VOS tweaks from Paul Green.

The Configure tweaks: the _exe needs to be
set after the init; VOS has fd 3 hardwired to /dev/tty;
the grep/ln/make substitutions really need to stick.

p4raw-id: //depot/perl@13932

6 files changed, 78 insertions, 39 deletions

diff --git a/vos/build.cm b/vos/build.cm
index 0cf3cb9128..4bdd976c7b 100644
--- a/vos/build.cm
+++ b/vos/build.cm
@@ -32,6 +32,12 @@
       &return 1
       &end
 &
+&if &compiler& = gcc & &version& = alpha
+&then &do
+      &display_line build: "-compiler gcc" is incompatible with "-version alpha"
+      &return 1
+      &end
+&
 & Set up the appropriate directory suffix for each architecture.
 &
 &if &cpu& = mc68020
@@ -47,6 +53,10 @@
 &then &set_string obj2 .68k
 &else &set_string obj2 &obj&
 &
+&if &cpu& = mc68020
+&then &set_string bindsize -size large
+&else &set_string bindsize ''
+&
 &if &compiler& = cc
 &then &do
 &set_string cpu -processor &cpu&
@@ -57,27 +67,14 @@
 &set_string s .o
 &end
 &
-& If requested, compile the source code.
-&
-&if &recompile& = 0
-&then &goto CHECK_REBIND
-&
-&if &version& = alpha
-&then !set_library_paths include << < &POSIX&>incl &+
-     (master_disk)>system>include_library
-&else !set_library_paths include << < &+
-     (master_disk)>system>stcp>include_library &+
-     (master_disk)>system>include_library
-&
-&if (exists *.obj -link)
-&then !unlink *.obj -no_ask -brief
-&
 & Suppress several harmless compiler warning and advice messages.
 & Use -list -show_include all -show_macros both_ways when debugging.
 &
+&set_string cflags -D_SVID_SOURCE -D_POSIX_C_SOURCE=199506L -DPERL_CORE -O4
+&
 &if &compiler& = cc
-&then &set_string cflags '-O4 -D_POSIX_C_SOURCE=199506L -DPERL_CORE -u'
-&else &set_string cflags '-O4 -D_POSIX_C_SOURCE=199506L -DPERL_CORE -c'
+&then &set_string cflags &cflags& '-u'
+&else &set_string cflags &cflags& '-c'
 &
 & The following is a work-around for stcp-1437,8,9
 &
@@ -89,9 +86,35 @@
 &else &set_string diag ''
 &
 & The following is a work-around for stcp-1570 and GCC.
+& (and for some perl errors that only cc finds)
 &
 &if &compiler& = gcc
 &then &set_string diag &diag& -w
+&else &set_string diag &diag& -w1
+&
+&if &version& = alpha
+&then !set_library_paths include << < &POSIX&>incl &+
+     (master_disk)>system>include_library
+&else !set_library_paths include << < &+
+     (master_disk)>system>stcp>include_library &+
+     (master_disk)>system>include_library>sysv &+
+     (master_disk)>system>include_library
+&
+&if &compiler& = gcc
+&then !set_library_paths command '(current_dir)' &+
+     (master_disk)>system>gnu_library>bin &+
+     (master_disk)>system>command_library
+&else !set_library_paths command '(current_dir)' &+
+     (master_disk)>system>command_library
+&
+& If requested, compile the source code.
+&
+&if &recompile& = 0
+&then &goto CHECK_REBIND
+&
+& Some of the compiler invocations need more VM than
+& the defaults allow. Raise the limits.
+!update_process_cmd_limits -initial_total_limit 100000000 -no_ask
 &
 !&compiler& <<av.c &diag& &cpu& &cflags& -o av&s&
 &if (command_status) ^= 0 &then &return
@@ -168,6 +191,8 @@
 &if (command_status) ^= 0 &then &return
 !&compiler& <<sv.c &diag& &cpu& &cflags& -o sv&s&
 &if (command_status) ^= 0 &then &return
