dot

#!/bin/bash

function	module::install()
{
	local	module="${1}"
	local	install_file="${MODS_DIR_BASE}/${module}/install"
	local	config_file="${MODS_DIR_BASE}/${module}/${MOD_CONFIG_FILE}"
	local	tmp_func

	# source module config file
	[ -f "${config_file}" ] && source "${config_file}" || true


	# source module install file
	if [ "${BASH_SOURCE[0]}" -ef "${0}" ]; then
		source "${install_file}"
	fi

	for prefix in ${PREFIX_INSTALL_MODULE[@]}; do
		tmp_func="${prefix}::${module}"
		[ "$(type -t ${tmp_func})" == "function" ] && ${tmp_func}
	done
}

: ' install function for all modules
    DO_MODULE : specific array to do
    if len DO_MODULE == 0 do all
'
function	modules::install()
{
	if [ "${#DO_MODULE[@]}" == 0 ]; then
		DO_MODULE=(${MODULE[@]})
		for module in ${INGORED_MODULE[@]}; do
			DO_MODULE=(${DO_MODULE[@]//${module}})
		done
	fi
	for module in ${DO_MODULE[*]}; do
		log::info "installing ${ORE}${module}${RST}"
		((LOG_LEVEL++))
		module::install "${module}"
		((LOG_LEVEL--))
		log::pass "installed ${ORE}${module}${RST}"
	done
}

function	dot::update()
{
	log::main_title "${GRE}Checking update${RST}" 1 "${LCYA}" 1
	utils::update_repo "https://github.com/Pixailz/dot_files" "${DOT_INSTALL_DIR}"
	utils::update_repo "https://github.com/Pixailz/lib_bash" "${DIR_LIB_BASH%\/*}"
}

# print help and quit
function	usage()
{
	# opt_usage
	printf "%b: ${SCRIPT_NAME} " "${P_USAGE}"
	printf "[-f|-n] [-p PART1... PARTN]\n"
	# desc
	printf "\tscripts to manage openvpn server docker\n"

	printf "\n\t1. Base\n"
	printf "\t\tflag available everywhere\n"
	parse::print_usage "h" "help" "Display the help then exit."
	parse::print_usage "" "version" "Display the version then exit."
	parse::print_usage "" "no-color" "disable all color"
	parse::print_usage "f" "force" "To force install"
	parse::print_usage "u" "update" "Update this script and lib_bash"
	parse::print_usage "p" "part" "install part, available part:"
	for part in ${MODULE[@]}; do
		parse::print_usage "" "" "    - ${part}"
	done
	parse::print_usage "" "" "should be at the end of command"
	printf "\n"
	parse::print_infos

	#printf "  -u, --user        install for specified user, default to current"
	#TODO
}

function	is::option()
{
	local	options_str=${1}

	if [[ ${options_str} =~ --.* ]]; then
		return 1
	elif [[ ${options_str} =~ -.* ]]; then
		return 2
	else
		return 0
	fi
}

: ' parse::short
    parse space separated and option separated
'
function	parse::short()
{
	local	to_shift=0

	PARSED_ARG=()
	shift
	for item in ${*}; do
		is::option ${item}
		[ ${?} != 0 ] && break
		PARSED_ARG[${#PARSED_ARG[@]}]=${item}
	done
	return ${#PARSED_ARG[@]}
}

function	parse::post_parsing()
{
	local	is_good

	if [ "${HAVE_PART}" == "1" ] && [ "${#DO_MODULE[@]}" == 0 ]; then
		print::warn "wrong usage. see --help"
		usage
	fi
	for to_str in ${DO_MODULE[@]}; do
		is_good=0
		for from_str in "${MODULE[@]}"; do
			if [ "${to_str}" == "${from_str}" ]; then
				is_good=1
				break
			fi
		done
		if [ "${is_good}" != 1 ]; then
			print::warn "wrong ${GRE}part name${RST} ${RED}${to_str}${RST}"
			usage
			exit 1
		fi
	done
}

# pars args, keep parsing even if launch modules
## if -f, --force				set FORCE_INSTALL=1
## if -n, --no-color			disable_color
## if -h, --help				help

## if -p, --part				set DO_MODULE=part1 ... partn

## -p && -a						false
## -f|-n && -p | --part | -all		true
function	parse::arg()
{
	HAVE_PART=0
	DO_MODULE=()

	# is launched by module
	[ "${0}" == "${1}" ] && shift 1

	while [ "${1:-}" != "" ]; do
		case "${1}" in
			-f|--force)
				export FORCE_MOVE=1
				;;
			-h|--help)
				usage
				exit
				;;
			-p|--part)
				parse::short ${*}
				shift $?
				DO_MODULE=${PARSED_ARG[*]}
				HAVE_PART=1
				;;
			-n|--no-color)
				NO_ANSI=1
				ansi::toggle_color
				;;
			-u|--update)
				dot::update
				exit
				;;
			-l|--no-log)
				DONT_PRINT=1
				;;
			*)
				print::warn "wrong options ${RED}[${RST}${1}${RED}]${RST}"
				# usage
				exit
				;;
		esac
		shift
	done
	parse::post_parsing
}

