tincs让C语言在批处理中运行

happy886rr

TINCS.EXE
__________________________________________________________________________
一款采用TCCLIB库制作的C脚本解释器，体积不足60KB，但是能动态执行批处理中的
C语言源代码，且无需编译，无需主函数main()，任意函数随意呼，任意参数随意传。

该解释器无需库文件都可运行，当然如果没有库文件，很多函数需要自己去实现，如
果涉及到复杂的函数调用，建议将tcc或mingw的库文件include和lib文件夹拷贝至
tincs.exe的同目录。

约定：/|||为混编开始符，|||/为混编结束符；tincs将从/|||作为开始端执行脚本
__________________________________________________________________________

批处理C脚本解释器, 版本 1.0
使用：
        tincs -s [脚本名] -f [函数名] -v [传入参数]
__________________________________________________________________________
选项：
      -h  显示帮助
      -s  指定脚本文件
      -f  指定要调用的函数名
      -v  指定传入参数
__________________________________________________________________________
示例：

执行批处理脚本自身，呼叫strlen函数计算字符串“你好”的长度
tincs -s "%~f0" -f strlen -v "你好"

__________________________________________________________________________
英译：

THE PARSER OF C SCRIPT, VERSION 1.0
TINCS.EXE
COPYRIGHT@2016~2018 BY HAPPY
-------------------------------------------------------------------------
tincs -s [ScriptFile] -f [FunctionName] -v [Parameters]
-------------------------------------------------------------------------
      -h  Show help information
      -s  Specify the script file
      -f  Specifies the function name
      -v  Specifies the parameters
-------------------------------------------------------------------------

下载地址：图片存为a.zip解压即是

核心源码

1. #include <stdlib.h>
   
2. #include <stdio.h>
   
3. #include <stdarg.h>
   
4. #include <string.h>
   
5. #include <errno.h>
   
6. #include <math.h>
   
7. #include <unistd.h>
   
8. #include <signal.h>
   
9. #include <fcntl.h>
   
10. #include <setjmp.h>
    
11. #include <time.h>
    
12. 
    
13. //清自行添加tcc库文件
    
14. #include "libtcc.h"
    
15. 
    
16. // 行号修正量
    
17. int Amendment_LineNUM=0;
    
18. 
    
19. //C脚本函数
    
20. int RunCscript(char* RAMRead, const char* FunctionName, const char* CommandLine)
    
21. {
    
22.         TCCState *S;
    
23.         int (*fun)(const char*);
    
24.         int ExitCode;
    
25.         unsigned long VL;
    
26.         S=tcc_new();
    
27. 
    
28.         if(!S){
    
29.                 fprintf(stderr, "Error state\n");
    
30.                 exit(1);
    
31.         }
    
32. 
    
33.         tcc_set_output_type(S, 0);
    
34. 
    
35.         if(tcc_compile_string(S, RAMRead)==-1){
    
36.                 tcc_delete(S);
    
37.                 fprintf(stderr, "Error compile\n");
    
38.                 return -2;
    
39.         }
    
40. 
    
41.         tcc_add_symbol(S, "printf", (unsigned long)&printf);
    
42.         tcc_relocate(S);
    
43.        
    
44.         if(tcc_get_symbol(S, &VL, FunctionName)==-1){
    
45.                 tcc_delete(S);
    
46.                 fprintf(stderr, "Can't find the function name "%s"\n", FunctionName);
    
47.                 exit(1);       
    
48.         }
    
49.         fun=(void*)VL;
    
50.         ExitCode=fun(CommandLine);
    
51.        
    
52.         tcc_delete(S);
    
53.         exit(ExitCode);
    
54. }
    
55. 
    
56. //读取脚本
    
57. int FileScript(const char* ScriptFile, const char* CommandLine, const char* FunctionName)
    
