2 * This file is part of DisOrder
3 * Copyright (C) 2004, 2005, 2007, 20008 Richard Kettlewell
5 * This program is free software: you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation, either version 3 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <http://www.gnu.org/licenses/>.
28 #define PREMATCH (-1) /* fictitious pre-match substring */
29 #define POSTMATCH (-2) /* fictitious post-match substring */
31 static inline int substring_start(const char attribute((unused
)) *subject
,
35 case PREMATCH
: return 0;
36 case POSTMATCH
: return ovector
[1];
37 default: return ovector
[2 * n
];
41 static inline int substring_end(const char *subject
,
45 case PREMATCH
: return ovector
[0];
46 case POSTMATCH
: return strlen(subject
);
47 default: return ovector
[2 * n
+ 1];
51 static void transform_append(struct dynstr
*d
,
55 int start
= substring_start(subject
, ovector
, n
);
56 int end
= substring_end(subject
, ovector
, n
);
59 dynstr_append_bytes(d
, subject
+ start
, end
- start
);
62 static void replace_core(struct dynstr
*d
,
73 transform_append(d
, subject
, ovector
, 0);
76 case '1': case '2': case '3':
77 case '4': case '5': case '6':
78 case '7': case '8': case '9':
79 substr
= replace
[1] - '0';
81 transform_append(d
, subject
, ovector
, substr
);
85 dynstr_append(d
, '$');
89 dynstr_append(d
, *replace
++);
93 dynstr_append(d
, *replace
++);
97 unsigned regsub_flags(const char *flags
) {
102 case 'g': f
|= REGSUB_GLOBAL
; break;
103 case 'i': f
|= REGSUB_CASE_INDEPENDENT
; break;
110 int regsub_compile_options(unsigned flags
) {
113 if(flags
& REGSUB_CASE_INDEPENDENT
)
114 options
|= PCRE_CASELESS
;
118 const char *regsub(const pcre
*re
, const char *subject
, const char *replace
,
120 int rc
, ovector
[99], matches
;
125 /* find the next match */
126 while((rc
= pcre_exec(re
, 0, subject
, strlen(subject
), 0,
127 0, ovector
, sizeof ovector
/ sizeof (int))) > 0) {
128 /* text just before the match */
129 if(!(flags
& REGSUB_REPLACE
))
130 transform_append(&d
, subject
, ovector
, PREMATCH
);
131 /* the replacement text */
132 replace_core(&d
, subject
, replace
, rc
, ovector
);
134 if(!*subject
) /* end of subject */
136 if(flags
& REGSUB_REPLACE
) /* replace subject entirely */
138 /* step over the matched substring */
139 subject
+= substring_start(subject
, ovector
, POSTMATCH
);
140 if(!(flags
& REGSUB_GLOBAL
))
143 if(rc
<= 0 && rc
!= PCRE_ERROR_NOMATCH
) {
144 error(0, "pcre_exec returned %d, subject '%s'", rc
, subject
);
147 if((flags
& REGSUB_MUST_MATCH
) && matches
== 0)
149 /* append the remainder of the subject */
150 if(!(flags
& REGSUB_REPLACE
))
151 dynstr_append_string(&d
, subject
);
152 dynstr_terminate(&d
);