Commit 7bda9ae5 authored by rennoch's avatar rennoch
Browse files

not used anymore due to import of LibCommon modules from Repository

parent 32da46f5
Loading
Loading
Loading
Loading
+0 −133
Original line number Diff line number Diff line
/*
 *	@author 	STF 276
 *  @version 	$Id$
 *	@desc		A collection of functions for abstract data types which may be 
 *              useful in the implementation of any TTCN-3 test suite.
 *  @remark	    End users should be aware that any changes made to the  in
 *              definitions this module may be overwritten in future releases.
 *				End users are encouraged to contact the distributers of this  
 *              module regarding their modifications or additions so that future 
 *              updates will include your changes.
 */
 module LibCommon_AbstractData {
	
	//LibCommon
	import from LibCommon_BasicTypesAndValues { type UInt } ;

	group stringStack {

		type record StringStack {
			UInt        stackSize,
			StringItems stringItems
		}

		type record of charstring StringItems;

		/*
		 * @desc    Constant which can be used to initialize a
		 *          string stack. A string stack can be intialized by
		 *          assigning this value in the variable declariation.
		 *          An alternative is to call the initlialization function.
		 * @see     LibCommon_AbstractData.f_initStringStack
		 * @remark	Note that an initlialized stack stack is not 
		 *          necessarily the same as an empty string stack.
		 *          An empty tring stack as 0 zero elements but may 
		 *          have a non empty list of (empty) items.
		 */
		const StringStack c_initStringStack := { 0, {} }

		/*
		 * @desc	The invocation of this function will initialize 
		 *          a string stack to an empty string stack.
		 *          An alternative is to initlialize a stack using a
		 *          constant value.
		 * @see     LibCommon_AbstractData.c_initStringStack
		 * @param	p_stack String stack to be initialized.
		 */
		function f_initStringStack ( inout StringStack p_stack ) {
			p_stack := c_initStringStack
		}

		/*
		 * @desc	This function checks if a string stack is
		 *          empty. 
		 * @param	p_stack String stack to be checked.
		 * @return	true if empty, false if not empty
		 */
		function f_isStringStackEmpty ( inout StringStack p_stack ) 
		return boolean {
			if ( p_stack.stackSize == 0 ) {return true}
			else {return false}
		}

		/*
		 * @desc	This function checks if a given string is on the
		 *          string stack. 
		 * @param	p_stack String stack where the string item 
		 *          is to be looked for.
		 * @param	p_item  String to be checked for.
		 * @return	true if found, false if not found
		 */
		function f_isItemOnStringStack ( inout StringStack p_stack,
									     in    charstring  p_item ) 
		return boolean {
			var integer i;
			for (i := 0; i < p_stack.stackSize; i := i+1 ) {
				if ( p_stack.stringItems[i] == p_item ) {
					return true;
				}
			}
			return false;
		}

		/*
		 * @desc	This function checks if a given string is on the
		 *          string stack. 
		 * @param	p_stack String stack where the string item 
		 *          is to be looked for.
		 * @param	p_item  String item on top of the stack.
		 * @return	false if stack is empty, true otherwise
		 */
		function f_peekStringStackTop ( inout StringStack p_stack,
										out   charstring  p_item) 
		return boolean {
			if (p_stack.stackSize == 0) {
				p_item := "f_peekTopStringStack: String stack is empty!";
				return false;
			}
			p_item := p_stack.stringItems[p_stack.stackSize-1];
			return true;
		}


		/*
		 * @desc	This function puts a string to the top of a
		 *          string stack. 
		 * @param	p_stack String stack to which the string item 
		 *          is to be added.
		 * @param	p_item  String to be added.
		 */
		function f_pushStringStack ( inout StringStack p_stack,
									 in    charstring  p_item ) {
			p_stack.stringItems[p_stack.stackSize] := p_item;
			p_stack.stackSize := p_stack.stackSize + 1;
		}

		/*
		 * @desc	This function removes the string from the top of a
		 *          string stack. If the stack is empty nothing is done
		 * @param	p_stack String stack from which the top string item 
		 *          is to be removed.
		 */
		function f_popStringStack ( inout StringStack p_stack ) {
            if ( p_stack.stackSize > 0 ) {
				p_stack.stackSize := p_stack.stackSize-1;
				// "delete" top stack item to be safe
				// Note: due to record of index the "old top" is size-1!
				p_stack.stringItems[p_stack.stackSize] := ""; 
			}
		}

	} // end group stringStack

} // end module LibCommon_AbstractData
+0 −220
Original line number Diff line number Diff line
/*
 *	@author 	STF 276
 *  @version 	$Id$
 *	@desc		A collection of basic type and value definitions which may be 
 *				useful in the implementation of any TTCN-3 test suite. <br><br>
 *  @remark	    End users should be aware that any changes made to the  in
 *              definitions this module may be overwritten in future releases.
 *				End users are encouraged to contact the distributers of this  
 *              module regarding their modifications or additions so that future 
 *              updates will include your changes.
 */
 module LibCommon_BasicTypesAndValues {
	
	/* 
	 *  @remark Number in subtype name always indicates encoding length 
	 *          in _bits_
	 */
	group unsignedIntegerDefintions {

		const integer	c_uInt1Max := 1;
		const integer	c_uInt2Max := 3;
		const integer	c_uInt3Max := 7;
		const integer	c_uInt4Max := 15;
		const integer	c_uInt5Max := 31;
		const integer	c_uInt6Max := 63;
		const integer	c_uInt7Max := 127;
		const integer	c_uInt8Max := 255;
		const integer	c_uInt9Max := 511;
		const integer	c_uInt10Max := 1023;
		const integer	c_uInt11Max := 2047;
		const integer	c_uInt12Max := 4095;
		const integer	c_uInt13Max := 8191;
		const integer	c_uInt14Max := 16383;
    	const integer 	c_uInt15Max := 32767;
		const integer	c_uInt16Max := 65535;
		const integer	c_uInt17Max := 131071;
		const integer	c_uInt18Max := 262143;
		const integer	c_uInt19Max := 524287;
		const integer 	c_uInt20Max := 1048575;
		const integer 	c_uInt21Max := 2097151;
		const integer 	c_uInt22Max := 4194303;
		const integer 	c_uInt23Max := 8388607;
		const integer 	c_uInt24Max := 16777215;
		const integer 	c_uInt25Max := 33554431;
		const integer 	c_uInt26Max := 67108863;
		const integer 	c_uInt27Max := 134217727;
		const integer 	c_uInt28Max := 268435456;
		const integer 	c_uInt29Max := 536870911;
		const integer 	c_uInt30Max := 1073741823;
		const integer 	c_uInt31Max := 2147483647;
//		const integer 	c_uInt32Max := 4294967295;

//		const integer 	c_uInt48Max := 281474976710655;
		const integer 	c_uInt48Max := 2147483647;

		type integer 	UInt  (0 .. infinity);
		type integer	UInt1 (0 .. c_uInt1Max) with {encode "length=1;"};
		type integer	UInt2 (0 .. c_uInt2Max) with {encode "length=2"};
		type integer	UInt3 (0 .. c_uInt3Max) with {encode "length=3"};
		type integer	UInt4 (0 .. c_uInt4Max) with {encode "length=4"};
		type integer	UInt5 (0 .. c_uInt5Max) with {encode "length=5"};
		type integer	UInt6 (0 .. c_uInt6Max) with {encode "length=6"};
		type integer	UInt7 (0 .. c_uInt7Max) with {encode "length=7"};
		type integer	UInt8 (0 .. c_uInt8Max) with {encode "length=8"};
		type integer	UInt9 (0 .. c_uInt9Max) with {encode "length=9"};
		type integer	UInt10 (0 .. c_uInt10Max) with {encode "length=10"};
		type integer	UInt11 (0 .. c_uInt11Max) with {encode "length=11"};
		type integer	UInt12 (0 .. c_uInt12Max) with {encode "length=12"};
		type integer	UInt13 (0 .. c_uInt13Max) with {encode "length=13"};
		type integer	UInt14 (0 .. c_uInt14Max) with {encode "length=14"};
    	type integer 	UInt15 (0 .. c_uInt15Max) with {encode "length=15"};
		type integer	UInt16 (0 .. c_uInt16Max) with {encode "length=16"};
		type integer	UInt17 (0 .. c_uInt17Max) with {encode "length=17"};
		type integer	UInt18 (0 .. c_uInt18Max) with {encode "length=18"};
		type integer	UInt19 (0 .. c_uInt19Max) with {encode "length=19"};
		type integer 	UInt20 (0 .. c_uInt20Max) with {encode "length=20"};
		type integer 	UInt21 (0 .. c_uInt21Max) with {encode "length=21"};
		type integer 	UInt22 (0 .. c_uInt22Max) with {encode "length=22"};
		type integer 	UInt23 (0 .. c_uInt23Max) with {encode "length=23"};
		type integer 	UInt24 (0 .. c_uInt24Max) with {encode "length=24"};
		type integer 	UInt25 (0 .. c_uInt25Max) with {encode "length=25"};
		type integer 	UInt26 (0 .. c_uInt26Max) with {encode "length=26"};
		type integer 	UInt27 (0 .. c_uInt27Max) with {encode "length=27"};
		type integer 	UInt28 (0 .. c_uInt28Max) with {encode "length=28"};
		type integer 	UInt29 (0 .. c_uInt29Max) with {encode "length=29"};
		type integer 	UInt30 (0 .. c_uInt30Max) with {encode "length=30"};
		type integer 	UInt31 (0 .. c_uInt31Max) with {encode "length=31"};
//		type integer 	UInt32 (0 .. c_uInt32Max) with {encode "length=32"};
		type integer 	UInt32 (0 .. c_uInt31Max) with {encode "length=32"};

//		type integer 	UInt48 (0 .. c_uInt48Max) with {encode "length=48"};
		type integer 	UInt48 (0 .. c_uInt31Max) with {encode "length=32"};

	} // end group unsignedIntegerDefintions
		
	/* 
	 * @remark Number in subtype name always indicates encoding length 
	 *         in _bits_
	 */
	group signedIntegerDefintions {

		const integer	c_int1Min := -1;
		const integer	c_int1Max := 0;
		const integer	c_int2Min := -2;
		const integer	c_int2Max := 1;
		const integer	c_int3Min := -4;
		const integer	c_int3Max := 3;
		const integer	c_int4Min := -8;
		const integer	c_int4Max := 7;
		const integer	c_int5Min := -16;
		const integer	c_int5Max := 15;
		const integer	c_int6Min := -32;
		const integer	c_int6Max := 31;
		const integer	c_int7Min := -64;
		const integer	c_int7Max := 63;
		const integer	c_int8Min := -128;
		const integer	c_int8Max := 127;
		const integer	c_int9Min := -256;
		const integer	c_int9Max := 255;
		const integer	c_int10Min := -512;
		const integer	c_int10Max := 511;
		const integer	c_int11Min := -1024;
		const integer	c_int11Max := 1023;
		const integer	c_int12Min := -2048;
		const integer	c_int12Max := 2047;
		const integer	c_int13Min := -4096;
		const integer	c_int13Max := 4095;
		const integer	c_int14Min := -8192;
		const integer	c_int14Max := 8191;
		const integer	c_int15Min := -16384;
		const integer	c_int15Max := 16383;
		const integer	c_int16Min := -32768;
    	const integer 	c_int16Max := 32767;
		const integer	c_int17Min := -65536;
		const integer	c_int17Max := 65535;
		const integer	c_int18Min := -131072;
		const integer	c_int18Max := 131071;
		const integer	c_int19Min := -262144;
		const integer	c_int19Max := 262143;
		const integer	c_int20Min := -524288;
		const integer	c_int20Max := 524287;
		const integer	c_int21Min := -1048576;
		const integer 	c_int21Max := 1048575;
		const integer	c_int22Min := -2097152;
		const integer 	c_int22Max := 2097151;
		const integer	c_int23Min := -4194304;
		const integer 	c_int23Max := 4194303;
		const integer	c_int24Min := -8388608;
		const integer 	c_int24Max := 8388607;
		const integer	c_int25Min := -16777216;
		const integer 	c_int25Max := 16777215;
		const integer	c_int26Min := -33554432;
		const integer 	c_int26Max := 33554431;
		const integer	c_int27Min := -67108864;
		const integer 	c_int27Max := 67108863;
		const integer	c_int28Min := -134217728;
		const integer 	c_int28Max := 134217727;
		const integer	c_int29Min := -268435456;
		const integer 	c_int29Max := 268435456;
		const integer	c_int30Min := -536870912;
		const integer 	c_int30Max := 536870911;
		const integer	c_int31Min := -1073741824;
		const integer 	c_int31Max := 1073741823;
//		const integer	c_int32Min := -2147483648;
		const integer 	c_int32Max := 2147483647;

		type integer 	Int;
		type integer    Int1  (c_int1Min .. c_int1Max) with { encode "length=1"};
		type integer    Int2  (c_int2Min .. c_int2Max) with { encode "length=2"};
		type integer    Int3  (c_int3Min .. c_int3Max) with { encode "length=3"};
		type integer    Int4  (c_int4Min .. c_int4Max) with { encode "length=4"};
		type integer    Int5  (c_int5Min .. c_int5Max) with { encode "length=5"};
		type integer    Int6  (c_int6Min .. c_int6Max) with { encode "length=6"};
		type integer    Int7  (c_int7Min .. c_int7Max) with { encode "length=7"};
		type integer    Int8  (c_int8Min .. c_int8Max) with { encode "length=8"};
		type integer    Int9  (c_int9Min .. c_int9Max) with { encode "length=9"};
		type integer    Int10  (c_int10Min .. c_int10Max) with { encode "length=10"};
		type integer    Int11  (c_int11Min .. c_int11Max) with { encode "length=11"};
		type integer    Int12  (c_int12Min .. c_int12Max) with { encode "length=12"};
		type integer    Int13  (c_int13Min .. c_int13Max) with { encode "length=13"};
		type integer    Int14  (c_int14Min .. c_int14Max) with { encode "length=14"};
		type integer    Int15  (c_int15Min .. c_int15Max) with { encode "length=15"};
		type integer    Int16  (c_int16Min .. c_int16Max) with { encode "length=16"};
		type integer    Int17  (c_int17Min .. c_int17Max) with { encode "length=17"};
		type integer    Int18  (c_int18Min .. c_int18Max) with { encode "length=18"};
		type integer    Int19  (c_int19Min .. c_int19Max) with { encode "length=19"};
		type integer    Int20  (c_int20Min .. c_int20Max) with { encode "length=20"};
		type integer    Int21  (c_int21Min .. c_int21Max) with { encode "length=21"};
		type integer    Int22  (c_int22Min .. c_int22Max) with { encode "length=22"};
		type integer    Int23  (c_int23Min .. c_int23Max) with { encode "length=23"};
		type integer    Int24  (c_int24Min .. c_int24Max) with { encode "length=24"};
		type integer    Int25  (c_int25Min .. c_int25Max) with { encode "length=25"};
		type integer    Int26  (c_int26Min .. c_int26Max) with { encode "length=26"};
		type integer    Int27  (c_int27Min .. c_int27Max) with { encode "length=27"};
		type integer    Int28  (c_int28Min .. c_int28Max) with { encode "length=28"};
		type integer    Int29  (c_int29Min .. c_int29Max) with { encode "length=29"};
		type integer    Int30  (c_int30Min .. c_int30Max) with { encode "length=30"};
		type integer    Int31  (c_int31Min .. c_int31Max) with { encode "length=31"};
//		type integer    Int32  (c_int32Min .. c_int32Max) with { encode "length=32"};

	} // end group signedIntegerDefintions

	/* 
	 * @remark Number in subtype name always indicates encoding length 
	 *		   in _bits_
	 */
	group booleanDefintions {

		type boolean	Bool1 with {encode "length=1"};
		type boolean	Bool2 with {encode "length=2"};
		type boolean	Bool3 with {encode "length=3"};
		type boolean	Bool4 with {encode "length=4"};
		type boolean	Bool5 with {encode "length=5"};
		type boolean	Bool6 with {encode "length=6"};
		type boolean	Bool7 with {encode "length=7"};
		type boolean	Bool8 with {encode "length=8"};
	
	} // end group booleanDefintions

} // end module LibCommon_BasicTypesAndValues
+0 −100
Original line number Diff line number Diff line
/*
 *	@author 	STF 276
 *  @version 	$Id$
 *	@desc		A collection of data string type and value definitions which 
 *				may be useful in the implementation of any TTCN-3 test 
 *              suite. "Data string" refers to TTCN-3 hexstring, octetstring  
 *				and bitstring types.
 *  @remark	    End users should be aware that any changes made to the  in
 *              definitions this module may be overwritten in future releases.
 *				End users are encouraged to contact the distributers of this  
 *              module regarding their modifications or additions so that future 
 *              updates will include your changes.
 */
 module LibCommon_DataStrings {
	
	/* 
	 * @remark Number in name indicates string length in number of 
	 * 		   _bits_
	 */
	group bitStringSubTypes {

		type bitstring	Bit1 	length(1) with {encode "1 bit"};
		type bitstring	Bit2 	length(2) with {encode "2 bits"};
		type bitstring	Bit3 	length(3) with {encode "3 bits"};
		type bitstring	Bit4 	length(4) with {encode "4 bits"};
		type bitstring	Bit5 	length(5) with {encode "5 bits"};
		type bitstring	Bit6 	length(6) with {encode "6 bits"};
		type bitstring	Bit7 	length(7) with {encode "7 bits"};
		type bitstring	Bit8 	length(8) with {encode "8 bits"};
		type bitstring	Bit9 	length(9) with {encode "9 bits"};
		type bitstring	Bit10 	length(10) with {encode "10 bits"};
		type bitstring	Bit11 	length(11) with {encode "11 bits"};
		type bitstring	Bit12 	length(12) with {encode "12 bits"};
		type bitstring	Bit13 	length(13) with {encode "13 bits"};
		type bitstring	Bit14 	length(14) with {encode "14 bits"};
		type bitstring	Bit15 	length(15) with {encode "15 bits"};
		type bitstring	Bit16 	length(16) with {encode "16 bits"};
		type bitstring	Bit17 	length(17) with {encode "17 bits"};
		type bitstring	Bit18 	length(18) with {encode "18 bits"};
		type bitstring	Bit19 	length(19) with {encode "19 bits"};
		type bitstring	Bit20 	length(20) with {encode "20 bits"};
		type bitstring	Bit21 	length(21) with {encode "21 bits"};
		type bitstring	Bit22 	length(22) with {encode "22 bits"};
		type bitstring	Bit23 	length(23) with {encode "23 bits"};
		type bitstring	Bit24 	length(24) with {encode "24 bits"};
		type bitstring	Bit25 	length(25) with {encode "25 bits"};
		type bitstring	Bit26 	length(26) with {encode "26 bits"};
		type bitstring	Bit27 	length(27) with {encode "27 bits"};
		type bitstring	Bit28 	length(28) with {encode "28 bits"};
		type bitstring	Bit29 	length(29) with {encode "29 bits"};
		type bitstring	Bit30 	length(30) with {encode "30 bits"};
		type bitstring	Bit31 	length(31) with {encode "31 bits"};
		type bitstring	Bit32 	length(32) with {encode "32 bits"};

		type bitstring	Bit48 	length(48) with {encode "48 bits"};
		
		type bitstring	Bit64 	length(64) with {encode "64 bits"};	

	} // end group bitStringSubTypes

	/* 
	 * @remark Number in name indicates string length in number of 
	 * 		   _octets_
	 */
	group octetStringSubTypes {

		type octetstring	Oct1 	length(1) with {encode "1 bytes"};
		type octetstring	Oct2 	length(2) with {encode "2 bytes"};
		type octetstring	Oct3 	length(3) with {encode "3 bytes"};
		type octetstring	Oct4 	length(4) with {encode "4 bytes"};
		type octetstring	Oct5 	length(5) with {encode "5 bytes"};
		type octetstring	Oct6 	length(6) with {encode "6 bytes"};
		type octetstring	Oct7 	length(7) with {encode "7 bytes"};
		type octetstring 	Oct8 	length(8) with {encode "8 bytes"};
 		type octetstring	Oct9 	length(9) with {encode "9 bytes"};
		type octetstring	Oct10	length(10) with {encode "10 bytes"};
		type octetstring	Oct11	length(11) with {encode "11 bytes"};
 	  	type octetstring 	Oct12 	length(12) with {encode "12 bytes"};
		type octetstring	Oct13 	length(13) with {encode "13 bytes"};
  	  	type octetstring 	Oct14 	length(14) with {encode "14 bytes"};
		type octetstring	Oct15 	length(15) with {encode "15 bytes"};
		type octetstring	Oct16 	length(16) with {encode "16 bytes"};

		type octetstring	Oct128 length(128) with {encode "128 bytes"};
// Added AF
		type octetstring	Oct80 length(80) with {encode "80 bytes"};
		type octetstring	Oct160 length(160) with {encode "160 bytes"};
		type octetstring	Oct320 length(320) with {encode "320 bytes"};
		type octetstring	Oct640 length(640) with {encode "640 bytes"};
		type octetstring	Oct1280 length(1280) with {encode "1280 bytes"};

		type octetstring	Oct1to15 	length(1..15) with {encode "1 to 15 bytes"};
		type octetstring	Oct6to15 	length(6..15) with {encode "6 to 15 bytes"};
		type octetstring	Oct1to128 	length(1..128) with {encode "1 to 128 bytes"};
		type octetstring	Oct1to254 	length(1..254) with {encode "1 to 254 bytes"};
		type octetstring	Oct1to255 	length(1..255) with {encode "1 to 255 bytes"};
	
	} // end group octetStringSubTypes

} // end module LibCommon_DataStrings

LibCommon/LibCommon_Sync.ttcn

deleted100644 → 0
+0 −1004

File deleted.

Preview size limit exceeded, changes collapsed.

+0 −794

File deleted.

Preview size limit exceeded, changes collapsed.

Loading