X-Git-Url: http://jsfdemo.indexdata.com/?a=blobdiff_plain;ds=sidebyside;f=www%2Fwsh.c;h=2927715f0f4856ab84833861d2e1227a24097b02;hb=949f8c4efedfe6d191264853690c84f527e1790b;hp=a67590a45146f60bbe810d73512409d258b4dd53;hpb=cbf0ef7549f996f4d96f41c6dafa76dc17dd7782;p=egate.git diff --git a/www/wsh.c b/www/wsh.c index a67590a..2927715 100644 --- a/www/wsh.c +++ b/www/wsh.c @@ -41,7 +41,10 @@ * USE OR PERFORMANCE OF THIS SOFTWARE. * * $Log: wsh.c,v $ - * Revision 1.4 1995/10/27 15:12:12 adam + * Revision 1.5 1995/11/01 16:15:48 adam + * Better presentation of records. Query/set number persistent. + * + * Revision 1.4 1995/10/27 15:12:12 adam * IrTcl incorporated in the gateway. * Better separation of script types. * Z39.50 gateway scripts entered. @@ -68,7 +71,7 @@ #include "wtcl.h" #include "wirtcl.h" -#define TIMEOUT_SHORT 60 +#define TIMEOUT_SHORT 180 #define TIMEOUT_MEDIUM 1800 #define TIMEOUT_LONG 7200 @@ -107,6 +110,8 @@ int main (int argc, char **argv) } while (wproto_process(wcl, timeout) > 0) { + char *p; + wo_clear (wcl, "text/html"); strcpy (parms_buf, wcl->wf_parms); script = parms = parms_buf; @@ -116,7 +121,7 @@ int main (int argc, char **argv) *parms++ = '\0'; if (*script) { - char *p = script + strlen(script) - 1; + p = script + strlen(script) - 1; while (*p && p != script) switch (*p) { @@ -140,6 +145,9 @@ int main (int argc, char **argv) --p; } } + for (p = parms; *p; p++) + if (*p == '+') + *p = ' '; gw_log (GW_LOG_DEBUG, mod, "script: %s", script); gw_log (GW_LOG_DEBUG, mod, "parms: %s", parms); if (w_interp_exec (w_interp, script, parms))