#!/bin/sh

extract () {
    # keep old files here, so we dont overwrite any configs
    tar -h --keep-old-files -p -vvxf $1 -C ${SYSROOT} 2>${LOG_FILE} | grep -v ^d | tr -s " " | cut -d" " -f6 | cut -c2- 
}

install_package () {
    local pkg_file="$1"
    local name="$2"
    local info_file="$pkg_file.info"

    local installed_dir="${SYSROOT}${INSTALLED_DIR}/$name"
    local info="$installed_dir/info"
    local files="$installed_dir/files"
    local checksum="$installed_dir/checksum"

    set -- $(sha512sum $pkg_file)
    local package_checksum=$1
    if [ ! -f $checksum ] || [ "$(cat $checksum)" != "$package_checksum" ]; then

        [ ! -d $installed_dir ] && mkdir -p "$installed_dir"

        [ -f "$files" ] && {
            for file in $(cat $files); do
                [ -z "${file%%/etc*}" ] || 
                    rm -f ${SYSROOT}$file
            done
            rm $files
        }

        ${VERBOSE} && printf "${BLACK}Extracting $name...\n"

        # dont overwrite anything in /etc; this is where configs are saved
        # TODO define which files should be preserved
        extract $pkg_file > $files

        [ -f $info_file ] && cp $info_file $info
        echo $package_checksum > $checksum
        return 0
    fi
    ${VERBOSE} && printf "${BLACK}Skipping $name; already installed...\n"
    return 1
}

get_package_filecount() {
    set -- $(get_package_download_info $1)
    echo $4
}

total_filecount() {
    local packages=$@
    local count=0
    for package in $packages; do
        c=$(tar -tvvf $package | grep -v ^d | wc -l)
        count=$((count+c))
    done
    echo $count
}

run_postinstall () {
    postinstall="${SYSROOT}/var/lib/xipkg/postinstall"
    [ -d $postinstall ] &&
        for f in $(ls $postinstall); do
            file=$postinstall/$f

            chmod 755 $file

            [ "${SYSROOT}" = "/" ] && {
                sh "/var/lib/xipkg/postinstall/$f" 2> ${LOG_FILE} > ${LOG_FILE}

            } || {
                xichroot ${SYSROOT} "/var/lib/xipkg/postinstall/$f" 2> ${LOG_FILE} > ${LOG_FILE}

            } 
        
            [ "$?" = "0" ] && {
                rm $file &&
                printf "${GREEN}${CHECKMARK} postinstall $f!\n"
            } || {
                ${QUIET} || printf "${RED}${CROSSMARK} failed postinstall $f!\n"
            }

        done 
}


install () {
    local packages=$@
    ${VERBOSE} && printf "${BLACK}Requested to install: $@\n${RESET}"

    if [ "$#" = "0" ]; then
        packages=$(ls ${SYSROOT}${INSTALLED_DIR})
    fi

    local missing=""
    for package in $packages; do
        [ ! -f $package ] && missing="$missing $(basename $package)"
    done

    if [ "${#missing}" != "0" ]; then
        ${VERBOSE} && printf "${BLACK}couldnt find: $missing\n${RESET}"
    else
        
        local total=$(total_filecount $packages 2>/dev/null || echo 1)
        local files_files=""
        for package in $packages; do
            local name=$(basename $package .xipkg | cut -d. -f2)
            ${VERBOSE} && printf "${BLACK}installing $name from $package \n${RESET}"
            install_package $package $name &

            mkdir -p "${SYSROOT}${INSTALLED_DIR}/$name/"
            filelist="${SYSROOT}${INSTALLED_DIR}/$name/files"
            touch $filelist
            files_files="$files_files $filelist"
        done
        wait_for_extract $total ${files_files}
        run_postinstall
    fi
}

reinstall () {  
    local packages=$@
    remove $@
    install $@
}

do_install () {
    [ "$#" = "0" ] && set -- $(installed)

    toinstall=${CACHE_DIR}/toinstall

    echo "" > $toinstall
    tofetch=""
    for f in $@; do
        [ -f "$f" ] && echo $f >> $toinstall || tofetch="$tofetch$f "
    done

    get $tofetch
    install $(cat $toinstall)
}