标题: [推荐] BAT转COM的C语言源程序 [打印本页]

---

作者: JonePeng     时间: 2004-8-23 00:00    标题: [推荐] BAT转COM的C语言源程序

最近我发现了一个把BAT文件转成COM的C语言原代码，编译后效果不错，转换后的COM文件比BAT2COM转换的要小得多，执行效率也更快。为了尊重原作者的创作权，在此不列出源程序，请光临他的网站：http://member.netease.com/~gmounto/cpro/BAT2COM.html

---

作者: Kinglion     时间: 2004-8-26 00:00
支持原创作品!

---

作者: JonePeng     时间: 2006-5-4 21:56
坛友wang6610今天提醒我 1 楼的链接已经失效，可能原链接更改或者因作者没有付费而空间被关闭。幸好我有源程序的备份，现在贴出来供大家学习和研究。

---

作者: wang6610     时间: 2006-5-5 05:46
谢谢JonePeng！！！

---

作者: chineselgs     时间: 2006-5-6 15:24    标题: 晕,这个网站怎么打不开啊??

---

作者: 272922032     时间: 2006-5-8 07:02    标题: 程序有1个错误,无法编译

---

作者: home     时间: 2006-5-22 21:35
源程序清单
/*************************************************************/
/* 程序名称: BAT2COM.C 1.50 */
/* 作 者: 董占山 */
/* 完成日期: 1993,1995 */
/* 用 途: 将批处理文件(.bat)转换为命令文件(.COM) */
/* 编译方法: 用下列命令编译连接可以得到BAT2COM.COM: */
/* tcc -mt bat2com */
/* tlink c:\tc\lib\c0t+bat2com,bat2com,,c:\tc\lib\cs\lib /t */
/*************************************************************/

#include <stdio.h>
#include <string.h>

/* 生成命令文件的头部,包含调用2EH的机器指令 */
char bat2comhead[81] = {
0xBB,0x00,0x10,0xB4,0x4A,0xCD,0x21,0x0E,0x1F,0x2E,
0x8B,0x0E,0x51,0x01,0xBE,0x51,0x01,0x8B,0xC6,0x50,
0x5B,0x51,0x83,0xC3,0x02,0x8B,0xF3,0x33,0xDB,0x8A,
0x1C,0x53,0x56,0x2E,0x8C,0x16,0x4D,0x01,0x2E,0x89,
0x26,0x4F,0x01,0xCD,0x2E,0x0E,0x1F,0x2E,0x8B,0x26,
0x4F,0x01,0x2E,0x8E,0x16,0x4D,0x01,0x58,0x5B,0x59,
0x03,0xC3,0x50,0x83,0xE9,0x01,0x83,0xF9,0x00,0x75,
0xCD,0xB8,0x00,0x4C,0xCD,0x21,0xC3,0x00,0x00,0x00,
0x00};

int totallength; /* 所生成文件的总长度 */
char buffer[10000]; /* 生成命令文件的缓冲区 */

/* 删除批命令中的无意义的前导空格函数 */
void removespace(str1)
char *str1;
{
unsigned int i=0;
char *str2;
str2=str1; /* str2指向str1的地址 */
if ((str1==' ') && (i==0))
{
++str1; /* str1地址加1 */
movmem(str1,str2,strlen(str1)+1); /* 删除一个前导空格 */
removespace(str2); /* 递归调用此函数 */
}
}

/* 将批命令中的"%%"改为"%"的函数 */
void removedouble(str1)
char *str1;
{
unsigned int j,i=0;
char *str2;
str2=str1; /* str2指向str1的地址 */
if ((str1=='%') && (str1[++i]=='%'))
{
--i;
for (j=0;j<i;j++) {
++str1;++str2;
}
++str1;
movmem(str1,str2,strlen(str1)+1); /* 删除一个'%'字符 */
removedouble(str2); /* 递归调用此函数 */
}
}

