Return to CHusername.c CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / new / xns / morexnslib / ch

Annotation of 43BSDTahoe/new/xns/morexnslib/ch/CHusername.c, revision 1.1.1.1

1.1       root        1: #ifndef lint
                      2: static char *rcsid = "$Header: CHusername.c,v 1.1 87/05/11 09:59:41 ed Exp $";
                      3: #endif lint
                      4: 
                      5: /* contains:
                      6:  * CH_NameToUser
                      7:  */
                      8: 
                      9: #ifndef CHUSERIDFILE
                     10: #define CHUSERIDFILE "/usr/new/lib/xnscourier/chusermap"
                     11: #endif
                     12: 
                     13: #include <stdio.h>
                     14: #include <sys/types.h>
                     15: #include <netns/ns.h>
                     16: #include <xnscourier/Clearinghouse2.h>
                     17: #include <ctype.h>
                     18: #include <ndbm.h>
                     19: extern char *rindex(), *CH_NameToString();
                     20: 
                     21: /*
                     22:  * produce a UNIX user name by table lookup given a CHS name
                     23:  */
                     24: char *
                     25: CH_NameToUser(chs_name)
                     26:        Clearinghouse2_ThreePartName chs_name;
                     27: {
                     28:        static char userid[12];
                     29:        DBM *db;
                     30:        datum cptr, uptr;
                     31:        register char *ptr;
                     32:        Clearinghouse2_ObjectName chdefault;
                     33:        FILE *dbf;
                     34:        char charbuf[100];
                     35:        int n;
                     36: 
                     37:        uptr.dptr = NULL;
                     38:        cptr.dptr = CH_NameToString(chs_name);
                     39:        for (ptr =cptr.dptr; *ptr != '\0'; ptr++)
                     40:                if (islower(*ptr)) *ptr = toupper(*ptr);
                     41: 
                     42:        /* lookup user id in hashed database */
                     43:        if ( (db= dbm_open(CHUSERIDFILE, 0, 0)) != (DBM*)0 ) {
                     44:                cptr.dsize = strlen(cptr.dptr);
                     45:                uptr = dbm_fetch(db, cptr);
                     46:                dbm_close(db);
                     47:        }
                     48:        /* lookup user id in text database using linear search */
                     49:        else if ( (dbf = fopen(CHUSERIDFILE, 0)) >= 0 ) {
                     50:                while ((n=fscanf(dbf, "%[^\t\n]\t%s\n",charbuf,userid)) >= 0) {
                     51:                        if (n != 2) continue;
                     52:                        for (ptr=charbuf; *ptr != '\0'; ptr++)
                     53:                                if (islower(*ptr)) *ptr = toupper(*ptr);
                     54:                        if (strcmp(charbuf,cptr.dptr) == 0) {
                     55:                                uptr.dptr = userid;
                     56:                                break;  /* found it! */
                     57:                        }
                     58:                }
                     59:                fclose(dbf);
                     60:        }
                     61:        if (uptr.dptr != NULL) return(uptr.dptr);
                     62: 
                     63:        /* default case */
                     64:        chdefault.object = chdefault.domain = chdefault.organization = NULL;
                     65:        CH_NameDefault(&chdefault);
                     66:        if ( strcmp(chs_name.domain,chdefault.domain) != 0 ||
                     67:             strcmp(chs_name.organization,chdefault.organization) != 0)
                     68:                return("nobody");
                     69:        else if ( (ptr= rindex(chs_name.object, ' ')) == 0 )
                     70:                return(chs_name.object);
                     71:        else
                     72:                return(ptr+1);
                     73: }

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