2 * Samba Unix/Linux SMB client library
4 * Copyright (C) Gregor Beck 2010
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 3 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program. If not, see <http://www.gnu.org/licenses/>.
22 * @author Gregor Beck <gb@sernet.de>
24 * @brief A simple recursive parser.
28 #include "system/locale.h"
33 bool srprs_skipws(const char** ptr
) {
34 while (isspace(**ptr
))
39 bool srprs_char(const char** ptr
, char c
) {
47 bool srprs_str(const char** ptr
, const char* str
, ssize_t len
)
52 if (memcmp(*ptr
, str
, len
) == 0) {
59 bool srprs_charset(const char** ptr
, const char* set
, cbuf
* oss
)
61 const char* p
= strchr(set
, **ptr
);
62 if (p
!= NULL
&& *p
!= '\0') {
63 cbuf_putc(oss
, **ptr
);
70 bool srprs_charsetinv(const char** ptr
, const char* set
, cbuf
* oss
)
72 if ((**ptr
!= '\0') && (strchr(set
, **ptr
) == NULL
)) {
73 cbuf_putc(oss
, **ptr
);
82 bool srprs_quoted_string(const char** ptr
, cbuf
* str
, bool* cont
)
84 const char* pos
= *ptr
;
85 const size_t spos
= cbuf_getpos(str
);
87 if (cont
== NULL
|| *cont
== false) {
88 if (!srprs_char(&pos
, '\"'))
93 while (srprs_charsetinv(&pos
, "\\\"", str
))
114 if (!srprs_charset(&pos
, "\\\"", str
))
124 cbuf_setpos(str
, spos
);
128 bool srprs_hex(const char** ptr
, size_t len
, unsigned* u
)
130 const char *str
= *ptr
;
131 const char *pos
= *ptr
;
136 assert((len
>= 1) && (len
<= 8));
138 for (i
=0; i
<len
; i
++) {
139 if (!srprs_charset(&pos
, "0123456789abcdefABCDEF", NULL
)) {
145 ret
= sscanf(buf
, "%8x", u
);
155 bool srprs_nl(const char** ptr
, cbuf
* nl
)
157 static const char CRLF
[] = "\r\n";
158 if (srprs_str(ptr
, CRLF
, sizeof(CRLF
) - 1)) {
159 cbuf_puts(nl
, CRLF
, sizeof(CRLF
) - 1);
162 return srprs_charset(ptr
, "\n\r", nl
);
165 bool srprs_eos(const char** ptr
)
167 return (**ptr
== '\0');
170 bool srprs_eol(const char** ptr
, cbuf
* nl
)
172 return srprs_eos(ptr
) || srprs_nl(ptr
, nl
);
175 bool srprs_line(const char** ptr
, cbuf
* str
)
177 while (srprs_charsetinv(ptr
, "\n\r", str
))
182 bool srprs_quoted(const char** ptr
, cbuf
* str
)
184 const char* pos
= *ptr
;
185 const size_t spos
= cbuf_getpos(str
);
187 if (!srprs_char(&pos
, '"')) {
192 while (srprs_charsetinv(&pos
, "\\\"", str
))
204 if (!srprs_charset(&pos
, "\\\"", str
)) {
206 if (!srprs_hex(&pos
, 2, &u
)) {
218 cbuf_setpos(str
, spos
);