===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/plugin/oxcgi.hh,v
retrieving revision 1.2
retrieving revision 1.4
diff -u -p -r1.2 -r1.4
--- OpenXM/src/kan96xx/plugin/oxcgi.hh	2004/09/24 08:35:47	1.2
+++ OpenXM/src/kan96xx/plugin/oxcgi.hh	2005/02/27 05:28:06	1.4
@@ -1,4 +1,4 @@
-/* $OpenXM: OpenXM/src/kan96xx/plugin/oxcgi.hh,v 1.1 2004/09/21 12:52:01 takayama Exp $ */
+/* $OpenXM: OpenXM/src/kan96xx/plugin/oxcgi.hh,v 1.3 2004/09/27 01:20:46 takayama Exp $ */
 else if (strcmp(key,"cgiUrlEncodingToKeyValuePair") == 0) {
   if (size != 2) errorKan1("%s\n","[(cgiUrlEncodingToKeyValuePair)  obj] extension kv-pair.");
   obj1 = getoa(obj,1);
@@ -15,6 +15,16 @@ else if (strcmp(key,"cgiKeyValuePairToUrlEncodingStrin
   obj1 = getoa(obj,1);
   rob = cgiKeyValuePairToUrlEncodingString(obj1);
 }
+else if (strcmp(key,"cgiStringToUrlEncoding") == 0) {
+  if (size != 2) errorKan1("%s\n","[(cgiStringToUrlEncoding)  s] extension sobj.");
+  obj1 = getoa(obj,1);
+  rob = KooStringToUrlEncoding(obj1);
+}
+else if (strcmp(key,"cgiUrlEncodedStringToObj") == 0) {
+  if (size != 2) errorKan1("%s\n","[(cgiUrlEncodedStringToObj)  s] extension sobj.");
+  obj1 = getoa(obj,1);
+  rob = KooUrlEncodedStringToObj(obj1);
+}
 else if (strcmp(key,"cgiHttpToKeyValuePair") == 0) {
   if (size != 2) errorKan1("%s\n","[(cgiHttpToKeyValuePair) sobj] extension kv-pair");
   obj1= getoa(obj,1);
@@ -23,4 +33,10 @@ else if (strcmp(key,"cgiHttpToKeyValuePair") == 0) {
   }else if (obj1.tag == SbyteArray) {
 	  rob = cgiHttpToKeyValuePair(KopByteArray(obj1),getByteArraySize(obj1));
   }else errorKan1("%s\n","cgiHttpToKeyValuePair: argument must be a string or a byte aray.");
+}
+else if (strcmp(key,"cgiToTokens") == 0) {
+  if (size != 3) errorKan1("%s\n","[(cgiToTokens) obj sep] extension tokens");
+  obj1= getoa(obj,1);
+  obj2= getoa(obj,2);
+  rob = KooToTokens(obj1,obj2);
 }