/* 删除批命令中的"@"符号函数 */
void removeatchar(str1)
char *str1;
{
char *str2;
str2=str1; /* str2指向str1的地址 */
if (str1[0]=='@')
{
++str1;
movmem(str1,str2,strlen(str1)+1); /* 删除字符'@' */
}
}

/* 转换所有的批命令,并写入缓冲区 */
void transfer(flnm)
char *flnm;
{
unsigned int i, cmnum=0;
char strlen1,ch,str1[256],*p,*cm;
FILE *txtfl;
if ((txtfl=fopen(flnm,"r"))==NULL) {
printf("Input file is not found !");
exit(0);
}
p = buffer; /* p指向缓冲区的开始地址 */
for (i=0;i<81;++i) *p++=bat2comhead; /* 将命令文件头写入缓冲区 */
ch = 0x0d; /* 回车符 */
totallength = 83; /* 命令文件头加2个字节的总长度 */
for (i=0;i<2;i++) p++; /* p指针相前移动2个字节 */
do {
fgets(str1,256,txtfl); /* 从批文件中读一条命令 */
removespace(str1); /* 删除前导空格 */
removedouble(str1); /* 将"%%"改为"%" */
removeatchar(str1); /* 删除"@"字符 */
strlen1 = strlen(str1); /* 计算命令串长度 */
if (strlen1>2) { /* 合法命令? */
++cmnum; /* 命令数加1 */
*p++ = strlen1-1; /* 把命令长度写入缓冲区 */
++totallength; /* 命令文件总长度加1 */
for (i=0;i<strlen1-1;++i) *p++ = str1; /* 将命令串写入缓冲区 */
totallength += strlen1-1; /* 命令文件总长度加上命令串长度 */
*p++=ch; /* 写入一个回车符 */
++totallength; /* 命令文件总长度加1 */
strcpy(str1,""); /* 清除命令字符串内容 */
}
} while (!feof(txtfl)); /* 是文件尾吗 ? */
cm = &cmnum; /* 写入命令个数 */
buffer[81] = *cm++;
buffer[80] = *cm;
fclose(txtfl); /* 关闭文件 */
}

/* 将构造好的缓冲区内容写入命令文件 */
void writeBAT2COM(flnm)
char *flnm;
{
FILE *bfl;
unsigned int i;
char drive[3],dir[65],name[9],ext[5];
fnsplit(flnm,drive,dir,name,ext);
strcat(name,".com");
if ((bfl=fopen(name,"wb"))==NULL) { /* 建立并打开一个二进制文件 */
printf("File does not opened !");
exit(1);
}
fwrite(buffer,totallength,1,bfl); /* 写缓冲区的内容 */
/* for (i=0;i<totallength;++i) fprintf(bfl,"%c",buffer); */
/* for (i=0;i<totallength;++i) fputc(buffer,bfl); */
fclose(bfl);
}

/* 帮助函数 */
void help()
{
printf("\nSyntex : B2C Batch_filename");
exit(0);
}

/* 主函数 */
main(argc,argv)
int argc;
char *argv[];
{
char flnm[80];
printf("\nB2C Version 1.0 Copyright (c) 1993,94 Dong Zhanshan");
switch (argc) {
case 1 : help();break;
case 2 : strcpy(flnm,argv[1]);break;
default: help();
}
transfer(flnm);
writeBAT2COM(flnm);
}




大家看看这个,是不是

---

作者: qylml     时间: 2006-6-14 16:49
学习中ing.....
:)

---

作者: wang6610     时间: 2006-8-13 15:55
/*************************************************************/
/*  程序名称: BAT2COM.C 1.50                                 */
/*  作    者: 董占山                                         */
/*  完成日期: 1993,1995                                      */
/*  用    途: 将批处理文件(.bat)转换为命令文件(.COM)         */
/*  编译方法: 用下列命令编译连接可以得到BAT2COM.COM:         */
/*  tcc -mt bat2com                                          */
/*  tlink c:\tc\lib\c0t+bat2com,bat2com,,c:\tc\lib\cs\lib /t */
/*************************************************************/

