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