Initialize the description in UAT_FLD_PROTO().
[metze/wireshark/wip.git] / epan / uat.h
1 /*
2  *  uat.h
3  *
4  *  $Id$
5  *
6  *  User Accessible Tables
7  *  Mantain an array of user accessible data strucures
8  *  
9  * (c) 2007, Luis E. Garcia Ontanon <luis.ontanon@gmail.com>
10  *
11  * Wireshark - Network traffic analyzer
12  * By Gerald Combs <gerald@wireshark.org>
13  * Copyright 2001 Gerald Combs
14  * 
15  * This program is free software; you can redistribute it and/or
16  * modify it under the terms of the GNU General Public License
17  * as published by the Free Software Foundation; either version 2
18  * of the License, or (at your option) any later version.
19  * 
20  * This program is distributed in the hope that it will be useful,
21  * but WITHOUT ANY WARRANTY; without even the implied warranty of
22  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
23  * GNU General Public License for more details.
24  * 
25  * You should have received a copy of the GNU General Public License
26  * along with this program; if not, write to the Free Software
27  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
28  */
29
30 #ifndef _UAT_H_
31 #define _UAT_H_
32
33 /*
34  * uat mantains a dynamically allocated table accessible to the user
35  * via a file and/or gui tables.
36  *
37  * the file is located either in userdir(when first read or when writen) or
38  * in datadir for defaults (read only , it will be always written to userdir).
39  *
40  * the behaviour of the table is controlled by a series of callbacks
41  * the caller must provide.
42  *
43  * BEWARE that the user can change an uat at (almost) any time, 
44  * That is pointers to records in an uat are valid only during the call
45  * to the function that obtains them (do not store them).
46  *
47  * UATs are meant for short tables of user data (passwords and such) there's
48  * no quick access, you must iterate through them each time to fetch the record
49  * you are looking for. Use uat_dup() or uat_se_dup() if necessary.
50  *
51  * Only users via gui or editing the file can add/remove records your code cannot.
52  */
53
54 /* obscure data type to handle an uat */
55 typedef struct _uat_t uat_t;
56 /********************************************
57  * Callbacks:
58  * these instruct uat on how to deal with user info and data in records
59  ********************************************/
60
61 /********
62  * Callbacks for the entire table (these deal with entire records)
63  ********/
64
65 /*
66  * Copy CB
67  * used to copy a record
68  * optional, memcpy will be used if not given
69  * copy(dest,orig,len)
70  */
71 typedef void* (*uat_copy_cb_t)(void*, const void*, unsigned);
72
73 /*
74  *
75  * Free CB
76  *
77  * destroy a record's child data
78  * (do not free the container, it will be handled by uat)
79  * it is optional, no child data will be freed if no present
80  * free(record)
81  */
82 typedef void (*uat_free_cb_t)(void*);
83
84 /*
85  * Update CB
86  *
87  * to be called after all record fields has been updated
88  * optional, record will be updated always if not given
89  * update(record,&error)
90  */
91 typedef void (*uat_update_cb_t)(void* , char** );
92
93
94 /*******
95  * Callbacks for single fields (these deal with single values)
96  * the caller should provide one of these for every field!
97  ********/
98
99 /* 
100  * given an input string (ptr, len) checks if the value is OK for a field in the record.
101  * it will return TRUE if OK or else
102  * it will return FALSE and may set *error to inform the user on what's
103  * wrong with the given input
104  * optional, if not given any input is considered OK and the set cb will be called
105  * chk(record, ptr, len, chk_data, fld_data, &error)
106  */
107 typedef gboolean (*uat_fld_chk_cb_t)(void*, const char*, unsigned, void*, void*, char**);
108
109 /*
110  * Set Field CB
111  *
112  * given an input string (ptr, len) sets the value of a field in the record,
113  * it will return TRUE if OK or else
114  * it will return FALSE and may set *error to inform the user on what's
115  * wrong with the given input
116  * it is mandatory
117  * set(record, ptr, len, set_data, fld_data)
118  */
119 typedef void (*uat_fld_set_cb_t)(void*, const char*, unsigned, void*, void*);
120
121 /*
122  * given a record returns a string representation of the field
123  * mandatory
124  * tostr(record, &out_ptr, &out_len, tostr_data, fld_data)
125  */
126 typedef void (*uat_fld_tostr_cb_t)(void*, char**, unsigned*, void*, void*);
127
128 /*********** 
129  * Text Mode
130  *
131  * used for file and dialog representation of fileds in columns,
132  * when the file is read it modifies the way the value is passed back to the fld_set_cb 
133  * (see definition bellow for description)
134  ***********/
135
136 typedef enum _uat_text_mode_t {
137         PT_TXTMOD_NONE,
138         /* not used */
139         
140         PT_TXTMOD_STRING,
141         /*
142          file:
143                  reads:
144                          ,"\x20\x00\x30", as " \00",3
145                          ,"", as "",0
146                          ,, as NULL,0
147                  writes:
148                          ,"\x20\x30\x00\x20", for " 0\0 ",4
149                          ,"", for *, 0
150                          ,, for NULL, *
151          dialog:
152                  accepts \x?? and other escapes
153                  gets "",0 on empty string
154          */
155         PT_TXTMOD_HEXBYTES,
156         /*
157          file:
158                  reads:
159                          ,A1b2C3d4, as "\001\002\003\004",4
160                          ,, as NULL,0
161                  writes:
162                          ,, on NULL, *
163                          ,a1b2c3d4, on "\001\002\003\004",4
164          dialog:
165                  "a1b2c3d4" as "\001\002\003\004",4
166                  "a1 b2:c3d4" as "\001\002\003\004",4
167                  "" as NULL,0
168                  "invalid" as NULL,3
169                  "a1b" as NULL, 1
170          */
171         PT_TXTMOD_ENUM
172 } uat_text_mode_t;
173
174 /*
175  * Fields
176  *
177  *
178  */
179 typedef struct _uat_field_t {
180         const char* name;
181         uat_text_mode_t mode;
182         
183         struct {
184                 uat_fld_chk_cb_t chk;
185                 uat_fld_set_cb_t set;
186                 uat_fld_tostr_cb_t tostr;
187         } cb;
188         
189         struct {
190                 void* chk;
191                 void* set;
192                 void* tostr;
193         } cbdata;
194         
195         void* fld_data;
196         
197         char* desc;
198         struct _fld_data_t* priv;
199 } uat_field_t;
200
201 #define FLDFILL NULL
202 #define UAT_END_FIELDS {0,PT_TXTMOD_NONE,{0,0,0},{0,0,0},0,0,FLDFILL}
203
204
205 #define UAT_CAT_GENERAL "General"
206 #define UAT_CAT_CRYPTO "Decryption"
207 #define UAT_CAT_FFMT "File Formats"
208
209 /*
210  * uat_new()
211  *
212  * creates a new uat
213  *
214  * name: the name of the table
215  *
216  * data_ptr: a pointer to a null terminated array of pointers to the data
217  *
218  * default_data: a pinter to a struct containing default values
219  *
220  * size: the size of the structure
221  *
222  * filename: the filename to be used (either in userdir or datadir)
223  *
224  * copy_cb: a function that copies the data in the struct
225  *
226  * update_cb: will be called when a record is updated
227  *
228  * free_cb: will be called to destroy a struct in the dataset
229  *
230  * 
231  */
232 uat_t* uat_new(const char* name,
233                            size_t size,
234                            char* filename,
235                            void** data_ptr,
236                            guint* num_items,
237                            char* category,
238                            char* help,
239                            uat_copy_cb_t copy_cb,
240                            uat_update_cb_t update_cb,
241                            uat_free_cb_t free_cb,
242                            uat_field_t* flds_array);
243
244
245 /*
246  * uat_dup()
247  * uat_se_dup()
248  * make a reliable copy of an uat for internal use,
249  * so that pointers to records can be kept through calls.
250  * return NULL on zero len.
251  */
252 void* uat_dup(uat_t*, guint* len_p); /* to be freed */
253 void* uat_se_dup(uat_t*, guint* len_p);
254
255 /*
256  * Some common uat_fld_chk_cbs 
257  */
258 gboolean uat_fld_chk_str(void*, const char*, unsigned, void*,void*, char** err);
259 gboolean uat_fld_chk_proto(void*, const char*, unsigned, void*,void*, char** err);
260 gboolean uat_fld_chk_num_dec(void*, const char*, unsigned, void*, void*, char** err);
261 gboolean uat_fld_chk_num_hex(void*, const char*, unsigned, void*, void*, char** err);
262 gboolean uat_fld_chk_enum(void*, const char*, unsigned, void*, void*, char**);
263
264 #define CHK_STR_IS_DECL(what) \
265 gboolean uat_fld_chk_str_ ## what (void*, const char*, unsigned, void*, void*, char**)
266
267 typedef void (*uat_cb_t)(void* uat,void* user_data);
268 void uat_foreach_table(uat_cb_t cb,void* user_data);
269
270 /* Some strings entirely made of ... already declared */
271 CHK_STR_IS_DECL(isprint);
272 CHK_STR_IS_DECL(isalpha);
273 CHK_STR_IS_DECL(isalnum);
274 CHK_STR_IS_DECL(isdigit);
275 CHK_STR_IS_DECL(isxdigit);
276
277 #define CHK_STR_IS_DEF(what) \
278 gboolean uat_fld_chk_str_ ## what (void* u1 _U_, const char* strptr, unsigned len, void* u2 _U_, void* u3 _U_, char** err) { \
279         guint i; for (i=0;i<len;i++) { \
280                 char c = strptr[i]; \
281                         if (! what(c)) { \
282                                 *err = ep_strdup_printf("invalid char pos=%d value=%.2x",i,c); return FALSE;  } } \
283                 *err = NULL; return TRUE; }
284
285
286 /*
287  * Macros
288  *   to define basic uat_fld_set_cbs, uat_fld_tostr_cbs
289  *   for those elements in uat_field_t array
290  */
291
292 /*
293  * CSTRING macros,
294  *    a simple c-string contained in (((rec_t*)rec)->(field_name))
295  */
296 #define UAT_CSTRING_CB_DEF(basename,field_name,rec_t) \
297 static void basename ## _ ## field_name ## _set_cb(void* rec, const char* buf, unsigned len, void* u1 _U_, void* u2 _U_) {\
298         if ((((rec_t*)rec)->field_name)) g_free((((rec_t*)rec)->field_name)); \
299         (((rec_t*)rec)->field_name) = g_strndup(buf,len); } \
300 static void basename ## _ ## field_name ## _tostr_cb(void* rec, char** out_ptr, unsigned* out_len, void* u1 _U_, void* u2 _U_) {\
301                 if (((rec_t*)rec)->field_name ) { \
302                         *out_ptr = (((rec_t*)rec)->field_name); *out_len = strlen((((rec_t*)rec)->field_name)); \
303                 } else { \
304                         *out_ptr = ""; *out_len = 0; } }
305
306 #define UAT_FLD_CSTRING(basename,field_name,desc) \
307         {#field_name, PT_TXTMOD_STRING,{uat_fld_chk_str,basename ## _ ## field_name ## _set_cb,basename ## _ ## field_name ## _tostr_cb},{0,0,0},0,desc,FLDFILL}
308
309 #define UAT_FLD_CSTRING_ISPRINT(basename,field_name,desc) \
310         {#field_name, PT_TXTMOD_STRING,{uat_fld_chk_str_isprint,basename ## _ ## field_name ## _set_cb,basename ## _ ## field_name ## _tostr_cb},{0,0,0},0,desc,FLDFILL}
311
312 #define UAT_FLD_CSTRING_OTHER(basename,field_name,chk,desc) \
313         {#field_name, PT_TXTMOD_STRING,{ chk ,basename ## _ ## field_name ## _set_cb,basename ## _ ## field_name ## _tostr_cb},{0,0,0},0,desc,FLDFILL}
314
315 /*
316  * LSTRING MACROS
317  */
318 #define UAT_LSTRING_CB_DEF(basename,field_name,rec_t,ptr_element,len_element) \
319 static void basename ## _ ## field_name ## _set_cb(void* rec, const char* buf, unsigned len, void* u1 _U_, void* u2 _U_) {\
320         if ((((rec_t*)rec)->ptr_element)) g_free((((rec_t*)rec)->ptr_element)); \
321         (((rec_t*)rec)->ptr_element) = g_strndup(buf,len); \
322         (((rec_t*)rec)->len_element) = len; } \
323 static void basename ## _ ## field_name ## _tostr_cb(void* rec, char** out_ptr, unsigned* out_len, void* u1 _U_, void* u2 _U_) {\
324         if (((rec_t*)rec)->ptr_element ) { \
325                 *out_ptr = (((rec_t*)rec)->ptr_element); *out_len = (((rec_t*)rec)->len_element); \
326         } else { \
327                 *out_ptr = ""; *out_len = 0; } }
328
329 #define UAT_FLD_LSTRING(basename,field_name,desc) \
330 {#field_name, PT_TXTMOD_STRING,{0,basename ## _ ## field_name ## _set_cb,basename ## _ ## field_name ## _tostr_cb},{0,0,0},0,desc,FLDFILL}
331
332
333 /*
334  * BUFFER macros,
335  *    a buffer_ptr contained in (((rec_t*)rec)->(field_name))
336  *    and its len in (((rec_t*)rec)->(len_name))
337  *  XXX: UNTESTED
338  */
339 #define UAT_BUFFER_CB_DEF(basename,field_name,rec_t,ptr_element,len_element) \
340 static void basename ## _ ## field_name ## _set_cb(void* rec, const char* buf, unsigned len, void* u1 _U_, void* u2 _U_) {\
341                 if ((((rec_t*)rec)->ptr_element) ) g_free((((rec_t*)rec)->ptr_element)); \
342                         (((rec_t*)rec)->ptr_element) = len ? g_memdup(buf,len) : NULL; \
343                         (((rec_t*)rec)->len_element) = len; } \
344 static void basename ## _ ## field_name ## _tostr_cb(void* rec, char** out_ptr, unsigned* out_len, void* u1 _U_, void* u2 _U_) {\
345         *out_ptr = ((rec_t*)rec)->ptr_element ? ep_memdup(((rec_t*)rec)->ptr_element,((rec_t*)rec)->len_element) : ""; \
346         *out_len = ((rec_t*)rec)->len_element; }
347
348 #define UAT_FLD_BUFFER(basename,field_name,desc) \
349         {#field_name, PT_TXTMOD_HEXBYTES,{0,basename ## _ ## field_name ## _set_cb,basename ## _ ## field_name ## _tostr_cb},{0,0,0},0,desc,FLDFILL}
350
351
352 /*
353  * DEC Macros,
354  *   a decimal number contained in 
355  */
356 #define UAT_DEC_CB_DEF(basename,field_name,rec_t) \
357 static void basename ## _ ## field_name ## _set_cb(void* rec, const char* buf, unsigned len, void* u1 _U_, void* u2 _U_) {\
358         ((rec_t*)rec)->field_name = strtol(ep_strndup(buf,len),NULL,10); } \
359 static void basename ## _ ## field_name ## _tostr_cb(void* rec, char** out_ptr, unsigned* out_len, void* u1 _U_, void* u2 _U_) {\
360         *out_ptr = ep_strdup_printf("%d",((rec_t*)rec)->field_name); \
361         *out_len = strlen(*out_ptr); }
362
363 #define UAT_FLD_DEC(basename,field_name,desc) \
364         {#field_name, PT_TXTMOD_STRING,{uat_fld_chk_num_dec,basename ## _ ## field_name ## _set_cb,basename ## _ ## field_name ## _tostr_cb},{0,0,0},0,desc,FLDFILL}
365
366
367 /*
368  * HEX Macros,
369  *   an hexadecimal number contained in 
370  */
371 #define UAT_HEX_CB_DEF(basename,field_name,rec_t) \
372 static void basename ## _ ## field_name ## _set_cb(void* rec, const char* buf, unsigned len, void* u1 _U_, void* u2 _U_) {\
373         ((rec_t*)rec)->field_name = strtol(ep_strndup(buf,len),NULL,16); } \
374 static void basename ## _ ## field_name ## _tostr_cb(void* rec, char** out_ptr, unsigned* out_len, void* u1 _U_, void* u2 _U_) {\
375         *out_ptr = ep_strdup_printf("%x",((rec_t*)rec)->field_name); \
376         *out_len = strlen(*out_ptr); }
377
378 #define UAT_FLD_HEX(basename,field_name,desc) \
379 {#field_name, PT_TXTMOD_STRING,{uat_fld_chk_num_hex,basename ## _ ## field_name ## _set_cb,basename ## _ ## field_name ## _tostr_cb},{0,0,0},0,desc,FLDFILL}
380
381
382 /*
383  * ENUM macros
384  *  enum_t: name = ((enum_t*)ptr)->strptr 
385  *          value = ((enum_t*)ptr)->value 
386  *  rec_t:
387  *        value
388  */
389 #define UAT_VS_DEF(basename,field_name,rec_t,default_val,default_str) \
390 static void basename ## _ ## field_name ## _set_cb(void* rec, const char* buf, unsigned len, void* vs, void* u2 _U_) {\
391         guint i; \
392         char* str = ep_strndup(buf,len); \
393         const char* cstr; ((rec_t*)rec)->field_name = default_val; \
394         for(i=0; ( cstr = ((value_string*)vs)[i].strptr ) ;i++) { \
395                 if (g_str_equal(cstr,str)) { \
396                         ((rec_t*)rec)->field_name = ((value_string*)vs)[i].value; return; } } } \
397 static void basename ## _ ## field_name ## _tostr_cb(void* rec, char** out_ptr, unsigned* out_len, void* vs, void* u2 _U_) {\
398         guint i; \
399         *out_ptr = ep_strdup(default_str); *out_len = strlen(default_str);\
400         for(i=0;((value_string*)vs)[i].strptr;i++) { \
401                 if ( ((value_string*)vs)[i].value == ((rec_t*)rec)->field_name ) { \
402                         *out_ptr = ep_strdup(((value_string*)vs)[i].strptr); \
403                         *out_len = strlen(*out_ptr); return; } } }
404
405
406 #define UAT_FLD_VS(basename,field_name,enum,desc) \
407         {#field_name, PT_TXTMOD_ENUM,{uat_fld_chk_enum,basename ## _ ## field_name ## _set_cb,basename ## _ ## field_name ## _tostr_cb},{&(enum),&(enum),&(enum)},&(enum),desc,FLDFILL}
408
409
410 /*
411  * PROTO macros
412  */
413
414 #define UAT_PROTO_DEF(basename,field_name,rec_t) \
415 static void basename ## _ ## field_name ## _set_cb(void* rec, const char* buf, unsigned len, void* u1 _U_, void* u2 _U_) {\
416         if (len) { \
417                 char* name = ep_strndup(buf,len); g_strdown(name); g_strchug(name); \
418                 ((rec_t*)rec)->field_name = find_dissector(name); \
419         } else { ((rec_t*)rec)->field_name = find_dissector("data"); } } \
420 static void basename ## _ ## field_name ## _tostr_cb(void* rec, char** out_ptr, unsigned* out_len, void* u1 _U_, void* u2 _U_) {\
421         if ( ((rec_t*)rec)->field_name ) { \
422                 *out_ptr = ep_strdup(dissector_handle_get_short_name(((rec_t*)rec)->field_name)); g_strdown(*out_ptr); \
423                 *out_len = strlen(*out_ptr); \
424         } else { \
425                 *out_ptr = ""; *out_len = 0; } } 
426
427
428 #define UAT_FLD_PROTO(basename,field_name,desc) \
429         {#field_name, PT_TXTMOD_STRING,{uat_fld_chk_proto,basename ## _ ## field_name ## _set_cb,basename ## _ ## field_name ## _tostr_cb},{0,0,0},0,desc,FLDFILL}
430
431
432
433 #endif
434