diff options
Diffstat (limited to 'tinyHTTP/ragel/thttp_parser_header.rl')
| -rw-r--r-- | tinyHTTP/ragel/thttp_parser_header.rl | 489 |
1 files changed, 489 insertions, 0 deletions
diff --git a/tinyHTTP/ragel/thttp_parser_header.rl b/tinyHTTP/ragel/thttp_parser_header.rl new file mode 100644 index 0000000..604b712 --- /dev/null +++ b/tinyHTTP/ragel/thttp_parser_header.rl @@ -0,0 +1,489 @@ +/*
+* 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 thttp_parser_header.c
+ * @brief HTTP headers parser.
+ *
+ * @author Mamadou Diop <diopmamadou(at)doubango.org>
+ *
+ * @date Created: Sat Nov 8 16:54:58 2009 mdiop
+ */
+#include "tinyhttp/parsers/thttp_parser_header.h"
+
+//#include "tinyhttp/headers/thttp_header_Allow.h"
+//#include "tinyhttp/headers/thttp_header_Allow_Events.h"
+#include "tinyhttp/headers/thttp_header_Authorization.h"
+//#include "tinyhttp/headers/thttp_header_Call_ID.h"
+//#include "tinyhttp/headers/thttp_header_Contact.h"
+//#include "tinyhttp/headers/thttp_header_CSeq.h"
+#include "tinyhttp/headers/thttp_header_Dummy.h"
+#include "tinyhttp/headers/thttp_header_ETag.h"
+//#include "tinyhttp/headers/thttp_header_Expires.h"
+//#include "tinyhttp/headers/thttp_header_From.h"
+//#include "tinyhttp/headers/thttp_header_Max_Forwards.h"
+//#include "tinyhttp/headers/thttp_header_Min_Expires.h"
+//#include "tinyhttp/headers/thttp_header_Path.h"
+//#include "tinyhttp/headers/thttp_header_P_Access_Network_Info.h"
+//#include "tinyhttp/headers/thttp_header_P_Preferred_Identity.h"
+//#include "tinyhttp/headers/thttp_header_Privacy.h"
+//#include "tinyhttp/headers/thttp_header_Proxy_Authenticate.h"
+//#include "tinyhttp/headers/thttp_header_Proxy_Authorization.h"
+//#include "tinyhttp/headers/thttp_header_Record_Route.h"
+//#include "tinyhttp/headers/thttp_header_Require.h"
+//#include "tinyhttp/headers/thttp_header_Route.h"
+//#include "tinyhttp/headers/thttp_header_Service_Route.h"
+//#include "tinyhttp/headers/thttp_header_Supported.h"
+#include "tinyhttp/headers/thttp_header_Transfer_Encoding.h"
+//#include "tinyhttp/headers/thttp_header_User_Agent.h"
+//#include "tinyhttp/headers/thttp_header_Via.h"
+#include "tinyhttp/headers/thttp_header_WWW_Authenticate.h"
+
+#include "tsk_debug.h"
+
+#undef ADD_HEADERS
+#undef ADD_HEADER
+
+#define ADD_HEADERS(headers)\
+ if(headers)\
+ {\
+ tsk_list_item_t *item;\
+ tsk_list_foreach(item, headers)\
+ {\
+ thttp_header_t *hdr = tsk_object_ref(item->data);\
+ tsk_list_push_back_data(message->headers, ((void**) &hdr));\
+ }\
+ \
+ TSK_OBJECT_SAFE_FREE(headers);\
+ }
+#define ADD_HEADER(header)\
+ if(header)\
+ {\
+ tsk_list_push_back_data(message->headers, ((void**) &header));\
+ }
+
+/***********************************
+* Ragel state machine.
+*/
+%%{
+ machine thttp_machine_parser_headers;
+
+
+ # /*== Accept: ==*/
+ action parse_header_Accept
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Accept NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Accept_Charset: ==*/
+ action parse_header_Accept_Charset
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Accept_Charset NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Accept_Encoding: ==*/
+ action parse_header_Accept_Encoding
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Accept_Encoding NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Accept_Language: ==*/
+ action parse_header_Accept_Language
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Accept_Language NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Allow: ==*/
+ action parse_header_Allow
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Allow NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Authorization: ==*/
+ action parse_header_Authorization
+ {
+ thttp_header_Authorization_t *header = thttp_header_Authorization_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+ }
+
+ # /*== Cache_Control: ==*/
+ action parse_header_Cache_Control
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Cache_Control NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Connection: ==*/
+ action parse_header_Connection
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Connection NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Content_Encoding: ==*/
+ action parse_header_Content_Encoding
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Content_Encoding NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Content_Language: ==*/
+ action parse_header_Content_Language
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Content_Language NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Content_Length: ==*/
+ action parse_header_Content_Length
+ {
+ if(!message->Content_Length){
+ message->Content_Length = thttp_header_Content_Length_parse(state->tag_start, (state->tag_end-state->tag_start));
+ }
+ else{
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+ //TSK_DEBUG_WARN("The message already have 'Content-Length' header.");
+ }
+ }
+
+ # /*== Content_Location: ==*/
+ action parse_header_Content_Location
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Content_Location NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Content_MD5: ==*/
+ action parse_header_Content_MD5
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Content_MD5 NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Content_Range: ==*/
+ action parse_header_Content_Range
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Content_Range NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Content_Type: ==*/
+ action parse_header_Content_Type
+ {
+ if(!message->Content_Type){
+ message->Content_Type = thttp_header_Content_Type_parse(state->tag_start, (state->tag_end-state->tag_start));
+ }
+ else{
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+ //TSK_DEBUG_WARN("The message already have 'Content-Type' header.");
+ }
+ }
+
+ # /*== Date: ==*/
+ action parse_header_Date
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Date NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== ETag: ==*/
+ action parse_header_ETag
+ {
+ thttp_header_ETag_t *header = thttp_header_ETag_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Expires NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Expect: ==*/
+ action parse_header_Expect
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Expect NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Expires: ==*/
+ action parse_header_Expires
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Expires NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== From: ==*/
+ action parse_header_From
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_From NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Host: ==*/
+ action parse_header_Host
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Host NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== If_Match: ==*/
+ action parse_header_If_Match
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_If_Match NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== If_Modified_Since: ==*/
+ action parse_header_If_Modified_Since
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_If_Modified_Since NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== If_None_Match: ==*/
+ action parse_header_If_None_Match
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_If_None_Match NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== If_Range: ==*/
+ action parse_header_If_Range
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_If_Range NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== If_Unmodified_Since: ==*/
+ action parse_header_If_Unmodified_Since
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_If_Unmodified_Since NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Last_Modified: ==*/
+ action parse_header_Last_Modified
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Last_Modified NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Max_Forwards: ==*/
+ action parse_header_Max_Forwards
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Max_Forwards NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Pragma: ==*/
+ action parse_header_Pragma
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Pragma NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Proxy_Authenticate: ==*/
+ action parse_header_Proxy_Authenticate
+ {
+ thttp_header_Proxy_Authenticate_t *header = thttp_header_Proxy_Authenticate_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+ }
+
+ # /*== Proxy_Authorization: ==*/
+ action parse_header_Proxy_Authorization
+ {
+ thttp_header_Proxy_Authorization_t *header = thttp_header_Proxy_Authorization_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+ }
+
+ # /*== Range: ==*/
+ action parse_header_Range
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Range NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Referer: ==*/
+ action parse_header_Referer
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Referer NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== TE: ==*/
+ action parse_header_TE
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_TE NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Trailer: ==*/
+ action parse_header_Trailer
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Trailer NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Transfer_Encoding: ==*/
+ action parse_header_Transfer_Encoding
+ {
+ thttp_header_Transfer_Encoding_t *header = thttp_header_Transfer_Encoding_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Trailer NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Upgrade: ==*/
+ action parse_header_Upgrade
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Upgrade NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== User_Agent: ==*/
+ action parse_header_User_Agent
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_User_Agent NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Via: ==*/
+ action parse_header_Via
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Via NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== Warning: ==*/
+ action parse_header_Warning
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_Warning NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+ # /*== WWW-Authenticate: ==*/
+ action parse_header_WWW_Authenticate
+ {
+ thttp_header_WWW_Authenticate_t *header = thttp_header_WWW_Authenticate_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+ }
+
+ # /*== extension_header: ==*/
+ action parse_header_extension_header
+ {
+ thttp_header_Dummy_t *header = thttp_header_Dummy_parse(state->tag_start, (state->tag_end-state->tag_start));
+ ADD_HEADER(header);
+
+ //TSK_DEBUG_WARN("parse_header_extension_header NOT IMPLEMENTED. Will be added as Dummy header.");
+ }
+
+
+ # Includes
+ include thttp_machine_utils "./ragel/thttp_machine_utils.rl";
+ include thttp_machine_header "./ragel/thttp_machine_header.rl";
+
+ # Entry point
+ main := HEADER;
+}%%
+
+int thttp_header_parse(tsk_ragel_state_t *state, thttp_message_t *message)
+{
+ int cs = 0;
+ const char *p = state->tag_start;
+ const char *pe = state->tag_end;
+ const char *eof = pe;
+
+ %%write data;
+ %%write init;
+ %%write exec;
+
+ return ( cs >= %%{ write first_final; }%% ) ? 0 : -1;
+}
|
