Annotation of embedaddon/curl/packages/vms/pcsi_product_gnv_curl.com, revision 1.1
1.1 ! misho 1: $! File: PCSI_PRODUCT_GNV_CURL.COM
! 2: $!
! 3: $! $Id$
! 4: $!
! 5: $! This command file packages up the product CURL into a sequential
! 6: $! format kit
! 7: $!
! 8: $! Copyright 2009 - 2020, 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: $! 16-Jun-2009 J.Malmberg
! 23: $!
! 24: $!=========================================================================
! 25: $!
! 26: $! Save default
! 27: $ default_dir = f$environment("DEFAULT")
! 28: $!
! 29: $! Put things back on error.
! 30: $ on warning then goto all_exit
! 31: $!
! 32: $!
! 33: $ can_build = 1
! 34: $ producer = f$trnlnm("GNV_PCSI_PRODUCER")
! 35: $ if producer .eqs. ""
! 36: $ then
! 37: $ write sys$output "GNV_PCSI_PRODUCER logical name has not been set."
! 38: $ can_build = 0
! 39: $ endif
! 40: $ producer_full_name = f$trnlnm("GNV_PCSI_PRODUCER_FULL_NAME")
! 41: $ if producer_full_name .eqs. ""
! 42: $ then
! 43: $ write sys$output -
! 44: "GNV_PCSI_PRODUCER_FULL_NAME logical name has not been set."
! 45: $ can_build = 0
! 46: $ endif
! 47: $ stage_root_name = f$trnlnm("STAGE_ROOT")
! 48: $ if stage_root_name .eqs. ""
! 49: $ then
! 50: $ write sys$output "STAGE_ROOT logical name has not been set."
! 51: $ can_build = 0
! 52: $ endif
! 53: $!
! 54: $ if (can_build .eq. 0)
! 55: $ then
! 56: $ write sys$output "Not able to build a kit."
! 57: $ goto all_exit
! 58: $ endif
! 59: $!
! 60: $! Make sure that the kit name is up to date for this build
! 61: $!----------------------------------------------------------
! 62: $ @MAKE_PCSI_CURL_KIT_NAME.COM
! 63: $!
! 64: $!
! 65: $! Make sure that the image is built
! 66: $!----------------------------------
! 67: $ arch_name = f$edit(f$getsyi("arch_name"),"UPCASE")
! 68: $ if f$search("[--.src]curl.exe") .eqs. ""
! 69: $ then
! 70: $ build_it = 1
! 71: $ libfile = "[.packages.vms.''arch_name']curllib.olb"
! 72: $ if f$search(libfile) .nes. ""
! 73: $ then
! 74: $ build_it = 0
! 75: $ else
! 76: $ ! GNV based build
! 77: $ libfile = "[.lib.^.libs]libcurl.a"
! 78: $ if f$search(libfile) .nes. ""
! 79: $ then
! 80: $ build_it = 0;
! 81: $ endif
! 82: $ endif
! 83: $ if build_it .eq. 1
! 84: $ then
! 85: $ @build_vms list
! 86: $ endif
! 87: $ @gnv_link_curl.com
! 88: $ endif
! 89: $!
! 90: $! Make sure that the release note file name is up to date
! 91: $!---------------------------------------------------------
! 92: $ @BUILD_GNV_CURL_RELEASE_NOTES.COM
! 93: $!
! 94: $!
! 95: $! Make sure that the source has been backed up.
! 96: $!----------------------------------------------
! 97: $ arch_type = f$getsyi("ARCH_NAME")
! 98: $ arch_code = f$extract(0, 1, arch_type)
! 99: $ @backup_gnv_curl_src.com
! 100: $!
! 101: $! Regenerate the PCSI description file.
! 102: $!--------------------------------------
! 103: $ @BUILD_GNV_CURL_PCSI_DESC.COM
! 104: $!
! 105: $! Regenerate the PCSI Text file.
! 106: $!---------------------------------
! 107: $ @BUILD_GNV_CURL_PCSI_TEXT.COM
! 108: $!
! 109: $!
! 110: $! Parse the kit name into components.
! 111: $!---------------------------------------
! 112: $ kit_name = f$trnlnm("GNV_PCSI_KITNAME")
! 113: $ if kit_name .eqs. ""
! 114: $ then
! 115: $ write sys$output "@MAKE_PCSI_CURL_KIT_NAME.COM has not been run."
! 116: $ goto all_exit
! 117: $ endif
! 118: $ producer = f$element(0, "-", kit_name)
! 119: $ base = f$element(1, "-", kit_name)
! 120: $ product_name = f$element(2, "-", kit_name)
! 121: $ mmversion = f$element(3, "-", kit_name)
! 122: $ majorver = f$extract(0, 3, mmversion)
! 123: $ minorver = f$extract(3, 2, mmversion)
! 124: $ updatepatch = f$element(4, "-", kit_name)
! 125: $ if updatepatch .eqs. "" then updatepatch = ""
! 126: $!
! 127: $ version_fao = "!AS.!AS"
! 128: $ mmversion = f$fao(version_fao, "''majorver'", "''minorver'")
! 129: $ if updatepatch .nes. ""
! 130: $ then
! 131: $ version = "''mmversion'" + "-" + updatepatch
! 132: $ else
! 133: $ version = "''mmversion'"
! 134: $ endif
! 135: $!
! 136: $ @stage_curl_install remove
! 137: $ @stage_curl_install
! 138: $!
! 139: $! Move to the base directories
! 140: $ set def [--]
! 141: $ current_default = f$environment("DEFAULT")
! 142: $ my_dir = f$parse(current_default,,,"DIRECTORY") - "[" - "<" - ">" - "]"
! 143: $!
! 144: $!
! 145: $!
! 146: $ source = "''default_dir'"
! 147: $ src1 = "new_gnu:[usr.bin],"
! 148: $ src2 = "new_gnu:[usr.include.curl],"
! 149: $ src3 = "new_gnu:[usr.lib],"
! 150: $ src4 = "new_gnu:[usr.lib.pkgconfig],"
! 151: $ src5 = "new_gnu:[usr.share.man.man1],"
! 152: $ src6 = "new_gnu:[usr.share.man.man3],"
! 153: $ src7 = "new_gnu:[vms_src],"
! 154: $ src8 = "new_gnu:[common_src],"
! 155: $ src9 = "prj_root:[''my_dir'],prj_root:[''my_dir'.src]"
! 156: $ gnu_src = src1 + src2 + src3 + src4 + src5 + src6 + src7 + src8 + src9
! 157: $!
! 158: $!
! 159: $ base = ""
! 160: $ if arch_name .eqs. "ALPHA" then base = "AXPVMS"
! 161: $ if arch_name .eqs. "IA64" then base = "I64VMS"
! 162: $ if arch_name .eqs. "VAX" then base = "VAXVMS"
! 163: $!
! 164: $ if base .eqs. "" then exit 44
! 165: $!
! 166: $ pcsi_option = "/option=noconfirm"
! 167: $ if arch_code .eqs. "V"
! 168: $ then
! 169: $ pcsi_option = ""
! 170: $ endif
! 171: $!
! 172: $!
! 173: $product package 'product_name' -
! 174: /base='base' -
! 175: /producer='producer' -
! 176: /source='source' -
! 177: /destination=STAGE_ROOT:[KIT] -
! 178: /material=('gnu_src','source') -
! 179: /format=sequential 'pcsi_option'
! 180: $!
! 181: $!
! 182: $! VAX can not do a compressed kit.
! 183: $! ZIP -9 "-V" does a better job, so no reason to normally build a compressed
! 184: $! kit.
! 185: $!----------------------------------
! 186: $if p1 .eqs. "COMPRESSED"
! 187: $then
! 188: $ if arch_code .nes. "V"
! 189: $ then
! 190: $ product copy /options=(novalidate, noconfirm) /format=compressed -
! 191: 'product_name' -
! 192: /source=stage_root:[kit]/dest=stage_root:[kit] -
! 193: /version='version'/base='base'
! 194: $ endif
! 195: $endif
! 196: $!
! 197: $all_exit:
! 198: $ set def 'default_dir'
! 199: $ exit
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>