#! /bin/zsh

source ${0:h}/be-paths # ./be-paths

run-audio-experiment () {
    # $1 is iterations per system (default: 1)
    (($#)) || set 1
    local its=$1

    cd $SRC_PATH

    clear-exp-data
    be-init

    local ni=$EXPERIMENT_SIGNAL_PATH/no_interference
    local dnt=$EXPERIMENT_SIGNAL_PATH/do_not_throttle
    local dt=$EXPERIMENT_SIGNAL_PATH/throttle
    echo -n > $ni > $dnt > $dt

    # ~/public_html/hs-linux/sys/base-audio-2
    local system=base-audio-2
    local system_file=$PROJECT_PATH/sys/$system

    export AUDIO_OUTPUT=$AUDIO_OUTPUT_PATH/no_interference
    for i in {1..$its}; do
        echo "no BE ($i of $its)" > $EXPERIMENT_STATUS_FILE
        $SRC_PATH/hs -s $system -i -h -P -r -Q -p  2>> $ni
    done

    local sys_time_ms=`grep "Global lifetime:" $system_file | cut -d" " -f3`
    local sys_time=$(($sys_time_ms*$its/1000))
    local stress_time=$(($sys_time*3))
    local stress_its=10
    local stress_factor=1

    repeat $stress_its be-stress $stress_factor $stress_time &
    export AUDIO_OUTPUT=$AUDIO_OUTPUT_PATH/throttle
    for i in {1..$its}; do
        echo "tamed BE ($i of $its)" > $EXPERIMENT_STATUS_FILE
        $SRC_PATH/hs -s $system -i -h -P -r -Q -f  2>> $dt
    done
    killall -9 stress

    repeat $stress_its be-stress $stress_factor $stress_time &
    be-start
    export AUDIO_OUTPUT=$AUDIO_OUTPUT_PATH/do_not_throttle
    for i in {1..$its}; do
        echo "wild BE ($i of $its)" > $EXPERIMENT_STATUS_FILE
        $SRC_PATH/hs -s $system -i -h -P -r -Q -p  2>> $dnt
    done
    killall -9 stress

    echo "terminated" > $EXPERIMENT_STATUS_FILE

    local result_file_name=audio_results
    local result_file=${result_file_name}.png
    dumpx $result_file_name
    local inverted_file=${result_file_name}_i.png
    convert -negate $result_file $inverted_file
    mv -f $inverted_file ~/public_html/hs-linux/docs/report/pics/
    rm $result_file
}