# install lib_bash
DIR_LIB_BASH="${HOME}/.local/lib/lib_bash"
[ ! -d "${DIR_LIB_BASH}" ] && \
	bash -c "$(curl -sL https://bit.ly/lib_bash)"

# source .config
source "${DIR_LIB_BASH}/.config"

# test if work, in this case update lib_bash
# cli::update

# source .config
PATH_CONFIG=$(realpath ${BASH_SOURCE[0]})
DIR_BASE=${PATH_CONFIG%/*}
source "${DIR_BASE}/.config"

parse::arg ${*}

log::main_title "${GRE}DOT FILES${RST}" 1 "${RED}" 1

# if not sourced, BASH_SOURCE keep current file when $0 keep launched file
[ "${BASH_SOURCE[0]}" -ef "${0}" ] && modules::install

LOG_PAD_STR="${LOG_PAD_STR_BAK}"

exit

function	menu::set::title()
{
	TO_RENDER_TITLE="\x1b[0;0HTITLE v1.0.0"
}

function	menu::set::date()
{
	printf -v TO_RENDER_DATE '%(%d-%m-%Y %H:%M:%S)T' -1
	local	pos=$((SCREEN_SIZE[1] - ${#TO_RENDER_DATE} + 1))
	TO_RENDER_DATE="\x1b[0;${pos}H${TO_RENDER_DATE}\n\n"
}

function	menu::set::item()
{
	local	i=1
	TO_RENDER_ITEM="Choose a module to run in the list below and press enter:\n\n"

	for mods in ${MODULE[@]}; do
		if [ "${i}" == "${SEL_ID}" ]; then
			TO_RENDER_ITEM+="- ${SEL_FMT_BEG}${mods}${SEL_FMT_END}\n"
		else
			TO_RENDER_ITEM+="- ${mods}\n"
		fi
		((i++))
	done
}

SCREEN_SIZE=($(echo -e "lines\ncols"|tput -S))
SEL_ID=1
SEL_MAX=
SEL_FMT_BEG="\x1b[3m\x1b[5m\x1b[4m\x1b[7m\x1b[1;32m"
SEL_FMT_END="\x1b[0m"
menu::set::title

function	render::menu()
{
	printf "${CLR_SCR}"
	menu::set::date
	menu::set::item
	TO_RENDER="${TO_RENDER_TITLE}${TO_RENDER_DATE}${TO_RENDER_ITEM}"
	printf "%b" "${TO_RENDER}"
}

function	post_key_press()
{
	if [ "${KEY_PRESS}" == "UP" -a ${SEL_ID} -gt 1 ]; then
		((SEL_ID--))
	elif [ "${KEY_PRESS}" == "DOWN" -a ${SEL_ID} -lt ${#MODULE[@]} ]; then
		((SEL_ID++))
	fi
}

# https://abs.traduc.org/abs-fr/ch05s02.html (chapter 5.3)
function	key_press()
{
	unset T1 T2 T3 KEY_PRESS
	read -s -N1 T1
	read -s -N2 -t 0.001 T2
	read -s -N1 -t 0.001 T3
	local	mode="$T1$T2$T3"

	case "${mode}" in
		$'\x1b\x5b\x41')		KEY_PRESS="UP" ;;		# UP ARROW
		$'\x77')				KEY_PRESS="UP" ;;		# 'w'
		$'\x1b\x5b\x42')		KEY_PRESS="DOWN" ;;		# DOWN ARROW
		$'\x73')				KEY_PRESS="DOWN" ;;		# 's'
		$'\x1b\x5b\x43')		KEY_PRESS="LEFT" ;;		# LEFT ARROW
		$'\x61')				KEY_PRESS="LEFT" ;;		# 's'
		$'\x1b\x5b\x44')		KEY_PRESS="RIGHT" ;;	# RIGHT ARROW
		$'\x64')				KEY_PRESS="RIGHT" ;;	# 'd'
		$'\x0a')				KEY_PRESS="ENTER" ;;	# ENTER
		*)
			printf "UNKNOWN KEY 0x$(printf '%b' ${mode} | xxd -ps)\n"
			KEY_PRESS="UNKNOWN"
		;;
	esac
	post_key_press
	render::menu
	printf "KEY ${KEY_PRESS} PRESSED\n"
}

render::menu

# keypress
while key_press; do :; done