diff options
Diffstat (limited to 'src/Logger/EPTF_HTTP_Logger_Functions.ttcn')
| -rw-r--r-- | src/Logger/EPTF_HTTP_Logger_Functions.ttcn | 180 |
1 files changed, 180 insertions, 0 deletions
diff --git a/src/Logger/EPTF_HTTP_Logger_Functions.ttcn b/src/Logger/EPTF_HTTP_Logger_Functions.ttcn new file mode 100644 index 0000000..fe63c55 --- /dev/null +++ b/src/Logger/EPTF_HTTP_Logger_Functions.ttcn @@ -0,0 +1,180 @@ +/////////////////////////////////////////////////////////////////////////////// +// +// Copyright (c) 2000-2018 Ericsson Telecom AB +// +// All rights reserved. This program and the accompanying materials +// are made available under the terms of the Eclipse Public License v1.0 +// which accompanies this distribution, and is available at +// http://www.eclipse.org/legal/epl-v10.html +/////////////////////////////////////////////////////////////////////////////// +// +// File: EPTF_HTTP_Logger_Functions.ttcn +// Rev: <RnXnn> +// Prodnr: CNL 113 618 +// Updated: 2012-11-28 +// Contact: http://ttcn.ericsson.se +/////////////////////////////////////////////////////////////////////////////// + +/////////////////////////////////////////////////////////// +// Module: EPTF_HTTP_Logger_Functions +// +// Purpose: +// This module contains the functions for EPTF_HTTP_Logger_PT component +// +// Module Parameters: +// tsp_EPTF_HTTP_Logging_Decode - *boolean* - default value:*true* +// +// Module depends on: +// <EPTF_CLL_Base_Functions> +// +// <EPTF_HTTP_Logger_Definitions> +// +// <HTTPmsg_Types> +// +// Current owner +// EAKOPER +// +// Last Review Date: +// 2008-01-09 +// +/////////////////////////////////////////////////////////// +module EPTF_HTTP_Logger_Functions { + +import from EPTF_CLL_Base_Functions all; +import from EPTF_HTTP_Logger_Definitions all; +import from HTTPmsg_Types all; + +//========================================================================= +// Module Parameters +//========================================================================= + +modulepar boolean tsp_EPTF_HTTP_Logging_Decode := true; + + +/////////////////////////////////////////////////////////// +// Group: LoggerClient +// +// Purpose: +// Functions of the LoggerClient component +// +/////////////////////////////////////////////////////////// +group LoggerClient { +/////////////////////////////////////////////////////////// + // Function: f_EPTF_HTTP_LoggerClient_init_CT + // + // Purpose: + // Function to init the LoggerClient component + // + // Parameters: + // pl_functionRef - *in* - <EPTF_HTTP_LoggerClient_FT> - The send function of the logging + // + // Return Value: + // - integer - if the component initialize already the return value will be -1 + // + // Errors: + // - + // + // Detailed Comments: + // - + // +/////////////////////////////////////////////////////////// + function f_EPTF_HTTP_LoggerClient_init_CT( + in EPTF_HTTP_LoggerClient_FT pl_functionRef) + runs on EPTF_HTTP_LoggerClient_CT + return integer + { + if (v_EPTF_HTTP_LoggerClient_initialized) { + return -1; + } + + f_EPTF_Base_registerCleanup(refers(f_EPTF_HTTP_LoggerClient_cleanup_CT)); + + vf_EPTF_HTTP_LoggerClient_sendFunction := pl_functionRef; + vc_EPTF_HTTP_LoggerClient_loggerComponent := EPTF_HTTP_Logger_CT.create; + connect(vc_EPTF_HTTP_LoggerClient_loggerComponent:HTTP_Logger_PCO,self:HTTP_LoggerClient_PCO); + vc_EPTF_HTTP_LoggerClient_loggerComponent.start(f_EPTF_HTTP_Logger_Behavior()); + + v_EPTF_HTTP_LoggerClient_initialized := true; + + return 1; + } + +/////////////////////////////////////////////////////////// + // Function: f_EPTF_HTTP_LoggerClient_cleanup_CT + // + // Purpose: + // Function to clean the LoggerClient component + // + // Parameters: + // - + // + // Return Value: + // - + // + // Errors: + // - + // + // Detailed Comments: + // - + // +/////////////////////////////////////////////////////////// + function f_EPTF_HTTP_LoggerClient_cleanup_CT() + runs on EPTF_HTTP_LoggerClient_CT { + + if (not v_EPTF_HTTP_LoggerClient_initialized) { + return; + } + v_EPTF_HTTP_LoggerClient_initialized := false; + + vc_EPTF_HTTP_LoggerClient_loggerComponent.stop; + disconnect(vc_EPTF_HTTP_LoggerClient_loggerComponent:HTTP_Logger_PCO, + self:HTTP_LoggerClient_PCO); + } +} + + +/////////////////////////////////////////////////////////// +// Function: f_EPTF_HTTP_Logger_Behavior +// +// Purpose: +// The main function of the logger component +// +// Parameters: +// - +// +// Return Value: +// - +// +// Errors: +// - +// +/////////////////////////////////////////////////////////// +function f_EPTF_HTTP_Logger_Behavior() +runs on EPTF_HTTP_Logger_CT +{ + var integer vl_noIntWarning; + alt { + [] HTTP_Logger_PCO.receive(octetstring:?) -> value v_EPTF_HTTP_Logger_incomingMsg + { + if(tsp_EPTF_HTTP_Logging_Decode) { + vl_noIntWarning := dec_HTTPMessage(v_EPTF_HTTP_Logger_incomingMsg, + v_EPTF_HTTP_Logger_decodedMessage ) + + log("The received decoded Message is: ", + v_EPTF_HTTP_Logger_decodedMessage); + } + + else { + log("The received encoded Message is: ", + v_EPTF_HTTP_Logger_incomingMsg); + } + repeat; + } + } +} + +}//end of module +with { +extension "version <RnXnn>" +} + |