1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
|
/*
* Ivy, C interface
*
* Copyright (C) 1997-2000
* Centre d'Études de la Navigation Aérienne
*
* Bind syntax for extracting message comtent
* using regexp or other
*
* Authors: François-Régis Colin <fcolin@cena.fr>
*
* $Id$
*
* Please refer to file version.h for the
* copyright notice regarding this software
*/
/* Module de gestion de la syntaxe des messages Ivy */
#include <stdio.h>
#include <sys/types.h>
#include <time.h>
#include <stdlib.h>
#include <memory.h>
#ifdef USE_PCRE_REGEX
#define OVECSIZE 60 /* must be multiple of 3, for regexp return */
#include <pcre.h>
#else
#include <regex.h>
#endif
#include "list.h"
#include "ivybind.h"
#ifdef USE_PCRE_REGEX
static const char *errbuf;
static int erroffset;
#else
static int erroroffset;
static char errbuf[4096];
#endif
struct _binding {
struct _binding *next;
#ifdef USE_PCRE_REGEX
pcre *regexp;
pcre_extra *inspect;
int ovector[OVECSIZE];
#else
regex_t regexp; /* la regexp sous forme machine */
regmatch_t match[MAX_MSG_FIELDS+1]; /* resultat du match */
#endif
};
IvyBinding IvyBindingCompile( const char * expression )
{
IvyBinding bind=0;
#ifdef USE_PCRE_REGEX
pcre *regexp;
regexp = pcre_compile(expression, PCRE_OPT,&errbuf,&erroffset,NULL);
if ( regexp != NULL )
{
bind = (IvyBinding)malloc( sizeof( struct _binding ));
bind->regexp = regexp;
bind->inspect = pcre_study(regexp,0,&errbuf);
if (errbuf!=NULL)
{
printf("Error studying %s, message: %s\n",expression,errbuf);
}
}
else
{
printf("Error compiling '%s', %s\n", expression, errbuf);
}
#else
regex_t regexp;
int reg;
reg = regcomp(®exp, expression, REGCOMP_OPT|REG_EXTENDED);
if ( reg == 0 )
{
bind = (IvyBinding)malloc( sizeof( struct _binding ));
bind->regexp = regexp;
}
else
{
regerror (reg, ®exp, errbuf, sizeof(errbuf) );
erroroffset = 0; // TODO unkown offset error
printf("Error compiling '%s', %s\n", expression, errbuf);
}
#endif
return bind;
}
void IvyBindingGetCompileError( int *offset, const char **errmessage )
{
#ifdef USE_PCRE_REGEX
*offset = erroffset;
*errmessage = errbuf;
#else
*offset = erroroffset;
*errmessage = errbuf;
#endif
}
void IvyBindingFree( IvyBinding bind )
{
#ifdef USE_PCRE_REGEX
if (bind->inspect!=NULL) pcre_free(bind->inspect);
pcre_free(bind->regexp);
#else
#endif
free ( bind );
}
int IvyBindingExec( IvyBinding bind, const char * message )
{
int nb_match = 0;
#ifdef USE_PCRE_REGEX
nb_match = pcre_exec(
bind->regexp,
bind->inspect,
message,
strlen(message),
0, /* debut */
0, /* no other regexp option */
bind->ovector,
OVECSIZE);
if (nb_match<1) return 0; /* no match */
nb_match--; // firts arg wall string ???
#else
memset( bind->match, -1, sizeof(bind->match )); /* work around bug !!!*/
nb_match = regexec (&bind->regexp, message, MAX_MSG_FIELDS, bind->match, 0)
if (nb_match == REG_NOMATCH)
return 0;
/* TODO Possible BUG if empty match in middle of regexp */
for ( index = 0; index < MAX_MSG_FIELDS; index++ )
{
if ( bind->match[i].rm_so != -1 )
nb_match++;
}
#endif
return nb_match;
}
void IvyBindingGetMatch( IvyBinding bind, const char *message, int index, const char **arg, int *arglen )
{
index++; // firts arg wall string ???
#ifdef USE_PCRE_REGEX
*arglen = bind->ovector[2*index+1]- bind->ovector[2*index];
*arg = message + bind->ovector[2*index];
#else /* we don't USE_PCRE_REGEX */
regmatch_t* p;
p = &bind->match[index];
if ( p->rm_so != -1 ) {
*arglen = p->rm_eo - p->rm_so;
*arg = message + p->rm_so;
} else { // ARG VIDE
*arglen = 0;
*arg = message;
}
#endif
}
|
