build

#!/bin/sh
# This script is only used for developement. It is removed by the 
# distribution process. 

set -e

ECHO=${ECHO:="echo"}
SED=${SED:="sed"}
TR=${TR:="tr"}
GREP=${GREP:="grep"}
CD=${CD:="cd"}
RM=${RM:="rm"}
CP=${CP:="cp"}
MV=${MV:="mv"}
MKDIR=${MKDIR:="mkdir"}
TAR=${TAR:="tar"}
FIND=${FIND:="find"}
WEBGLUE=${WEBGLUE:="webglue"}

OCAMLBUILD=${OCAMLBUILD:="ocamlbuild -classic-display -use-ocamlfind"}
OCAMLDOCFLAGS=${OCAMLDOCFLAGS:="-docflags -colorize-code,-charset,utf-8"}
OASIS=${OASIS:="oasis -quiet"}
OASISQ=${OASISQ:="$OASIS query"}
OPAMMKREPO=${OPAMMKREPO:="opam-mk-repo"}
GIT=${GIT:="git"}

ocb () { $OCAMLBUILD "$@" ; }
action () 
{
  case $1 in
    module) ocb `$OASISQ Name`.cmx ;;
    doc)
      ocb $OCAMLDOCFLAGS -I src -no-links doc/api.docdir/index.html
      $CP doc/style.css _build/doc/api.docdir/style.css ;;
    distrib) distrib ;;
    publish) publish ;;
    opam) publish_opam ;;
    opam-prepare-unstable) opam_prepare_unstable ;;
    clean)
      ocb -clean
      $RM -f myocamlbuild.ml setup.ml setup.data setup.log src/META \
          src/`$OASISQ Name`.mllib
      ;;
    *) ocb $1;;
  esac;
} 

project_info ()
{
  VERSION=`$ECHO "\`$GIT describe --dirty\`" | $SED "s/^.\(.*\)/\1/"`
  NAME=`$OASISQ Name`
  MODNAME=`$OASISQ Library\("$NAME"\).Modules`
  SYNOPSIS=`$OASISQ Synopsis`
  DESCRIPTION=`$OASISQ Description | $SED "s|$|\\\\\|"`
  HOMEPAGE=`$OASISQ Homepage`
  MAINTAINER=`$OASISQ Maintainers`
  AUTHORS=`$OASISQ Authors`
  OCAMLVERSION=`$OASISQ OCamlVersion`
  DEPS=`$OASISQ "Library(\"$NAME\").BuildDepends"`
  if [ "$DEPS" ]; then
  PPDEPS=`$ECHO ", $DEPS"| $SED "s|,|,   |g" | $TR "," "\n" | $SED "s|$|\\\\\|"`
  fi;

  OPAMDESCRIPTION=`$OASISQ Description`
  OPAMDEPS=`$ECHO "$DEPS" | $SED "s/\(\b\w\+\b\)/\"\0\"/g"` 
  OPAMOCAMLVERSION=`$OASISQ OCamlVersion | $SED "s/\([[:digit:]\.]\+\)/\"\0\"/"`
}

varsubsts()
{
  $FIND $ROOTDIR \
    \( -name "*~" -o -name ".DS_Store" -o -name ".gdb_history" \) \
    -exec $RM {} ';'
  for file in `$FIND $ROOTDIR \( -name .git \) -prune -o -type f -print`; do
      $SED "s|%%NAME%%|$NAME|g; \
            s|%%MODNAME%%|$MODNAME|g; \
            s|%%VERSION%%|$VERSION|g; \
            s|%%SYNOPSIS%%|$SYNOPSIS|g; \
            s|%%DESCRIPTION%%|$DESCRIPTION |g; \
            s|%%HOMEPAGE%%|$HOMEPAGE|g; \
            s|%%MAINTAINER%%|$MAINTAINER|g; \
            s|%%AUTHORS%%|$AUTHORS|g; \
            s|%%OCAMLVERSION%%|$OCAMLVERSION|g; \
            s|%%DEPS%%|$DEPS|g; \
            s|%%PPDEPS%%|$PPDEPS |g;" \
	$file > $file.tmp
    $MV -f $file.tmp $file
  done
}

