From 9608cd6ade9e5ad12a4d9d15cc5512a055655432 Mon Sep 17 00:00:00 2001
From: berge <berge@642cae54-f987-0410-8976-d08d2a59187e>
Date: Mon, 5 Jul 2010 09:15:42 +0000
Subject: [PATCH] Added port primitives

---
 ttcn/LibIts_Interface.ttcn | 205 +++++++++++++++++++++++++++++++++++--
 1 file changed, 194 insertions(+), 11 deletions(-)

diff --git a/ttcn/LibIts_Interface.ttcn b/ttcn/LibIts_Interface.ttcn
index 78f642a7..79ac456a 100644
--- a/ttcn/LibIts_Interface.ttcn
+++ b/ttcn/LibIts_Interface.ttcn
@@ -84,7 +84,8 @@ module LibIts_Interface {
 				 * @desc AC1 Mac M5 Port (MacM5/PhyM5) 
 				 */
 				type port MacM5Port message {
-				    in integer; //TODO: remove me
+				    in MacM5Ind;
+				    out MacM5Req;
 				} // end MacM5Port
 			    
 			} // end ac1Ports
@@ -95,7 +96,8 @@ module LibIts_Interface {
 				 * @desc AC2 Mac IR Port (MacIR/PhyIR) 
 				 */
 				type port MacIrPort message {
-				    in integer; //TODO: remove me
+				    in MacIrInd;
+				    out MacIrReq;
 				} // end MacIrPort
 			    
 			} // end ac2Ports
@@ -110,14 +112,16 @@ module LibIts_Interface {
 				 * @desc FA1 CAM Port (CAM/BTP/GeoNet/G5) 
 				 */
 				type port CamPort message {
-				    in integer; //TODO: remove me
+				    in CamInd;
+				    out CamReq;
 				} // end CamPort
 
 				/**
 				 * @desc FA1 DENM Port (DENM/BTP/GeoNet/G5) 
 				 */
 				type port DenmPort message {
-				    in integer; //TODO: remove me
+				    in DenmInd;
+				    out DenmReq;
 				} // end DenmPort
 						    
 			} // end fa1Ports
@@ -128,7 +132,8 @@ module LibIts_Interface {
 				 * @desc FA2 Cooper Port (Cooper/Fast/M5-IR) 
 				 */
 				type port CooperPort message {
-				    in integer; //TODO: remove me
+				    in CooperInd;
+				    out CooperReq;
 				} // end CooperPort			    
 			    
 			} // end fa2Ports
@@ -143,7 +148,8 @@ module LibIts_Interface {
 				 * @desc MGT1 IISC Port (IISC/LAN) 
 				 */
 				type port IiscPort message {
-				    in integer; //TODO: remove me
+				    in IiscInd;
+				    out IiscReq;
 				} // end IiscPort
 				
 			} // end mgt1Ports
@@ -158,7 +164,8 @@ module LibIts_Interface {
 				 * @desc NT1 BTP Port (BTP/GeoNet/G5) 
 				 */
 				type port BtpPort message {
-				    in integer; //TODO: remove me
+				    in BtpInd;
+				    out BtpReq;
 				} // end BtpPort
 							    
 			} // end nt1Ports
@@ -169,16 +176,17 @@ module LibIts_Interface {
 				 * @desc NT2 GeoNetworking Port (GeoNetworking/G5) 
 				 */
 				type port GeoNetworkingPort message {
-				    inout GeoNetworkingPacket
+				    in GeoNetworkingInd;
+				    out GeoNetworkingReq;
 				} // end GeoNetworkingPort
 
 				/**
 				 * @desc NT2 IPv6 over GeoNetworking Port (IPv6/GeoNetworking/G5) 
 				 */
 				type port IPv6OverGeoNetworkingPort message {
-				    in integer; //TODO: remove me
+				    in IPv6OverGeoNetworkingInd;
+				    out IPv6OverGeoNetworkingReq;
 				} // end IPv6OverGeoNetworkingPort
-
 			    
 			} // end nt2Ports
 			
@@ -188,7 +196,8 @@ module LibIts_Interface {
 				 * @desc NT3 Fast Port (Fast/M5-IR) 
 				 */
 				type port FastPort message {
-				    in integer; //TODO: remove me
+				    in FastInd;
+				    out FastReq;
 				} // end FastPort
 			    
 			} // end nt3Ports
