wap_push_si_compiler.c File Reference

#include <ctype.h>
#include <inttypes.h>
#include <libxml/xmlmemory.h>
#include <libxml/tree.h>
#include <libxml/debugXML.h>
#include <libxml/encoding.h>
#include "shared.h"
#include "xml_shared.h"
#include "wap_push_si_compiler.h"
#include "xml_definitions.h"

Go to the source code of this file.

Data Structures
struct	si_2table_t
struct	si_3table_t

Macros
#define	NUMBER_OF_ELEMENTS   sizeof(si_elements)/sizeof(si_elements[0])
#define	NUMBER_OF_ATTRIBUTES   sizeof(si_attributes)/sizeof(si_attributes[0])
#define	NUMBER_OF_URL_VALUES   sizeof(si_URL_values)/sizeof(si_URL_values[0])

Typedefs
typedef struct si_2table_t	si_2table_t
typedef struct si_3table_t	si_3table_t

Functions
static int	parse_document (xmlDocPtr document, Octstr *charset, simple_binary_t **si_binary)
static int	parse_node (xmlNodePtr node, simple_binary_t **sibxml)
static int	parse_element (xmlNodePtr node, simple_binary_t **sibxml)
static int	parse_text (xmlNodePtr node, simple_binary_t **sibxml)
static int	parse_cdata (xmlNodePtr node, simple_binary_t **sibxml)
static int	parse_attribute (xmlAttrPtr attr, simple_binary_t **sibxml)
static int	url (int hex)
static int	action (int hex)
static int	date (int hex)
static Octstr *	tokenize_date (Octstr *date)
static void	octstr_drop_trailing_zeros (Octstr **date_token)
static void	flag_date_length (Octstr **token)
static void	parse_url_value (Octstr *value, simple_binary_t **sibxml)
int	si_compile (Octstr *si_doc, Octstr *charset, Octstr **si_binary)

Variables
static si_2table_t	si_elements []
static si_3table_t	si_attributes []
static si_2table_t	si_URL_values []

Macro Definition Documentation

NUMBER_OF_ATTRIBUTES

#define NUMBER_OF_ATTRIBUTES   sizeof(si_attributes)/sizeof(si_attributes[0])

Definition at line 137 of file wap_push_si_compiler.c.

Referenced by parse_attribute().

NUMBER_OF_ELEMENTS

#define NUMBER_OF_ELEMENTS   sizeof(si_elements)/sizeof(si_elements[0])

Definition at line 113 of file wap_push_si_compiler.c.

Referenced by parse_element().

NUMBER_OF_URL_VALUES

#define NUMBER_OF_URL_VALUES   sizeof(si_URL_values)/sizeof(si_URL_values[0])

Definition at line 150 of file wap_push_si_compiler.c.

Referenced by parse_url_value().

Typedef Documentation

si_2table_t

typedef struct si_2table_t si_2table_t

Definition at line 88 of file wap_push_si_compiler.c.

si_3table_t

typedef struct si_3table_t si_3table_t

Definition at line 100 of file wap_push_si_compiler.c.

Function Documentation

action()

static int action ( int  hex )

static

Definition at line 434 of file wap_push_si_compiler.c.

Referenced by fdset_listen(), fdset_register(), fdset_set_timeout(), fdset_unregister(), parse_attribute(), and poller().

{
    switch ((unsigned char) hex) {
    case 0x05: case 0x06: /* action signal-none, action signal-low */
    case 0x07: case 0x08: /* action signal-medium, action signal-high */
    case 0x09:            /* action delete */
    return 1;
    }
    return 0;
}

date()

static int date ( int  hex )

static

Definition at line 451 of file wap_push_si_compiler.c.

Referenced by check_reversible(), date_convert_universal(), date_parse_http(), http_send_reply(), parse_attribute(), parse_date(), parse_http_date(), soap_parse_mo(), soap_write_date(), and tokenize_date().

