Return to build_gnv_curl_release_notes.com CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / curl / packages / vms

Annotation of embedaddon/curl/packages/vms/build_gnv_curl_release_notes.com, revision 1.1

1.1     ! misho       1: $! File: Build_GNV_curl_release_notes.com
        !             2: $!
        !             3: $! $Id$
        !             4: $!
        !             5: $! Build the release note file from the four components:
        !             6: $!    1. The curl_release_note_start.txt
        !             7: $!    2. The hp_ssl_release_info.txt
        !             8: $!    3. [--]readme. file from the Curl distribution.
        !             9: $!    4. The Curl_gnv-build_steps.txt.
        !            10: $!
        !            11: $! Set the name of the release notes from the GNV_PCSI_FILENAME_BASE
        !            12: $! logical name.
        !            13: $!
        !            14: $! Copyright 2009 - 2020, John Malmberg
        !            15: $!
        !            16: $! Permission to use, copy, modify, and/or distribute this software for any
        !            17: $! purpose with or without fee is hereby granted, provided that the above
        !            18: $! copyright notice and this permission notice appear in all copies.
        !            19: $!
        !            20: $! THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
        !            21: $! WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
        !            22: $! MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
        !            23: $! ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
        !            24: $! WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
        !            25: $! ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
        !            26: $! OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
        !            27: $!
        !            28: $! 14-Jun-2009  J. Malmberg
        !            29: $!
        !            30: $!===========================================================================
        !            31: $!
        !            32: $ base_file = f$trnlnm("GNV_PCSI_FILENAME_BASE")
        !            33: $ if base_file .eqs. ""
        !            34: $ then
        !            35: $   write sys$output "@MAKE_PCSI_CURL_KIT_NAME.COM has not been run."
        !            36: $   goto all_exit
        !            37: $ endif
        !            38: $!
        !            39: $!
        !            40: $ curl_readme = f$search("sys$disk:[--]readme.")
        !            41: $ if curl_readme .eqs. ""
        !            42: $ then
        !            43: $   curl_readme = f$search("sys$disk:[--]$README.")
        !            44: $ endif
        !            45: $ if curl_readme .eqs. ""
        !            46: $ then
        !            47: $    write sys$output "Can not find Curl readme file."
        !            48: $    goto all_exit
        !            49: $ endif
        !            50: $!
        !            51: $ curl_copying = f$search("sys$disk:[--]copying.")
        !            52: $ if curl_copying .eqs. ""
        !            53: $ then
        !            54: $   curl_copying = f$search("sys$disk:[--]$COPYING.")
        !            55: $ endif
        !            56: $ if curl_copying .eqs. ""
        !            57: $ then
        !            58: $    write sys$output "Can not find Curl copying file."
        !            59: $    goto all_exit
        !            60: $ endif
        !            61: $!
        !            62: $ vms_readme = f$search("sys$disk:[]readme.")
        !            63: $ if vms_readme .eqs. ""
        !            64: $ then
        !            65: $   vms_readme = f$search("sys$disk:[]$README.")
        !            66: $ endif
        !            67: $ if vms_readme .eqs. ""
        !            68: $ then
        !            69: $   write sys$output "Can not find VMS specific Curl readme file."
        !            70: $   goto all_exit
        !            71: $ endif
        !            72: $!
        !            73: $ curl_release_notes = f$search("sys$disk:[--]release-notes.")
        !            74: $ if curl_release_notes .eqs. ""
        !            75: $ then
        !            76: $   curl_release_notes = f$search("sys$disk:[--]$RELEASE-NOTES.")
        !            77: $ endif
        !            78: $ if curl_release_notes .eqs. ""
        !            79: $ then
        !            80: $    write sys$output "Can not find Curl release-notes file."
        !            81: $    goto all_exit
        !            82: $ endif
        !            83: $!
        !            84: $ if f$search("sys$disk:[]hp_ssl_release_info.txt") .eqs. ""
        !            85: $ then
        !            86: $   write sys$output "GNV_LINK_CURL.COM has not been run!"
        !            87: $   goto all_exit
        !            88: $ endif
        !            89: $!
        !            90: $ type/noheader 'curl_readme', 'vms_readme', -
        !            91:                 'curl_release_notes', -
        !            92:                 sys$disk:[]curl_release_note_start.txt, -
        !            93:                 sys$disk:[]hp_ssl_release_info.txt, -
        !            94:                 'curl_copying', -
        !            95:                 sys$disk:[]curl_gnv_build_steps.txt -
        !            96:                 /out='base_file'.release_notes
        !            97: $!
        !            98: $ purge 'base_file'.release_notes
        !            99: $ rename 'base_file.release_notes ;1
        !           100: $!
        !           101: $all_exit:
        !           102: $ exit