@@ -196,5 +205,179 @@ module LibIts_Interface {
     	} // end networkAndTransportPorts
     
     } // end interfacePorts
+
+    group interfacePrimitives {    
+    
+    	group accessPrimitives {
+		
+			group ac1Primitives {
+
+				/**
+				 * @desc AC1 Mac M5 Indication Primitive 
+				 */
+				type record MacM5Ind {
+				}
+				
+				/**
+				 * @desc AC1 Mac M5 Request Primitive 
+				 */
+				type record MacM5Req {
+				}
+			    
+			} // end ac1Primitives
+
+			group ac2Primitives {
+			    
+			    /**
+				 * @desc AC2 Mac IR Indication Primitive 
+				 */
+				type record MacIrInd {
+				}
+							    
+			    /**
+				 * @desc AC2 Mac IR Request Primitive 
+				 */
+				type record MacIrReq {
+				}
+			    
+			} // end ac2Primitives
+    	    
+    	} // end accessPrimitives
+
+    	group facilityPrimitives {
+    	    
+    	    group fa1Primitives {
+	
+				/**
+				 * @desc FA1 CAM Indication Primitive 
+				 */
+				type record CamInd {
+				}
+					
+				/**
+				 * @desc FA1 CAM Request Primitive 
+				 */
+				type record CamReq {
+				}
+
+				/**
+				 * @desc FA1 DENM Indication Primitive 
+				 */
+				type record DenmInd {
+				}
+				
+				/**
+				 * @desc FA1 DENM Request Primitive 
+				 */
+				type record DenmReq {
+				}
+						    
+			} // end fa1Primitives
+
+    	    group fa2Primitives {
+			    
+				/**
+				 * @desc FA2 Cooper Indication Primitive 
+				 */
+				type record CooperInd {
+				}
+							    
+				/**
+				 * @desc FA2 Cooper Request Primitive 
+				 */
+				type record CooperReq {
+				}		    
+			    
+			} // end fa2Primitives
+    	    
+    	} // end facilityPrimitives
+	
+    	group managementPrimitives {
+    	    
+    	    group mgt1Primitives {
+			    
+			    /**
+				 * @desc MGT1 IISC Indication Primitive 
+				 */
+				type record IiscInd {
+				}
+							    
+			    /**
+				 * @desc MGT1 IISC Request Primitive 
+				 */
+				type record IiscReq {
+				}
+				
+			} // end mgt1Primitives
+    	    
+    	} // end managementPrimitives    	
+
+    	group networkAndTransportPrimitives {
+    	    
+    	    group nt1Primitives {
+
+				/**
+				 * @desc NT1 BTP Indication Primitive 
+				 */
+				type record BtpInd {
+				}
+				
+				/**
+				 * @desc NT1 BTP Request Primitive 
+				 */
+				type record BtpReq {
+				}
+							    
+			} // end nt1Primitives
+			
+			group nt2Primitives {
+
+				/**
+				 * @desc NT2 GeoNetworking Indication Primitive 
+				 */
+				type record GeoNetworkingInd {
+				    GeoNetworkingPacket msgIn
+				}
+				
+				/**
+				 * @desc NT2 GeoNetworking Request Primitive 
+				 */
+				type record GeoNetworkingReq {
+				    GeoNetworkingPacket msgOut
+				}
+
+				/**
+				 * @desc NT2 IPv6 over GeoNetworking Indication Primitive 
+				 */
+				type record IPv6OverGeoNetworkingInd {
+				}
+				
+				/**
+				 * @desc NT2 IPv6 over GeoNetworking Request Primitive 
+				 */
+				type record IPv6OverGeoNetworkingReq {
+				}
+			    
+			} // end nt2Primitives
+			
+			group nt3Primitives {
+
+				/**
+				 * @desc NT3 Fast Indication Primitive 
+				 */
+				type record FastInd {
+				}
+				
+				/**
+				 * @desc NT3 Fast Request Primitive 
+				 */
+				type record FastReq {
+				}
+			    
+			} // end nt3Primitives
+    	    
+    	} // end networkAndTransportPrimitives
+    
+    } // end interfacePrimitives    
     
 } // end LibIts_Interface
-- 
GitLab