58. {
    
59.         FILE* fp;
    
60.         if( (fp=fopen(ScriptFile, "rb"))==NULL ){
    
61.                 fputs("Read script file error\n", stdout);
    
62.                 exit(-1);
    
63.         }
    
64.        
    
65.         //流位参数
    
66.         long  ReadStart=0, ReadEnd=0;
    
67.         //行计数器
    
68.         int i=0;
    
69.         //行存放器
    
70.         char* LCache=(char*)tcc_malloc(4097*sizeof(char));
    
71.         //辅助行指针
    
72.         char* Line;
    
73. 
    
74.         while(!feof(fp)){
    
75.                 memset(LCache, 0,  4096*sizeof(char));
    
76.                 fgets(LCache, 4096, fp);
    
77. 
    
78.                 //指针置换
    
79.                 Line=LCache;
    
80. 
    
81.                 //行计数器
    
82.                 i++;
    
83. 
    
84.                 //过滤行TAB缩进或前空格
    
85.                 while(*Line=='\t'|| *Line==' '){Line++;}
    
86. 
    
87.                 //过滤注释符
    
88.                 if(Line[0]=='/' &&Line[1]=='/'){
    
89.                         continue;
    
90.                 }
    
91.                 //开始符
    
92.                 if(
    
93.                         (Line[0]=='/') &&
    
94.                         (Line[1]=='|') &&
    
95.                         (Line[2]=='|') &&
    
96.                         (Line[3]=='|')
    
97.                 ){
    
98.                         //获取起点流位
    
99.                         ReadStart=ftell(fp);
    
100.                         //提取行号修正量
     
101.                         Amendment_LineNUM=i;
     
102. 
     
103.                 //结束符               
     
104.                 }else if(
     
105.                         (Line[0]=='|') &&
     
106.                         (Line[1]=='|') &&
     
107.                         (Line[2]=='|') &&
     
108.                         (Line[3]=='/')
     
109.                 ){
     
110.                         break;
     
111.                 }
     
112.         }
     
113. 
     
114.         //无法识别宏标签则退出
     
115.         if(ReadStart==0){exit(-2);}
     
116.        
     
117.         //计算结束位置
     
118.         ReadEnd=ftell(fp)-strlen(LCache);
     
119.         tcc_free(LCache);
     
120.        
     
121.         //脚本分离，读入内存
     
122.         char* RAMRead=(char*)tcc_malloc((ReadEnd-ReadStart+1)*sizeof(char));
     
123.         fseek(fp, ReadStart, SEEK_SET);
     
124.         fread(RAMRead, ReadEnd-ReadStart, 1, fp);
     
125.         fclose(fp);
     
126.        
     
127.         //RAMRead为空则退出
     
128.         if(RAMRead==NULL){
     
129.                 fprintf(stderr, "Error script string!\n");
     
130.                 exit(-3);
     
131.         }
     
132. 
     
133.         RAMRead[ReadEnd-ReadStart]='\0';
     
134.         RunCscript(RAMRead, FunctionName, CommandLine);
     
135.         tcc_free(RAMRead);
     
136.         return 0;
     
137. }
     
138. 
     
139. /*************MAIN主函数入口*************/
     
140. int main(int argc, char** argv)
     
141. {
     
142.         if(
     
143.                 (argc      == 7                  ) &&
     
144.                 (argv[1][0]=='-'                 ) &&
     
145.                 (argv[1][1]=='s'||argv[1][1]=='S') &&
     
146.                 (argv[3][0]=='-'                 ) &&
     
147.                 (argv[3][1]=='f'||argv[3][1]=='F') &&
     
148.                 (argv[5][0]=='-'                 ) &&
     
149.                 (argv[5][1]=='v'||argv[5][1]=='V')
     
150.         ){       
     
151.                 char TCC_CUR_path[MAX_PATH]={0};
     
152.                 GetModuleFileName(NULL,TCC_CUR_path,MAX_PATH);
     
153.                 *(strrchr( TCC_CUR_path, '\\')+1) = 0;
     
154.                 tcc_lib_path=TCC_CUR_path;
     
155.                 FileScript(argv[2], argv[6], argv[4]);
     
156.                 return 0;
     
157.         }
     
158.         //异常则抛出使用说明
     
159.         fputs(
     
160.                 "THE PARSER OF C SCRIPT, VERSION 1.0\n"
     
161.                 "TINCS.EXE\n"
     
162.                 "COPYRIGHT@2016~2018 BY HAPPY\n"
     
163.                 "-------------------------------------------------------------------------\n"
     
164.                 "tincs -s [ScriptFile] -f [FunctionName] -v [Parameters]\n"
     
165.                 "-------------------------------------------------------------------------\n"
     
166.                 "      -h  Show help information\n"
     
167.                 "      -s  Specify the script file\n"
     
168.                 "      -f  Specifies the function name\n"
     
169.                 "      -v  Specifies the parameters\n"
     
170.                 "-------------------------------------------------------------------------\n"
     
171.                 "2016/11/23\n"
     
172.                 ,stdout
     
173.         );
     
174.         return -1;
     
175. }
     

