Re: [PATCH] perlfaq6.pod -- case-aware s///
[p5sagit/p5-mst-13.2.git] / hints / os2.sh
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 :-():
15 emxload -m 30 sh.exe ls.exe tr.exe id.exe sed.exe # make.exe 
16 emxload -m 30 grep.exe egrep.exe fgrep.exe cat.exe rm.exe mv.exe cp.exe
17 emxload -m 30 uniq.exe basename.exe sort.exe awk.exe echo.exe
18
19 path_sep=\;
20
21 if test -f $sh.exe; then sh=$sh.exe; fi
22
23 startsh="#!$sh"
24 cc='gcc'
25
26 # Make denser object files and DLL
27 case "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         ;;
32 esac
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
50 usrinc="`./UU/loc stdlib.h /emx/include $usrinc`"
51 usrinc="`dirname $usrinc | tr '\\\' '/'`"
52 libemx="`dirname $libemx | tr '\\\' '/'`"
53
54 if test -d $tryman/man1; then
55   sysman="$tryman/man1"
56 else
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`"
58 fi
59
60 emxpath="`dirname $libemx`"
61 if test ! -d "$emxpath"; then 
62   emxpath="`./UU/loc . /emx c:/emx d:/emx e:/emx f:/emx g:/emx h:/emx /emx`"
63 fi
64
65 if test ! -d "$libemx"; then 
66   libemx="$emxpath/lib"
67 fi
68 if 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
74 fi
75
76 if 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
86 fi
87
88 rsx="`./UU/loc rsx.exe undef $pth`"
89
90 if test "$libemx" = "X"; then echo "Cannot find C library!" >&2; fi
91
92 # Acute backslashitis:
93 libpth="`echo \"$LIBRARY_PATH\" | tr ';\\\' ' /'`"
94 libpth="$libpth $libemx/mt $libemx"
95
96 set `cmd /c emxrev -f emxlibcm`
97 emxcrtrev=$5
98 # indented to not put it into config.sh
99   _defemxcrtrev=-D_EMX_CRT_REV_=$emxcrtrev
100
101 so='dll'
102
103 # Additional definitions:
104
105 firstmakefile='GNUmakefile'
106 exe_ext='.exe'
107
108 # We provide it
109 i_dlfcn='define'
110
111 aout_d_shrplib='undef'
112 aout_useshrplib='false'
113 aout_obj_ext='.o'
114 aout_lib_ext='.a'
115 aout_ar='ar'
116 aout_plibext='.a'
117 aout_lddlflags="-Zdll $ld_dll_optimize"
118 # Cannot have 32000K stack: get SYS0170  ?!
119 if [ $emxcrtrev -ge 50 ]; then 
120     aout_ldflags='-Zexe -Zsmall-conv -Zstack 16000'
121 else
122     aout_ldflags='-Zexe -Zstack 16000'
123 fi
124
125 # To get into config.sh:
126 aout_ldflags="$aout_ldflags"
127
128 aout_d_fork='define'
129 aout_ccflags="-DDOSISH -DPERL_IS_AOUT -DOS2=2 -DEMBED -I. $_defemxcrtrev"
130 aout_cppflags="-DDOSISH -DPERL_IS_AOUT -DOS2=2 -DEMBED -I. $_defemxcrtrev"
131 aout_use_clib='c'
132 aout_usedl='undef'
133 aout_archobjs="os2.o dl_os2.o"
134 # Not listed in dynamic_ext, but needed for AOUT static_ext nevertheless
135 aout_extra_static_ext="OS2::DLL"
136
137 # variable which have different values for aout compile
138 used_aout='d_shrplib useshrplib plibext lib_ext obj_ext ar plibext d_fork lddlflags ldflags ccflags use_clib usedl archobjs cppflags'
139
140 if [ "$emxaout" != "" ]; then
141     d_shrplib="$aout_d_shrplib"
142     useshrplib="$aout_useshrplib"
143     obj_ext="$aout_obj_ext"
144     lib_ext="$aout_lib_ext"
145     ar="$aout_ar"
146     plibext="$aout_plibext"
147     if [ $emxcrtrev -lt 50 ]; then 
148         d_fork="$aout_d_fork"
149     fi
150     lddlflags="$aout_lddlflags"
151     ldflags="$aout_ldflags"
152     ccflags="$aout_ccflags"
153     cppflags="$aout_cppflags"
154     use_clib="$aout_use_clib"
155     usedl="$aout_usedl"
156 else
157     d_shrplib='define'
158     useshrplib='true'
159     obj_ext='.obj'
160     lib_ext='.lib'
161     ar='emxomfar'
162     plibext='.lib'
163     if [ $emxcrtrev -ge 50 ]; then 
164         d_fork='define'
165     else
166         d_fork='undef'
167     fi
168     lddlflags="-Zdll -Zomf -Zmt -Zcrtdll $ld_dll_optimize"
169     # Recursive regmatch may eat 2.5M of stack alone.
170     ldflags='-Zexe -Zomf -Zmt -Zcrtdll -Zstack 32000'
171     if [ $emxcrtrev -ge 50 ]; then 
172         ccflags="-Zomf -Zmt -DDOSISH -DOS2=2 -DEMBED -I. $_defemxcrtrev"
173     else
174         ccflags="-Zomf -Zmt -DDOSISH -DOS2=2 -DEMBED -I. -DEMX_BAD_SBRK $_defemxcrtrev"
175     fi
176     use_clib='c_import'
177     usedl='define'
178 fi
179
180 # indented to miss config.sh
181   _ar="$ar"
182
183 # To get into config.sh (should start at the beginning of line)
184 # or you can put it into config.over.
185 plibext="$plibext"
186 # plibext is not needed anymore.  Just directly set $libperl.
187 libperl="libperl${plibext}"
188
189 #libc="/emx/lib/st/c_import$lib_ext"
190 libc="$libemx/mt/$use_clib$lib_ext"
191
192 if test -r "$libemx/c_alias$lib_ext"; then 
193     libnames="$libemx/c_alias$lib_ext"
194 fi
195 # otherwise puts -lc ???
196
197 # [Maybe we should just remove c from $libswanted ?]
198
199 # Test would pick up wrong rand, so we hardwire the value for random()
200 libs='-lsocket -lm -lbsd'
201 randbits=31
202 archobjs="os2$obj_ext dl_os2$obj_ext"
203
204 # Run files without extension with sh:
205 EXECSHELL=sh
206
207 cccdlflags='-Zdll'
208 dlsrc='dl_dlopen.xs'
209 ld='gcc'
210
211 #cppflags='-DDOSISH -DOS2=2 -DEMBED -I.'
212
213 # for speedup: (some patches to ungetc are also needed):
214 # Note that without this guy tests 8 and 10 of io/tell.t fail, with it 11 fails
215
216 stdstdunder=`echo "#include <stdio.h>" | cpp | egrep -c "char +\* +_ptr"`
217 d_stdstdio='define'
218 d_stdiobase='define'
219 d_stdio_ptr_lval='define'
220 d_stdio_cnt_lval='define'
221
222 if test "$stdstdunder" = 0; then
223   stdio_ptr='((fp)->ptr)'
224   stdio_cnt='((fp)->rcount)'
225   stdio_base='((fp)->buffer)'
226   stdio_bufsiz='((fp)->rcount + (fp)->ptr - (fp)->buffer)'
227   ccflags="$ccflags -DMYTTYNAME"
228   myttyname='define'
229 else
230   stdio_ptr='((fp)->_ptr)'
231   stdio_cnt='((fp)->_rcount)'
232   stdio_base='((fp)->_buffer)'
233   stdio_bufsiz='((fp)->_rcount + (fp)->_ptr - (fp)->_buffer)'
234 fi
235
236 # to put into config.sh
237 myttyname="$myttyname"
238
239 # To have manpages installed
240 nroff='nroff.cmd'
241 # above will be overwritten otherwise, indented to avoid config.sh
242   _nroff='nroff.cmd'
243
244 # should be handled automatically by Configure now.
245 ln='cp'
246 # Will be rewritten otherwise, indented to not put in config.sh
247   _ln='cp'
248 lns='cp'
249
250 nm_opt='-p'
251
252 ####### We define these functions ourselves
253
254 d_strtoll='define'
255 d_strtoull='define'
256 d_getprior='define'
257 d_setprior='define'
258
259 # The next two are commented. pdksh handles #!, extproc gives no path part.
260 # sharpbang='extproc '
261 # shsharp='false'
262
263 # Commented:
264 #startsh='extproc ksh\\n#! sh'
265
266 # Find patch:
267 gnupatch='patch'
268 if (gnupatch -v || gnupatch --version)   2>&1 >/dev/null; then
269     gnupatch=gnupatch
270 else
271     if (gpatch -v || gpatch --version)   2>&1 >/dev/null; then
272         gnupatch=gpatch
273     else
274         # They may have a special PATH during configuring
275         if (patch -v || patch --version) 2>&1 >/dev/null; then
276             gnupatch="`./UU/loc patch.exe undef $pth`"
277         fi
278     fi
279 fi
280
281 # Apply patches if needed
282 case "$0$running_c_cmd" in
283   *[/\\]Configure|*[/\\]Configure.|Configure|Configure.) # Skip Configure.cmd
284     if grep "^libnames" ./Configure > /dev/null; then
285         # Not patched!
286         if test -f ./Configure.cmd ; then
287             echo "!!!" >&2
288             echo "!!! I see that what is running is ./Configure." >&2
289             echo "!!! ./Configure is not patched, but ./Configure.cmd exists." >&2
290             echo "!!!" >&2
291             echo "!!! You are supposed to run Configure.cmd, not Configure" >&2
292             echo "!!!  after an automagic patching." >&2
293             echo "!!!" >&2
294             echo "!!! If you insist on running Configure, please" >&2
295             echo "!!!  patch it manually from ./os2/diff.configure." >&2
296             echo "!!!" >&2
297             exit 2
298         fi
299         echo "!!!" >&2
300         echo "!!! You did not patch ./Configure!" >&2
301         echo "!!! I create Configure.cmd and patch it from ./os2/diff.configure." >&2
302         echo "!!!" >&2
303         echo "$gnupatch -b -p1 --output=Configure.cmd <./os2/diff.configure 2>&1 | tee 00_auto_patch" >&2
304         ($gnupatch -b -p1 --output=Configure.cmd <./os2/diff.configure 2>&1 | tee 00_auto_patch) >&2
305         echo "!!!" >&2
306         echo "!!! The report of patching is copied to 00_auto_patch." >&2
307         echo "!!! Now you need to restart Configure.cmd with all the options" >&2
308         echo "!!!" >&2
309         echo "extproc sh" > Configure.ctm
310         cat Configure.cmd >> Configure.ctm && mv -f Configure.ctm Configure.cmd
311         exit 0
312     else
313         echo "!!! Apparently we are running a patched Configure." >&2
314     fi 
315     ;;
316   *) echo "!!! Apparently we are running a renamed Configure: '$0'." >&2
317 esac
318
319 # This script UU/usethreads.cbu will get 'called-back' by Configure 
320 # after it has prompted the user for whether to use threads.
321 cat > UU/usethreads.cbu <<'EOCBU'
322 case "$usethreads" in
323 $define|true|[yY]*)
324         ccflags="-Zmt $ccflags"
325         cppflags="-Zmt $cppflags"  # Do we really need to set this?
326         aout_ccflags="-DUSE_THREADS $aout_ccflags"
327         aout_cppflags="-DUSE_THREADS $aout_cppflags"
328         aout_lddlflags="-Zmt $aout_lddlflags"
329         aout_ldflags="-Zmt $aout_ldflags"
330         ;;
331 esac
332 EOCBU
333
334 # Now install the external modules. We are in the ./hints directory.
335
336 cd ./os2/OS2
337
338 if ! test -d ../../ext/OS2 ; then
339    mkdir ../../ext/OS2
340 fi
341
342 cp -rfu * ../../ext/OS2/
343
344 # Install tests:
345
346 for xxx in * ; do
347         if $test -d $xxx/t; then
348                 cp -uf $xxx/t/*.t ../../t/lib
349         else
350                 if $test -d $xxx; then
351                         cd $xxx
352                         for yyy in * ; do
353                                 if $test -d $yyy/t; then
354                                     cp -uf $yyy/t/*.t ../../t/lib
355                                 fi
356                         done
357                         cd ..
358                 fi
359         fi
360 done
361
362 case "$ldlibpthname" in
363 '') ldlibpthname=none ;;
364 esac
365
366 # Now go back
367 cd ../..