{
    switch ((unsigned char) hex) {
    case 0x0a: case 0x10: /* created, si-expires */
    return 1;
    }
    return 0;
}

flag_date_length()

static void flag_date_length ( Octstr **  token )

static

Definition at line 513 of file wap_push_si_compiler.c.

References octstr_destroy(), octstr_format(), octstr_insert(), octstr_len(), and token.

Referenced by tokenize_date().

{
    Octstr *lenos;

    lenos = octstr_format("%c", octstr_len(*token) - 1);
    octstr_insert(*token, lenos, 1);

    octstr_destroy(lenos);
}

octstr_drop_trailing_zeros()

static void octstr_drop_trailing_zeros ( Octstr **  date_token )

static

Definition at line 503 of file wap_push_si_compiler.c.

References octstr_delete(), octstr_get_char(), and octstr_len().

Referenced by tokenize_date().

{
    while (1) {
        if (octstr_get_char(*date_token, octstr_len(*date_token) - 1) == '\0')
            octstr_delete(*date_token, octstr_len(*date_token) - 1, 1);
        else
            return;
    }
}

parse_attribute()

static int parse_attribute ( xmlAttrPtr  attr, simple_binary_t **  sibxml  )

static

Definition at line 342 of file wap_push_si_compiler.c.

References action(), create_octstr_from_node, date(), error(), name, NUMBER_OF_ATTRIBUTES, octstr_compare(), octstr_create, octstr_delete(), octstr_destroy(), octstr_imm(), octstr_len(), octstr_ncompare(), output_char(), output_octet_string(), parse_inline_string(), parse_url_value(), si_attributes, si_3table_t::token, tokenize_date(), url(), and si_3table_t::value_part.

Referenced by parse_element().

{
    Octstr *name,
           *value,
           *valueos,
           *tokenized_date;
    unsigned char si_hex;
    size_t i,
           value_len;

    name = octstr_create((char *)attr->name);

    if (attr->children != NULL)
    value = create_octstr_from_node((char *)attr->children);
    else 
    value = NULL;

    if (value == NULL)
        goto error;

    i = 0;
    valueos = NULL;
    while (i < NUMBER_OF_ATTRIBUTES) {
        if (octstr_compare(name, octstr_imm(si_attributes[i].name)) == 0) {
        if (si_attributes[i].value_part == NULL) {
            break; 
            } else {
                value_len = octstr_len(valueos = 
                    octstr_imm(si_attributes[i].value_part));
            if (octstr_ncompare(value, valueos, value_len) == 0) {
            break;
                }
            }
        }
       ++i;
    }

    if (i == NUMBER_OF_ATTRIBUTES)
        goto error;

    tokenized_date = NULL;
    si_hex = si_attributes[i].token;
    if (action(si_hex)) {
        output_char(si_hex, sibxml);
    } else if (url(si_hex)) {
        output_char(si_hex, sibxml);
        octstr_delete(value, 0, octstr_len(valueos));
        parse_url_value(value, sibxml);
    } else if (date(si_hex)) {
        if ((tokenized_date = tokenize_date(value)) == NULL)
            goto error;
        output_char(si_hex, sibxml);
        output_octet_string(tokenized_date, sibxml);
    } else {
        output_char(si_hex, sibxml);
        parse_inline_string(value, sibxml);
    }  

    octstr_destroy(tokenized_date);
    octstr_destroy(name);
    octstr_destroy(value);
    return 0;

error:
    octstr_destroy(name);
    octstr_destroy(value);
    return -1;
}

parse_cdata()

static int parse_cdata ( xmlNodePtr  node, simple_binary_t **  sibxml  )

static

Definition at line 596 of file wap_push_si_compiler.c.

References create_octstr_from_node, octstr_destroy(), and parse_octet_string().

Referenced by parse_node().

{
    int ret = 0;
    Octstr *temp;

    temp = create_octstr_from_node((char *)node);
    parse_octet_string(temp, sibxml);
    octstr_destroy(temp);

    return ret;
}

