Return to regsub.c CVS log

Up to [MW Coherent from dump] / coherent / g / usr / lib / misc

Annotation of coherent/g/usr/lib/misc/regsub.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * regsub
                      3:  *
                      4:  *     Copyright (c) 1986 by University of Toronto.
                      5:  *     Written by Henry Spencer.  Not derived from licensed software.
                      6:  *
                      7:  *     Permission is granted to anyone to use this software for any
                      8:  *     purpose on any computer system, and to redistribute it freely,
                      9:  *     subject to the following restrictions:
                     10:  *
                     11:  *     1. The author is not responsible for the consequences of use of
                     12:  *             this software, no matter how awful, even if they arise
                     13:  *             from defects in it.
                     14:  *
                     15:  *     2. The origin of this software must not be misrepresented, either
                     16:  *             by explicit claim or by omission.
                     17:  *
                     18:  *     3. Altered versions must be plainly marked as such, and must not
                     19:  *             be misrepresented as being the original software.
                     20:  ********* This version is slightly altered to fit cleanly with Coherent
                     21:  ********* libmisc.a. The original may be obtained freely on mwcbbs.
                     22:  */
                     23: #include <stdio.h>
                     24: #include "local_misc.h"
                     25: 
                     26: #ifndef CHARBITS
                     27: #define        UCHARAT(p)      ((int)*(unsigned char *)(p))
                     28: #else
                     29: #define        UCHARAT(p)      ((int)*(p)&CHARBITS)
                     30: #endif
                     31: 
                     32: #define FAIL(msg) { regerror(msg); return; }
                     33: 
                     34: /*
                     35:  - regsub - perform substitutions after a regexp match
                     36:  */
                     37: void
                     38: regsub(prog, source, dest)
                     39: regexp *prog;
                     40: char *source;
                     41: char *dest;
                     42: {
                     43:        register char *src;
                     44:        register char *dst;
                     45:        register char c;
                     46:        register int no;
                     47:        register int len;
                     48:        extern char *strncpy();
                     49: 
                     50:        if (prog == NULL || source == NULL || dest == NULL)
                     51:                FAIL("NULL parm to regsub");
                     52:        if (UCHARAT(prog->program) != (unsigned char)REG_MAGIC)
                     53:                FAIL("damaged regexp fed to regsub");
                     54: 
                     55:        src = source;
                     56:        dst = dest;
                     57:        while ((c = *src++) != '\0') {
                     58:                if (c == '&')
                     59:                        no = 0;
                     60:                else if (c == '\\' && '0' <= *src && *src <= '9')
                     61:                        no = *src++ - '0';
                     62:                else
                     63:                        no = -1;
                     64: 
                     65:                if (no < 0)     /* Ordinary character. */
                     66:                        *dst++ = c;
                     67:                else if (prog->startp[no] != NULL && prog->endp[no] != NULL) {
                     68:                        len = prog->endp[no] - prog->startp[no];
                     69:                        (void) strncpy(dst, prog->startp[no], len);
                     70:                        dst += len;
                     71:                        /* strncpy hit NUL? */
                     72:                        if (len != 0 && *(dst-1) == '\0')
                     73:                                FAIL("damaged mch string");
                     74:                }
                     75:        }
                     76:        *dst++ = '\0';
                     77: }

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