Kannel: Open Source WAP and SMS gateway  $Revision: 5037 $
pcre.c
Go to the documentation of this file.
1 /* ====================================================================
2  * The Kannel Software License, Version 1.0
3  *
4  * Copyright (c) 2001-2016 Kannel Group
5  * Copyright (c) 1998-2001 WapIT Ltd.
6  * 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  *
12  * 1. Redistributions of source code must retain the above copyright
13  * notice, this list of conditions and the following disclaimer.
14  *
15  * 2. Redistributions in binary form must reproduce the above copyright
16  * notice, this list of conditions and the following disclaimer in
17  * the documentation and/or other materials provided with the
18  * distribution.
19  *
20  * 3. The end-user documentation included with the redistribution,
21  * if any, must include the following acknowledgment:
22  * "This product includes software developed by the
23  * Kannel Group (http://www.kannel.org/)."
24  * Alternately, this acknowledgment may appear in the software itself,
25  * if and wherever such third-party acknowledgments normally appear.
26  *
27  * 4. The names "Kannel" and "Kannel Group" must not be used to
28  * endorse or promote products derived from this software without
29  * prior written permission. For written permission, please
30  * contact org@kannel.org.
31  *
32  * 5. Products derived from this software may not be called "Kannel",
33  * nor may "Kannel" appear in their name, without prior written
34  * permission of the Kannel Group.
35  *
36  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
37  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
38  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
39  * DISCLAIMED. IN NO EVENT SHALL THE KANNEL GROUP OR ITS CONTRIBUTORS
40  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
41  * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
42  * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
43  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
44  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
45  * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
46  * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
47  * ====================================================================
48  *
49  * This software consists of voluntary contributions made by many
50  * individuals on behalf of the Kannel Group. For more information on
51  * the Kannel Group, please see <http://www.kannel.org/>.
52  *
53  * Portions of this software are based upon software originally written at
54  * WapIT Ltd., Helsinki, Finland for the Kannel project.
55  */
56 
57 /*
58  * pcre.c - Perl compatible regular expressions (PCREs)
59  *
60  * This modules implements wrapper functions to the pcre_foobar() et all
61  * functions implemented in the libpcre.a library.
62  * PCRE is a library of functions to support regular expressions whose syntax
63  * and semantics are as close as possible to those of the Perl 5 language.
64  *
65  * See http://www.pcre.org/ for more details on PCRE regular expressions.
66  *
67  * Stipe Tolj <stolj@wapme.de>
68  */
69 
70 #include <ctype.h>
71 
72 #include "gwlib/gwlib.h"
73 #include "pcre.h"
74 
75 #ifdef HAVE_PCRE
76 
77 
78 /********************************************************************
79  * Generic pcre functions.
80  */
81 
82 pcre *gw_pcre_comp_real(const Octstr *pattern, int cflags, const char *file,
83  long line, const char *func)
84 {
85  pcre *preg;
86  const char *err;
87  const char *pat;
88  int erroffset;
89 
90  pat = pattern ? octstr_get_cstr(pattern) : NULL;
91  if ((preg = pcre_compile(pat, cflags, &err, &erroffset, NULL)) == NULL) {
92  error(0, "%s:%ld: %s: pcre compilation `%s' failed at offset %d: %s "
93  "(Called from %s:%ld:%s.)",
94  __FILE__, (long) __LINE__, __func__, octstr_get_cstr(pattern),
95  erroffset, err, (file), (long) (line), (func));
96  }
97 
98  return preg;
99 }
100 
101 
102 int gw_pcre_exec_real(const pcre *preg, const Octstr *string, int start,
103  int eflags, int *ovector, int oveccount,
104  const char *file, long line, const char *func)
105 {
106  int rc;
107  char *sub;
108 
109  gw_assert(preg != NULL);
110 
111  sub = string ? octstr_get_cstr(string) : NULL;
112  rc = pcre_exec(preg, NULL, sub, octstr_len(string), start, eflags,
113  ovector, oveccount);
114 
115  if (rc < 0 && rc != PCRE_ERROR_NOMATCH) {
116  error(0, "%s:%ld: %s: pcre execution on `%s' failed with error %d "
117  "(Called from %s:%ld:%s.)",
118  __FILE__, (long) __LINE__, __func__, octstr_get_cstr(string), rc,
119  (file), (long) (line), (func));
120  }
121 
122  return rc;
123 }
124 
125 
126 /********************************************************************
127  * Matching wrapper functions.
128  *
129  * Beware that the regex compilation takes the most significant CPU time,
130  * so always try to have pre-compiled regular expressions that keep being
131  * reused and re-matched on variable string patterns.
132  */
133 
134 int gw_pcre_match_real(const Octstr *re, const Octstr *os, const char *file,
135  long line, const char *func)
136 {
137  pcre *regexp;
138  int rc;
139  int ovector[PCRE_OVECCOUNT];
140 
141  /* compile */
142  regexp = gw_pcre_comp_real(re, 0, file, line, func);
143  if (regexp == NULL)
144  return 0;
145 
146  /* execute and match */
147  rc = gw_pcre_exec_real(regexp, os, 0, 0, ovector, PCRE_OVECCOUNT,
148  file, line, func);
149 
150  return (rc > 0) ? 1 : 0;
151 }
152 
153 
154 int gw_pcre_match_pre_real(const pcre *preg, const Octstr *os, const char *file,
155  long line, const char *func)
156 {
157  int rc;
158  int ovector[PCRE_OVECCOUNT];
159 
160  gw_assert(preg != NULL);
161 
162  /* execute and match */
163  rc = gw_pcre_exec_real(preg, os, 0, 0, ovector, PCRE_OVECCOUNT,
164  file, line, func);
165 
166  return (rc > 0) ? 1 : 0;
167 }
168 
169 
170 #endif /* HAVE_PCRE */
171 
void error(int err, const char *fmt,...)
Definition: log.c:612
#define octstr_get_cstr(ostr)
Definition: octstr.h:233
FILE * file
Definition: log.c:133
gw_assert(wtls_machine->packet_to_send!=NULL)
long octstr_len(const Octstr *ostr)
Definition: octstr.c:340
Definition: octstr.c:118
static int start
See file LICENSE for details about the license agreement for using, modifying, copying or deriving work from this software.