This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Ultrix hints update.
[perl5.git] / hints / os2.sh
... / ...
CommitLineData
1#! /bin/sh
2# hints/os2.sh
3# This file reflects the tireless work of
4# Ilya Zakharevich <ilya@math.ohio-state.edu>
5#
6# Trimmed and comments added by
7# Andy Dougherty <doughera@lafcol.lafayette.edu>
8# Exactly what is required beyond a standard OS/2 installation?
9# (see in README.os2)
10
11# Note that symbol extraction code gives wrong answers (sometimes?) on
12# gethostent and setsid.
13
14# Optimization (GNU make 3.74 cannot be loaded :-():
15emxload -m 30 sh.exe ls.exe tr.exe id.exe sed.exe # make.exe
16emxload -m 30 grep.exe egrep.exe fgrep.exe cat.exe rm.exe mv.exe cp.exe
17emxload -m 30 uniq.exe basename.exe sort.exe awk.exe echo.exe
18
19path_sep=\;
20
21if test -f $sh.exe; then sh=$sh.exe; fi
22
23startsh="#!$sh"
24cc='gcc'
25
26# Make denser object files and DLL
27case "X$optimize" in
28 X)
29 optimize="-O2 -fomit-frame-pointer -malign-loops=2 -malign-jumps=2 -malign-functions=2 -s"
30 ld_dll_optimize="-s"
31 ;;
32esac
33
34# Get some standard things (indented to avoid putting in config.sh):
35 oifs="$IFS"
36 IFS=" ;"
37 set $MANPATH
38 tryman="$@"
39 set $LIBRARY_PATH
40 libemx="$@"
41 set $C_INCLUDE_PATH
42 usrinc="$@"
43 IFS="$oifs"
44 tryman="`./UU/loc . /man $tryman`"
45 tryman="`echo $tryman | tr '\\\' '/'`"
46
47 # indented to avoid having it *two* times at start
48 libemx="`./UU/loc os2.a /emx/lib $libemx`"
49
50usrinc="`./UU/loc stdlib.h /emx/include $usrinc`"
51usrinc="`dirname $usrinc | tr '\\\' '/'`"
52libemx="`dirname $libemx | tr '\\\' '/'`"
53
54if test -d $tryman/man1; then
55 sysman="$tryman/man1"
56else
57 sysman="`./UU/loc . /man/man1 c:/man/man1 c:/usr/man/man1 d:/man/man1 d:/usr/man/man1 e:/man/man1 e:/usr/man/man1 f:/man/man1 f:/usr/man/man1 g:/man/man1 g:/usr/man/man1 /usr/man/man1`"
58fi
59
60emxpath="`dirname $libemx`"
61if test ! -d "$emxpath"; then
62 emxpath="`./UU/loc . /emx c:/emx d:/emx e:/emx f:/emx g:/emx h:/emx /emx`"
63fi
64
65if test ! -d "$libemx"; then
66 libemx="$emxpath/lib"
67fi
68if test ! -d "$libemx"; then
69 if test -d "$LIBRARY_PATH"; then
70 libemx="$LIBRARY_PATH"
71 else
72 libemx="`./UU/loc . X c:/emx/lib d:/emx/lib e:/emx/lib f:/emx/lib g:/emx/lib h:/emx/lib /emx/lib`"
73 fi
74fi
75
76if test ! -d "$usrinc"; then
77 if test -d "$emxpath/include"; then
78 usrinc="$emxpath/include"
79 else
80 if test -d "$C_INCLUDE_PATH"; then
81 usrinc="$C_INCLUDE_PATH"
82 else
83 usrinc="`./UU/loc . X c:/emx/include d:/emx/include e:/emx/include f:/emx/include g:/emx/include h:/emx/include /emx/include`"
84 fi
85 fi
86fi
87
88rsx="`./UU/loc rsx.exe undef $pth`"
89
90if test "$libemx" = "X"; then echo "Cannot find C library!" >&2; fi
91
92# Acute backslashitis:
93libpth="`echo \"$LIBRARY_PATH\" | tr ';\\\' ' /'`"
94libpth="$libpth $libemx/mt $libemx"
95
96set `emxrev -f emxlibcm`
97emxcrtrev=$5
98
99so='dll'
100
101# Additional definitions:
102
103firstmakefile='GNUmakefile'
104exe_ext='.exe'
105
106# We provide it
107i_dlfcn='define'
108
109aout_d_shrplib='undef'
110aout_useshrplib='false'
111aout_obj_ext='.o'
112aout_lib_ext='.a'
113aout_ar='ar'
114aout_plibext='.a'
115aout_lddlflags="-Zdll $ld_dll_optimize"
116# Cannot have 32000K stack: get SYS0170 ?!
117if [ $emxcrtrev -ge 50 ]; then
118 aout_ldflags='-Zexe -Zsmall-conv -Zstack 16000'
119else
120 aout_ldflags='-Zexe -Zstack 16000'
121fi
122
123# To get into config.sh:
124aout_ldflags="$aout_ldflags"
125
126aout_d_fork='define'
127aout_ccflags='-DPERL_CORE -DDOSISH -DPERL_IS_AOUT -DOS2=2 -DEMBED -I.'
128aout_cppflags='-DPERL_CORE -DDOSISH -DPERL_IS_AOUT -DOS2=2 -DEMBED -I.'
129aout_use_clib='c'
130aout_usedl='undef'
131aout_archobjs="os2.o dl_os2.o"
132
133# variable which have different values for aout compile
134used_aout='d_shrplib useshrplib plibext lib_ext obj_ext ar plibext d_fork lddlflags ldflags ccflags use_clib usedl archobjs cppflags'
135
136if [ "$emxaout" != "" ]; then
137 d_shrplib="$aout_d_shrplib"
138 useshrplib="$aout_useshrplib"
139 obj_ext="$aout_obj_ext"
140 lib_ext="$aout_lib_ext"
141 ar="$aout_ar"
142 plibext="$aout_plibext"
143 if [ $emxcrtrev -lt 50 ]; then
144 d_fork="$aout_d_fork"
145 fi
146 lddlflags="$aout_lddlflags"
147 ldflags="$aout_ldflags"
148 ccflags="$aout_ccflags"
149 cppflags="$aout_cppflags"
150 use_clib="$aout_use_clib"
151 usedl="$aout_usedl"
152else
153 d_shrplib='define'
154 useshrplib='true'
155 obj_ext='.obj'
156 lib_ext='.lib'
157 ar='emxomfar'
158 plibext='.lib'
159 if [ $emxcrtrev -ge 50 ]; then
160 d_fork='define'
161 else
162 d_fork='undef'
163 fi
164 lddlflags="-Zdll -Zomf -Zmt -Zcrtdll $ld_dll_optimize"
165 # Recursive regmatch may eat 2.5M of stack alone.
166 ldflags='-Zexe -Zomf -Zmt -Zcrtdll -Zstack 32000'
167 if [ $emxcrtrev -ge 50 ]; then
168 ccflags='-Zomf -Zmt -DDOSISH -DOS2=2 -DEMBED -I.'
169 else
170 ccflags='-Zomf -Zmt -DDOSISH -DOS2=2 -DEMBED -I. -DEMX_BAD_SBRK'
171 fi
172 use_clib='c_import'
173 usedl='define'
174fi
175
176# indented to miss config.sh
177 _ar="$ar"
178
179# To get into config.sh (should start at the beginning of line)
180# or you can put it into config.over.
181plibext="$plibext"
182# plibext is not needed anymore. Just directly set $libperl.
183libperl="libperl${plibext}"
184
185#libc="/emx/lib/st/c_import$lib_ext"
186libc="$libemx/mt/$use_clib$lib_ext"
187
188if test -r "$libemx/c_alias$lib_ext"; then
189 libnames="$libemx/c_alias$lib_ext"
190fi
191# otherwise puts -lc ???
192
193# [Maybe we should just remove c from $libswanted ?]
194
195# Test would pick up wrong rand, so we hardwire the value for random()
196libs='-lsocket -lm -lbsd'
197randbits=31
198archobjs="os2$obj_ext dl_os2$obj_ext"
199
200# Run files without extension with sh:
201EXECSHELL=sh
202
203cccdlflags='-Zdll'
204dlsrc='dl_dlopen.xs'
205ld='gcc'
206
207#cppflags='-DDOSISH -DOS2=2 -DEMBED -I.'
208
209# for speedup: (some patches to ungetc are also needed):
210# Note that without this guy tests 8 and 10 of io/tell.t fail, with it 11 fails
211
212stdstdunder=`echo "#include <stdio.h>" | cpp | egrep -c "char +\* +_ptr"`
213d_stdstdio='define'
214d_stdiobase='define'
215d_stdio_ptr_lval='define'
216d_stdio_cnt_lval='define'
217
218if test "$stdstdunder" = 0; then
219 stdio_ptr='((fp)->ptr)'
220 stdio_cnt='((fp)->rcount)'
221 stdio_base='((fp)->buffer)'
222 stdio_bufsiz='((fp)->rcount + (fp)->ptr - (fp)->buffer)'
223 ccflags="$ccflags -DMYTTYNAME"
224 myttyname='define'
225else
226 stdio_ptr='((fp)->_ptr)'
227 stdio_cnt='((fp)->_rcount)'
228 stdio_base='((fp)->_buffer)'
229 stdio_bufsiz='((fp)->_rcount + (fp)->_ptr - (fp)->_buffer)'
230fi
231
232# to put into config.sh
233myttyname="$myttyname"
234
235# To have manpages installed
236nroff='nroff.cmd'
237# above will be overwritten otherwise, indented to avoid config.sh
238 _nroff='nroff.cmd'
239
240# should be handled automatically by Configure now.
241ln='cp'
242# Will be rewritten otherwise, indented to not put in config.sh
243 _ln='cp'
244lns='cp'
245
246nm_opt='-p'
247
248####### We define these functions ourselves
249
250d_getprior='define'
251d_setprior='define'
252
253# The next two are commented. pdksh handles #!, extproc gives no path part.
254# sharpbang='extproc '
255# shsharp='false'
256
257# Commented:
258#startsh='extproc ksh\\n#! sh'
259
260# Copy pod:
261
262cp ./README.os2 ./pod/perlos2.pod
263
264# This script UU/usethreads.cbu will get 'called-back' by Configure
265# after it has prompted the user for whether to use threads.
266cat > UU/usethreads.cbu <<'EOCBU'
267case "$usethreads" in
268$define|true|[yY]*)
269 ccflags="-Zmt $ccflags"
270 cppflags="-Zmt $cppflags" # Do we really need to set this?
271 aout_ccflags="-DUSE_THREADS $aout_ccflags"
272 aout_cppflags="-DUSE_THREADS $aout_cppflags"
273 aout_lddlflags="-Zmt $aout_lddlflags"
274 aout_ldflags="-Zmt $aout_ldflags"
275 ;;
276esac
277EOCBU
278
279# Now install the external modules. We are in the ./hints directory.
280
281cd ./os2/OS2
282
283if ! test -d ../../ext/OS2 ; then
284 mkdir ../../ext/OS2
285fi
286
287cp -rfu * ../../ext/OS2/
288
289# Install tests:
290
291for xxx in * ; do
292 if $test -d $xxx/t; then
293 cp -uf $xxx/t/*.t ../../t/lib
294 else
295 if $test -d $xxx; then
296 cd $xxx
297 for yyy in * ; do
298 if $test -d $yyy/t; then
299 cp -uf $yyy/t/*.t ../../t/lib
300 fi
301 done
302 cd ..
303 fi
304 fi
305done
306
307# Now go back
308cd ../..