setup_gnv_curl_build.com 9.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286
  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