Return to build_curl-config_script.com CVS log | Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / curl / packages / vms |
1.1 ! misho 1: $! build_curl-config_script.com ! 2: $! ! 3: $! This generates the curl-config. script from the curl-config.in file. ! 4: $! ! 5: $! Copyright 2014, John Malmberg ! 6: $! ! 7: $! Permission to use, copy, modify, and/or distribute this software for any ! 8: $! purpose with or without fee is hereby granted, provided that the above ! 9: $! copyright notice and this permission notice appear in all copies. ! 10: $! ! 11: $! THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES ! 12: $! WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF ! 13: $! MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ! 14: $! ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES ! 15: $! WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ! 16: $! ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT ! 17: $! OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ! 18: $! ! 19: $! ! 20: $! 16-Dec-2014 J. Malmberg ! 21: $! ! 22: $!=========================================================================== ! 23: $! ! 24: $! Skip this if the curl-config. already exists. ! 25: $ if f$search("[--]curl-config.") .nes. "" then goto all_exit ! 26: $! ! 27: $ if (f$getsyi("HW_MODEL") .lt. 1024) ! 28: $ then ! 29: $ arch_name = "VAX" ! 30: $ else ! 31: $ arch_name = "" ! 32: $ arch_name = arch_name + f$edit(f$getsyi("ARCH_NAME"), "UPCASE") ! 33: $ if (arch_name .eqs. "") then arch_name = "UNK" ! 34: $ endif ! 35: $! ! 36: $ x_prefix = "/usr" ! 37: $ x_exec_prefix = "/usr" ! 38: $ x_includedir = "${prefix}/include" ! 39: $ x_cppflag_curl_staticlib = "-DCURL_STATICLIB" ! 40: $ x_enabled_shared = "no" ! 41: $ x_curl_ca_bundle = "" ! 42: $ x_cc = "cc" ! 43: $ x_support_features = "SSL IPv6 libz NTLM" ! 44: $ x_support_protocols1 = "DICT FILE FTP FTPS GOPHER HTTP HTTPS IMAP IMAPS LDAP" ! 45: $ x_support_protocols2 = " LDAPS POP3 POP3S RTSP SMTP SMTPS TELNET TFTP" ! 46: $ x_support_protocols = x_support_protocols1 + x_support_protocols2 ! 47: $ x_curlversion = "0.0.0.0" ! 48: $ x_versionnum = "" ! 49: $ x_libdir = "${prefix}/lib" ! 50: $ x_require_lib_deps = "" ! 51: $ x_enable_static = "" ! 52: $ x_ldflags = "" ! 53: $ part1 = "-L/usr/lib -L/SSL_LIB -lssl -lcrypto -lz" ! 54: $ if arch_name .eqs. "VAX" ! 55: $ then ! 56: $ x_libcurl_libs = part1 ! 57: $ else ! 58: $ x_libcurl_libs = part1 + " -lgssapi" ! 59: $ endif ! 60: $ x_libext = "a" ! 61: $! ! 62: $! Get the version number ! 63: $!----------------------- ! 64: $ i = 0 ! 65: $ open/read/error=version_loop_end vhf [--.include.curl]curlver.h ! 66: $ version_loop: ! 67: $ read/end=version_loop_end vhf line_in ! 68: $ if line_in .eqs. "" then goto version_loop ! 69: $ if f$locate("#define LIBCURL_VERSION ", line_in) .eq. 0 ! 70: $ then ! 71: $ x_curlversion = f$element(2," ", line_in) - """" - """" ! 72: $ i = i + 1 ! 73: $ endif ! 74: $ if f$locate("#define LIBCURL_VERSION_NUM ", line_in) .eq. 0 ! 75: $ then ! 76: $ x_versionnum = f$element(2," ", line_in) - """" - """" ! 77: $ i = i + 1 ! 78: $ endif ! 79: $ if i .lt 2 then goto version_loop ! 80: $ version_loop_end: ! 81: $ close vhf ! 82: $! ! 83: $ kit_type = "V" ! 84: $ if f$locate("-", x_curlversion) .lt. f$length(x_curlversion) ! 85: $ then ! 86: $ kit_type = "D" ! 87: $ x_prefix = "/beta" ! 88: $ x_exec_prefix = "/beta" ! 89: $ endif ! 90: $! ! 91: $ if kit_type .nes. "D" ! 92: $ then ! 93: $ part1 = " echo "" '--prefix=/usr' '--exec-prefix=/usr' " ! 94: $ else ! 95: $ part1 = " echo "" '--prefix=/beta' '--exec_prefix=/beta' " ! 96: $ endif ! 97: $ if arch_name .eqs. "VAX" ! 98: $ then ! 99: $ part3 = "" ! 100: $ else ! 101: $ part3 = "'--with-gssapi' " ! 102: $ endif ! 103: $ part2 = "'--disable-dependency-tracking' '--disable-libtool-lock' " ! 104: $ part4 = "'--disable-ntlm-wb' '--with-ca-path=gnv$curl_ca_path'""" ! 105: $! ! 106: $ x_configure_options = part1 + part2 + part3 + part4 ! 107: $! ! 108: $! ! 109: $ open/read/error=read_loop_end c_c_in sys$disk:[--]curl-config.in ! 110: $ create sys$disk:[--]curl-config. ! 111: $ open/append c_c_out sys$disk:[--]curl-config. ! 112: $read_loop: ! 113: $ read/end=read_loop_end c_c_in line_in ! 114: $ line_in_len = f$length(line_in) ! 115: $ if f$locate("@", line_in) .ge. line_in_len ! 116: $ then ! 117: $ write c_c_out line_in ! 118: $ goto read_loop ! 119: $ endif ! 120: $ i = 0 ! 121: $ line_out = "" ! 122: $sub_loop: ! 123: $ ! Replace between pairs of @ by alternating the elements. ! 124: $ ! If mis-matched pairs, do not substitute anything. ! 125: $ section1 = f$element(i, "@", line_in) ! 126: $ if section1 .eqs. "@" ! 127: $ then ! 128: $ goto sub_loop_end ! 129: $ endif ! 130: $ i = i + 1 ! 131: $ section2 = f$element(i, "@", line_in) ! 132: $ if section2 .eqs. "@" ! 133: $ then ! 134: $ goto sub_loop_end ! 135: $ endif ! 136: $ i = i + 1 ! 137: $ section3 = f$element(i, "@", line_in) ! 138: $ if section3 .eqs. "@" ! 139: $ then ! 140: $ if line_out .eqs. "" then line_out = line_in ! 141: $ goto sub_loop_end ! 142: $ endif ! 143: $ line_out = line_out + section1 ! 144: $ if f$type(x_'section2') .eqs. "STRING" ! 145: $ then ! 146: $ line_out = line_out + x_'section2' ! 147: $ endif ! 148: $ goto sub_loop ! 149: $sub_loop_end: ! 150: $ write c_c_out line_out ! 151: $ goto read_loop ! 152: $read_loop_end: ! 153: $ close c_c_in ! 154: $ close c_c_out