Sync with 5.4.0
[deliverable/titan.core.git] / regression_test / commProcedure / PortAddress.cc
CommitLineData
970ed795 1///////////////////////////////////////////////////////////////////////////////
3abe9331 2// Copyright (c) 2000-2015 Ericsson Telecom AB
970ed795
EL
3// All rights reserved. This program and the accompanying materials
4// are made available under the terms of the Eclipse Public License v1.0
5// which accompanies this distribution, and is available at
6// http://www.eclipse.org/legal/epl-v10.html
7///////////////////////////////////////////////////////////////////////////////
8// This Test Port skeleton source file was generated by the
9// TTCN-3 Compiler of the TTCN-3 Test Executor version 1.4.pl3
10// for Gabor Tatarka (tmpgta@pythagoras) on Tue Jul 29 10:50:23 2003
11
12
13// You may modify this file. Complete the body of empty functions and
14// add your member functions here.
15
16#include "PortAddress.hh"
17
18#ifndef OLD_NAMES
19namespace ProcPort {
20#endif
21
22PortAddress::PortAddress(const char *par_port_name)
23 : PortAddress_BASE(par_port_name)
24{
25
26}
27
28PortAddress::~PortAddress()
29{
30
31}
32
33void PortAddress::set_parameter(const char *parameter_name,
34 const char *parameter_value)
35{
36
37}
38
39void PortAddress::Handle_Fd_Event(int fd, boolean is_readable,
40 boolean is_writable, boolean is_error)
41{
42
43}
44
45void PortAddress::user_map(const char *system_port)
46{
47
48}
49
50void PortAddress::user_unmap(const char *system_port)
51{
52
53}
54
55void PortAddress::user_start()
56{
57
58}
59
60void PortAddress::user_stop()
61{
62
63}
64
65void PortAddress::outgoing_call(const MyProc_call& call_par,
66 const ADDRESS *destination_address)
67{
68 ADDRESS a;
69 if(destination_address==NULL)TTCN_error("Address is a NULL pointer.");
70 a.a1()=destination_address->a2();
71 a.a2()=destination_address->a1();
72 if(a.a1()==67) {
73 MyProc_reply tmp;
74 tmp.Par2()="CharString";tmp.Par3()=1.41;tmp.return_value()=true;
75 incoming_reply(tmp,&a);
76 } else if(a.a1()==68) {
77 incoming_exception(MyProc_exception(INTEGER(a.a1()+a.a2())),&a);
78 } else TTCN_error("Error in address.");
79}
80
81void PortAddress::outgoing_call(const s__StopPTC_call& call_par,
82 const ADDRESS *destination_address)
83{
84
85}
86
87void PortAddress::outgoing_reply(const MyProc_reply& reply_par,
88 const ADDRESS *destination_address)
89{
90
91}
92
93void PortAddress::outgoing_reply(const s__StopPTC_reply& reply_par,
94 const ADDRESS *destination_address)
95{
96
97}
98
99void PortAddress::outgoing_reply(const MyProc2_reply& reply_par,
100 const ADDRESS *destination_address)
101{
102
103}
104
105void PortAddress::outgoing_raise(const MyProc_exception& raise_exception,
106 const ADDRESS *destination_address)
107{
108
109}
110
111#ifndef OLD_NAMES
112} /* end of namespace */
113#endif
This page took 0.040728 seconds and 5 git commands to generate.