LibUpperTester.ttcn 1.34 KB
Newer Older
Bostjan Pintar's avatar
Bostjan Pintar committed
/*
 *	@author 	STF 370
 *  @version    $Id$
 *	@desc		xxx
 */
module LibUpperTester {
	import from LibCommon_VerdictControl {type FncRetCode;}
	import from LibIot_TypesAndValues {type Status;}

	// TODO - move to common lib
	/*type record Status {
		FncRetCode code, charstring reason optional
	}*/
// TODO commented out due to problems with tools not accepting 'extends' from several components
  /**
	 * @desc
	 *     This component type is used to trigger, stimualte, configure etc any
	 *     equipment related to the test, i.e., EUTs or other, or the
	 *     interconnecting network. To be used as PTC.
	 */
//	type component EquipmentUser {
//		port EquipmentAccessPort eaPort;
//		timer T_Equipment;
//	}

	group equipmentOperationTypes {

		type record of charstring ParameterList;

		type charstring EquipmentCommand;

		type record EquipmentOperationReq {
			EquipmentCommand cmd, ParameterList params optional 
		}

		type record EquipmentOperationRsp {
			Status status
		}
	}
	with{
		encode "LibUpperTesterCodec"
	}
	
	group equipmentOperationTemplates {
		
		template EquipmentOperationReq m_EQ_Request(in EquipmentCommand p_cmd, ParameterList p_params) := {
			cmd := p_cmd,
			params := p_params
		}
		
		template EquipmentOperationRsp mw_EO_Response(in template FncRetCode p_code) := {
			status := {
				code := p_code,
				reason := *
			}
		}
	}

	
}