Hogwarts Wand Docs: ../server/lll

File: ../server/lll

#!/bin/bash
#@DOC@ run parse on 1 or more files
#
# Copyright (C) 2006  Nathan (Acorn) Pooley
# 
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# version 2 as published by the Free Software Foundation.
# 
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License (gpl.txt) for more details. 
# 
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
# 
# You can contact the author, Nathan (Acorn) Pooley, by writing
# to Nathan (Acorn) Pooley, 949 Buckeye Drive, Sunnyvale, CA  94086, USA
# or through the form at http://www.rawbw.com/~acorn/wand/feedback.html
# 

_usage() {
    echo "Usage: lll [OPTIONS] <file1> ..."
    echo "  run parse on 1 or more files"
    #./parse -?
    exit 1
}

gg_path="."
if [[ $0 == */* ]] ; then
    gg_path="${0%/*}"
fi

ocnt=0
olist[0]=""
unset olist

fcnt=0
flist[0]=""
unset olist

OPT_all=0

_addopt() {
    olist[$ocnt]="$1"
    (( ocnt = ocnt + 1 ))
}

_addfile() {
    flist[$fcnt]="$1"
    (( fcnt = fcnt + 1 ))
}

for i in "$@"
do
    if [[ x${1%\?}y = x-y ]] ; then
        _usage
    fi
    if [[ $i = -* ]] ; then
        _addopt "$i"
    elif [[ $i = a ]] ; then
        OPT_all=1
    else
        _addfile "$i"
    fi
done

if (( OPT_all )) ; then
    for i in pics/wpic*.txt picf/wpic*.txt
    do
        _addfile "$i"
    done
fi


for i in "${flist[@]}"
do
    #echo "$gg_path/parse ${olist[@]} ${i##*/} < $i"
    $gg_path/parse "${olist[@]}" "${i##*/}" < "$i"
done

This file Copyright (C) 2006 by Nathan (Acorn) Pooley
Go to TOP Wand page
Go to Acorn's personal webpage
Go to Hogwarts website: www.gotohogwarts.com
Snout: www.snout.org/game
Gadgets of Justice Unlimited
Snout GC (Wiki)
Snout Wiki
File created by do_doc at Wed May 30 03:30:32 PDT 2007