Annotation of 43BSDReno/usr.bin/xsend/enroll/enroll.c, revision 1.1.1.1

1.1       root        1: #ifndef lint
                      2: static char sccsid[] = "@(#)enroll.c   4.3 5/11/89";
                      3: #endif
                      4: 
                      5: #include <sys/types.h>
                      6: #include <pwd.h>
                      7: #include "xmail.h"
                      8: #include "pathnames.h"
                      9: 
                     10: MINT *a[42], *x, *b, *one, *c64, *t45, *z, *q, *r, *two, *t15;
                     11: char buf[256];
                     12: char maildir[] = _PATH_SECRETMAIL;
                     13: main()
                     14: {
                     15:        int uid, i;
                     16:        FILE *fd;
                     17:        char *myname, fname[128];
                     18:        uid = getuid();
                     19:        myname = (char *) getlogin();
                     20:        if(myname == NULL)
                     21:                myname = getpwuid(uid)->pw_name;
                     22:        sprintf(fname, "%s/%s.key", maildir, myname);
                     23:        comminit();
                     24:        setup(getpass("Gimme key: "));
                     25:        mkb();
                     26:        mkx();
                     27: #ifdef debug
                     28:        omout(b);
                     29:        omout(x);
                     30: #endif
                     31:        mka();
                     32:        i = creat(fname, 0644);
                     33:        if(i<0)
                     34:        {       perror(fname);
                     35:                exit(1);
                     36:        }
                     37:        close(i);
                     38:        fd = fopen(fname, "w");
                     39:        for(i=0; i<42; i++)
                     40:                nout(a[i], fd);
                     41:        exit(0);
                     42: }

unix.superglobalmegacorp.com

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