parse_document()

static int parse_document ( xmlDocPtr  document, Octstr *  charset, simple_binary_t **  si_binary  )

static

Definition at line 221 of file wap_push_si_compiler.c.

References charset, octstr_create, octstr_destroy(), parse_charset(), and parse_node().

Referenced by si_compile().

{
    xmlNodePtr node;

    (*sibxml)->wbxml_version = 0x02; /* WBXML Version number 1.2  */
    (*sibxml)->public_id = 0x05; /* SI 1.0 Public ID */
    
    charset = octstr_create("UTF-8");
    (*sibxml)->charset = parse_charset(charset);
    octstr_destroy(charset);

    node = xmlDocGetRootElement(document);
    return parse_node(node, sibxml);
}

parse_element()

static int parse_element ( xmlNodePtr  node, simple_binary_t **  sibxml  )

static

Definition at line 245 of file wap_push_si_compiler.c.

References element_check_content(), name, NUMBER_OF_ELEMENTS, octstr_compare(), octstr_create, octstr_destroy(), octstr_duplicate, octstr_get_cstr, octstr_imm(), octstr_len(), output_char(), output_octet_string(), parse_attribute(), parse_end(), si_elements, si_2table_t::token, warning(), WBXML_CONTENT_BIT, and WBXML_LITERAL.

Referenced by parse_node().

{
    Octstr *name,
           *outos;
    size_t i;
    unsigned char status_bits,
             si_hex;
    int add_end_tag;
    xmlAttrPtr attribute;

    name = octstr_create((char *)node->name);
    outos = NULL;
    if (octstr_len(name) == 0) {
        octstr_destroy(name);
        return -1;
    }

    i = 0;
    while (i < NUMBER_OF_ELEMENTS) {
        if (octstr_compare(name, octstr_imm(si_elements[i].name)) == 0)
            break;
        ++i;
    }

    status_bits = 0x00;
    si_hex = 0x00;
    add_end_tag = 0;

    if (i != NUMBER_OF_ELEMENTS) {
        si_hex = si_elements[i].token;
        if ((status_bits = element_check_content(node)) > 0) {
        si_hex = si_hex | status_bits;
        
        if ((status_bits & WBXML_CONTENT_BIT) == WBXML_CONTENT_BIT)
            add_end_tag = 1;
        }
        output_char(si_hex, sibxml);
    } else {
        warning(0, "unknown tag %s in SI source", octstr_get_cstr(name));
        si_hex = WBXML_LITERAL;
        if ((status_bits = element_check_content(node)) > 0) {
        si_hex = si_hex | status_bits;
        /* If this node has children, the end tag must be added after 
           them. */
        if ((status_bits & WBXML_CONTENT_BIT) == WBXML_CONTENT_BIT)
        add_end_tag = 1;
    }
    output_char(si_hex, sibxml);
        output_octet_string(outos = octstr_duplicate(name), sibxml);
    }

    if (node->properties != NULL) {
    attribute = node->properties;
    while (attribute != NULL) {
        parse_attribute(attribute, sibxml);
        attribute = attribute->next;
    }
    parse_end(sibxml);
    }

    octstr_destroy(outos);
    octstr_destroy(name);
    return add_end_tag;
}

parse_node()

static int parse_node ( xmlNodePtr  node, simple_binary_t **  sibxml  )

static

Definition at line 530 of file wap_push_si_compiler.c.

References error(), parse_cdata(), parse_element(), parse_end(), parse_text(), and warning().

Referenced by parse_document().

