Add ITS HTTP support (5f055d91) · Commits · TTCN-3 Libraries / LibIts

ttcn/LibHttp/LibItsHttp_Templates.ttcn

0 → 100644

+62 −0

Original line number	Original line	Diff line number	Diff line
			/**
			* @author ETSI / STF549
			* @version $URL$
			* $ID:$
			* @desc This module provides the templates for ITS HTTP based protocols.
			* @copyright ETSI Copyright Notification
			* No part may be reproduced except as authorized by written permission.
			* The copyright and the foregoing restriction extend to reproduction in all media.
			* All rights reserved.
			* @see ETSI TS 103 478
			*/
			module LibHttp_Templates {

			// LibHttp
			import from LibHttp_TypesAndValues all;

			template (value) HeaderLine m_header_line(
			in template (value) charstring p_header_name,
			in template (value) charstring_list p_header_value
			) := {
			header_name := p_header_name,
			header_value := p_header_value
			} // End of template m_header_line

			template (value) HttpMessage m_http_request(
			in template (value) Request p_request
			) := {
			request := p_request
			} // End of template m_http_request

			template (present) HttpMessage mw_http_request(
			template (present) Request p_request := ?
			) := {
			request := p_request
			} // End of template mw_http_request

			template (value) HttpMessage m_http_response(
			in template (value) Response p_response
			) := {
			response := p_response
			} // End of template m_http_response

			template (present) HttpMessage mw_http_response(
			template (present) Response p_response := ?
			) := {
			response := p_response
			} // End of template mw_http_response

			template (omit) Request m_http_request_get(
			in charstring p_uri,
			in template (value) HeaderLines p_headers,
			in template (omit) charstring p_body := omit
			) := {
			method := "GET",
			uri := p_uri,
			version_major := c_http_version_major,
			version_minor := c_http_version_minor,
			header := p_headers,
			body := p_body
			} // End of template m_http_request_get

			} // End of module LibHttp_Templates

ttcn/LibHttp/LibItsHttp_TypesAndValues.ttcn

0 → 100644

+59 −0

Original line number	Original line	Diff line number	Diff line
			/**
			* @author ETSI / STF545
			* @version $URL$
			* $ID:$
			* @desc This module provides the types and values used by ITS HTTP based protocols.
			* @copyright ETSI Copyright Notification
			* No part may be reproduced except as authorized by written permission.
			* The copyright and the foregoing restriction extend to reproduction in all media.
			* All rights reserved.
			* @see ETSI TS 103 478
			*/
			module LibHttp_TypesAndValues {

			const integer c_http_version_major := 1;
			const integer c_http_version_minor := 1;

			type record of charstring charstring_list;
			type record HeaderLine {
			charstring header_name,
			charstring_list header_value
			} with {
			variant "FIELDORDER(msb)"
			}

			type record of HeaderLine HeaderLines;

			type record Request {
			charstring method,
			charstring uri,
			integer version_major,
			integer version_minor,
			HeaderLines header,
			charstring body optional
			} with {
			variant "FIELDORDER(msb)"
			}

			type record Response {
			integer version_major,
			integer version_minor,
			integer statuscode,
			charstring statustext,
			HeaderLines header,
			charstring body optional
			} with {
			variant "FIELDORDER(msb)"
			}

			type union HttpMessage {
			Response response,
			Request request
			} with {
			variant "FIELDORDER(msb)"
			}

			} with {
			variant ""
			encode "HttcpCodec"
			} // End of module LibHttp_TypesAndValues

Admin message