Return to s5sysname.c CVS log

Up to [Research Unix] / researchv10no / cmd / nupas / libc

Annotation of researchv10no/cmd/nupas/libc/s5sysname.c, revision 1.1.1.1

1.1       root        1: /* get the system's name -- System V */
                      2: 
                      3: #include <utsname.h>
                      4: #include <string.h>
                      5: 
                      6: extern char *
                      7: sysname_read()
                      8: {
                      9:        static struct utsname s;
                     10: 
                     11:        if (uname(&s)<0 || strcmp(s.nodename, "") == 0)
                     12:                return "kremvax";
                     13:        return s.nodename;
                     14: }

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