diff options
Diffstat (limited to 'branches/1.0/tinySDP/ragel/tsdp_parser_message.rl')
| -rw-r--r-- | branches/1.0/tinySDP/ragel/tsdp_parser_message.rl | 288 |
1 files changed, 0 insertions, 288 deletions
diff --git a/branches/1.0/tinySDP/ragel/tsdp_parser_message.rl b/branches/1.0/tinySDP/ragel/tsdp_parser_message.rl deleted file mode 100644 index bd1e916..0000000 --- a/branches/1.0/tinySDP/ragel/tsdp_parser_message.rl +++ /dev/null @@ -1,288 +0,0 @@ -/*
-* Copyright (C) 2009-2010 Mamadou Diop.
-*
-* Contact: Mamadou Diop <diopmamadou(at)doubango.org>
-*
-* This file is part of Open Source Doubango Framework.
-*
-* DOUBANGO is free software: you can redistribute it and/or modify
-* it under the terms of the GNU General Public License as published by
-* the Free Software Foundation, either version 3 of the License, or
-* (at your option) any later version.
-*
-* DOUBANGO is distributed in the hope that it will be useful,
-* but WITHOUT ANY WARRANTY; without even the implied warranty of
-* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-* GNU General Public License for more details.
-*
-* You should have received a copy of the GNU General Public License
-* along with DOUBANGO.
-*
-*/
-/**@file tsdp_machine_message.rl
- * @brief Ragel file.
- *
- * @author Mamadou Diop <diopmamadou(at)doubango.org>
- *
- * @date Created: Sat Nov 8 16:54:58 2009 mdiop
- */
-#include "tinysdp/parsers/tsdp_parser_message.h"
-
-#include "tinysdp/headers/tsdp_header_A.h"
-#include "tinysdp/headers/tsdp_header_B.h"
-#include "tinysdp/headers/tsdp_header_C.h"
-#include "tinysdp/headers/tsdp_header_Dummy.h"
-#include "tinysdp/headers/tsdp_header_E.h"
-#include "tinysdp/headers/tsdp_header_I.h"
-#include "tinysdp/headers/tsdp_header_K.h"
-#include "tinysdp/headers/tsdp_header_M.h"
-#include "tinysdp/headers/tsdp_header_O.h"
-#include "tinysdp/headers/tsdp_header_P.h"
-#include "tinysdp/headers/tsdp_header_R.h"
-#include "tinysdp/headers/tsdp_header_S.h"
-#include "tinysdp/headers/tsdp_header_T.h"
-#include "tinysdp/headers/tsdp_header_U.h"
-#include "tinysdp/headers/tsdp_header_V.h"
-#include "tinysdp/headers/tsdp_header_Z.h"
-
-#include "tsk_debug.h"
-
-%%{
- machine tsdp_machine_message;
-
- ###########################################
- # Includes
- ###########################################
- include tsdp_machine_utils "./ragel/tsdp_machine_utils.rl";
-
- action tag{
- tag_start = p;
- }
-
- ###########################################
- # Actions
- ###########################################
- action parse_header_A{
- if(hdr_M){
- if(!hdr_M->Attributes){
- hdr_M->Attributes = tsk_list_create();
- }
- if((header = (tsdp_header_t*)tsdp_header_A_parse(tag_start, (p - tag_start)))){
- tsk_list_push_back_data(hdr_M->Attributes, (void**)&header);
- }
- }
- else if((header = (tsdp_header_t*)tsdp_header_A_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_B{
- if(hdr_M){
- if(!hdr_M->Bandwidths){
- hdr_M->Bandwidths = tsk_list_create();
- }
- if((header = (tsdp_header_t*)tsdp_header_B_parse(tag_start, (p - tag_start)))){
- tsk_list_push_back_data(hdr_M->Bandwidths, (void**)&header);
- }
- }
- else if((header = (tsdp_header_t*)tsdp_header_B_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_C{
- if(hdr_M && !hdr_M->C){
- hdr_M->C = tsdp_header_C_parse(tag_start, (p - tag_start));
- }
- else if((header = (tsdp_header_t*)tsdp_header_C_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_Dummy{
- if((header = (tsdp_header_t*)tsdp_header_Dummy_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_E{
- if((header = (tsdp_header_t*)tsdp_header_E_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_I{
- if(hdr_M && !hdr_M->I){
- hdr_M->I = tsdp_header_I_parse(tag_start, (p - tag_start));
- }
- else if((header = (tsdp_header_t*)tsdp_header_I_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_K{
- if(hdr_M && !hdr_M->K){
- hdr_M->K = tsdp_header_K_parse(tag_start, (p - tag_start));
- }
- else if((header = (tsdp_header_t*)tsdp_header_K_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_M{
- if((hdr_M = tsdp_header_M_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, TSDP_HEADER(hdr_M));
- hdr_M = tsk_object_unref(hdr_M);
- }
- }
-
- action parse_header_O{
- if((header = (tsdp_header_t*)tsdp_header_O_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_P{
- if((header = (tsdp_header_t*)tsdp_header_P_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_R{
- if((header = (tsdp_header_t*)tsdp_header_R_parse(tag_start, (p - tag_start)))){
- if(hdr_T){
- if(!hdr_T->repeat_fields){
- hdr_T->repeat_fields = tsk_list_create();
- }
- tsk_list_push_back_data(hdr_T->repeat_fields, (void**)&header);
- }
- else{
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
- }
-
- action parse_header_S{
- if((header = (tsdp_header_t*)tsdp_header_S_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_T{
- if((hdr_T = tsdp_header_T_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, TSDP_HEADER(hdr_T));
- hdr_T = tsk_object_unref(hdr_T);
- }
- }
-
- action parse_header_U{
- if((header = (tsdp_header_t*)tsdp_header_U_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_V{
- if((header = (tsdp_header_t*)tsdp_header_V_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- action parse_header_Z{
- if((header = (tsdp_header_t*)tsdp_header_Z_parse(tag_start, (p - tag_start)))){
- tsdp_message_add_header(sdp_msg, header);
- tsk_object_unref(header);
- }
- }
-
- ###########################################
- # Headers
- ###########################################
-
- A = "a"i SP* "=" SP*<: any* %parse_header_A :>CRLF;
- B = "b"i SP* "=" SP*<: any* %parse_header_B :>CRLF;
- C = "c"i SP* "=" SP*<: any* %parse_header_C :>CRLF;
- E = "e"i SP* "=" SP*<: any* %parse_header_E :>CRLF;
- I = "i"i SP* "=" SP*<: any* %parse_header_I :>CRLF;
- K = "k"i SP* "=" SP*<: any* %parse_header_K :>CRLF;
- M = "m"i SP* "=" SP*<: any* %parse_header_M :>CRLF;
- O = "o"i SP* "=" SP*<: any* %parse_header_O :>CRLF;
- P = "p"i SP* "=" SP*<: any* %parse_header_P :>CRLF;
- R = "r"i SP* "=" SP*<: any* %parse_header_R :>CRLF;
- S = "s"i SP* "=" SP*<: any* %parse_header_S :>CRLF;
- T = "t"i SP* "=" SP*<: any* %parse_header_T :>CRLF;
- U = "u"i SP* "=" SP*<: any* %parse_header_U :>CRLF;
- V = "v"i SP* "=" SP*<: any* %parse_header_V :>CRLF;
- Z = "z"i SP* "=" SP*<: any* %parse_header_Z :>CRLF;
-
- Dummy = alpha SP* "=" SP*<: any* %parse_header_Dummy :>CRLF;
-
- Header = (A | B | C | E | I | K | M | O | P | R | S | T | U | V | Z)>tag >1 | (Dummy>tag) >0;
-
-
- ###########################################
- # Message
- ###########################################
- SDP_message = Header*;
-
- ###########################################
- # Entry Point
- ###########################################
- main := SDP_message;
-}%%
-
-/* Ragel data */
-%% write data;
-
-tsdp_message_t* tsdp_message_parse(const void *input, tsk_size_t size)
-{
- tsdp_message_t* sdp_msg = tsk_null;
- const char* tag_start = tsk_null;
- tsdp_header_t *header = tsk_null;
- tsdp_header_T_t *hdr_T = tsk_null;
- tsdp_header_M_t *hdr_M = tsk_null;
-
- /* Ragel variables */
- int cs = 0;
- const char* p = input;
- const char* pe = p + size;
- const char* eof = tsk_null;
-
- if(!input || !size){
- TSK_DEBUG_ERROR("Null or empty buffer.");
- goto bail;
- }
-
- if(!(sdp_msg = tsdp_message_create())){
- goto bail;
- }
-
- /* Ragel init */
- %% write init;
-
- /* Ragel execute */
- %% write exec;
-
- /* Check result */
- if( cs < %%{ write first_final; }%% )
- {
- TSK_DEBUG_ERROR("Failed to parse SDP message.");
- TSK_OBJECT_SAFE_FREE(sdp_msg);
- goto bail;
- }
-
-bail:
- return sdp_msg;
-}
|
