2 Bacula® - The Network Backup Solution
4 Copyright (C) 2000-2007 Free Software Foundation Europe e.V.
6 The main author of Bacula is Kern Sibbald, with contributions from
7 many others, a complete list can be found in the file AUTHORS.
8 This program is Free Software; you can redistribute it and/or
9 modify it under the terms of version two of the GNU General Public
10 License as published by the Free Software Foundation plus additions
11 that are listed in the file LICENSE.
13 This program is distributed in the hope that it will be useful, but
14 WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
23 Bacula® is a registered trademark of John Walker.
24 The licensor of Bacula is the Free Software Foundation Europe
25 (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich,
26 Switzerland, email:ftf@fsfeurope.org.
31 * Lexical scanning of configuration files, used by parsers.
42 /* Lex get_char() return values */
49 /* Tokens returned by get_token() */
53 #define T_IDENTIFIER 104
54 #define T_UNQUOTED_STRING 105
55 #define T_QUOTED_STRING 106
56 #define T_BOB 108 /* begin block */
57 #define T_EOB 109 /* end of block */
62 #define T_UTF8_BOM 201 /* File starts with a UTF-8 BOM*/
63 #define T_UTF16_BOM 202 /* File starts with a UTF-16LE BOM*/
66 * The following will be returned only if
67 * the appropriate expect flag has been set
69 #define T_SKIP_EOL 113 /* scan through EOLs */
70 #define T_PINT32 114 /* positive integer */
71 #define T_PINT32_RANGE 115 /* positive integer range */
72 #define T_INT32 116 /* integer */
73 #define T_INT64 117 /* 64 bit integer */
74 #define T_NAME 118 /* name max 128 chars */
75 #define T_STRING 119 /* string */
77 #define T_ALL 0 /* no expectations */
89 lex_utf8_bom, /* we are parsing out a utf8 byte order mark */
90 lex_utf16_le_bom /* we are parsing out a utf-16 (little endian) byte order mark */
93 /* Lex scan options */
94 #define LOPT_NO_IDENT 0x1 /* No Identifiers -- use string */
95 #define LOPT_STRING 0x2 /* Force scan for string */
97 class BPIPE; /* forward reference */
100 typedef struct s_lex_context {
101 struct s_lex_context *next; /* pointer to next lexical context */
102 int options; /* scan options */
103 char *fname; /* filename */
104 FILE *fd; /* file descriptor */
105 char line[MAXSTRING]; /* input line */
106 char str[MAXSTRING]; /* string being scanned */
107 int str_len; /* length of string */
108 int line_no; /* file line number */
109 int col_no; /* char position on line */
110 int begin_line_no; /* line no of beginning of string */
111 enum lex_state state; /* lex_state variable */
112 int ch; /* last char/L_VAL returned by get_char */
115 uint32_t pint32_val2;
118 void (*scan_error)(const char *file, int line, struct s_lex_context *lc, const char *msg, ...);
119 int err_type; /* message level for scan_error (M_..) */
120 void *caller_ctx; /* caller private data */
121 BPIPE *bpipe; /* set if we are piping */
124 typedef void (LEX_ERROR_HANDLER)(const char *file, int line, LEX *lc, const char *msg, ...);
126 /* Lexical scanning errors in parsing conf files */
127 #define scan_err0(lc, msg) lc->scan_error(__FILE__, __LINE__, lc, msg)
128 #define scan_err1(lc, msg, a1) lc->scan_error(__FILE__, __LINE__, lc, msg, a1)
129 #define scan_err2(lc, msg, a1, a2) lc->scan_error(__FILE__, __LINE__, lc, msg, a1, a2)
130 #define scan_err3(lc, msg, a1, a2, a3) lc->scan_error(__FILE__, __LINE__, lc, msg, a1, a2, a3)
131 #define scan_err4(lc, msg, a1, a2, a3, a4) lc->scan_error(__FILE__, __LINE__, lc, msg, a1, a2, a3, a4)
132 #define scan_err5(lc, msg, a1, a2, a3, a4, a5) lc->scan_error(__FILE__, __LINE__, lc, msg, a1, a2, a3, a4, a5)
133 #define scan_err6(lc, msg, a1, a2, a3, a4, a5, a6) lc->scan_error(__FILE__, __LINE__, lc, msg, a1, a2, a3, a4, a5, a6)
135 void scan_to_eol(LEX *lc);
136 int scan_to_next_not_eol(LEX * lc);