#!/bin/sh

# Auteur : LMQT (forum Jeedom)
# Propos : afficher des informations formatées et suivant un template, sur un écran LCD
# Version : 1.0 (13/04/2024)

# INSTRUCTIONS POUR LA COMMANDE "printf" : printf "%x" "chaine"
# Le premier argument, entre guillemets, est optionnel. Il sert à indiquer un formatage quelconque de ce qui va suivre.
# Le ou les arguments suivants sont les chaînes de caractères à afficher.
# Quelques codes de formatage :
# %b : sert à dire qu'il faudra interpréter les caractères d'échappements de la chaîne (saut de ligne \n par exemple).
# %f : permet de transformer une valeur en variable avec virgule.
#      si veut formater, on peut l'indiquer devant le "f" par exemple avec "%6.3f" qui indique que la chaîne de sortie
#      occupera 6 caractères au total et qu'il y aura 3 chiffres après la virgule (obligatoirement un point en fait).
# %i : transforme une valeur en variable entière.
# %d : traite la valeur en entier. On peut utiliser "%5d" par exemple pour la transformer en entier sur 5 caractères.
# %s : traite la valeur en texte. "%10s" la formate avec des espaces devant jusqu'à arriver à 10 caractères au total.
#                                 "%-10s" fait pareil, mais ajoute les espaces derrière la valeur.
# Si on veut ajouter du texte avant le formatage, le mettre avant la formule "%f". Si c'est après qu'on le veut,
#      on ajoute ledit texte juste après le "%f".
#      Exemple : "=%6.3f kW" "$variable" affichera qqch comme '=12.345 kW'


# Variables pour définir codage région :
export LC_ALL=C
export LC_NUMERIC=C

# Variables pour effets et couleurs à l'écran :
# La commande d'échappement ANSI est à saisir sous cette forme :
#	\033[<style>;<foreground>;<background>m
# NOTA :
# - on peut ne saisir qu'un seul argument, ou deux, ou les trois.
# - il semble que les saisir dans cet ordre 1 2 3 facilite les choses quand on les concatène.
# Infos ici : https://en.wikipedia.org/wiki/ANSI_escape_code
# 1) Effets de texte (optionel) :
v_txt_normal="\033[0m"       # Normal, aucun effet (= reset)
v_txt_clair="\033[1m"        # clair
v_txt_sombre="\033[2m"       # sombre (ne fonctionne pas sur LCD MHS35)
v_txt_souligne="\033[4m"     # souligné (ne fonctionne pas sur LCD MHS35)
v_txt_fondgris="\033[5m"     # fond gris
v_txt_inverse="\033[7m"      # inverse texte (foreground) et fond (background)
# 2) Couleurs de texte (foreground) :
v_txt_fg_noir="\033[30m"
v_txt_fg_rouge="\033[31m"
v_txt_fg_vert="\033[32m"
v_txt_fg_jaune="\033[33m"
v_txt_fg_bleu="\033[34m"
v_txt_fg_magenta="\033[35m"
v_txt_fg_cyan="\033[36m"
v_txt_fg_blanc="\033[37m"
# 2) Couleurs de fond (background) (optionel) :
v_txt_bg_noir="\033[40m"
v_txt_bg_rouge="\033[41m"
v_txt_bg_vert="\033[42m"
v_txt_bg_jaune="\033[43m"
v_txt_bg_bleu="\033[44m"
v_txt_bg_magenta="\033[45m"
v_txt_bg_cyan="\033[46m"
v_txt_bg_blanc="\033[47m"
# Commandes diverses :
v_txt_clr_lgn="\033[0K"      # Efface du curseur, au bout de la ligne

# Variables diverses :
v_deja_fait=0	# Pour savoir si on a déjà affiché les stats histo ou pas encore.

# Fonction d'initialisation de l'affichage :
init(){
	# On reset les effets de texte :
	printf "${v_txt_normal}"
	# On cache le surseur ("?25l") :
	printf '\e[?25l'
	# On le positionne en y1,x1 (nota : "H" = "1;1H"), efface l'écran entier ("2J"), efface le buffer ("3J") :
	printf '\e[1;1H\e[2J\e[3J'
	# On affiche le template :
	printf "\e[3;10H"
	printf "%b" "│CONSO │AUTO-C│VENTE\n"
	printf "%b" "${v_txt_clair}Pi     kW${v_txt_normal}│      │      │\n"
	printf "%b" "${v_txt_clair}Σ J   kWh${v_txt_normal}│      │      │\n"
	printf "%b" "Σ J-1 kWh│      │      │\n"
	printf "%b" "Σ J-2 kWh│      │      │"
}


