[BACK]Return to strings.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / mail

Annotation of src/usr.bin/mail/strings.c, Revision 1.6

1.6     ! millert     1: /*     $OpenBSD: strings.c,v 1.5 1997/07/14 00:24:30 millert Exp $     */
1.2       deraadt     2: /*     $NetBSD: strings.c,v 1.5 1996/06/08 19:48:40 christos Exp $     */
                      3:
1.1       deraadt     4: /*
                      5:  * Copyright (c) 1980, 1993
                      6:  *     The Regents of the University of California.  All rights reserved.
                      7:  *
                      8:  * Redistribution and use in source and binary forms, with or without
                      9:  * modification, are permitted provided that the following conditions
                     10:  * are met:
                     11:  * 1. Redistributions of source code must retain the above copyright
                     12:  *    notice, this list of conditions and the following disclaimer.
                     13:  * 2. Redistributions in binary form must reproduce the above copyright
                     14:  *    notice, this list of conditions and the following disclaimer in the
                     15:  *    documentation and/or other materials provided with the distribution.
                     16:  * 3. All advertising materials mentioning features or use of this software
                     17:  *    must display the following acknowledgement:
                     18:  *     This product includes software developed by the University of
                     19:  *     California, Berkeley and its contributors.
                     20:  * 4. Neither the name of the University nor the names of its contributors
                     21:  *    may be used to endorse or promote products derived from this software
                     22:  *    without specific prior written permission.
                     23:  *
                     24:  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
                     25:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     26:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     27:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     28:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     29:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     30:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     31:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     32:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     33:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     34:  * SUCH DAMAGE.
                     35:  */
                     36:
                     37: #ifndef lint
1.2       deraadt    38: #if 0
                     39: static char sccsid[] = "@(#)strings.c  8.1 (Berkeley) 6/6/93";
                     40: #else
1.6     ! millert    41: static char rcsid[] = "$OpenBSD: strings.c,v 1.5 1997/07/14 00:24:30 millert Exp $";
1.2       deraadt    42: #endif
1.1       deraadt    43: #endif /* not lint */
                     44:
                     45: /*
                     46:  * Mail -- a mail program
                     47:  *
                     48:  * String allocation routines.
                     49:  * Strings handed out here are reclaimed at the top of the command
                     50:  * loop each time, so they need not be freed.
                     51:  */
                     52:
                     53: #include "rcv.h"
                     54: #include "extern.h"
                     55:
                     56: /*
                     57:  * Allocate size more bytes of space and return the address of the
                     58:  * first byte to the caller.  An even number of bytes are always
                     59:  * allocated so that the space will always be on a word boundary.
                     60:  * The string spaces are of exponentially increasing size, to satisfy
                     61:  * the occasional user with enormous string size requests.
                     62:  */
                     63:
                     64: char *
                     65: salloc(size)
                     66:        int size;
                     67: {
1.6     ! millert    68:        char *t;
        !            69:        int s;
        !            70:        struct strings *sp;
1.1       deraadt    71:        int index;
                     72:
                     73:        s = size;
1.3       millert    74:        s += (sizeof(char *) - 1);
                     75:        s &= ~(sizeof(char *) - 1);
1.1       deraadt    76:        index = 0;
                     77:        for (sp = &stringdope[0]; sp < &stringdope[NSPACE]; sp++) {
1.5       millert    78:                if (sp->s_topFree == NULL && (STRINGSIZE << index) >= s)
1.1       deraadt    79:                        break;
                     80:                if (sp->s_nleft >= s)
                     81:                        break;
                     82:                index++;
                     83:        }
                     84:        if (sp >= &stringdope[NSPACE])
1.6     ! millert    85:                errx(1, "String too large");
1.5       millert    86:        if (sp->s_topFree == NULL) {
1.1       deraadt    87:                index = sp - &stringdope[0];
1.4       millert    88:                sp->s_topFree = (char *)malloc(STRINGSIZE << index);
1.6     ! millert    89:                if (sp->s_topFree == NULL)
        !            90:                        errx(1, "No room for space %d", index);
1.1       deraadt    91:                sp->s_nextFree = sp->s_topFree;
                     92:                sp->s_nleft = STRINGSIZE << index;
                     93:        }
                     94:        sp->s_nleft -= s;
                     95:        t = sp->s_nextFree;
                     96:        sp->s_nextFree += s;
                     97:        return(t);
                     98: }
                     99:
                    100: /*
                    101:  * Reset the string area to be empty.
                    102:  * Called to free all strings allocated
                    103:  * since last reset.
                    104:  */
                    105: void
                    106: sreset()
                    107: {
1.6     ! millert   108:        struct strings *sp;
        !           109:        int index;
1.1       deraadt   110:
                    111:        if (noreset)
                    112:                return;
                    113:        index = 0;
                    114:        for (sp = &stringdope[0]; sp < &stringdope[NSPACE]; sp++) {
1.5       millert   115:                if (sp->s_topFree == NULL)
1.1       deraadt   116:                        continue;
                    117:                sp->s_nextFree = sp->s_topFree;
                    118:                sp->s_nleft = STRINGSIZE << index;
                    119:                index++;
                    120:        }
                    121: }
                    122:
                    123: /*
                    124:  * Make the string area permanent.
                    125:  * Meant to be called in main, after initialization.
                    126:  */
                    127: void
                    128: spreserve()
                    129: {
1.6     ! millert   130:        struct strings *sp;
1.1       deraadt   131:
                    132:        for (sp = &stringdope[0]; sp < &stringdope[NSPACE]; sp++)
1.5       millert   133:                sp->s_topFree = NULL;
1.1       deraadt   134: }