version 1.6, 2004/09/28 12:27:17 |
version 1.7, 2004/11/23 01:37:47 |
|
|
/* $OpenXM: OpenXM/src/kan96xx/plugin/oxcgi.c,v 1.5 2004/09/28 12:20:40 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/plugin/oxcgi.c,v 1.6 2004/09/28 12:27:17 takayama Exp $ */ |
#include <stdio.h> |
#include <stdio.h> |
#include "datatype.h" |
#include "datatype.h" |
#include "stackm.h" |
#include "stackm.h" |
Line 317 int cgiKeyValuePairToUrlEncodingFile2(struct object ob |
|
Line 317 int cgiKeyValuePairToUrlEncodingFile2(struct object ob |
|
eob = getoa(ob,i); |
eob = getoa(ob,i); |
eob0 = getoa(eob,0); eob1 = getoa(eob,1); |
eob0 = getoa(eob,0); eob1 = getoa(eob,1); |
key = KopString(eob0); |
key = KopString(eob0); |
if (i == 0) { |
if ((i == 0) && (strcmp(key,"URL")==0)) { |
if (strcmp(key,"URL") != 0) warningKan("Key word should be URL.\n"); |
|
if (eob1.tag != Sdollar) errorKan1("%s\n","URL value must be a string."); |
if (eob1.tag != Sdollar) errorKan1("%s\n","URL value must be a string."); |
fp2fputs(KopString(eob1),fp); |
fp2fputs(KopString(eob1),fp); |
if ( n > 1 ) fp2fputc('?',fp); |
if ( n > 1 ) fp2fputc('?',fp); |