Craig A. Berry wrote:
On Dec 31, 2008, at 11:38 AM, demerphq wrote:
And many of the people building perl would not have the GNV bash
package, so
the equivalent logic will need to be added to configure.com.
Will that be hard? I am willing to support as much as I can.
Processing the .patch file in configure.com should not be a big deal.
We already process it the old way when it just had the Perforce change
number in it, so we just need to update that to do what
make_patchnum.sh does. Running git to generate lib/Config_git.pl is
not possible at this point since there is as yet no git on VMS, so
those parts of make_patchnum.sh cannot currently be translated.
Since there is also no generally available rsync on VMS, the only
practical way to stay current with blead is to generate your own
snapshot on a system that does have rsync and/or git. If we haven't
already done so, it would be nice to document the recommended procedure
for generating a snapshot. I assume it involves running
make_patchnum.sh followed but some incantation of git --archive.
Here is a first pass at a make_patchnum.com.
I have not integrated it into the configure.com yet.
I am almost there with getting the UNIX mode working on VMS. After
that, I can start looking at the GIT issue again.
-John
wb8...@gmail.company
Personal Opinion Only
--
I expect to have the old e-mail address working again in a few days or so.
$! MAKE_PATCHNUM.COM
$!
$open/read pf .patch
$read pf line_in
$close pf
$branch = f$element(0, " ", line_in)
$snapshot_created = f$element(1, " ", line_in)
$commit_id = f$element(2, " ", line_in)
$describe = f$element(3, " ", line_in)
$!
$changed=""
$extra_info="git_snapshot_date=''snapshot_created'"
$commit_title="Snapshot of:"
$!
$create .patchnum
$open/append pn .patchnum
$write pn "describe: ''describe'"
$close pn
$!
$create unpushed.h
$open/append unp unpushed.h
$write unp -
"/**********************************************************************"
$write unp -
"* WARNING: unpushed.h is automatically generated by make_patchnum.com *"
$write unp -
"* DO NOT EDIT DIRECTLY - edit make_patchnum.com instead *"
$write unp -
"**********************************************************************/"
$write unp -
"#define PERL_GIT_UNPUSHED_COMMITS /*no-op*/"
$write unp -
"/*leave-this-comment*/"
$close unp
$!
$create [.lib]Config_git.pl
$open/append cfg [.lib]Config_git.pl
$write cfg -
"##################################################################"
$write cfg -
"# WARNING: lib/Config_git.pl is generated by make_patchnum.com #"
$write cfg -
"# DO NOT EDIT DIRECTLY - edit make_patchnum.com instead #"
$write cfg -
"##################################################################"
$write cfg -
"$Config::Git_Data=<<'ENDOFGIT';"
$write cfg -
"git_commit_id=''commit_id'"
$write cfg -
"git_describe=''describe'"
$write cfg -
"git_branch=''branch'"
$write cfg -
"git_uncommitted_changes=''changed'"
$write cfg -
"git_commit_id_title=''commit_title'"
$write cfg -
"''extra_info'"
$write cfg -
"ENDOFGIT"
$close cfg
