From: Miloš Mulač <mulac@civ.zcu.cz>
Date: Thu, 14 Jul 2005 09:47:23 +0000 (+0000)
Subject: - transform funcion name correstions
X-Git-Tag: first_version~6
X-Git-Url: http://scientific.zcu.cz/git/?a=commitdiff_plain;h=4824cc4c25e94b3591a3017b87f8e01f7dad85f1;p=jra1mw.git

- transform funcion name correstions
- precooked, commented out, usage of transform functions from Soap to C enums
---

diff --git a/org.glite.lb.server/src/ws_typeref.c.T b/org.glite.lb.server/src/ws_typeref.c.T
index 062b747..48c30da 100644
--- a/org.glite.lb.server/src/ws_typeref.c.T
+++ b/org.glite.lb.server/src/ws_typeref.c.T
@@ -780,7 +780,7 @@ static void edg_wll_SoapToEnQueuedResult(enum in, edg_wll_EnQueuedResult *out)
 	}
 }
 
-static void edg_wll_SoapToHelperCallSrc_role(enum in, edg_wll_HelperCallSrc_role *out)
+static void edg_wll_SoapToHelperCallSrcRole(enum in, edg_wll_HelperCallSrc_role *out)
 {
 	switch ( in ) {
         case : *out = EDG_WLL_HELPERCALL_UNDEFINED,; break;
@@ -790,7 +790,7 @@ static void edg_wll_SoapToHelperCallSrc_role(enum in, edg_wll_HelperCallSrc_role
 	}
 }
 
-static void edg_wll_SoapToHelperReturnSrc_role(enum in, edg_wll_HelperReturnSrc_role *out)
+static void edg_wll_SoapToHelperReturnSrcRole(enum in, edg_wll_HelperReturnSrc_role *out)
 {
 	switch ( in ) {
         case : *out = EDG_WLL_HELPERRETURN_UNDEFINED,; break;
@@ -810,7 +810,7 @@ static void edg_wll_SoapToResubmissionResult(enum in, edg_wll_ResubmissionResult
 	}
 }
 
-static void edg_wll_SoapToDoneStatus_code(enum in, edg_wll_DoneStatus_code *out)
+static void edg_wll_SoapToDoneStatusCode(enum in, edg_wll_DoneStatus_code *out)
 {
 	switch ( in ) {
         case : *out = EDG_WLL_DONE_UNDEFINED,; break;
@@ -821,7 +821,7 @@ static void edg_wll_SoapToDoneStatus_code(enum in, edg_wll_DoneStatus_code *out)
 	}
 }
 
-static void edg_wll_SoapToCancelStatus_code(enum in, edg_wll_CancelStatus_code *out)
+static void edg_wll_SoapToCancelStatusCode(enum in, edg_wll_CancelStatus_code *out)
 {
 	switch ( in ) {
         case : *out = EDG_WLL_CANCEL_UNDEFINED,; break;
@@ -902,7 +902,7 @@ static void edg_wll_EnQueuedResultToSoap(edg_wll_EnQueuedResult in, enum *out)
 	}
 }
 
-static void edg_wll_HelperCallSrc_roleToSoap(edg_wll_HelperCallSrc_role in, enum *out)
+static void edg_wll_HelperCallSrcRoleToSoap(edg_wll_HelperCallSrc_role in, enum *out)
 {
 	switch ( in ) {
 	case EDG_WLL_HELPERCALL_UNDEFINED,: *out = ; break; 
@@ -912,7 +912,7 @@ static void edg_wll_HelperCallSrc_roleToSoap(edg_wll_HelperCallSrc_role in, enum
 	}
 }
 
-static void edg_wll_HelperReturnSrc_roleToSoap(edg_wll_HelperReturnSrc_role in, enum *out)
+static void edg_wll_HelperReturnSrcRoleToSoap(edg_wll_HelperReturnSrc_role in, enum *out)
 {
 	switch ( in ) {
 	case EDG_WLL_HELPERRETURN_UNDEFINED,: *out = ; break; 
@@ -932,7 +932,7 @@ static void edg_wll_ResubmissionResultToSoap(edg_wll_ResubmissionResult in, enum
 	}
 }
 
-static void edg_wll_DoneStatus_codeToSoap(edg_wll_DoneStatus_code in, enum *out)
+static void edg_wll_DoneStatusCodeToSoap(edg_wll_DoneStatus_code in, enum *out)
 {
 	switch ( in ) {
 	case EDG_WLL_DONE_UNDEFINED,: *out = ; break; 
@@ -943,7 +943,7 @@ static void edg_wll_DoneStatus_codeToSoap(edg_wll_DoneStatus_code in, enum *out)
 	}
 }
 
-static void edg_wll_CancelStatus_codeToSoap(edg_wll_CancelStatus_code in, enum *out)
+static void edg_wll_CancelStatusCodeToSoap(edg_wll_CancelStatus_code in, enum *out)
 {
 	switch ( in ) {
 	case EDG_WLL_CANCEL_UNDEFINED,: *out = ; break; 
@@ -966,7 +966,7 @@ static void edg_wll_ClearReasonToSoap(edg_wll_ClearReason in, enum *out)
 	}
 }
 
-static void edg_wll_RegJobJobtypeToSoap(edg_wll_RegJobJobtype in, enum *out)
+static void edg_wll_RegJobtypeToSoap(edg_wll_RegJobJobtype in, enum *out)
 {
 	switch ( in ) {
 	case EDG_WLL_REGJOB_UNDEFINED,: *out = ; break; 
@@ -1173,6 +1173,7 @@ static int edg_wll_SoapToEvent(
 				}
 				my $usuc = $fn;
 				$usuc = $1.uc($2).$3 while ($usuc =~ /([^_]*)_([a-z])(.*)/);
+				my $fuc = ucfirst($usuc);
 
 				if ($ft eq 'jobid') {
 
@@ -1188,6 +1189,15 @@ static int edg_wll_SoapToEvent(
 					if ($f->{optional}) {
 						gen "\t\t\tout->$act.$fn = *in->$name->$usuc;\n";
 					}
+# XXX: comment out when tranform functions ready...
+#					elsif ($f->{codes}) {
+#						if ($type eq '_common_') {
+#							gen "\t\t\tedg_wll_SoapTo$fuc(in->$name->$usuc,&(out->$act.$fn));\n";
+#						}
+#						else {
+#							gen "\t\t\tedg_wll_SoapTo$name$fuc(in->$name->$usuc,&(out->$act.$fn));\n";
+#						}
+#					}
 					else {
 						gen "\t\t\tout->$act.$fn = in->$name->$usuc;\n";
 					}