setup_gnv_curl_build.com (9586B)
1 $! File: setup_gnv_curl_build.com 2 $! 3 $! Set up build environment for building Curl under GNV on VMS. 4 $! 5 $! GNV needs some files moved into the other directories to help with 6 $! the configure script and the build. 7 $! 8 $! Copyright (C) John Malmberg 9 $! 10 $! Permission to use, copy, modify, and/or distribute this software for any 11 $! purpose with or without fee is hereby granted, provided that the above 12 $! copyright notice and this permission notice appear in all copies. 13 $! 14 $! THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES 15 $! WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF 16 $! MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR 17 $! ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES 18 $! WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN 19 $! ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT 20 $! OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 21 $! 22 $! SPDX-License-Identifier: ISC 23 $! 24 $!======================================================================= 25 $! 26 $! Save this so we can get back. 27 $ default_dir = f$environment("default") 28 $! 29 $! Move to where the Configure script is. 30 $ set def [--] 31 $! 32 $! Get the path to where the Configure script is. 33 $ base_dir = f$environment("default") 34 $! 35 $! Allow arguments to be grouped together with comma or separated by spaces 36 $! Do no know if we will need more than 8. 37 $ args = "," + p1 + "," + p2 + "," + p3 + "," + p4 + "," 38 $ args = args + p5 + "," + p6 + "," + p7 + "," + p8 + "," 39 $! 40 $! Provide lower case version to simplify parsing. 41 $ args_lower = f$edit(args, "LOWERCASE,COLLAPSE") 42 $! 43 $ args_len = f$length(args) 44 $ args_lower_len = f$length(args_lower) 45 $! 46 $ tests = 0 47 $ if f$locate(",test", args_lower) .lt. args_lower_len 48 $ then 49 $ tests = 1 50 $ endif 51 $! 52 $ examples = 0 53 $ if f$locate(",exam", args_lower) .lt. args_lower_len 54 $ then 55 $ examples = 1 56 $ endif 57 $! 58 $! We want detailed build logs. 59 $ clist = "/list/show=(expan,includ)" 60 $! 61 $! We want full symbol names in exact case. Need a common 62 $! repository for all directories. 63 $ cnames = "/names=(shortened,as_is)/repository=''base_dir'" 64 $! 65 $! Set the compiler options for GNV CC wrapper to inherit. 66 $ cc :== cc'clist''cnames'/nested_include_directory=none 67 $ cxx :== cxx'clist''cnames'/nested_include_directory=none 68 $ pointer_size = "32" 69 $! Note 64-bit pointers requires all libraries to either have 70 $! 64-bit pointers or have #pragma directives. 71 $! Currently building curl on VMS with 64-bit pointers does not work. 72 $! 73 $! A logical name to make it easier to find some of the hacks. 74 $ define/job gnv_hacks 'base_dir' 75 $! 76 $! A logical name to find the [.packages.vms] directory where we started. 77 $ define/job gnv_packages_vms 'default_dir' 78 $! 79 $! Kerberos headers: 80 $ if f$trnlnm("gssapi") .eqs. "" 81 $ then 82 $ if f$search("sys$sysroot:[kerberos]include.dir") .nes. "" 83 $ then 84 $ define/job gssapi sys$sysroot:[kerberos.include] 85 $ endif 86 $ endif 87 $! 88 $! OpenSSL headers 89 $ if f$trnlnm("openssl") .eqs. "" 90 $ then 91 $ if f$trnlnm("ssl$include") .nes. "" 92 $ then 93 $ define/job openssl ssl$include: 94 $ endif 95 $ endif 96 $! 97 $! C compiler include path. 98 $ define/job decc$system_include prj_root:[.include.curl],- 99 [-.packages.vms],- 100 ssl$include:,gnv$gnu:[usr.include],- 101 gnv$gnu:[usr.include.libz],gnv$gnu:[include],- 102 gnv$zlib_include:,- 103 sys$sysroot:[kerberos.include] 104 $! 105 $! Set up an include list for the compiler to find all the header files 106 $! that they need. 107 $! 108 $ define/job decc$user_include src_root:[.include.curl] 109 $ define ssl_lib sys$library: 110 $! 111 $! Calculate what is needed in the option files 112 $ libzshr_line = "" 113 $ try_shr = "gnv$libzshr''pointer_size'" 114 $ if f$search(try_shr) .nes. "" then libzshr_line = "''try_shr'/share" 115 $ if (libzshr_line .eqs. "") 116 $ then 117 $ try_shr = "sys$share:" + try_shr 118 $ if f$search("''try_shr'.exe") .nes. "" 119 $ then 120 $ libzshr_line = "''try_shr'/share" 121 $ endif 122 $ endif 123 $! 124 $! Kerberos 125 $ gssrtlshr_line = "" 126 $ try_shr = "sys$share:gss$rtl" 127 $ if f$search("''try_shr'.exe") .nes. "" 128 $ then 129 $ gssrtlshr_line = "''try_shr'/share" 130 $ endif 131 $! 132 $! HP OpenSSL 133 $ libcryptoshr_line = "" 134 $ try_shr = "sys$share:ssl$libcrypto_shr''pointer_size'" 135 $ if f$search("''try_shr'.exe") .nes. "" 136 $ then 137 $ libcryptoshr_line = "''try_shr'/share" 138 $ endif 139 $! 140 $ libsslshr_line = "" 141 $ try_shr = "sys$share:ssl$libssl_shr''pointer_size'" 142 $ if f$search("''try_shr'.exe") .nes. "" 143 $ then 144 $ libsslshr_line = "''try_shr'/share" 145 $ endif 146 $! 147 $! 148 $! Copy over the gnv$conftest* files to base directory. 149 $!----------------------------------------------------- 150 $ copy 'default_dir'gnv_conftest.c_first 'base_dir'gnv$conftest.c_first 151 $ create 'base_dir'gnv$conftest.opt 152 $ open/append opt 'base_dir'gnv$conftest.opt 153 $ if libzshr_line .nes. "" then write opt libzshr_line 154 $ if libcryptoshr_line .nes. "" then write opt libcryptoshr_line 155 $ if libsslshr_line .nes. "" then write opt libsslshr_line 156 $ close opt 157 $ purge 'base_dir'gnv$conftest.* 158 $ rename 'base_dir'gnv$conftest.* ;1 159 $! 160 $! 161 $! 162 $! GNV helper files for building the test curl binary. 163 $!----------------------------------------------- 164 $ create [.src]gnv$curl.opt 165 $ open/append opt [.src]gnv$curl.opt 166 $ write opt "gnv_packages_vms:curlmsg.obj" 167 $ if libzshr_line .nes. "" then write opt libzshr_line 168 $ if gssrtlshr_line .nes. "" then write opt gssrtlshr_line 169 $ if libcryptoshr_line .nes. "" then write opt libcryptoshr_line 170 $ if libsslshr_line .nes. "" then write opt libsslshr_line 171 $ close opt 172 $ purge [.src]gnv$*.* 173 $ rename [.src]gnv$*.* ;1 174 $! 175 $! 176 $! Create the libcurl 177 $!------------------------------------------------------ 178 $ create 'default_dir'gnv_libcurl_linker.opt 179 $ open/append opt 'default_dir'gnv_libcurl_linker.opt 180 $ if libzshr_line .nes. "" then write opt libzshr_line 181 $ if gssrtlshr_line .nes. "" then write opt gssrtlshr_line 182 $ if libcryptoshr_line .nes. "" then write opt libcryptoshr_line 183 $ if libsslshr_line .nes. "" then write opt libsslshr_line 184 $ close opt 185 $! 186 $! 187 $! Create the template linker file 188 $!--------------------------------- 189 $ create 'default_dir'gnv_template_linker.opt 190 $ open/append opt 'default_dir'gnv_template_linker.opt 191 $ write opt "gnv_vms_common:vms_curl_init_unix.obj" 192 $ if libzshr_line .nes. "" then write opt libzshr_line 193 $ if gssrtlshr_line .nes. "" then write opt gssrtlshr_line 194 $ if libcryptoshr_line .nes. "" then write opt libcryptoshr_line 195 $ if libsslshr_line .nes. "" then write opt libsslshr_line 196 $ close opt 197 $! 198 $! Copy over the gnv$*.opt files for [.docs.examples] 199 $!---------------------------------------------------- 200 $ if examples .ne. 0 201 $ then 202 $ example_apps = "10-at-a-time,anyauthput,certinfo,cookie_interface,debug" 203 $ example_apps = example_apps + ",fileupload,fopen,ftpget,ftpgetresp" 204 $ example_apps = example_apps + ",ftpupload,getinfo,getinmemory" 205 $ example_apps = example_apps + ",http-post,httpcustomheader,httpput" 206 $ example_apps = example_apps + ",https,multi-app,multi-debugcallback" 207 $ example_apps = example_apps + ",multi-double,multi-post,multi-single" 208 $ example_apps = example_apps + ",persistent,post-callback,postit2" 209 $ example_apps = example_apps + ",sendrecv,sepheaders,simple,simplepost" 210 $ example_apps = example_apps + ",simplessl" 211 $! 212 $ i = 0 213 $example_loop: 214 $ ap_name = f$element(i, ",", example_apps) 215 $ if ap_name .eqs. "," then goto example_loop_end 216 $ if ap_name .eqs. "" then goto example_loop_end 217 $ copy 'default_dir'gnv_template_linker.opt - 218 [.docs.examples]gnv$'ap_name'.opt 219 $ i = i + 1 220 $ goto example_loop 221 $example_loop_end: 222 $! 223 $! clean up the copy. 224 $ purge [.docs.examples]gnv$*.opt 225 $ rename [.docs.examples]gnv$*.opt ;1 226 $ endif 227 $! 228 $! 229 $ if tests .ne. 0 230 $ then 231 $ libtest_apps = "lib500,lib501,lib502,lib503,lib504,lib505,lib506,lib507" 232 $ libtest_apps = libtest_apps + ",lib508,lib510,lib511,lib512,lib513,lib514" 233 $ libtest_apps = libtest_apps + ",lib515,lib516,lib517,lib518,lib519,lib520" 234 $ libtest_apps = libtest_apps + ",lib521,lib523,lib524,lib525,lib526,lib527" 235 $ libtest_apps = libtest_apps + ",lib529,lib530,lib532,lib533,lib536,lib537" 236 $ libtest_apps = libtest_apps + ",lib539,lib540,lib541,lib542,lib543,lib544" 237 $ libtest_apps = libtest_apps + ",lib545,lib547,lib548,lib549,lib552,lib553" 238 $ libtest_apps = libtest_apps + ",lib554,lib555,lib556,lib557,lib558,lib559" 239 $ libtest_apps = libtest_apps + ",lib560,lib562,lib564" 240 $ i = 0 241 $libtest_loop: 242 $ ap_name = f$element(i, ",", libtest_apps) 243 $ if ap_name .eqs. "," then goto libtest_loop_end 244 $ if ap_name .eqs. "" then goto libtest_loop_end 245 $ copy 'default_dir'gnv_template_linker.opt - 246 [.tests.libtest]gnv$'ap_name'.opt 247 $ i = i + 1 248 $ goto libtest_loop 249 $libtest_loop_end: 250 $! 251 $! clean up the copy. 252 $ purge [.tests.libtest]gnv$*.opt 253 $ rename [.tests.libtest]gnv$*.opt ;1 254 $ endif 255 $! 256 $! 257 $! Build the Message file. 258 $!-------------------------- 259 $ if f$search("[.packages.vms]curlmsg.obj") .eqs. "" 260 $ then 261 $ message [.packages.vms]curlmsg.msg/object=[.packages.vms] 262 $ endif 263 $ if f$search("gnv$curlmsg.exe") .eqs. "" 264 $ then 265 $ link/share=gnv$curlmsg.exe [.packages.vms]curlmsg.obj 266 $ endif 267 $! 268 $! 269 $! 270 $! Need to build the common init module. 271 $!------------------------------------------- 272 $ init_obj = "[.packages.vms]curl_crtl_init.obj" 273 $ if f$search(init_obj) .eqs. "" 274 $ then 275 $ cc'cflags' 'default_dir'curl_crtl_init.c/obj='init_obj' 276 $ purge 'init_obj' 277 $ rename 'init_obj' ;1 278 $ endif 279 $! 280 $all_exit: 281 $! 282 $ set def 'default_dir' 283 $! 284 $! Verify can break things in bash, especially in Configure scripts. 285 $ set nover 286 $ exit