开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 通讯/手机编程 > 串口编程 > 查看源码
COMTEST.C
资源名称：COMTEST.rar　[点击查看]
上传用户：wyswfw
上传日期：2007-05-18
资源大小：2k
文件大小：7k
源码类别：

串口编程

开发平台：

DOS

COMTEST.C：源码内容
  1. #include<process.h>
  2. #include<stdlib.h>
  3. #include<stdio.h>
  4. #include<dos.h>
  5. #include<conio.h>
  6. #include<string.h>
  7. #include<bios.h>
  9. int flag=0,g,t=0,tt,t1=0,irq,irqnum,irqreg,irqs,irqe;
  10. unsigned int tport;
  11. int i,ti,loop=30;
  12. void interrupt far new_int();
  13. void interrupt(*old_int)();
  16. int dd(char a)
  17. {
  18.    if(a == '0')  return 0;
  19.    else if(a == '1') return 1;
  20.    else if(a == '2') return 2;
  21.    else if(a == '3') return 3;
  22.    else if(a == '4') return 4;
  23.    else if(a == '5') return 5;
  24.    else if(a == '6') return 6;
  25.    else if(a == '7') return 7;
  26.    else if(a == '8') return 8;
  27.    else if(a == '9') return 9;
  28.    else if(a == 'a' || a == 'A') return 10;
  29.    else if(a == 'b' || a == 'B') return 11;
  30.    else if(a == 'c' || a == 'C') return 12;
  31.    else if(a == 'd' || a == 'D') return 13;
  32.    else if(a == 'e' || a == 'E') return 14;
  33.    else if(a == 'f' || a == 'F') return 15;
  34.    else return -1;
  35. }
  39.   /*  Disable interrupt  */
  41. void Close_Rece()
  42. {
  44.     disable();
  45. outportb(tport+1,0);
  46. outportb(tport+4,0);
  47. outportb(irqreg,inportb(irqreg)|irqe);
  48.     enable();
  49.     setvect(irqnum,old_int);
  50. }
  54.       /*  Interrupt subprogramm  */
  56. void interrupt far new_int()
  57. {
  58.    flag=1;
  59.    g=inportb(tport) & 0xff;
  61.    outportb(0x20,0x20);
  62.    outportb(0xa0,0x20);
  63. }
  65.     /*  Interrupt receive  */
  67. void Inter_Rece()
  69. irqnum=0x71;
  70. irqreg=0xa1;
  71. irqs=0xfd;
  72. irqe=0x02;
  74. {
  75. old_int=getvect(irqnum);
  76. disable();
  77. outportb(irqreg,inportb(irqreg) & irqs);
  78. setvect(irqnum,new_int);
  79. enable();
  80. }
  83. main(argc,argv)
  84. int argc;
  85. char *argv[];
  86. {
  87.   int z=0,z1;
  88.   int st,st1,st2,st3,st4,ik,r;
  89.   int st1flag=0,st2flag=0,st3flag=0,st4flag=0;
  90.   int tiflag=0;
  91.   if(argc==1){
  92.   printf("Serial port test kit for all pin.nr");
  93.   printf("You can choice RS232 or RS422 port to test.nr");
  94.   printf("Usage:n  COMTEST [port address(hex)] [IRQ number(dec)]");
  95.   printf("nPress comtest/? to show more help screen.");
  96.   exit(0);
  97.  }
  99.   else if(argc>4){
  100.  printf("Parameter Error!");
  101.  printf("nPress comtest to show help screen.");
  102.  printf("nPress comtest/? to show more help screen.");
  103.  exit(0);
  104.  }
  106.   if((argv[1][0] == '/') && (argv[1][1] == '?'))
  107.   {
  108.  printf("Serial port test kit for all pin.nr");
  109.  printf("You can choice RS232 or RS422 port to test.nr");
  110.  printf("Usage:n  COMTEST [port address(hex)] [IRQ number(dec)]");
  111.  printf("nRS232 Loop Back Box:");
  112.  printf("n      RTS - CTS - DCD");
  113.  printf("n      TXD - RXD");
  114.  printf("n      DTR - DSR - RI");
  115.  printf("nRS422 Loop Back Box:");
  116.  printf("n      TX+ - RX+");
  117.  printf("n      TX- - RX-");
  118.  exit(0);
  119.   }
  120.   tport=dd(argv[1][0])*256+dd(argv[1][1])*16+dd(argv[1][2]);
  121.   if(!(tport>=0x100 && tport<=0x400))
  122.   {
  123.  printf("Parameter Error!");
  124.  printf("nPress comtest to show help screen.");
  125.  printf("nPress comtest/? to show more help screen.");
  126.  exit(0);
  127.   }
  129.   z=dd(argv[2][0]);
  130.   z1=dd(argv[2][1]);
  132.   if(z == 1)
  133.   {
  134. if(z1 == 0) irq=10;
  135. else if(z1 == 1) irq=11;
  136. else if(z1 == 2) irq=12;
  137. else if(z1 == 5) irq=15;
  138.   }
  139.   else  irq=z;
  141.   if(irq == 2)
  142.   {
  143.     irqnum=0x0a;
  144.     irqreg=0x21;
  145.     irqs=0xfb;
  146.     irqe=0x04;
  147.   }
  148.   else if(irq == 3)
  149.   {
  150.     irqnum=0x0b;
  151.     irqreg=0x21;
  152.     irqs=0xf7;
  153.     irqe=0x08;
  154.   }
  155.   else if(irq == 4)
  156.   {
  157.     irqnum=0x0c;
  158.     irqreg=0x21;
  159.     irqs=0xef;
  160.     irqe=0x10;
  161.   }
  162.   else if(irq == 5)
  163.   {
  164.     irqnum=0x0d;
  165.     irqreg=0x21;
  166.     irqs=0xdf;
  167.     irqe=0x20;
  168.   }
  169.   else if(irq == 6)
  170.   {
  171.     irqnum=0x0e;
  172.     irqreg=0x21;
  173.     irqs=0xbf;
  174.     irqe=0x40;
  175.   }
  176.   else if(irq == 7)
  177.   {
  178.     irqnum=0x0f;
  179.     irqreg=0x21;
  180.     irqs=0x7f;
  181.     irqe=0x80;
  182.   }
  183.   else if(irq == 9)
  184.   {
  185. irqnum=0x71;
  186. irqreg=0xa1;
  187. irqs=0xfd;
  188. irqe=0x02;
  189.   }
  190.   else if(irq == 10)
  191.   {
  192.     irqnum=0x72;
  193.     irqreg=0xa1;
  194.     irqs=0xfb;
  195. irqe=0x04;
  196.   }
  197.   else if(irq == 11)
  198.   {
  199.     irqnum=0x73;
  200.     irqreg=0xa1;
  201.     irqs=0xf7;
  202.     irqe=0x08;
  203.   }
  204.   else if(irq == 12)
  205.   {
  206.     irqnum=0x74;
  207.     irqreg=0xa1;
  208.     irqs=0xef;
  209.     irqe=0x10;
  210.   }
  211.   else if(irq == 15)
  212.   {
  213.     irqnum=0x77;
  214.     irqreg=0xa1;
  215.     irqs=0x7f;
  216.     irqe=0x80;
  217.   }
  219.   outportb(tport+3,0x80);
  220.   outportb(tport,0x01);
  221.   outportb(tport+1,0x00);
  222.   outportb(tport+3,0x03);
  223.   outportb(tport+4,0x0b);
  224.   outportb(tport+1,0x01);
  226.   clrscr();
  227.   gotoxy(2,2);
  228.   cprintf(" Serial port loop back tester (RS232 or RS422)       Ver:1.0");
  229.   gotoxy(2,4);
  230.   cprintf(" PORT:");
  231.   gotoxy(12,4);
  232.   if(z > 0)
  233.   cprintf(" IRQ:");
  234.   gotoxy(8,4);
  235.   textcolor(CYAN);
  236.   cprintf(" %X",tport);
  237.   if(z > 0)
  238.   {
  239. gotoxy(17,4);
  240. cprintf(" %d",irq);
  241.   }
  242.   for(ik=0;ik<10;ik++)
  243.   {
  244.   outportb(tport+4,0x0b);
  245.   gotoxy(10,5);
  246.   textcolor(CYAN);
  247.   cprintf("nr             /DCD      /RI      /DSR      /CTS");
  248.   st=inportb(tport+6) & 0xff;
  249.   st1=(st & 0x80)>>7;
  250.   st2=(st & 0x40)>>6;
  251.   st3=(st & 0x20)>>5;
  252.   st4=(st & 0x10)>>4;
  253.   textcolor(GREEN);
  254.   cprintf("nr              %d         %d         %d         %d",st1,st2,st3,st4);
  255.   if(st1 != 1) st1flag=1;
  256.   if(st2 != 1) st2flag=1;
  257.   if(st3 != 1) st3flag=1;
  258.   if(st4 != 1) st4flag=1;
  259.   outportb(tport+4,0x08);
  260.   textcolor(CYAN);
  261.   cprintf("nr             /DCD      /RI      /DSR      /CTS");
  262.   st=inportb(tport+6) & 0xff;
  263.   st1=(st & 0x80)>>7;
  264.   st2=(st & 0x40)>>6;
  265.   st3=(st & 0x20)>>5;
  266.   st4=(st & 0x10)>>4;
  267.   textcolor(GREEN);
  268.   cprintf("nr              %d         %d         %d         %dn",st1,st2,st3,st4);
  269.   if(st1 != 0) st1flag=1;
  270.   if(st2 != 0) st2flag=1;
  271.   if(st3 != 0) st3flag=1;
  272.   if(st4 != 0) st4flag=1;
  273.   }
  274.   if(st1flag == 1)  {  textcolor(BLINK|RED); gotoxy(13,10); cprintf("ERROR"); }
  275.   else              {  textcolor(YELLOW);gotoxy(13,10); cprintf("PASS");  }
  276.   if(st2flag == 1)  {  textcolor(BLINK|RED); gotoxy(23,10); cprintf("ERROR"); }
  277.   else              {  textcolor(YELLOW);gotoxy(23,10); cprintf("PASS");  }
  278.   if(st3flag == 1)  {  textcolor(BLINK|RED); gotoxy(33,10); cprintf("ERROR"); }
  279.   else              {  textcolor(YELLOW);gotoxy(33,10); cprintf("PASS");  }
  280.   if(st4flag == 1)  {  textcolor(BLINK|RED); gotoxy(43,10); cprintf("ERROR"); }
  281.   else              {  textcolor(YELLOW);gotoxy(43,10); cprintf("PASS");  }
  283.   if((inportb(tport+5) & 0x01) == 1)
  284.   {
  285.      inportb(tport);
  286.   }
  288.   t=0;
  289.   gotoxy(2,13);
  290.   textcolor(CYAN);
  291.   cprintf("Check:");
  292.   textcolor(GREEN);
  293.   for(i=0;i<loop;i++)
  294.   {
  295. gotoxy(12,13);
  296. for(ik=0;ik<25;ik++)
  297. {
  298.   outportb(tport,t);
  299. /*   while((inportb(tport+5) & 0x40) != 0x40);  */
  300.   ti=t++;
  301.   if(t>255) t=0;
  302.   delay(10);
  303.   if((inportb(tport+5) & 0x01) == 1)
  304.   {
  305. r=inportb(tport);
  306. cprintf("%2X",r);
  307. if(r != ti) { tiflag=1; break; }
  308.   }
  309.   else
  310.   {
  311. tiflag=1; break;
  312.   }
  313. }
  314.    }
  315.    gotoxy(65,13);
  316.    if(tiflag == 0) { textcolor(YELLOW); cprintf("  PASS"); }
  317.    else            { textcolor(BLINK|RED); cprintf("  ERROR");}
  319.   Inter_Rece();
  321.   if(z > 0)
  322.   {
  323.    tiflag=0;
  324.    t=0;
  325.    gotoxy(1,15);
  326.    textcolor(CYAN);
  327.    cprintf("Interrupt:");
  328.    textcolor(GREEN);
  329.    for(i=0;i<loop;i++)
  330.    {
  331. gotoxy(12,15);
  332. for(ik=0;ik<25;ik++)
  333. {
  334.   outportb(tport,t);
  335.   ti=t++;
  336.   if(t>255) t=0;
  337.   delay(10);
  338.   if(flag == 1)
  339.   {
  340. flag=0;
  341. cprintf("%2X",g);
  342. if(g != ti) { tiflag=1; break; }
  343.   }
  344.   else
  345.   {
  346. tiflag=1; break;
  347.   }
  349.  }
  350. }
  351. gotoxy(65,15);
  352. if(tiflag == 0) { textcolor(YELLOW); cprintf("  PASS"); }
  353. else            { textcolor(BLINK|RED); cprintf("  ERROR");}
  354.    }
  355.    Close_Rece();
  356. }