#include <stdio.h>
#include <string.h>

/* 生成命令文件的头部,包含调用2EH的机器指令 */
char bat2comhead[81] = {
    0xBB,0x00,0x10,0xB4,0x4A,0xCD,0x21,0x0E,0x1F,0x2E,
    0x8B,0x0E,0x51,0x01,0xBE,0x51,0x01,0x8B,0xC6,0x50,
    0x5B,0x51,0x83,0xC3,0x02,0x8B,0xF3,0x33,0xDB,0x8A,
    0x1C,0x53,0x56,0x2E,0x8C,0x16,0x4D,0x01,0x2E,0x89,
    0x26,0x4F,0x01,0xCD,0x2E,0x0E,0x1F,0x2E,0x8B,0x26,
    0x4F,0x01,0x2E,0x8E,0x16,0x4D,0x01,0x58,0x5B,0x59,
    0x03,0xC3,0x50,0x83,0xE9,0x01,0x83,0xF9,0x00,0x75,
    0xCD,0xB8,0x00,0x4C,0xCD,0x21,0xC3,0x00,0x00,0x00,
    0x00};

int totallength;    /* 所生成文件的总长度 */
char buffer[10000]; /* 生成命令文件的缓冲区 */

/* 删除批命令中的无意义的前导空格函数 */
void removespace(str1)
char *str1;
{
  unsigned int i=0;
  char *str2;
  str2=str1; /* str2指向str1的地址 */
  if ((str1[i]==' ') && (i==0))
     {
     ++str1; /* str1地址加1 */
     movmem(str1,str2,strlen(str1)+1);  /* 删除一个前导空格 */
     removespace(str2);  /* 递归调用此函数 */
     }
}

/* 将批命令中的"%%"改为"%"的函数 */
void removedouble(str1)
char *str1;
{
  unsigned int j,i=0;
  char *str2;
  str2=str1; /* str2指向str1的地址 */
  if ((str1[i]=='%') && (str1[++i]=='%'))
     {
     --i;
     for (j=0;j<i;j++) {
       ++str1;++str2;
       }
     ++str1;
     movmem(str1,str2,strlen(str1)+1);  /* 删除一个'%'字符 */
     removedouble(str2);  /* 递归调用此函数 */
     }
}

/* 删除批命令中的"@"符号函数 */
void removeatchar(str1)
char *str1;
{
  char *str2;
  str2=str1; /* str2指向str1的地址 */
  if (str1[0]=='@')
     {
     ++str1;
     movmem(str1,str2,strlen(str1)+1);  /* 删除字符'@' */
     }
}

/* 转换所有的批命令,并写入缓冲区 */
void transfer(flnm)
char *flnm;
{
   unsigned int i, cmnum=0;
   char strlen1,ch,str1[256],*p,*cm;
   FILE *txtfl;
   if ((txtfl=fopen(flnm,"r"))==NULL) {
      printf("Input file is not found !");
      exit(0);
      }
   p = buffer; /* p指向缓冲区的开始地址 */
   for (i=0;i<81;++i) *p++=bat2comhead[i]; /* 将命令文件头写入缓冲区 */
   ch = 0x0d; /* 回车符 */
   totallength = 83; /* 命令文件头加2个字节的总长度 */
   for (i=0;i<2;i++) p++; /* p指针相前移动2个字节 */
   do {
     fgets(str1,256,txtfl); /* 从批文件中读一条命令 */
     removespace(str1);     /* 删除前导空格 */
     removedouble(str1);    /* 将"%%"改为"%" */
     removeatchar(str1);    /* 删除"@"字符 */
     strlen1 = strlen(str1);  /* 计算命令串长度 */
     if (strlen1>2) {       /* 合法命令? */
       ++cmnum;                    /* 命令数加1 */
       *p++ = strlen1-1;    /* 把命令长度写入缓冲区 */
       ++totallength;       /* 命令文件总长度加1 */
       for (i=0;i<strlen1-1;++i) *p++ = str1[i]; /* 将命令串写入缓冲区 */
       totallength += strlen1-1;  /* 命令文件总长度加上命令串长度 */
       *p++=ch;  /* 写入一个回车符 */
       ++totallength; /* 命令文件总长度加1 */
       strcpy(str1,""); /* 清除命令字符串内容 */
       }
   } while (!feof(txtfl)); /* 是文件尾吗 ? */
   cm = &cmnum; /* 写入命令个数 */
   buffer[81] = *cm++;
   buffer[80] = *cm;
   fclose(txtfl); /* 关闭文件 */
}

