#!/bin/sh

# nbpost -- script for drafting journal entries using a
#           template file as a starting point, written 
#           with nano-blogger in mind (bash blog engine)
# Copyleft (C) 2008 Adrian C. <anrxc_sysphere_org>
#            All rights reversed

ext="txt"
exw="htm"
#doc="html"
doc="post"

nbe="${HOME}/blog/nb"
tmp="${HOME}/blog/draft.tmpl"
dir="${HOME}/blog/website/drafts"

grp="grep"
tch="touch"
eme="emacs"
emc="emacsclient"
ffx="/usr/local/bin/firefox"


umask 077

if [ "$#" -eq 0 ]; then
    echo "Usage: `basename $0` draftName [-g]"
    exit 0
fi


draft_name="$1"

if ! `echo ${draft_name} | ${grp} -q "^[[:alnum:]]\+$"`; then
    echo "Name must contain alphanumeric characters only"
    exit 1
fi


if [ ! -r "/tmp/${eme}${UID}/server" ]; then
    ${eme} --daemon
    emc="${emc} -n -c"
fi


draft_file="${dir}/${draft_name}.${ext}"

if [ -f "${draft_file}" ]; then
    if [ "$2" == "-g" ]; then
        draft_prev="${dir}/${draft_name}.${exw}"

        ${nbe} make-page "${draft_file}" "${draft_prev}"
        ${ffx} "${draft_prev}"
    else
        ${emc} --eval "(find-file \"${draft_file}\")" "(${doc}-mode)"
    fi
else
    ${tch} "${draft_file}"
    ${emc} --eval "(find-file \"${draft_file}\")" "(insert-file \"${tmp}\")" "(${doc}-mode)"
fi