+!&compiler& <<sharedsv.c &diag& &cpu& &cflags& -o sharedsv&s&
+&if (command_status) ^= 0 &then &return
 !&compiler& <<taint.c &diag& &cpu& &cflags& -o taint&s&
 &if (command_status) ^= 0 &then &return
 !&compiler& <<toke.c &diag& &cpu& &cflags& -o toke&s&
@@ -189,10 +214,11 @@
 &if &compiler& = gcc
 &then &do
  !delete_file perl.a
- !ar rc perl.a av.o deb.o doio.o doop.o dump.o globals.o gv.o hv.o mg.o &+
- op.o perl.o perlapi.o perlio.o perly.o pp.o pp_ctl.o pp_hot.o pp_sys.o &+
- regcomp.o regexec.o run.o scope.o sv.o taint.o toke.o universal.o utf8.o &+
- util.o xsutils.o
+ !ar rc perl.a av.o deb.o doio.o doop.o dump.o globals.o gv.o hv.o locale.o &+
+ mg.o numeric.o op.o perl.o perlapi.o perlio.o perly.o pp.o pp_ctl.o &+
+ pp_hot.o pp_pack.o pp_sort.o pp_sys.o regcomp.o regexec.o run.o scope.o &+
+ sharedsv.o sv.o taint.o toke.o universal.o utf8.o util.o xsutils.o
+ !delete_file *.o -no_ask -brief
 &end
 &else &do
  !&compiler& <<miniperlmain.c &diag& &cpu& &cflags& -o miniperlmain&s&
@@ -235,6 +261,7 @@
      &stcp_objlib&>net &+
      &stcp_objlib&>sbsd &+
      &stcp_objlib&>socket &+
+     &posix_objlib&>sysv &+
      &posix_objlib&>bsd &+
      &posix_objlib& &+
      &c_objlib& &objlib&
@@ -249,9 +276,8 @@
  &if &version& = alpha
  &then !bind -control <perl.bind vos_dummies &+
      &tcp_objlib&>tcp_runtime &tcp_objlib&>tcp_gethost &+
-     &cpu& -target_module &tgt_mod& -map
+     &cpu& -target_module &tgt_mod& &bindsize& -map
  &else !bind -control <perl.bind &cpu& -target_module &tgt_mod& -map
  &if (command_status) ^= 0 &then &return
 &end
 !delete_file *&s& -no_ask -brief
-!unlink *&s& -no_ask -brief
diff --git a/vos/config.alpha.def b/vos/config.alpha.def
index 56b765d622..996a0c79a1 100644
--- a/vos/config.alpha.def
+++ b/vos/config.alpha.def
@@ -69,7 +69,7 @@ $d_fchmod='define'
 $d_fchown='undef'
 $d_fcntl='define'
 $d_fcntl_can_lock='define'
-$d_fd_set='undef'
+$d_fd_set='define'
 $d_fgetpos='define'
 $d_finite='undef'
 $d_finitel='undef'
diff --git a/vos/config.alpha.h b/vos/config.alpha.h
index 1553f758c2..8d39fe467f 100644
--- a/vos/config.alpha.h
+++ b/vos/config.alpha.h
@@ -88,12 +88,6 @@
 #define const
 #endif
 
-/* HAS_CRYPT:
- *	This symbol, if defined, indicates that the crypt routine is available
- *	to encrypt passwords and the like.
- */
-/*#define HAS_CRYPT		/**/
-
 /* HAS_CUSERID:
  *	This symbol, if defined, indicates that the cuserid routine is
  *	available to get character login names.
@@ -1307,7 +1301,7 @@
  *	This symbol, when defined, indicates presence of the fd_set typedef
  *	in <sys/types.h>
  */