# Fonction de requêtage et d'affichage des informations :
main(){
	# On affiche l'heure de récup des valeurs instantannées, en blanc vif :
	printf "\e[1;1H"
	printf "%b" "${v_txt_clair}${v_txt_fg_blanc}Jour:`date +%T`${v_txt_normal} │"
	
	# Récupérations des infos de Jeedom :
	# On définit un timeout de 2" pour la connexion au serveur et de 4" de l'essai de connexion à l'obtention de sa réponse
	v_conso=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=12422")
	v_vente=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=12428")
	v_auto_conso=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=13929")
	v_conso_jour=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=3619")
	v_vente_jour=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=3670")
	v_auto_conso_jour=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=13931")
	# Affichage de ces infos :
	printf "\e[4;11H"; printf "${v_txt_clair}${v_txt_fg_rouge}%6.3f" "$v_conso" 
	printf "\e[4;18H"; printf "${v_txt_clair}${v_txt_fg_vert}%6.3f" "$v_auto_conso"
	printf "\e[4;25H"; printf "${v_txt_clair}${v_txt_fg_jaune}%6.3f" "$v_vente"
	printf "\e[5;11H"; printf "${v_txt_clair}${v_txt_fg_rouge}%6.3f" "$v_conso_jour"
	printf "\e[5;18H"; printf "${v_txt_clair}${v_txt_fg_vert}%6.3f" "$v_auto_conso_jour"
	printf "\e[5;25H"; printf "${v_txt_clair}${v_txt_fg_jaune}%6.3f" "$v_vente_jour"

	# DEBUT - Test si 1ère minute de chaque heure
	# Si oui, ou si jamais fait, on va chercher les stats étendues :
	v_test_heure=$(date +%M)
	if [ $v_test_heure -eq 0 -o $v_deja_fait -eq 0 ]; then
		printf "\e[1;17H"
		printf "%b" "${v_txt_normal}Histo:`date +%T`"	# Heure de récup des stats histo, en blanc normal
		v_deja_fait=1
		v_conso_veille=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=3622")
		v_vente_veille=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=3676")
		v_auto_conso_veille=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=12501")
		v_conso_avant_veille=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=14493")
		v_vente_avant_veille=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=14492")
		v_auto_conso_avant_veille=$(curl --connect-timeout 2 --max-time 4 -s "http://aaa.bbb.ccc.ddd/core/api/jeeApi.php?apikey=XXXXXXXXXX&type=cmd&id=14491")
		printf "\e[6;11H"; printf "${v_txt_normal}${v_txt_fg_rouge}%6.3f" "$v_conso_veille"
		printf "\e[6;18H"; printf "${v_txt_normal}${v_txt_fg_vert}%6.3f" "$v_auto_conso_veille"
		printf "\e[6;25H"; printf "${v_txt_normal}${v_txt_fg_jaune}%6.3f" "$v_vente_veille"
		
		printf "\e[7;11H"; printf "${v_txt_normal}${v_txt_fg_rouge}%6.3f" "$v_conso_avant_veille"
		printf "\e[7;18H"; printf "${v_txt_normal}${v_txt_fg_vert}%6.3f" "$v_auto_conso_avant_veille"
		printf "\e[7;25H"; printf "${v_txt_normal}${v_txt_fg_jaune}%6.3f" "$v_vente_avant_veille"
	fi
	# FIN - Test si 1ère minute de chaque heure

	# On affiche la suite des infos, l'espace disque libre :
	printf "\e[9;1H"
	# sous la forme => « 2.2G / 14G (17%) »
		#printf "%b" "${v_txt_normal}SD used: $(df -h | grep 'root' | head -1 | awk '{ print $3,"/ "$2,"("$5")" }')"
		#printf "%b" "${v_txt_normal}SD used: $(df -h /root | awk 'NR==2 { print $3,"/ "$2,"("$5")" }')"
	# sous la forme => « 12G (83%) » (plus court)
		printf "%b" "${v_txt_normal}SD free: $(df -h /root | awk 'NR==2 {gsub(/%/,"",$5); print $4 " ("100 - $5"%)"}')"
	# l'uptime :
	printf "\e[10;1H"
	printf "UpTime :"
	#printf "%b" "UpTime : $(uptime -p | awk '{ print $2 "j," $4"h"$6"m" }')"	# OK seulement si on a dépassé 1 jour, sinon les colonnes sont décalées !
	v_uptime=$(uptime | awk -F'( |,|:)+' '{d=h=m=0; if ($7=="min") m=$6; else {if ($7~/^day/) {d=$6;h=$8;m=$9} else {h=$6;m=$7}}} {print d,"j,",h,"h,",m,"m"}')
	v_uptime=$(echo $v_uptime | tr -d ' ' | tr ',' ' ') # On supprime les espaces, puis on remplace les virgules par des espaces
	printf "\e[10;9H"
	printf "%12s" "${v_uptime}"	# On ajoute des espaces devant la chaîne pour qu'elle occupe 12 caractères.
	# la température :
	printf "\e[10;22H"
	printf "%b" "│ CPU:$(($(cat /sys/class/thermal/thermal_zone0/temp)/1000))°"
}

