Return to learn.c CVS log

Up to [CSRG BSD Unix] / 42BSD / usr.bin / learn

Annotation of 42BSD/usr.bin/learn/learn.c, revision 1.1.1.1

1.1       root        1: #ifndef lint
                      2: static char sccsid[] = "@(#)learn.c    4.2     (Berkeley)      4/27/83";
                      3: #endif not lint
                      4: 
                      5: #include "stdio.h"
                      6: #include "lrnref.h"
                      7: #include "signal.h"
                      8: 
                      9: char   *direct = "/usr/lib/learn";     /* CHANGE THIS ON YOUR SYSTEM */
                     10: int    more;
                     11: char   *level;
                     12: int    speed;
                     13: char   *sname;
                     14: char   *todo;
                     15: FILE   *incopy = NULL;
                     16: int    didok;
                     17: int    sequence        = 1;
                     18: int    comfile = -1;
                     19: int    status;
                     20: int    wrong;
                     21: char   *pwline;
                     22: char   *dir;
                     23: FILE   *scrin;
                     24: int    logging = 1;    /* set to 0 to turn off logging */
                     25: int    ask;
                     26: int    again;
                     27: int    skip;
                     28: int    teed;
                     29: int    total;
                     30: 
                     31: main(argc,argv)
                     32: int argc;
                     33: char *argv[];
                     34: {
                     35:        extern hangup(), intrpt();
                     36:        extern char * getlogin();
                     37:        char *malloc();
                     38: 
                     39:        speed = 0;
                     40:        more = 1;
                     41:        pwline = getlogin();
                     42:        setbuf(stdout, malloc(BUFSIZ));
                     43:        setbuf(stderr, malloc(BUFSIZ));
                     44:        selsub(argc, argv);
                     45:        chgenv();
                     46:        signal(SIGHUP, hangup);
                     47:        signal(SIGINT, intrpt);
                     48:        while (more) {
                     49:                selunit();
                     50:                dounit();
                     51:                whatnow();
                     52:        }
                     53:        wrapup(0);
                     54: }
                     55: 
                     56: hangup()
                     57: {
                     58:        wrapup(1);
                     59: }
                     60: 
                     61: intrpt()
                     62: {
                     63:        char response[20], *p;
                     64: 
                     65:        signal(SIGINT, hangup);
                     66:        write(2, "\nInterrupt.\nWant to go on?  ", 28);
                     67:        p = response;
                     68:        *p = 'n';
                     69:        while (read(0, p, 1) == 1 && *p != '\n')
                     70:                p++;
                     71:        if (response[0] != 'y')
                     72:                wrapup(0);
                     73:        ungetc('\n', stdin);
                     74:        signal(SIGINT, intrpt);
                     75: }

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