* Copyright (c) 1986 by University of Toronto.
* Written by Henry Spencer. Not derived from licensed software.
* Permission is granted to anyone to use this software for any
* purpose on any computer system, and to redistribute it freely,
* subject to the following restrictions:
* 1. The author is not responsible for the consequences of use of
* this software, no matter how awful, even if they arise
* 2. The origin of this software must not be misrepresented, either
* by explicit claim or by omission.
* 3. Altered versions must be plainly marked as such, and must not
* be misrepresented as being the original software.
#define UCHARAT(p) ((int)*(unsigned char *)(p))
#define UCHARAT(p) ((int)*(p)&CHARBITS)
- regsub - perform substitutions after a regexp match
regsub(prog
, source
, dest
)
if (prog
== NULL
|| source
== NULL
|| dest
== NULL
) {
regerror("NULL parm to regsub");
if (UCHARAT(prog
->program
) != MAGIC
) {
regerror("damaged regexp fed to regsub");
while ((c
= *src
++) != '\0') {
else if (c
== '\\' && '0' <= *src
&& *src
<= '9')
if (no
< 0) { /* Ordinary character. */
if (c
== '\\' && (*src
== '\\' || *src
== '&'))
} else if (prog
->startp
[no
] != NULL
&& prog
->endp
[no
] != NULL
) {
len
= prog
->endp
[no
] - prog
->startp
[no
];
(void) strncpy(dst
, prog
->startp
[no
], len
);
if (len
!= 0 && *(dst
-1) == '\0') { /* strncpy hit NUL. */
regerror("damaged match string");