distrib ()
{  
  project_info
  DIRNAME=$NAME-$VERSION
  ROOTDIR=/tmp/$DIRNAME

  $RM -R -f $ROOTDIR
  $MKDIR -p $ROOTDIR
  $CP -R . $ROOTDIR
  $CD $ROOTDIR

  # Remove dev artefacts
  $RM -R -f TODO .typerex .git .gitignore build _tags myocamlbuild.ml  
  action clean

  # Generate oasis artefacts
  $OASIS setup

  # Substitute a few things
  varsubsts

  # Test oasis setup 
  ocaml setup.ml -configure
  ocaml setup.ml -build
  ocaml setup.ml -build test/tests.otarget

  # Generate static doc 
  action doc
  $CP _build/doc/api.docdir/*.html doc/
  
  # Clean and wrap up the project
  ocaml setup.ml -distclean

  $CD ..
  $TAR -cvjf $DIRNAME.tbz $DIRNAME
  $RM -R $DIRNAME
}

opam_prepare_unstable ()
{
  project_info
  
  # Remove dev artefacts
  $RM -f build _tags myocamlbuild.ml  
  $OASIS setup

  # Substitute a few things
  ROOTDIR=.
  varsubsts
}

publish_opam () 
{
    project_info 
    ARCHIVE=$NAME-$VERSION.tbz
    OPAMPACK=$NAME.$VERSION
    SITEGENROOT=~/sync/erratique
    OPAMROOT=$SITEGENROOT/maps/software/opam
    $RM -rf $OPAMROOT/packages/$OPAMPACK
    $MKDIR -p $OPAMROOT/packages/$OPAMPACK/files

    $CD $OPAMROOT/packages/$OPAMPACK
    
    cat > descr <<EOF
$SYNOPSIS

$OPAMDESCRIPTION
EOF

    cat > opam <<EOF
opam-version: "1"
maintainer: "$MAINTAINER"
homepage: "$HOMEPAGE"
authors: ["$AUTHORS"]
doc: "$HOMEPAGE/doc/$MODNAME"
license: "BSD3"
build: [
  ["ocaml" "setup.ml" "-configure" "--prefix" "%{prefix}%" ]
  ["ocaml" "setup.ml" "-build"]
  ["ocaml" "setup.ml" "-install"]
]
remove: [
  ["ocamlfind" "remove" "$NAME"]
]
depends: ["ocamlfind" $OPAMDEPS]
ocaml-version: [$OPAMOCAMLVERSION]
EOF

  cat > url <<EOF
archive: "$HOMEPAGE/releases/$ARCHIVE"
checksum: ""
EOF


  cat > files/$NAME.install <<EOF
opam-version: "1"
EOF
#doc:[ "README" "CHANGES" "doc/index.html"]

  $CD $OPAMROOT
  $OPAMMKREPO --generate-checksums $OPAMPACK
  $RM -rf archives
  $OPAMMKREPO --index
}

publish ()
{
    project_info
    DIRNAME=$NAME-$VERSION
    ARCHIVE=/tmp/$DIRNAME.tbz
    SITEGENROOT=~/sync/erratique
    PAGEROOT=$SITEGENROOT/maps/software/$NAME

    $CP $ARCHIVE $PAGEROOT/releases/
    $RM -R $PAGEROOT/doc
    $TAR -C $PAGEROOT --strip-components=1 -xvjf $ARCHIVE $DIRNAME/doc
    $CD $SITEGENROOT
    $ECHO "$VERSION" | $WEBGLUE set --replace $NAME s-last-version
    $ECHO "$DEPS" | $WEBGLUE set --replace $NAME s-deps
    $WEBGLUE get timestamp utc | $WEBGLUE set --replace $NAME s-updated
}

if [ $# -eq 0 ]; then action module ; else
  while [ $# -gt 0 ]; do action $1; shift ; done
fi