Return to CHstrtoname.c CVS log

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

Annotation of 43BSD/contrib/xns/morexnslib/ch/CHstrtoname.c, revision 1.1

1.1     ! root        1: /* $Header: CHstrtoname.c,v 2.0 85/11/21 07:22:34 jqj Exp $ */
        !             2: 
        !             3: /* contains:
        !             4:  * CH_strtoname
        !             5:  */
        !             6: 
        !             7: /* $Log:       CHstrtoname.c,v $
        !             8:  * Revision 2.0  85/11/21  07:22:34  jqj
        !             9:  * 4.3BSD standard release
        !            10:  * 
        !            11:  * Revision 1.1  85/03/26  06:27:02  jqj
        !            12:  * Initial revision
        !            13:  * 
        !            14:  * Revision 1.1  85/03/26  06:27:02  jqj
        !            15:  * Initial revision
        !            16:  * 
        !            17:  */
        !            18: 
        !            19: #include <xnscourier/Clearinghouse2.h>
        !            20: 
        !            21: static char *copy();
        !            22: 
        !            23: /*
        !            24:  * Given a string in standard format, return an ObjectName.
        !            25:  * If the string is incomplete, e.g. "jqj" or "::cornell-univ", fill 
        !            26:  * in default values from defaults.
        !            27:  */
        !            28: Clearinghouse2_ObjectName
        !            29: CH_StringToName(str,defaults)
        !            30:        char *str;
        !            31:        Clearinghouse2_ObjectName *defaults;
        !            32: {
        !            33:        register char *s1;
        !            34:        extern char *index();
        !            35:        register Clearinghouse2_ObjectName result;
        !            36: 
        !            37:        s1 = result.object = (str ? copy(str) : "");
        !            38:        if (s1 = index(s1,':')) {
        !            39:                *s1 = '\0';
        !            40:                result.domain = ++s1;
        !            41:                if (s1 = index(s1,':')) {
        !            42:                        *s1 = '\0';
        !            43:                        result.organization = ++s1;
        !            44:                }
        !            45:                else
        !            46:                        result.organization = "";
        !            47:        }
        !            48:        else
        !            49:                result.organization = result.domain = "";
        !            50:        /* now fill in defaults if any */
        !            51:        if (defaults == (Clearinghouse2_ObjectName*) NULL)
        !            52:                return(result);
        !            53:        if (*result.object == '\0' && defaults->object != NULL)
        !            54:                result.object = copy(defaults->object);
        !            55:        if (*result.domain == '\0' && defaults->domain != NULL)
        !            56:                result.domain = copy(defaults->domain);
        !            57:        if (*result.organization == '\0' && defaults->organization != NULL)
        !            58:                result.organization = copy(defaults->organization);
        !            59:        return(result);
        !            60: }
        !            61: 
        !            62: 
        !            63: static char *
        !            64: copy(s)
        !            65:        char *s;
        !            66: {
        !            67:        char *p;
        !            68:        extern char *malloc();
        !            69: 
        !            70:        if ((p = malloc(strlen(s) + 1)) == NULL) {
        !            71:                exit(1);
        !            72:        }
        !            73:        (void) strcpy(p, s);
        !            74:        return (p);
        !            75: }
        !            76: 

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