-/*#define HAS_FD_SET	/**/
+#define HAS_FD_SET	/**/
 
 /* HAS_FINITE:
  *	This symbol, if defined, indicates that the finite routine is
@@ -3400,6 +3394,12 @@
 #define PERL_XS_APIVERSION "5.00563"
 #define PERL_PM_APIVERSION "5.005"
 
+/* HAS_CRYPT:
+ *	This symbol, if defined, indicates that the crypt routine is available
+ *	to encrypt passwords and the like.
+ */
+/*#define HAS_CRYPT		/**/
+
 /* SETUID_SCRIPTS_ARE_SECURE_NOW:
  *	This symbol, if defined, indicates that the bug that prevents
  *	setuid scripts from being secure is not present in this kernel.
@@ -3503,6 +3503,11 @@
  *	This symbol is defined if PROCSELFEXE_PATH is a symlink
  *	to the absolute pathname of the executing program.
  */
+/* PROCSELFEXE_PATH:
+ *	If HAS_PROCSELFEXE is defined this symbol is the filename
+ *	of the symbolic link pointing to the absolute pathname of
+ *	the executing program.
+ */
 /*#define HAS_PROCSELFEXE	/**/
 #if defined(HAS_PROCSELFEXE) && !defined(PROCSELFEXE_PATH)
 #define PROCSELFEXE_PATH		/**/
diff --git a/vos/config.ga.def b/vos/config.ga.def
index 07262b3912..ec18320514 100644
--- a/vos/config.ga.def
+++ b/vos/config.ga.def
@@ -69,7 +69,7 @@ $d_fchmod='define'
 $d_fchown='undef'
 $d_fcntl='define'
 $d_fcntl_can_lock='define'
-$d_fd_set='undef'
+$d_fd_set='define'
 $d_fgetpos='define'
 $d_finite='undef'
 $d_finitel='undef'
diff --git a/vos/config.ga.h b/vos/config.ga.h
index 014c94d916..974b6e1ac6 100644
--- a/vos/config.ga.h
+++ b/vos/config.ga.h
@@ -88,12 +88,6 @@
 #define const
 #endif
 
-/* HAS_CRYPT:
- *	This symbol, if defined, indicates that the crypt routine is available
- *	to encrypt passwords and the like.
- */
-/*#define HAS_CRYPT		/**/
-
 /* HAS_CUSERID:
  *	This symbol, if defined, indicates that the cuserid routine is
  *	available to get character login names.
@@ -1307,7 +1301,7 @@
  *	This symbol, when defined, indicates presence of the fd_set typedef
  *	in <sys/types.h>
  */
-/*#define HAS_FD_SET	/**/
+#define HAS_FD_SET	/**/
 
 /* HAS_FINITE:
  *	This symbol, if defined, indicates that the finite routine is
@@ -3400,6 +3394,12 @@
 #define PERL_XS_APIVERSION "5.00563"
 #define PERL_PM_APIVERSION "5.005"
 
+/* HAS_CRYPT:
+ *	This symbol, if defined, indicates that the crypt routine is available
+ *	to encrypt passwords and the like.
+ */
+/*#define HAS_CRYPT		/**/
+
 /* SETUID_SCRIPTS_ARE_SECURE_NOW:
  *	This symbol, if defined, indicates that the bug that prevents
  *	setuid scripts from being secure is not present in this kernel.
@@ -3503,6 +3503,11 @@
  *	This symbol is defined if PROCSELFEXE_PATH is a symlink
  *	to the absolute pathname of the executing program.
  */
+/* PROCSELFEXE_PATH:
+ *	If HAS_PROCSELFEXE is defined this symbol is the filename
+ *	of the symbolic link pointing to the absolute pathname of
+ *	the executing program.
+ */
 /*#define HAS_PROCSELFEXE	/**/
 #if defined(HAS_PROCSELFEXE) && !defined(PROCSELFEXE_PATH)
 #define PROCSELFEXE_PATH		/**/
diff --git a/vos/vosish.h b/vos/vosish.h
index d600065698..86982139fd 100644
--- a/vos/vosish.h
+++ b/vos/vosish.h
@@ -1 +1,4 @@
 #include "unixish.h"
+
+/* The following declaration is an avoidance for posix-950. */
+extern int ioctl (int fd, int request, ...);