# Your platform: (SOLARIS, SOLARIS8, LINUX, FREEBSD or WIN32)
PLATFORM = LINUX

# Your platform: (SOLARIS, SOLARIS8, LINUX, FREEBSD or WIN32)
PLATFORM = LINUX

# Your C++ compiler:
# (if you change the platform, you may need to change the compiler)
CXX = g++

# Flags for the C++ preprocessor (and makedepend as well):
CPPFLAGS = -D$(PLATFORM) -I$(TTCN3_DIR)/include

# Flags for the C++ compiler:
CXXFLAGS = -Wall

ifeq ($(PLATFORM), WIN32)
# Silence linker warnings.
LDFLAGS += -Wl,--enable-auto-import,--enable-runtime-pseudo-reloc
endif

compile:
	g++ -o server server.c ../StructUdpExample.cc -I/home/philip/Titan/include

makefilegen  ...options ...list of TTCN files...list of  cc/hh files ...list of c/h files

makefilegen   -s  file1.ttcn    file2cc file3.hh file4.c file5.h

make

  type port PCOType message
    {
	inout integer;
    }

module IntegerUdpExample
{
    type port PCOType message
    {
	inout integer;
    }

    type component MTCType
    {
	port PCOType MyPCO;
    }

external function f_encode_Structure(in Structure pdu) return octetstring 
with { extension "prototype(convert) encode(RAW)" }
external function f_decode_Structure(in octetstring data) return Structure
with { extension "prototype(convert) decode(RAW)" }


type integer  UInt16 (0 .. 65535) with { variant "FIELDLENGTH(16),BYTEORDER(last)" };
type charstring CSL6 with { variant "FIELDLENGTH(6)" };
type record Structure
{
CSL6        f1,
UInt16      f2,
float       f3
}
with {variant "" }
 


testcase TC_encdec()  runs on MTCType system MTCType
{

var Structure v_struct:={f1:="abcd",f2:=666, f3:=3.14}

log(f_encode_Structure(v_struct))

log(f_decode_Structure(f_encode_Structure(v_struct)))
}

    control
    {
	//execute(Square(2, 4));	
	
	execute(TC_encdec())
	
    }
}with { encode "RAW" }

/home/philip/Titan/bin/compiler -L  \
StructUdpExample.ttcn UDPasp_PortType.ttcn UDPasp_Types.ttcn  - StructUdpExample.ttcn UDPasp_PortType.ttcn UDPasp_Types.ttcn
Notify: Parsing TTCN-3 module `StructUdpExample.ttcn'...
Notify: Parsing TTCN-3 module `UDPasp_PortType.ttcn'...
Notify: Parsing TTCN-3 module `UDPasp_Types.ttcn'...
Notify: Checking modules...
StructUdpExample.ttcn: In TTCN-3 module `StructUdpExample':
 StructUdpExample.ttcn:56.5-77: In external function definition `f_encode_Structure':
  StructUdpExample.ttcn:56.41-58: In formal parameter list:
   StructUdpExample.ttcn:56.42-57: In parameter `pdu':
    StructUdpExample.ttcn:64.5-69.5: In type definition `Structure':
     StructUdpExample.ttcn:70.11-20: warning: This variant does not belong to an encode
     StructUdpExample.ttcn:66.5-18: In record field `f1':
      StructUdpExample.ttcn:63.5-24: In type definition `CSL6':
       StructUdpExample.ttcn:63.33-56: warning: This variant does not belong to an encode
     StructUdpExample.ttcn:67.5-18: In record field `f2':
      StructUdpExample.ttcn:62.5-37: In type definition `UInt16':
       StructUdpExample.ttcn:62.46-86: warning: This variant does not belong to an encode
 StructUdpExample.ttcn:117.5-148.5: In function definition `f_server':
  StructUdpExample.ttcn:138.2-147.6: In while statement:
   StructUdpExample.ttcn:140.4-59: In receive statement:
    StructUdpExample.ttcn:140.15-31: error: '*' cannot be used as a matching template for a 'receive' operation
Notify: Error found in the input modules. Code will not be generated.
Makefile:152: die Regel für Ziel „compile" scheiterte
make: *** [compile] Fehler 1

Client(4)@philip-VirtualBox: Dynamic test case error: While RAW-decoding type '@StructUdpExample.RequestStructure': There is not enough bits in the buffer to decode type REAL.

alt {
	  // Handle the case when the expected answer comes in
	  [] pt.receive(ASP_UDP_message:?) -> value v_ASP_UDP_message {
	 	  log(f_decode_RequestStructure(v_ASP_UDP_message.data))
                  var ResponseStructure respStruct := f_decode_ResponseStructure(v_ASP_UDP_message.data)	  
	  	  setverdict(pass);
	  	  log("Expected message from server was received");
	  	  replyTimer.stop;
	  }