Annotation of embedaddon/curl/packages/vms/build_curl-config_script.com, revision 1.1.1.1

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

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>