projects
/
egate.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
IrTcl incorporated in the gateway.
[egate.git]
/
www
/
wsh.c
diff --git
a/www/wsh.c
b/www/wsh.c
index
990d141
..
a67590a
100644
(file)
--- a/
www/wsh.c
+++ b/
www/wsh.c
@@
-41,7
+41,12
@@
* USE OR PERFORMANCE OF THIS SOFTWARE.
*
* $Log: wsh.c,v $
* USE OR PERFORMANCE OF THIS SOFTWARE.
*
* $Log: wsh.c,v $
- * Revision 1.3 1995/10/23 16:55:41 adam
+ * 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.
+ *
+ * Revision 1.3 1995/10/23 16:55:41 adam
* A lot of changes - really.
*
* Revision 1.2 1995/10/20 14:02:42 adam
* A lot of changes - really.
*
* Revision 1.2 1995/10/20 14:02:42 adam
@@
-59,7
+64,9
@@
#include <unistd.h>
#include <ctype.h>
#include <unistd.h>
#include <ctype.h>
-#include "winterp.h"
+#include "whtml.h"
+#include "wtcl.h"
+#include "wirtcl.h"
#define TIMEOUT_SHORT 60
#define TIMEOUT_MEDIUM 1800
#define TIMEOUT_SHORT 60
#define TIMEOUT_MEDIUM 1800
@@
-88,6
+95,8
@@
int main (int argc, char **argv)
gw_log_session (wcl->id);
if (!strcmp (*argv, "egwtcl"))
w_interp = w_interp_create (w_interp_tcl, wcl, NULL);
gw_log_session (wcl->id);
if (!strcmp (*argv, "egwtcl"))
w_interp = w_interp_create (w_interp_tcl, wcl, NULL);
+ else if (!strcmp (*argv, "egwirtcl"))
+ w_interp = w_interp_create (w_interp_irtcl, wcl, NULL);
else if (!strcmp (*argv, "egwhtml"))
w_interp = w_interp_create (w_interp_html, wcl, NULL);
else
else if (!strcmp (*argv, "egwhtml"))
w_interp = w_interp_create (w_interp_html, wcl, NULL);
else
@@
-103,7
+112,7
@@
int main (int argc, char **argv)
script = parms = parms_buf;
while (*parms && *parms != '/')
parms++;
script = parms = parms_buf;
while (*parms && *parms != '/')
parms++;
- if (*parms == '/')
+ if (*parms)
*parms++ = '\0';
if (*script)
{
*parms++ = '\0';
if (*script)
{