buildstamp

#!/bin/sh
# generate a build stamp\
exec tclsh8.6 "$0" "$@"

# Usage: buildstamp [-c ID | --fbld ID]
#   -c ID outputs C code to define a const char* named ID with the contents of
#   the build stamp.
#   --fbld ID outputs .fbld defining a tag ID with the value of the build
#   stamp.
#
# Otherwise it just outputs the build stamp.

# Outputs a C program that defines the given identifer as a const char* with
# the contents of the build stamp.
set entries [list]
lappend entries [exec date -I]
catch { lappend entries "[exec git describe --always --dirty]" }
set stamp [join $entries ","]

switch -exact [lindex $argv 0] {
  -c {
    set id [lindex $argv 1]
    puts "const char* $id = \"$stamp\";"
  }
  --fbld {
    set id [lindex $argv 1]
    puts "@let\[$id\]\[$stamp\] @@"
  }
  default {
    puts $stamp
  }
}