Return to cmdhdl.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / cpm / src

Annotation of 43BSD/contrib/cpm/src/cmdhdl.c, revision 1.1.1.1

1.1       root        1: /*     cmdhdl.c        1.12    85/03/24        */
                      2: 
                      3: #include <ctype.h>
                      4: #include <stdio.h>
                      5: #include "cpmio.h"
                      6: 
                      7: /*
                      8:  * Write prompt to stdout.
                      9:  * Read command from stdin.
                     10:  * return the number of characters read.
                     11:  */
                     12: 
                     13: cmdinp(cmd)
                     14:        char cmd[];
                     15: {
                     16: 
                     17:        int cnt = 0;
                     18: 
                     19:        while (cnt == 0) {
                     20:                printf("cpm> ");
                     21:                while((cmd[cnt] = getchar()) != '\n') {
                     22:                        if (cmd[cnt] == EOF)
                     23:                                return(-1);
                     24:                        cnt++;
                     25:                }
                     26:                cmd[cnt] = '\0';
                     27:        }
                     28:        return (cnt);
                     29: }
                     30: 
                     31: /*
                     32:  * Compare the command pointed to by cmd to the table of defined
                     33:  * commands in defcmd, return the command index if found, null
                     34:  * otherwise.
                     35:  */
                     36: 
                     37: struct command {
                     38:        char *cmd;
                     39:        int  lth, abbr;
                     40: } defcmd[] = {
                     41:        "directory",    9,      1,              /* 1 */
                     42:        "rename",       6,      1,              /* 2 */
                     43:        "copyin",       6,      0,              /* 3 */
                     44:        "delete",       6,      1,              /* 4 */
                     45:        "erase",        5,      1,              /* 5 */
                     46:        "exit",         4,      1,              /* 6 */ 
                     47:        "type",         4,      1,              /* 7 */
                     48:        "help",         4,      1,              /* 8 */
                     49:        "ls ",          2,      0,              /* 9 */ 
                     50:        "logout",       6,      1,              /* 10 */        
                     51:        "ccopyin",      7,      0,              /* 11 */
                     52:        "ccopyout",     8,      0,              /* 12 */
                     53:        "copyout",      7,      0,              /* 13 */
                     54:        "dump",         4,      1,              /* 14 */
                     55:        /*"!! ",                2,      0,              /* 15 */
                     56:        '\0' , 0 };
                     57: 
                     58: chkcmd(cmd)
                     59:        char *cmd;
                     60: 
                     61: {
                     62:        int index, len;
                     63: 
                     64:        len = strlen(cmd);
                     65:        for (index=0; *defcmd[index].cmd != '\0' ; index++) {
                     66:                if ((len == 3) && defcmd[index].abbr) {
                     67:                        if (strncmp(defcmd[index].cmd, cmd, 3) == 0)
                     68:                                goto ok;
                     69:                } else {
                     70:                        if (strncmp(defcmd[index].cmd, cmd, defcmd[index].lth) 
                     71:                                                                        == 0)
                     72:                                goto ok;
                     73:                }
                     74:        }
                     75:        return (0);
                     76: 
                     77: ok:
                     78:        if (len > defcmd[index].lth)
                     79:                return (0);
                     80:        else
                     81:                return (++index);
                     82: }
                     83: 
                     84: help()
                     85: {
                     86: 
                     87:        FILE *fd, *fopen();
                     88:        int c;
                     89: 
                     90:        if ((fd = fopen(HELPFILE, "r")) == NULL)
                     91:                printf("Can't find help file (cpm.hlp) \n");
                     92:        else
                     93:                while ( (c = getc(fd)) != EOF) 
                     94:                        putchar(c);
                     95: }
                     96: 
                     97: 
                     98: /*
                     99:  * Separate fname into name and extension, return NULL if
                    100:  * bad file name, otherwise 1.
                    101:  */
                    102: 
                    103: namesep(fname, name, ext)
                    104:        char fname[], name[], ext[];
                    105: {
                    106: 
                    107:        int i = 0;
                    108: 
                    109:        strncpy(name, "         ", 9);
                    110:        strncpy(ext, "    ", 4);
                    111:        while(i<8 && !(iscntrl(fname[i])) && fname[i] != '.') {
                    112:                name[i] = fname[i];
                    113:                i++;
                    114:        }
                    115: #ifdef DEBUG
                    116:        printf("namesep: name=%s, len=%d ", name, i);
                    117: #endif
                    118:        clean(name, 8);
                    119:        if (fname[i] == '.') {
                    120:                strncpy(ext, fname+i+1, 3);
                    121:                clean(ext, 3);
                    122:        } else {
                    123:                if (fname[i] != ' ' && fname[i] != '\0') {
                    124:                        fprintf(stderr, "Illegal filename\n");
                    125:                        return (NULL);
                    126:                }
                    127:        }
                    128: #ifdef DEBUG
                    129:        printf("name: %s, ext: %s, combined: %s\n", name, ext,
                    130:                fixname(name, ext));
                    131: #endif
                    132:        if (!(isalnum(name[0]))) {
                    133:                fprintf(stderr, "Illegal filename\n");
                    134:                return(NULL);
                    135:        }
                    136:        return(1);
                    137: }
                    138: 
                    139: clean(str, len)
                    140: char str[];
                    141: int len;
                    142: {
                    143:        str[len] = '\0';
                    144:        while (len-- > 0) {
                    145:                if (!(isspace(str[len])) && !(iscntrl(str[len]))) break;
                    146:                str[len] = ' ';
                    147:        }
                    148:        while (len >= 0) {
                    149:                str[len] = islower(str[len]) ? toupper(str[len]):str[len] ;
                    150:                len--;
                    151:        }
                    152: }

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