Mercurial > hgrepos > Python2 > PyMuPDF

comparison mupdf-source/thirdparty/curl/packages/vms/curl_startup.com @ 2:b50eed0cc0ef upstream

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
ADD: MuPDF v1.26.7: the MuPDF source as downloaded by a default build of PyMuPDF 1.26.4. The directory name has changed: no version number in the expanded directory now.
author Franz Glasner <fzglas.hg@dom66.de>
date Mon, 15 Sep 2025 11:43:07 +0200
parents
children
comparison
equal deleted inserted replaced
1:1d09e1dec1d9 2:b50eed0cc0ef
1 $! File: curl_Startup.com
2 $!
3 $! $Id$
4 $!
5 $! Procedure to setup the CURL libraries for use by programs from the
6 $! VMS SYSTARTUP*.COM procedure.
7 $!
8 $! Copyright 2009, 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 $! 15-Jun-2009 J. Malmberg
23 $! 30-Jul-2013 J. Malmberg Update for Curl 7.32
24 $!========================================================================
25 $!
26 $!
27 $! GNV$GNU if needed.
28 $ if f$trnlnm("GNV$GNU") .eqs. ""
29 $ then
30 $ x = f$trnlnm("GNU","LNM$SYSTEM_TABLE")
31 $ if x .eqs. ""
32 $ then
33 $ write sys$output "GNV must be started up before this procedure.
34 $ exit 44
35 $ endif
36 $ define/system/exec/trans=conc GNV$GNU 'x'
37 $ endif
38 $!
39 $!
40 $ myproc = f$environment("procedure")
41 $!
42 $! ZLIB needed.
43 $ if f$trnlnm("GNV$LIBZSHR32") .eqs. ""
44 $ then
45 $ zlib_startup = f$parse("gnv$zlib_startup.com;0", myproc,,,)
46 $ if f$search(zlib_startup) .nes. ""
47 $ then
48 $ @'zlib_startup
49 $ else
50 $ write sys$output "ZLIB package not found and is required."
51 $ exit 44
52 $ endif
53 $ endif
54 $!
55 $!
56 $ curl_ssl_libcrypto32 = ""
57 $ curl_ssl_libssl32 = ""
58 $ gnv_ssl_libcrypto32 = "gnv$gnu:[lib]ssl$libcrypto_shr32.exe"
59 $ gnv_ssl_libssl32 = "gnv$gnu:[lib]ssl$libssl_shr32.exe"
60 $ if f$search(gnv_ssl_libcrypto32) .nes. ""
61 $ then
62 $ curl_ssl_libcrypto32 = gnv_ssl_libcrypto32
63 $ curl_ssl_libssl32 = gnv_ssl_libssl32
64 $ else
65 $ hp_ssl_libcrypto32 = "sys$share:ssl$libcrypto_shr32.exe"
66 $ hp_ssl_libssl32 = "sys$share:ssl$libssl_shr32.exe"
67 $ if f$search(hp_ssl_libcrypto32) .nes. ""
68 $ then
69 $ curl_ssl_libcrypto32 = hp_ssl_libcrypto32
70 $ curl_ssl_libssl32 = hp_ssl_libssl32
71 $ else
72 $ write sys$output "HP SSL package not found and is required."
73 $ endif
74 $ endif
75 $!
76 $ define/system/exec gnv$curl_ssl_libcryptoshr32 'curl_ssl_libcrypto32'
77 $ define/system/exec gnv$curl_ssl_libsslshr32 'curl_ssl_libssl32'
78 $!
79 $!
80 $! CURL setup
81 $ define/system/exec gnv$libcurl gnv$gnu:[usr.lib]GNV$LIBCURL.EXE
82 $ define/system/exec gnv$curl_include gnv$gnu:[usr.include.curl]
83 $ if .not. f$file_attributes("gnv$libcurl", "known")
84 $ then
85 $ install ADD gnv$libcurl/OPEN/SHARE/HEADER
86 $ else
87 $ install REPLACE gnv$libcurl/OPEN/SHARE/HEADER
88 $ endif
89 $!
90 $!
91 $ curl_exe = "gnv$gnu:[usr.bin]gnv$curl.exe"
92 $ if .not. f$file_attributes(curl_exe, "known")
93 $ then
94 $ install ADD 'curl_exe'/OPEN/SHARE/HEADER
95 $ else
96 $ install REPLACE 'curl_exe'/OPEN/SHARE/HEADER
97 $ endif
98 $!
99 $all_exit:
100 $ exit