pkgs/development/lisp-modules-obsolete/quicklisp.sh

   1 #! /usr/bin/env bash
   2
   3 op=
   4 end_param=
   5 args=()
   6 cmd_args=()
   7
   8 while let "$#"; do
   9     if test -n "$end_param" || test "$1" = "${1#--}"; then
  10         if test -n "$op"; then
  11             args[${#args[@]}]="$1";
  12         else
  13             op="$1"
  14         fi
  15         shift
  16     else
  17         case "$1" in
  18             --)
  19                 end_param=1; shift;
  20             ;;
  21             --quicklisp-dir)
  22                 NIX_QUICKLISP_DIR="$2";
  23                 shift; shift;
  24             ;;
  25             --help)
  26                 echo "Operation: init, run, update, install {system-name}"
  27                 exit 0;
  28             ;;
  29             *)
  30                 echo "Unknown parameter [$1]" >&2
  31                 exit 2;
  32             ;;
  33         esac
  34     fi
  35 done
  36
  37 NIX_QUICKLISP_DIR="${NIX_QUICKLISP_DIR:-${HOME}/quicklisp}"
  38
  39 case "$op" in
  40     '') echo "Specify an operation: init, install, run, update"
  41     ;;
  42     install)
  43         NIX_LISP_SKIP_CODE=1 source "@clwrapper@/bin/common-lisp.sh";
  44
  45         cmd_args[${#cmd_args[@]}]="$NIX_LISP_EXEC_CODE"
  46         cmd_args[${#cmd_args[@]}]="(load \"$NIX_QUICKLISP_DIR/setup.lisp\")"
  47         for i in "${args[@]}"; do
  48             cmd_args[${#cmd_args[@]}]="$NIX_LISP_EXEC_CODE"
  49             cmd_args[${#cmd_args[@]}]="(ql:quickload :$i)"
  50         done
  51         cmd_args[${#cmd_args[@]}]="$NIX_LISP_EXEC_CODE"
  52         cmd_args[${#cmd_args[@]}]="$NIX_LISP_QUIT"
  53
  54         "@clwrapper@/bin/common-lisp.sh" "${cmd_args[@]}"
  55     ;;
  56     update)
  57         NIX_LISP_SKIP_CODE=1 source "@clwrapper@/bin/common-lisp.sh"
  58
  59         ln -sfT "@out@/lib/common-lisp/quicklisp/asdf.lisp" "$NIX_QUICKLISP_DIR/asdf.lisp"
  60         cp -f "@out@/lib/common-lisp/quicklisp/setup.lisp" "$NIX_QUICKLISP_DIR/setup.lisp"
  61
  62         if test -d "$NIX_QUICKLISP_DIR/quicklisp"; then
  63             mv "$NIX_QUICKLISP_DIR/quicklisp"{,-old-$(date +%Y%m%d-%H%M%S)}
  64         fi
  65
  66         cp -rfT "@out@/lib/common-lisp/quicklisp/quicklisp" "$NIX_QUICKLISP_DIR/quicklisp"
  67
  68         "@clwrapper@/bin/common-lisp.sh" "$NIX_LISP_EXEC_CODE" \
  69           "(load \"$NIX_QUICKLISP_DIR/setup.lisp\")" "$NIX_LISP_EXEC_CODE" \
  70           "(ql:update-all-dists)" "$NIX_LISP_EXEC_CODE" "$NIX_LISP_QUIT"
  71     ;;
  72     init)
  73         mkdir -p "$NIX_QUICKLISP_DIR"/{dists/quicklisp,tmp,local-projects}
  74         echo 1 > "$NIX_QUICKLISP_DIR/dists/quicklisp/enabled.txt"
  75         cp -f "@out@/lib/common-lisp/quicklisp/quicklisp-distinfo.txt" \
  76           "$NIX_QUICKLISP_DIR/dists/quicklisp/distinfo.txt"
  77
  78         NIX_QUICKLISP_DIR="$NIX_QUICKLISP_DIR" "$0" update
  79     ;;
  80     run)
  81         NIX_LISP_SKIP_CODE=1 source "@clwrapper@/bin/common-lisp.sh"
  82         "@clwrapper@/bin/common-lisp.sh" "$NIX_LISP_EXEC_CODE" \
  83           "(load \"$NIX_QUICKLISP_DIR/setup.lisp\")" "${args[@]}"
  84     ;;
  85 esac