summaryrefslogtreecommitdiff
path: root/start-bgpstore.sh
blob: 599068eae409d3ef88d4940e21fe09261ab74cb7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
#! /bin/sh

HOST=$1
PORT=$2
DB_DB=$3
DB_USER=$4
DB_PW=$5
DB_HOST=$6

[ -z "$HOST" ] && HOST=victoria.tug.nordu.net
[ -z "$PORT" ] && PORT=50001

[ -z "$DB_DB" ] && DB_DB=linus
[ -z "$DB_USER" ] && DB_USER=linus
[ -z "$DB_PW" ] && DB_PW=
[ -z "$DB_HOST" ] && DB_HOST=localhost

# FIXME: The (use-package 'postmodern) should've been taken care of in
# package.lisp.  Why doesn't it work?

sbcl --no-userinit \
    --eval "(require 'asdf)" \
    --eval "(asdf:oos 'asdf:load-op 'postmodern)" \
    --eval "(use-package 'postmodern)" \
    --eval "(require 'bgpstore)" \
    --eval "(let ((*db-spec* '(\"$DB_DB\" \"$DB_USER\" \"$DB_PW\" \"$DB_HOST\"))) (start-bgpstore \"$HOST\" $PORT))"