Return to initmodem.c CVS log

Up to [MW Coherent from dump] / coherent / a / usr / bob / uusrc / modemcap

Annotation of coherent/a/usr/bob/uusrc/modemcap/initmodem.c, revision 1.1

1.1     ! root        1: #include "modemcap.h"
        !             2: 
        !             3: static char    f_names[] = "asditthc";
        !             4: static char    *f_caps[] = {
        !             5:        &AS, &DI, &TT, &HC
        !             6: };
        !             7: 
        !             8: static char    i_names[] = "bdblidad";
        !             9: static int     *i_caps[] = {
        !            10:        &BD, &BL, &ID, &AD
        !            11: };
        !            12: 
        !            13: static char    c_names[] = "cscedsdeiscoclathu";
        !            14: static char    **c_caps[] = {
        !            15:        &CS, &CE, &DS, &DE, &IS, &CO, &CL, &AT, &HU
        !            16: };
        !            17: 
        !            18: initmodem (modem, fd)
        !            19: char   *modem;                                 /* name of modem        */
        !            20: int    fd;                                     /* channel to modem     */
        !            21: {
        !            22:        static  char    mcapbuf[1024];
        !            23:        static  char    area[1024];
        !            24:        char    *ap = area;
        !            25:        register char   *cp;
        !            26:        register int    i, j;
        !            27:        char    *mgetstr ();
        !            28: 
        !            29:        if (mgetent (mcapbuf, modem) != 1)
        !            30:                return (0);
        !            31: 
        !            32:        for (i = 0, cp = f_names;*cp;i++, cp += 2)
        !            33:                *(f_caps[i]) = mgetflag (cp);
        !            34: 
        !            35:        for (i = 0, cp = i_names;*cp;i++, cp += 2)
        !            36:                *(i_caps[i]) = ((j=mgetnum(cp)) >= 0) ? j: 0;
        !            37: 
        !            38:        for (i = 0, cp = c_names;*cp;i++, cp += 2)
        !            39:                *(c_caps[i]) = mgetstr (cp, &ap);
        !            40: 
        !            41:        if (IS != (char *) 0) {
        !            42:                write (fd, IS, strlen (IS));
        !            43:                if (ID)
        !            44:                        sleep (ID);
        !            45:        }
        !            46:        return (1);
        !            47: }

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