Return to riotst.c CVS log

Up to [Synchronet] / sbbs / steve

Annotation of sbbs/steve/riotst.c, revision 1.1.1.1

1.1       root        1: #include <conio.h>
                      2: #include <stdio.h>
                      3: 
                      4: extern unsigned int riobp;
                      5: int rioini(int,int);
                      6: int setbaud(int);
                      7: int incom(void);
                      8: int outcom(int);
                      9: void bblst(void);
                     10: int dtr(int);
                     11: 
                     12: main() {
                     13:        unsigned int j,c,*pci;
                     14:        unsigned char *pc;
                     15:        directvideo=0;
                     16:        printf("rioini() returned %d, ",rioini(2,0)); /* com 3, irq 4 */
                     17:        printf("setbaud() returned %d\n",setbaud(2400));
                     18:        printf("b"); bblst();
                     19:        system("ios");
                     20:        outcs("\015ready\015\012");
                     21:        printf("\na"); bblst();
                     22:        printf("Any key to start, then escape exits, ");
                     23:        printf("backquote drops dtr, ctrl-r dials Rob.\n");
                     24:        while (!bioskey(1));    c=getch();
                     25:        printf("+"); bblst();
                     26:        while (1) {
                     27:                c=0;
                     28:                if (bioskey(1)) c=getch();
                     29:                if (c==0x1b) break;
                     30:                if (c==0x60) {
                     31:                        printf("\n*** dtr() returned %d\n",dtr(2)); c=0; }
                     32:                if (c==0x12) { outcs("atdt 17145299525\015"); c=0; }
                     33:                if (c==0x7e) {
                     34:                        outcsi("Here's a test string what tries to overf");
                     35:                        outcsi("low the transmit buffer, yessiree.\015");
                     36:                        c=0; }
                     37:                if (c) outcom(c);
                     38:                if ((c=incom())!=0x100) putch(c);
                     39:                 }
                     40:        printf("\n-"); bblst();
                     41:        printf("done\n");
                     42:        pci=&riobp; pc=pci; pc+=24; printf("rxb ");
                     43:        for (j=0; j<24; j++) printf("%02X ",0xff&*(pc+j));
                     44:        printf("\ntxb ");
                     45:        pc+=*(pci+5);
                     46:        for (j=0; j<24; j++) printf("%02X ",0xff&*(pc+j));
                     47:        printf("\n");
                     48:        outcs("ath\x0d");
                     49:        system("ios");
                     50:        rioini(0,0);
                     51: }
                     52: int outcs(char *str) {
                     53:        int i=0;
                     54:        while(str[i]!=0) outcom(str[i++]);
                     55: }
                     56: int outcsi(char *str) {
                     57:        int c,i=0;
                     58:        while(str[i]!=0) {
                     59:                outcom(str[i++]);
                     60:                if (i>4)
                     61:                        if ((c=incom())!=0x100) putch(c); }
                     62: }
                     63: void bblst(void) {
                     64:        unsigned int *pv;
                     65:        int i;
                     66:        pv=&riobp;
                     67:        printf("%Fp",pv);
                     68:        for (i=0; i<12; i++) printf(".%04X",*(pv+i));
                     69:        printf("\n");
                     70: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.