{
    int status = 0;
    
    /* Call for the parser function of the node type. */
    switch (node->type) {
    case XML_ELEMENT_NODE:
    status = parse_element(node, sibxml);
    break;
    case XML_TEXT_NODE:
    status = parse_text(node, sibxml);
    break;
    case XML_CDATA_SECTION_NODE:
    status = parse_cdata(node, sibxml);
    break;
    case XML_COMMENT_NODE:
    case XML_PI_NODE:
    /* Comments and PIs are ignored. */
    break;
    /*
     * XML has also many other node types, these are not needed with 
     * SI. Therefore they are assumed to be an error.
     */
    default:
    error(0, "SI compiler: Unknown XML node in the SI source.");
    return -1;
    break;
    }

    /* 
     * If node is an element with content, it will need an end tag after it's
     * children. The status for it is returned by parse_element.
     */
    switch (status) {
    case 0:

    if (node->children != NULL)
        if (parse_node(node->children, sibxml) == -1)
        return -1;
    break;
    case 1:
    if (node->children != NULL)
        if (parse_node(node->children, sibxml) == -1)
        return -1;
    parse_end(sibxml);
    break;

    case -1: /* Something went wrong in the parsing. */
    return -1;
    default:
    warning(0,"SI compiler: undefined return value in a parse function.");
    return -1;
    break;
    }

    if (node->next != NULL)
    if (parse_node(node->next, sibxml) == -1)
        return -1;

    return 0;
}

parse_text()

static int parse_text ( xmlNodePtr  node, simple_binary_t **  sibxml  )

static

Definition at line 316 of file wap_push_si_compiler.c.

References create_octstr_from_node, octstr_destroy(), octstr_len(), octstr_shrink_blanks(), octstr_strip_blanks(), and parse_inline_string().

Referenced by parse_node().

{
    Octstr *temp;

    temp = create_octstr_from_node((char *)node);

    octstr_shrink_blanks(temp);
    octstr_strip_blanks(temp);

    if (octstr_len(temp) == 0) {
        octstr_destroy(temp);
        return 0;
    }

    parse_inline_string(temp, sibxml);    
    octstr_destroy(temp);

    return 0;
}

parse_url_value()

void parse_url_value ( Octstr *  value, simple_binary_t **  sibxml  )

static

Definition at line 615 of file wap_push_si_compiler.c.

References name, NUMBER_OF_URL_VALUES, octstr_delete(), octstr_destroy(), octstr_duplicate, octstr_imm(), octstr_len(), octstr_search(), output_char(), parse_inline_string(), si_URL_values, and token.

Referenced by parse_attribute().

{
    size_t i;
    long pos;
    Octstr *urlos,
           *first_part,
       *last_part;
    size_t first_part_len;

    i = 0;
    first_part_len = 0;
    first_part = NULL;
    last_part = NULL;
    while (i < NUMBER_OF_URL_VALUES) {
        pos = octstr_search(value, 
            urlos = octstr_imm(si_URL_values[i].name), 0);
        if (pos >= 0) {
        first_part = octstr_duplicate(value);
            octstr_delete(first_part, pos, octstr_len(first_part) - pos);
            first_part_len = octstr_len(first_part);
            parse_inline_string(first_part, sibxml);
            output_char(si_URL_values[i].token, sibxml);
            last_part = octstr_duplicate(value);
            octstr_delete(last_part, 0, first_part_len + octstr_len(urlos));
            parse_inline_string(last_part, sibxml);
        octstr_destroy(first_part);
            octstr_destroy(last_part);
            break;
        }
        octstr_destroy(urlos);
        ++i;
    }

    if (pos < 0) 
    parse_inline_string(value, sibxml);
        
}

si_compile()

int si_compile	(	Octstr *	si_doc,
		Octstr *	charset,
		Octstr **	si_binary
	)

Definition at line 178 of file wap_push_si_compiler.c.

References charset, error(), octstr_create, octstr_destroy(), octstr_get_cstr, octstr_len(), octstr_strip_blanks(), parse_document(), set_charset(), simple_binary_create(), simple_binary_destroy(), simple_binary_output(), and size.

Referenced by convert_si_to_sic(), and main().

