diff options
Diffstat (limited to 'tinySDP/ragel/tsdp_parser_message.rl')
| -rw-r--r-- | tinySDP/ragel/tsdp_parser_message.rl | 288 |
1 files changed, 288 insertions, 0 deletions
diff --git a/tinySDP/ragel/tsdp_parser_message.rl b/tinySDP/ragel/tsdp_parser_message.rl new file mode 100644 index 0000000..bd1e916 --- /dev/null +++ b/tinySDP/ragel/tsdp_parser_message.rl @@ -0,0 +1,288 @@ +/*
+* 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;
+}
|
