[Info-vax] WASD demo issues
issinoho
iain at issinoho.com
Sat Jan 29 04:57:41 EST 2022
On Saturday, 29 January 2022 at 03:17:06 UTC, Mark Daniel wrote:
> On 28/1/22 9:54 am, issinoho wrote:
> > On Thursday, 27 January 2022 at 13:31:29 UTC, issinoho wrote:
> >> On Tuesday, 25 January 2022 at 21:59:16 UTC, Mark Daniel wrote:
> >>> On 26/1/22 3:53 am, issinoho wrote:
> 8< snip 8<
> > Ok, the root cause of the issue seems to be in the host name resolution, specifically with regard to case sensitivity. Setting an alias with the specific case that WASD is expecting solves the problem.
> Confirmed via a little code (see below) and some local database fiddles.
>
> WASD establishes the primary server host name using gethostname(). This
> always is returned as lower case regardless of the host name database entry.
>
> All upper or lower case host name works. Does not work with mixed-case.
> $ tcpip show host /local
>
> LOCAL database
>
> Host address Host name
>
> 127.0.0.1 LOCALHOST, localhost
> 192.168.1.2 gort.lan
> 192.168.1.3 klaatu.lan
> 192.168.1.254 router.lan
>
> $ mcr []lookup "klaatu.lan"
> gethostname() klaatu.lan 0
> gethostbyname() klaatu.lan %X00061578
> $QIO() klaatu.lan %X00000001 %X00000001
> $ tcpip show host /local
>
> LOCAL database
>
> Host address Host name
> 192.168.1.3 KLAATU.LAN
> 127.0.0.1 LOCALHOST, localhost
> 192.168.1.2 gort.lan
> 192.168.1.254 router.lan
> 192.168.1.86 x86vms.lan
>
> $ mcr []lookup "klaatu.lan"
> gethostname() klaatu.lan 0
> gethostbyname() klaatu.lan %X00061578
> $QIO() klaatu.lan %X00000001 %X00000001
> $ tcpip show host /local
>
> LOCAL database
>
> Host address Host name
>
> 127.0.0.1 LOCALHOST, localhost
> 192.168.1.2 gort.lan
> 192.168.1.3 klAAtu.lan
> 192.168.1.254 router.lan
> 192.168.1.86 x86vms.lan
>
> $ mcr []lookup "klaatu.lan"
> gethostname() klaatu.lan 0
> gethostbyname() klaatu.lan %X00000000
> $QIO() klaatu.lan %X00000001 %X00000870
>
> $ mcr []lookup "klAAtu.lan"
> gethostname() klaatu.lan 0
> gethostbyname() klAAtu.lan %X00061578
> $QIO() klAAtu.lan %X00000001 %X00000001
>
> /*****************************************************************************/
>
> #include<ints.h>
> #include<stdlib.h>
> #include<stdio.h>
> #include<string.h>
> #include<in.h>
> #include<netdb.h>
>
> #include<iodef.h>
> #include<iosbdef.h>
> #include<efndef.h>
> #include<starlet.h>
> #include<descrip.h>
>
> #define INETACP_FUNC$C_GETHOSTBYNAME 1
>
> int main (int argc, char *argv[])
> {
> static $DESCRIPTOR (TcpIpDeviceDsc, "TCPIP$DEVICE");
> static $DESCRIPTOR (HostNameDsc, "");
> static $DESCRIPTOR (HostAddressDsc, "");
>
> static char SubFunction [4] =
> { INETACP_FUNC$C_GETHOSTBYNAME, 0, 0, 0 };
> static struct dsc$descriptor SubFunctionDsc =
> { sizeof(SubFunction), DSC$K_DTYPE_T, DSC$K_CLASS_S, SubFunction };
>
> int status;
> short chan;
> char hname [128];
> unsigned char ipaddr [16];
> struct _iosb IOsb;
> struct hostent *heptr;
>
> status = gethostname (hname, sizeof(hname));
> printf ("gethostname() %s %d\n", hname, status);
>
> heptr = gethostbyname (argv[1]);
> printf ("gethostbyname() %s %%X%08.08X\n", argv[1], heptr);
>
> HostNameDsc.dsc$a_pointer = argv[1];
> HostNameDsc.dsc$w_length = strlen(argv[1]);
>
> HostAddressDsc.dsc$a_pointer = (char*)ipaddr;
> HostAddressDsc.dsc$w_length = sizeof(ipaddr);
>
> status = sys$assign (&TcpIpDeviceDsc, &chan, 0, 0);
> if (!(status & 1)) exit (status);
>
> status = sys$qiow (EFN$C_ENF, chan, IO$_ACPCONTROL,
> &IOsb, 0, 0,
> &SubFunctionDsc,
> &HostNameDsc, 0,
> &HostAddressDsc, 0, 0);
>
> printf ("$QIO() %s %%X%08.08X %%X%08.08X\n",
> HostNameDsc.dsc$a_pointer, status, IOsb.iosb$w_status);
> }
>
> /*****************************************************************************/
> --
> Anyone, who using social-media, forms an opinion regarding anything
> other than the relative cuteness of this or that puppy-dog, needs
> seriously to examine their critical thinking.
So, Mark Berryman's 7.2.29 is working well, however 7.4.27 (both posted versions) gives the following response...
ERROR 502 - External agent did not respond (or not acceptably).
And here's the WATCHER trace...
29-JAN-2022 00:06:09 WATCH REPORT axpbox.home:80
--------------------------------------------------
HTTPD_SSL 12.0.0 25-JAN-2022 22:23:06.36 DKA0:[WASD_ROOT.][AXP]HTTPD_SSL.EXE (25-JAN-2022 22:23:05.17)
HP TCPIP$IPC_SHR V5.7-ECO5 (08-NOV-2014 13:06:10.02)
OpenSSL 1.1.1l 24 Aug 2021 (Mon Sep 6 09:12:51 2021 UTC) [SYS0.SYSCOMMON.SSL111.INCLUDE]*.H SYS$COMMON:[SYSLIB]SSL111$LIBSSL_SHR32.EXE
$ CC (V8.4-2L1/70490002) /DECC /STAND=RELAXED_ANSI /PREFIX=ALL /NAMES=UPPER /OPTIMIZE=(INLINE=AUTO,LEVEL=4,UNROLL=0,TUNE=HOST) /NODEBUG /WARNING=(DISABLE=(PREOPTW)) /FLOAT=IEEE /IEEE=DENORM /DEFINE=(SESOLA,WATCH_CAT=1,WATCH_MOD=0,WASD_ACME=1,WASD_GETSPI=1)
AlphaServer DS10L with 1 CPU and 4GB running VMS V8.4-2L1 (ODS-5 enabled, VMS NAML, VMS FIB, ODS-DIRECT enabled, ZLIB %X00018292 (%RMS-E-FNF, file not found), REGEX enabled, lksb$b_valblk[64])
$ HTTPD /PRIORITY=4
AST:1992/2000 BIO:1997/2000 BYT:4874688/4999424 DIO:997/1000 ENQ:471/500 FIL:293/300 PGFL:460480/500000 PRC:0/100 TQ:97/100
DCL Scripting: detached, as HTTP$NOBODY, PERSONA disabled
Process: WASD:80 OTHER DKA0:[wasd_root.][startup]startup_server.com;1 DKA0:[wasd_root.][log_server]AXPBOX_20220128235933.LOG;1
Instances: AXPBOX::WASD:80
Watching: connect, request, response, mapping, error, cgi, dcl (98963) via HTTP/2
Filter: NONE
|Time_______|Module__|Line|Item__|Category__|Event...|
|00:06:13.69 DCL 4470 000000 DCL USERNAME HTTP$NOBODY|
|00:06:13.69 DCL 4586 000000 DCL CREATE detached pid:00001DF1 priority 4|
|00:06:13.69 NET 2151 000001 CONNECT ACCEPTED 192.168.0.28,64347 on http://axpbox.home,80 (192.168.0.47) BG18857:|
AST:1939/2000 BIO:1945/2000 BYT:4873408/4999424 DIO:996/1000 ENQ:471/500 FIL:293/300 PGFL:460480/500000 PRC:0/100 TQ:97/100
|00:06:13.74 ERROR 0463 ****** INTERNAL CGI:2285, not a strict CGI response|
|00:06:13.75 DCL 4829 000000 DCL DELPRC pid:00001DF1|
|00:06:13.75 DCL 4873 000000 DCL DETACHED completion pid:00001DF1 %X00002BD4 (%SYSTEM-F-EXITFORCED, forced exit of image or process by SYS$DELPRC)|
|++++++++++++++++++++++++++++++++++++++++++++
|00:06:13.84 SERVICE 1757 000003 CONNECT UNKNOWN service|
|00:06:13.84 REQUEST 4413 000003 REQUEST GET /favicon.ico|
|00:06:13.84 MAPURL 0966 000003 MAPPING PATH /favicon.ico|
0001 /favicon.ico .. SET /wasd_root/doc/* map=ELLIPSIS
0002 /favicon.ico .. SET /wasd_root/src/* NOcache map=ELLIPSIS
0003 /favicon.ico .. PASS /wasd_root/* /wasd_root/* dir=access dir=wildcard
0004 /favicon.ico .. MAP /httpd-internal-icons/* /httpd/-/*
0005 /favicon.ico .. PASS /*/-/* /wasd_root/runtime/*/*
0006 /favicon.ico .. PASS /wasd_root/runtime/* /wasd_root/runtime/*
0007 /favicon.ico .. PASS /httpd/-/admin/*
0008 /favicon.ico .. SET /wasd_root/local/* auth=ALL
0009 /favicon.ico .. SET /local/* auth=ALL
0010 /favicon.ico .. PASS /web/* /web/*
0011 /favicon.ico .. EXEC /cgi-bin/* /cgi-bin/*
0012 /favicon.ico .. EXEC+ /cgiplus-bin/* /cgi-bin/*
0013 /favicon.ico .. EXEC+ /cgiauth-bin/* /cgi-bin/*
0014 /favicon.ico .. EXEC+ /isapi/* /cgi-bin/*
0015 /favicon.ico .. SCRIPT+ /conan* /cgi-bin/conan*
0016 /favicon.ico .. SCRIPT+ /help* /cgi-bin/conan*
0017 /favicon.ico .. SCRIPT+ /HyperReader* /cgi-bin/HyperReader*
0018 /favicon.ico .. SCRIPT+ /HyperShelf* /cgi-bin/HyperShelf*
0019 if (path-info:/query/wasd_root/doc/*) script /query/* /cgi-bin/query/*
FALSE path-info:/query/wasd_root/doc/* '/favicon.ico'
FALSE
0020 if (path-info:/extract/wasd_root/doc/*) script /extract/* /cgi-bin/extract/*
FALSE path-info:/extract/wasd_root/doc/* '/favicon.ico'
FALSE
0021 /favicon.ico .. EXEC /rtbin/* (cgi-bin:[000000]rte_example.exe)/wasd_root/src/httpd/*
0022 /favicon.ico .. EXEC /decnet/* /0::/cgi-bin/*
0023 /favicon.ico .. REDIRECT /*.*.htmlx /*.htmlx?httpd=ssi&__part=*
0024 /favicon.ico .. EXEC /osu/* /0::"0=wwwexec"/cgi-bin/*
0025 /favicon.ico .. EXEC /htbin/* /0::"0=wwwexec"/cgi-bin/*
0026 /favicon.ico .. MAP /demo/* /www_root/serverdoc/*
0027 /favicon.ico .. PASS /help*
0028 /favicon.ico .. PASS /*[*]*
0029 /favicon.ico .. PASS /www_root/*
0030 /favicon.ico .. PASS /sys$common/syshlp/* /sys$common/syshlp/* dir=access dir=wildcard
0031 /favicon.ico .. PASS /sys$common/syslib/* /sys$common/syslib/* dir=access dir=wildcard
0032 /favicon.ico .. PASS /sys$common/syshlp/* /sys$common/ssl/* dir=access dir=wildcard
0033 /favicon.ico .. PASS /decw$book/* /decw$book/*
0034 /favicon.ico .. PASS /sys$common/decw$book/* /sys$common/decw$book/*
0035 /favicon.ico .. PASS /sys$common/decw$defaults/user/* /sys$common/decw$defaults/user/*
0036 /favicon.ico .. PASS /disk$vaxdoc* /disk$vaxdoc*
0037 /favicon.ico .. PASS /disk$axpdoc* /disk$axpdoc*
0038 /favicon.ico .. REDIRECT /phpmyadmin/**/ /phpmyadmin/*/index.php
0039 /favicon.ico .. EXEC /phpmyadmin/**.php* (cgi-bin:[000000]phpwasd.exe)/phpmyadmin$root/*.php* map=ONCE ods=5 script=QUERY=relaxed
0040 /favicon.ico .. PASS /phpmyadmin/* /phpmyadmin$root/*
0041 /favicon.ico .. REDIRECT /phpbb3/**/ /phpbb3/*/index.php
0042 /favicon.ico .. EXEC /phpbb3/**.php* (cgi-bin:[000000]phpwasd.exe)/phpbb3$root/*.php* map=ONCE ods=5 script=QUERY=relaxed
0043 /favicon.ico .. PASS /phpbb3/* /phpbb3$root/*
0044 /favicon.ico .. PASS /ht_root/* /wasd_root/*
0045 /favicon.ico Y- PASS /* /wasd_root/*
|00:06:13.84 MAPURL 0991 000003 MAPPING RESULT|
Mapped: /wasd_root/favicon.ico
Translated: wasd_root:[000000]favicon.ico (ODS-5)
Script:
Script-File:
Run-Time:
|00:06:13.84 CACHE 0562 000003 RESPONSE CACHE request no-cache|
|00:06:13.84 CACHE 0562 000003 RESPONSE CACHE request no-cache|
|00:06:13.84 CACHE 0562 000003 RESPONSE CACHE request no-cache|
|00:06:13.84 FILE 1587 000003 RESPONSE FILE WASD_ROOT:[000000]favicon.ico ODS:5 rfm:FIX ebk:6 ffb:174 (2734 bytes) rdt:04-NOV-2021 09:41:18.78|
|00:06:13.84 CACHE 1618 000003 RESPONSE CACHE etag: 3eb7000600009513fb2a00b6b4e8|
|00:06:13.84 REQUEST 1435 000003 REQUEST STATUS 200 (OK) rx:452 tx:2999 bytes 5.000ms 690,200 B/s|
|--------------------------------------------
|00:06:13.84 REQUEST 1789 000003 CONNECT PERSISTENT 2 with 192.168.0.28,64342|
|00:06:44.38 HTTPD 3543 000002 CONNECT TIMER (t/o:input) |
|00:07:02.92 NETIO 1002 000002 CONNECT CLOSE channel 592 %X00000001|
|00:07:08.92 end|
I've also just noticed the error, ZLIB %X00018292 (%RMS-E-FNF, file not found)
AXPBOX::prod sho prod zlib
------------------------------------ ----------- ---------
PRODUCT KIT TYPE STATE
------------------------------------ ----------- ---------
JFP AXPVMS ZLIB V1.2-7 Full LP Installed
------------------------------------ ----------- ---------
Thoughts???
More information about the Info-vax
mailing list