{
    simple_binary_t *sibxml;
    int ret;
    xmlDocPtr pDoc;
    size_t size;
    char *si_c_text;

    *si_binary = octstr_create(""); 
    sibxml = simple_binary_create();

    octstr_strip_blanks(si_doc);
    set_charset(si_doc, charset);
    size = octstr_len(si_doc);
    si_c_text = octstr_get_cstr(si_doc);
    pDoc = xmlParseMemory(si_c_text, size);

    ret = 0;
    if (pDoc) {
        ret = parse_document(pDoc, charset, &sibxml);
        simple_binary_output(*si_binary, sibxml);
        xmlFreeDoc(pDoc);
    } else {
        xmlFreeDoc(pDoc);
        octstr_destroy(*si_binary);
        simple_binary_destroy(sibxml);
        error(0, "SI: No document to parse. Probably an error in SI source");
        return -1;
    }

    simple_binary_destroy(sibxml);

    return ret;
}

tokenize_date()

static Octstr * tokenize_date ( Octstr *  date )

static

Definition at line 465 of file wap_push_si_compiler.c.

References date(), flag_date_length(), octstr_append_char(), octstr_create, octstr_destroy(), octstr_drop_trailing_zeros(), octstr_get_char(), octstr_len(), octstr_set_bits(), parse_date(), and WBXML_OPAQUE.

Referenced by parse_attribute().

{
    Octstr *date_token;
    long j;
    size_t i,
           date_len;
    unsigned char c;

    if (!parse_date(date)) {
        return NULL;
    }

    date_token = octstr_create("");
    octstr_append_char(date_token, WBXML_OPAQUE);

    i = 0;
    j = 0;
    date_len = octstr_len(date);
    while (i < date_len) {
        c = octstr_get_char(date, i);
        if (c != 'T' && c != 'Z' && c != '-' && c != ':') {
            if (isdigit(c)) {
                octstr_set_bits(date_token, 4*j + 8, 4, c & 0x0f);
                ++j;
            } else {
                octstr_destroy(date_token);
                return NULL;
            }
        }  
        ++i; 
    }

    octstr_drop_trailing_zeros(&date_token);
    flag_date_length(&date_token);

    return date_token;
}

url()

static int url ( int  hex )

static

Definition at line 417 of file wap_push_si_compiler.c.

Referenced by parse_attribute().

{
    switch ((unsigned char) hex) {
    case 0x0b:            /* href */
    case 0x0c: case 0x0e: /* href http://, href https:// */
    case 0x0d: case 0x0f: /* href http://www., href https://www. */
    return 1;
    }
    return 0;
}

Variable Documentation

si_attributes

si_3table_t si_attributes[]

static

Initial value:

= {
    { "action", "signal-none", 0x05 },
    { "action", "signal-low", 0x06 },
    { "action", "signal-medium", 0x07 },
    { "action", "signal-high", 0x08 },
    { "action", "delete", 0x09 },
    { "created", NULL, 0x0a },
    { "href", "https://www.", 0x0f },
    { "href", "http://www.", 0x0d },
    { "href", "https://", 0x0e },
    { "href", "http://", 0x0c },
    { "href", NULL, 0x0b },
    { "si-expires", NULL, 0x10 },
    { "si-id", NULL, 0x11 },
    { "class", NULL, 0x12 }
}

Definition at line 120 of file wap_push_si_compiler.c.

Referenced by parse_attribute().

si_elements

si_2table_t si_elements[]

static

Initial value:

= {
    { "si", 0x05 },
    { "indication", 0x06 },
    { "info", 0x07 },
    { "item", 0x08 }
}

Definition at line 106 of file wap_push_si_compiler.c.

Referenced by parse_element().

si_URL_values

si_2table_t si_URL_values[]

static

Initial value:

= {
  { ".com/", 0x85 },
  { ".edu/", 0x86 },
  { ".net/", 0x87 },
  { ".org/", 0x88 }
}

Definition at line 143 of file wap_push_si_compiler.c.

Referenced by parse_url_value().