#!/bin/zsh -f

# initialization {{{
PLAY_DEBUG=${PLAY_DEBUG:-0}

[[ $PLAY_DEBUG == 2 ]] && setopt xtrace

PLAY_DIR="${PLAY_DIR:-${0:h}}"
PLAY_GAMES="${PLAY_GAMES:-$PLAY_DIR/installed}"
PLAY_TEMPLATES="${PLAY_TEMPLATES:-$PLAY_DIR/templates}"

typeset -A ENV EENV
BIN=$0
# }}}

# global functions {{{
out () {
    echo ">>> $*" >&2
}

log () {
    [[ $PLAY_DEBUG > 0 ]] && echo "*** $*" >&2
}

die () {
    out "*** ERROR: $*"
    exit 1
}

exp () {
    log "Setting envvar '$1' to '$2'"
    export $1=$2
}

exc () {
    local cmd="eval"

    if [[ $1 == "-e" ]]; then
        cmd="exec"
        shift
    fi

    log "Executing (using '$cmd'):"
    log "> $*"

    if [[ $cmd == exec ]]; then
        exec $@
    else
        $*
    fi
}

EXPORT () {
    local name=$1
    shift

    for f in $@; do
        eval "$f () { ${name}_${f}; }"
    done
}

inherit () {
    zparseopts -D e=nonfatal
    
    if [[ ! -e $PLAY_TEMPLATES/$1 ]]; then
        if [[ -n $nonfatal ]]; then
            log "Template '$1' not found"
            return
        else
            die "Template '$1' not found"
        fi
    fi
    
    source $PLAY_TEMPLATES/$1
}

load () {
    inherit -e default

    source "$PLAY_GAMES/$1"
}
# }}}

# default template {{{

# exporting variables
EENV[WINEPREFIX]='eval echo $PREFIX'
ENV[DISPLAY]=":1"

PREFIX="~/.wine"

# functions
play_execute () {
    exc -e startx $BIN -x $GAME -- $DISPLAY -ac -br -quiet ${=EXARGS}
}

play_prepare () {
    # set display size
    [[ -n $SIZE ]] && exc xrandr -s $SIZE
}

play_setenv () {
    PREFIX=${PREFIX:-$GAME}
    for e v in ${(kv)ENV}; do
        v=${(P)${:-PLAY_ENV_$e}:-$v}
        exp $e $v
    done
    
    for e v in ${(kv)EENV}; do
        v=${(P)${:-PLAY_EENV_$e}:-$v}
        exp $e `eval $v`
    done
}

play_run () {
    # cd into dir
    local dir="$(exc winepath -u $GPATH)"
    exc cd "$(dirname $dir)"

    # start game
    exc wine start $GPATH "$ARGS"
    
    # wait for wine to shutdown
    exc wineserver -w
}

play_cleanup () {
}

EXPORT play execute prepare setenv run cleanup
# }}}

if [[ $1 == "-x" ]]; then
    load $2
    prepare
    run
    cleanup
else
    GAME=$1
    DGAME="$PLAY_GAMES/$GAME"

    list () {
        out "The installed games are:"
        for k in $PLAY_GAMES/*(.,@:t); do
            echo "\t> $k"
        done
    }
    
    if [[ -z $GAME || ! -e $DGAME ]]; then
        [[ ! -e $DGAME ]] && out "Game '$GAME' not found"
        list
        exit 1
    else
        out "Launching '$GAME'"
        load $GAME
        setenv
        execute
    fi
fi

# vim: foldmethod=marker