# Fonction d'affichage de test des couleurs :
affichage_test(){
	# On positionne le curseur en y1,x1 ("H" ou "1;1H"), efface l'écran entier ("2J"), efface le buffer ("3J") :
	printf '\e[1;1H\e[2J\e[3J'
	# On reset les effets de texte :
	printf "${v_txt_normal}"
	printf "%b" "═════════════TEST═════════════\n"
	printf "${v_txt_inverse}${v_txt_fg_noir}NOIR${v_txt_normal}    | ${v_txt_fg_noir}NOIR    | ${v_txt_clair}${v_txt_fg_noir}NOIR\n"
	printf "${v_txt_inverse}${v_txt_fg_rouge}ROUGE${v_txt_normal}   | ${v_txt_fg_rouge}ROUGE   | ${v_txt_clair}${v_txt_fg_rouge}ROUGE\n"
	printf "${v_txt_inverse}${v_txt_fg_vert}VERT${v_txt_normal}    | ${v_txt_fg_vert}VERT    | ${v_txt_clair}${v_txt_fg_vert}VERT\n"
	printf "${v_txt_inverse}${v_txt_fg_jaune}JAUNE${v_txt_normal}   | ${v_txt_fg_jaune}JAUNE   | ${v_txt_clair}${v_txt_fg_jaune}JAUNE\n"
	printf "${v_txt_inverse}${v_txt_fg_bleu}BLEU${v_txt_normal}    | ${v_txt_fg_bleu}BLEU    | ${v_txt_clair}${v_txt_fg_bleu}BLEU\n"
	printf "${v_txt_inverse}${v_txt_fg_magenta}MAGENTA${v_txt_normal} | ${v_txt_fg_magenta}MAGENTA | ${v_txt_clair}${v_txt_fg_magenta}MAGENTA\n"
	printf "${v_txt_inverse}${v_txt_fg_cyan}CYAN${v_txt_normal}    | ${v_txt_fg_cyan}CYAN    | ${v_txt_clair}${v_txt_fg_cyan}CYAN\n"
	printf "${v_txt_inverse}${v_txt_fg_blanc}BLANC${v_txt_normal}   | ${v_txt_fg_blanc}BLANC   | ${v_txt_clair}${v_txt_fg_blanc}BLANC\n"
	printf "${v_txt_normal}══════════════════════════════"
}


# Fonction d'interception des sorties du script :
CleanExit(){
	err=$?						# sauve l'éventuel code erreur de sortie.
	printf "%b" "\nBye bye\n"	# affiche un message de sortie.
	printf '\e[?25h'			# réaffiche le curseur.
	printf "${v_txt_normal}"	# reset les effets de texte.
	exit $err					# quitte en rétablissant le code d'erreur trouvé précédemment.
}

# -----------------------------------------------------------------------------
# Là on exécute le programme en lui-même :

trap 'CleanExit' INT TERM EXIT	# Interception de sortie pour rétablir le clignotement du curseur

affichage_test	# On affiche un test sur l'écran.
sleep 5			# On patiente qq secondes pour qu'il soit lu si besoin.

init			# On prépare l'écran et le template.

# Boucle infinie pour que le programme ne s'arrête jamais (c'est le but d'un service) :
#for (( ; ; ))
while true
do
	main
	sleep 20		# On rafraîchit les data toutes les 20s (pour ne pas surcharger de wget !).
done