Return to slappend.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / mkmf / src

Annotation of 43BSD/contrib/mkmf/src/slappend.c, revision 1.1.1.1

1.1       root        1: /* $Header: slappend.c,v 1.2 85/03/18 13:18:28 nicklin Exp $ */
                      2: 
                      3: /*
                      4:  * Author: Peter J. Nicklin
                      5:  */
                      6: 
                      7: /*
                      8:  * slappend() saves a null-terminated key string somewhere and inserts a
                      9:  * pointer to the key at the tail of list slist. Returns a pointer to
                     10:  * the somewhere, or a null pointer if out of memory.
                     11:  */
                     12: #include <stdio.h>
                     13: #include "macro.h"
                     14: #include "null.h"
                     15: #include "slist.h"
                     16: 
                     17: extern char *PGN;                      /* program name */
                     18: 
                     19: char *
                     20: slappend(key, slist)
                     21:        char *key;                      /* key string */
                     22:        SLIST *slist;                   /* pointer to list head block */
                     23: {
                     24:        char *malloc();                 /* memory allocator */
                     25:        char *strcpy();                 /* string copy */
                     26:        int strlen();                   /* string length */
                     27:        SLBLK *slbptr;                  /* pointer to list block */
                     28:        unsigned int klen;              /* key length */
                     29: 
                     30:        if (slist == NULL)
                     31:                return(NULL);
                     32:        klen = strlen(key);
                     33:        slist->maxkey = MAX(slist->maxkey, klen);
                     34:        if ((slbptr = (SLBLK *) malloc(sizeof(SLBLK))) == NULL ||
                     35:            (slbptr->key = malloc(klen+1)) == NULL)
                     36:                {
                     37:                if (*PGN != '\0')
                     38:                        fprintf(stderr, "%s: ", PGN);
                     39:                fprintf(stderr, "out of memory\n");
                     40:                return(NULL);
                     41:                }
                     42:        strcpy(slbptr->key, key);
                     43:        slbptr->next = NULL;
                     44:        if (slist->tail == NULL)
                     45:                slist->head = slist->tail = slbptr;
                     46:        else
                     47:                slist->tail = slist->tail->next = slbptr;
                     48:        slist->nk++;
                     49:        return(slbptr->key);
                     50: }

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