* WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
*/
#include <stdio.h>
+#include <ctype.h>
#include <glib.h>
-#define set_error(msg...) do { if (error != NULL) *error = g_error_new (GINT_TO_POINTER (1), 1, msg); } while (0);
+#define set_error(msg, ...) do { if (error != NULL) *error = g_error_new (GINT_TO_POINTER (1), 1, msg, __VA_ARGS__); } while (0);
typedef enum {
START,
g_free (context);
}
+static gboolean
+my_isspace (char c)
+{
+ if (c == ' ' || c == '\t' || c == '\r' || c == '\n' || c == '\v')
+ return TRUE;
+ return FALSE;
+}
+
+static gboolean
+my_isalnum (char c)
+{
+ if ((c >= 'a' && c <= 'z') || (c >= 'A' && c <= 'Z'))
+ return TRUE;
+ if (c >= '0' && c <= '9')
+ return TRUE;
+
+ return FALSE;
+}
+
+static gboolean
+my_isalpha (char c)
+{
+ if ((c >= 'a' && c <= 'z') || (c >= 'A' && c <= 'Z'))
+ return TRUE;
+ return FALSE;
+}
+
static const char *
skip_space (const char *p, const char *end)
{
- for (; p < end && isspace (*p); p++)
+ for (; p < end && my_isspace (*p); p++)
;
return p;
}
int l;
if (*p != '"'){
- set_error ("Expected the attribute value to start with a quote");
+ set_error ("%s", "Expected the attribute value to start with a quote");
return end;
}
start = ++p;
;
if (p == end)
return end;
- l = p - start;
+ l = (int)(p - start);
p++;
- *value = malloc (l + 1);
+ *value = g_malloc (l + 1);
if (*value == NULL)
return end;
strncpy (*value, start, l);
const char *start = p;
int l;
- for (; p < end && isalnum (*p); p++)
+ for (; p < end && my_isalnum (*p); p++)
;
if (p == end)
return end;
- l = p - start;
- *value = malloc (l + 1);
+ l = (int)(p - start);
+ *value = g_malloc (l + 1);
if (*value == NULL)
return end;
strncpy (*value, start, l);
p = skip_space (p, end);
if (p == end){
- free (name);
+ g_free (name);
return p;
}
if (*p != '='){
set_error ("Expected an = after the attribute name `%s'", name);
- free (name);
+ g_free (name);
return end;
}
p++;
p = skip_space (p, end);
if (p == end){
- free (name);
+ g_free (name);
return end;
}
p = parse_value (p, end, &value, error);
if (p == end){
- free (name);
+ g_free (name);
return p;
}
switch (context->state){
case START:
- if (c == ' ' || c == '\t' || c == '\f' || c == '\n')
+ if (c == ' ' || c == '\t' || c == '\f' || c == '\n' || (c & 0x80))
continue;
if (c == '<'){
if (p+1 < end && p [1] == '?'){
context->state = START_ELEMENT;
continue;
}
- set_error ("Expected < to start the document");
+ set_error ("%s", "Expected < to start the document");
goto fail;
case SKIP_XML_DECLARATION:
int full_stop = 0, l;
gchar **names = NULL, **values = NULL;
- for (; p < end && isspace (*p); p++)
+ for (; p < end && my_isspace (*p); p++)
;
if (p == end){
- set_error ("Unfinished element");
+ set_error ("%s", "Unfinished element");
goto fail;
}
break;
}
- if (!(isascii (*p) && isalpha (*p))){
- set_error ("Expected an element name");
+ if (!my_isalpha (*p)){
+ set_error ("%s", "Expected an element name");
goto fail;
}
- for (++p; p < end && (isalnum (*p) || (*p == '.')); p++)
+ for (++p; p < end && (my_isalnum (*p) || (*p == '.')); p++)
;
if (p == end){
- set_error ("Expected an element");
+ set_error ("%s", "Expected an element");
goto fail;
}
element_end = p;
- for (; p < end && isspace (*p); p++)
+ for (; p < end && my_isspace (*p); p++)
;
if (p == end){
- set_error ("Unfinished element");
+ set_error ("%s", "Unfinished element");
goto fail;
}
p = parse_attributes (p, end, &names, &values, error, &full_stop, context->state);
}
/* Only set the error if parse_attributes did not */
if (error != NULL && *error == NULL)
- set_error ("Unfinished sequence");
+ set_error ("%s", "Unfinished sequence");
goto fail;
}
- l = element_end - element_start;
- ename = malloc (l + 1);
+ l = (int)(element_end - element_start);
+ ename = g_malloc (l + 1);
if (ename == NULL)
goto fail;
strncpy (ename, element_start, l);
}
if (error != NULL && *error != NULL){
- free (ename);
+ g_free (ename);
goto fail;
}
if (context->parser.end_element != NULL && context->state == START_ELEMENT){
context->parser.end_element (context, ename, context->user_data, error);
if (error != NULL && *error != NULL){
- free (ename);
+ g_free (ename);
goto fail;
}
}
- free (ename);
+ g_free (ename);
} else {
context->level = g_slist_prepend (context->level, ename);
}
break;
case FLUSH_TEXT:
- if (context->parser.text != NULL){
+ if (context->parser.text != NULL && context->text != NULL){
context->parser.text (context, context->text->str, context->text->len,
context->user_data, error);
if (error != NULL && *error != NULL)
char *text;
if (context->level == NULL){
- set_error ("Too many closing tags, not enough open tags");
+ set_error ("%s", "Too many closing tags, not enough open tags");
goto fail;
}
if (context->parser.end_element != NULL){
context->parser.end_element (context, text, context->user_data, error);
if (error != NULL && *error != NULL){
- free (text);
+ g_free (text);
goto fail;
}
}
- free (text);
+ g_free (text);
while (p < end && *p != '>')
p++;