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

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