Return to getlog_.c CVS log

Up to [CSRG BSD Unix] / 42BSD / usr.lib / libU77

Annotation of 42BSD/usr.lib/libU77/getlog_.c, revision 1.1.1.1

1.1       root        1: /*
                      2: char id_getlog[] = "@(#)getlog_.c      1.1";
                      3:  *
                      4:  * get login name of user
                      5:  *
                      6:  * calling sequence:
                      7:  *     character*8 getlog, name
                      8:  *     name = getlog()
                      9:  * or
                     10:  *     call getlog (name)
                     11:  * where:
                     12:  *     name will receive the login name of the user, or all blanks if
                     13:  *     this is a detached process.
                     14:  */
                     15: 
                     16: char *getlogin();
                     17: 
                     18: getlog_(name, len)
                     19: char *name; long len;
                     20: {
                     21:        char *l = getlogin();
                     22: 
                     23:        b_char(l?l:" ", name, len);
                     24: }

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