复制代码

调用演示

1. @echo off
   
2. copy /b 1.png + 1.zip 3.png
   
3. pause
   
4. exit
   
5. 
   
6. REM CMD与C脚本混编，计算一首诗的汉字个数
   
7. REM 诗的内容存入字符串string里
   
8. 
   
9. set string=^
   
10. 《春庭晚望》^
    
11. 春庭聊纵望，楼台自相隐。^
    
12. 窗梅落晚花，池竹开初荀。^
    
13. 泉鸣知水急，云来觉山近。^
    
14. 不愁花不飞，到畏花飞尽。
    
15. 
    
16. ::***************************************************************************
    
17. echo;格式： tincs -s [脚本路径] -f [入口函数] -v [传入参数]
    
18. echo;
    
19. 
    
20. ::***************************************************************************
    
21. echo 小写转大写
    
22. tincs -s "%~f0" -f strupr  -v "Youth means a temperamental predominance of courage over timidity, of the appetite for adventure over the love of ease"
    
23. echo;&echo;
    
24. ::***************************************************************************
    
25. tincs -s "%~f0" -f strlenA -v  %string%
    
26. echo;这首诗共计%errorlevel%个汉字：%string%
    
27. pause>NUL&exit /b
    
28. ::***************************************************************************
    
29. 
    
30. 
    
31. /|||
    
32. 
    
33. int strlenA(const char* str)
    
34. {
    
35.         int i=0;
    
36.         unsigned char* p=(unsigned char*)str;
    
37.         while(*p!='\0'){
    
38.                 if(*p++>0x7F){*p++;}
    
39.                 i++;
    
40.         }
    
41.         return i;
    
42. }
    
43. 
    
44. void strupr(const char *str)
    
45. {
    
46.         int i=0;
    
47.         unsigned char* p=(unsigned char*)str;
    
48.         while(*p!='\0'){
    
49.                 *p=('a'<=*p && *p<='z')?*p-32:*p;
    
50.                 printf("%c", *p++);
    
51.         }       
    
52.         return;
    
53. }
    
54. 
    
55. |||/
    

复制代码

如果嫌可用函数太少，可将tcc或mingw的库文件直接拖过来用，可动态解释更广泛的C源代码。

zhangzsky

虽然不会C，但知道这又是一个很牛的开始

ads350668398

批处理可以更强大了 这样是me

happy886rr

回复 3# ads350668398
这只是开始，之后我将再发个贴，让你看到批处理如何实现网页中的图片翻转，拉伸旋转等js特效，基本70%的网页js特效都能在批处理黑黑的控制台下实现。完全颠覆你对批处理的认识。

用批处理制作带音乐的动感相册，将会是分分钟的事。几行批文就实现。这个第三方我还在编写中，马上完成。

codegay

作品好多。进步好快。

happy886rr

回复 5# codegay
多谢兄的夸奖，我才学会结构体怎么用，学会指针是啥了。

yu2n

下载地址：图片存为a.zip解压即是

7-Zip 表示根本不认识你家的 .zip ，这明明是 .rar 。

happy886rr

回复 7# yu2n
哈哈，7z是lzma，默认它没有WinRAR的兼容头，偏移量不对，7z可作为#解压。一般WinRAR是主流，支持这种copy /b的解压。7z注重压缩算法，lz77变种算法。