/* 将构造好的缓冲区内容写入命令文件 */
void writeBAT2COM(flnm)
char *flnm;
{
  FILE *bfl;
  unsigned int i;
  char drive[3],dir[65],name[9],ext[5];
  fnsplit(flnm,drive,dir,name,ext);
  strcat(name,".com");
  if ((bfl=fopen(name,"wb"))==NULL) { /* 建立并打开一个二进制文件 */
     printf("File does not opened !");
     exit(1);
     }
    fwrite(buffer,totallength,1,bfl); /* 写缓冲区的内容 */
/*  for (i=0;i<totallength;++i) fprintf(bfl,"%c",buffer[i]); */
/*  for (i=0;i<totallength;++i) fputc(buffer[i],bfl); */
  fclose(bfl);
}

/* 帮助函数 */
void help()
{
  printf("\nSyntex : B2C Batch_filename");
  exit(0);
}

/* 主函数 */
main(argc,argv)
int argc;
char *argv[];
{
   char flnm[80];
   printf("\nB2C Version 1.0 Copyright (c) 1993,94 Dong Zhanshan");
   switch (argc) {
     case 1 : help();break;
     case 2 : strcpy(flnm,argv[1]);break;
     default: help();
  }
  transfer(flnm);
  writeBAT2COM(flnm);
}

---

作者: NaturalJ0     时间: 2006-8-15 00:58
编译失败了，请高手指点一下。非常感谢。

---

作者: mornsmile     时间: 2006-8-16 08:11
.........................

http://zhenlove.com.cn/cndos/fileup/files/b2c.rar

---

作者: redtek     时间: 2007-2-8 07:23
精彩！！！收藏～～～

---

作者: anqing     时间: 2007-2-8 08:13
谢谢

---

作者: wang6610     时间: 2007-6-25 16:23
C:\TC>tcc -mt bat2com
Turbo C  Version 2.0  Copyright (c) 1987, 1988 Borland International
bat2com.c:
Error bat2com.c 11: Unable to open include file 'stdio.h'
Error bat2com.c 12: Unable to open include file 'string.h'
Error bat2com.c 82: Undefined symbol 'FILE' in function transfer
Error bat2com.c 82: Undefined symbol 'txtfl' in function transfer
Warning bat2com.c 82: Code has no effect in function transfer
Error bat2com.c 83: Undefined symbol 'NULL' in function transfer
Warning bat2com.c 109: Suspicious pointer conversion in function transfer
Error bat2com.c 119: Undefined symbol 'FILE' in function writeBAT2COM
Error bat2com.c 119: Undefined symbol 'bfl' in function writeBAT2COM
Warning bat2com.c 119: Code has no effect in function writeBAT2COM
Error bat2com.c 120: Expression syntax in function writeBAT2COM
Error bat2com.c 121: Expression syntax in function writeBAT2COM
Error bat2com.c 122: Undefined symbol 'drive' in function writeBAT2COM
Error bat2com.c 122: Undefined symbol 'dir' in function writeBAT2COM
Error bat2com.c 122: Undefined symbol 'name' in function writeBAT2COM
Error bat2com.c 122: Undefined symbol 'ext' in function writeBAT2COM
Error bat2com.c 124: Undefined symbol 'NULL' in function writeBAT2COM
*** 14 errors in Compile ***

        Available memory 400928

---

作者: duanml     时间: 2007-6-25 17:21
编译环境不对，stdio.h都找不到~