1 /******************************************************************************
3 * Copyright (C) 2000 Pierangelo Masarati, <ando@sys-net.it>
6 * Permission is granted to anyone to use this software for any purpose
7 * on any computer system, and to alter it and redistribute it, subject
8 * to the following restrictions:
10 * 1. The author is not responsible for the consequences of use of this
11 * software, no matter how awful, even if they arise from flaws in it.
13 * 2. The origin of this software must not be misrepresented, either by
14 * explicit claim or by omission. Since few users ever read sources,
15 * credits should appear in the documentation.
17 * 3. Altered versions must be plainly marked as such, and must not be
18 * misrepresented as being the original software. Since few users
19 * ever read sources, credits should appear in the documentation.
21 * 4. This notice may not be removed or altered.
23 ******************************************************************************/
29 * These are required by every file of the library, so they're included here
31 #include <ac/stdlib.h>
32 #include <ac/string.h>
33 #include <ac/syslog.h>
35 #include <ac/socket.h>
36 #include <ac/unistd.h>
41 #include "../libldap/ldap-int.h"
47 /* Uncomment to use ldap pvt threads */
48 #define USE_REWRITE_LDAP_PVT_THREADS
49 #include <ldap_pvt_thread.h>
52 * For details, see RATIONALE.
55 #define REWRITE_MAX_MATCH 11 /* 0: overall string; 1-9: submatches */
56 #define REWRITE_MAX_PASSES 100
59 * Submatch escape char
61 /* the '\' conflicts with slapd.conf parsing */
62 /* #define REWRITE_SUBMATCH_ESCAPE '\\' */
63 #define REWRITE_SUBMATCH_ESCAPE '%'
69 #define REWRITE_FLAG_HONORCASE 'C'
70 #define REWRITE_FLAG_BASICREGEX 'R'
75 #define REWRITE_FLAG_EXECONCE ':'
76 #define REWRITE_FLAG_STOP '@'
77 #define REWRITE_FLAG_UNWILLING '#'
78 #define REWRITE_FLAG_GOTO 'G' /* requires an arg */
79 #define REWRITE_FLAG_IGNORE_ERR 'I'
84 #define REWRITE_OPERATOR_SUBCONTEXT '>'
85 #define REWRITE_OPERATOR_COMMAND '|'
86 #define REWRITE_OPERATOR_VARIABLE_SET '&'
87 #define REWRITE_OPERATOR_VARIABLE_GET '*'
88 #define REWRITE_OPERATOR_PARAM_GET '$'
98 struct rewrite_action {
99 struct rewrite_action *la_next;
101 #define REWRITE_ACTION_STOP 0x0001
102 #define REWRITE_ACTION_UNWILLING 0x0002
103 #define REWRITE_ACTION_GOTO 0x0003
104 #define REWRITE_ACTION_IGNORE_ERR 0x0004
117 #define REWRITE_MAP_XFILEMAP 0x0001 /* Rough implementation! */
118 #define REWRITE_MAP_XPWDMAP 0x0002 /* uid -> gecos */
119 #define REWRITE_MAP_XLDAPMAP 0x0003 /* Not implemented yet! */
124 #define REWRITE_MAP_SUBCONTEXT 0x0101
126 #define REWRITE_MAP_SET_OP_VAR 0x0102
127 #define REWRITE_MAP_SETW_OP_VAR 0x0103
128 #define REWRITE_MAP_GET_OP_VAR 0x0104
129 #define REWRITE_MAP_SET_SESN_VAR 0x0105
130 #define REWRITE_MAP_SETW_SESN_VAR 0x0106
131 #define REWRITE_MAP_GET_SESN_VAR 0x0107
132 #define REWRITE_MAP_GET_PARAM 0x0108
133 #define REWRITE_MAP_BUILTIN 0x0109
140 * Old maps store private data in _lm_args;
141 * new maps store the substitution pattern in _lm_subst
145 struct rewrite_subst *_lm_subst;
147 #define lm_args lm_union._lm_args
148 #define lm_subst lm_union._lm_subst
150 #ifdef USE_REWRITE_LDAP_PVT_THREADS
151 ldap_pvt_thread_mutex_t lm_mutex;
152 #endif /* USE_REWRITE_LDAP_PVT_THREADS */
158 struct rewrite_builtin_map {
159 #define REWRITE_BUILTIN_MAP_LDAP 0x0201
164 #ifdef USE_REWRITE_LDAP_PVT_THREADS
165 ldap_pvt_thread_mutex_t lb_mutex;
166 #endif /* USE_REWRITE_LDAP_PVT_THREADS */
170 * Submatch substitution
172 struct rewrite_submatch {
173 #define REWRITE_SUBMATCH_ASIS 0x0000
174 #define REWRITE_SUBMATCH_XMAP 0x0001
175 #define REWRITE_SUBMATCH_MAP_W_ARG 0x0002
177 struct rewrite_map *ls_map;
180 * The first one represents the index of the submatch in case
181 * the map has single submatch as argument;
182 * the latter represents the map argument scheme in case
183 * the map has substitution string argument form
188 * Pattern substitution
190 struct rewrite_subst {
192 struct berval **lt_subs;
195 struct rewrite_submatch **lt_submatch;
201 struct rewrite_rule {
202 struct rewrite_rule *lr_next;
203 struct rewrite_rule *lr_prev;
206 char *lr_subststring;
211 * I was thinking about some kind of per-rule mutex, but there's
212 * probably no need, because rules after compilation are only read;
213 * however, I need to check whether regexec is reentrant ...
216 struct rewrite_subst *lr_subst;
218 #define REWRITE_REGEX_ICASE REG_ICASE
219 #define REWRITE_REGEX_EXTENDED REG_EXTENDED
222 #define REWRITE_RECURSE 0x0001
223 #define REWRITE_EXEC_ONCE 0x0002
226 struct rewrite_action *lr_action;
230 * Rewrite Context (set of rules)
232 struct rewrite_context {
234 struct rewrite_context *lc_alias;
235 struct rewrite_rule *lc_rule;
241 struct rewrite_session {
244 #ifdef USE_REWRITE_LDAP_PVT_THREADS
245 ldap_pvt_thread_rdwr_t ls_vars_mutex;
246 #endif /* USE_REWRITE_LDAP_PVT_THREADS */
254 struct berval lv_value;
266 const void *lo_cookie;
277 struct rewrite_info {
281 * No global mutex because maps are read only at
288 #ifdef USE_REWRITE_LDAP_PVT_THREADS
289 ldap_pvt_thread_rdwr_t li_params_mutex;
290 ldap_pvt_thread_rdwr_t li_cookies_mutex;
291 #endif /* USE_REWRITE_LDAP_PVT_THREADS */
295 * use `rewriteEngine {on|off}' directive to alter
300 * Defaults to REWRITE_MAXPASSES;
301 * use `rewriteMaxPasses numPasses' directive to alter
303 #define REWRITE_MAXPASSES 100
307 * Behavior in case a NULL or non-existent context is required
316 LDAP_REWRITE_V (struct rewrite_context*) __curr_context;
323 * Parses a map (also in legacy 'x' version)
325 LDAP_REWRITE_F (struct rewrite_map *)
327 struct rewrite_info *info,
332 LDAP_REWRITE_F (struct rewrite_map *)
334 struct rewrite_info *info,
340 * Resolves key in val by means of map (also in legacy 'x' version)
344 struct rewrite_info *info,
345 struct rewrite_op *op,
346 struct rewrite_map *map,
353 struct rewrite_info *info,
354 struct rewrite_op *op,
355 struct rewrite_map *map,
362 * Submatch substitution
366 * Compiles a substitution pattern
368 LDAP_REWRITE_F (struct rewrite_subst *)
369 rewrite_subst_compile(
370 struct rewrite_info *info,
375 * Substitutes a portion of rewritten string according to substitution
376 * pattern using submatches
380 struct rewrite_info *info,
381 struct rewrite_op *op,
382 struct rewrite_subst *subst,
384 const regmatch_t *match,
394 * Compiles the rule and appends it at the running context
397 rewrite_rule_compile(
398 struct rewrite_info *info,
399 struct rewrite_context *context,
402 const char *flagstring
406 * Rewrites string according to rule; may return:
407 * REWRITE_REGEXEC_OK: fine; if *result != NULL rule matched
408 * and rewrite succeeded.
409 * REWRITE_REGEXEC_STOP: fine, rule matched; stop processing
411 * REWRITE_REGEXEC_UNWILL: rule matched; force 'unwilling to perform'
412 * REWRITE_REGEXEC_ERR: an error occurred
416 struct rewrite_info *info,
417 struct rewrite_op *op,
418 struct rewrite_rule *rule,
428 * Fetches a struct rewrite_session
430 LDAP_REWRITE_F (struct rewrite_session *)
431 rewrite_session_find(
432 struct rewrite_info *info,
437 * Defines and inits a variable with session scope
440 rewrite_session_var_set(
441 struct rewrite_info *info,
448 * Gets a var with session scope
451 rewrite_session_var_get(
452 struct rewrite_info *info,
462 rewrite_session_delete(
463 struct rewrite_info *info,
468 * Destroys the cookie tree
471 rewrite_session_destroy(
472 struct rewrite_info *info
483 LDAP_REWRITE_F (struct rewrite_var *)
490 * Inserts a newly created var
492 LDAP_REWRITE_F (struct rewrite_var *)
502 LDAP_REWRITE_F (struct rewrite_var *)
524 * Finds the context named rewriteContext in the context tree
526 LDAP_REWRITE_F (struct rewrite_context *)
527 rewrite_context_find(
528 struct rewrite_info *info,
529 const char *rewriteContext
533 * Creates a new context called rewriteContext and stores in into the tree
535 LDAP_REWRITE_F (struct rewrite_context *)
536 rewrite_context_create(
537 struct rewrite_info *info,
538 const char *rewriteContext
542 * Rewrites string according to context; may return:
543 * OK: fine; if *result != NULL rule matched and rewrite succeeded.
544 * STOP: fine, rule matched; stop processing following rules
545 * UNWILL: rule matched; force 'unwilling to perform'
548 rewrite_context_apply(
549 struct rewrite_info *info,
550 struct rewrite_op *op,
551 struct rewrite_context *context,
556 #endif /* REWRITE_INT_H */