version 1.2, 2004/09/24 08:35:47 |
version 1.4, 2005/02/27 05:28:06 |
|
|
/* $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) { |
else if (strcmp(key,"cgiUrlEncodingToKeyValuePair") == 0) { |
if (size != 2) errorKan1("%s\n","[(cgiUrlEncodingToKeyValuePair) obj] extension kv-pair."); |
if (size != 2) errorKan1("%s\n","[(cgiUrlEncodingToKeyValuePair) obj] extension kv-pair."); |
obj1 = getoa(obj,1); |
obj1 = getoa(obj,1); |
Line 15 else if (strcmp(key,"cgiKeyValuePairToUrlEncodingStrin |
|
Line 15 else if (strcmp(key,"cgiKeyValuePairToUrlEncodingStrin |
|
obj1 = getoa(obj,1); |
obj1 = getoa(obj,1); |
rob = cgiKeyValuePairToUrlEncodingString(obj1); |
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) { |
else if (strcmp(key,"cgiHttpToKeyValuePair") == 0) { |
if (size != 2) errorKan1("%s\n","[(cgiHttpToKeyValuePair) sobj] extension kv-pair"); |
if (size != 2) errorKan1("%s\n","[(cgiHttpToKeyValuePair) sobj] extension kv-pair"); |
obj1= getoa(obj,1); |
obj1= getoa(obj,1); |
Line 23 else if (strcmp(key,"cgiHttpToKeyValuePair") == 0) { |
|
Line 33 else if (strcmp(key,"cgiHttpToKeyValuePair") == 0) { |
|
}else if (obj1.tag == SbyteArray) { |
}else if (obj1.tag == SbyteArray) { |
rob = cgiHttpToKeyValuePair(KopByteArray(obj1),getByteArraySize(obj1)); |
rob = cgiHttpToKeyValuePair(KopByteArray(obj1),getByteArraySize(obj1)); |
}else errorKan1("%s\n","cgiHttpToKeyValuePair: argument must be a string or a byte aray."); |
}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); |
} |
} |