main.sh

#!/bin/bash

OPENWBBASEDIR=$(cd `dirname $0`/../../ && pwd)
RAMDISKDIR="$OPENWBBASEDIR/ramdisk"
MODULEDIR=$(cd `dirname $0` && pwd)
DMOD="EVSOC"
CHARGEPOINT=$1

# check if config file is already in env
if [[ -z "$debug" ]]; then
	echo "soc_mypeugeot: Seems like openwb.conf is not loaded. Reading file."
	# try to load config
	. $OPENWBBASEDIR/loadconfig.sh
	# load helperFunctions
	. $OPENWBBASEDIR/helperFunctions.sh
fi

case $CHARGEPOINT in
	2)
		# second charge point
		manualSocFile="$RAMDISKDIR/manual_soc_lp2"
		manualMeterFile="$RAMDISKDIR/manual_soc_meter_lp2"
		socFile="$RAMDISKDIR/soc1"
		soctimerfile="$RAMDISKDIR/soctimer1"
		socIntervall=1 # update every 20 seconds if script is called every 10 seconds
		peugeotSocFile="$RAMDISKDIR/peugeotsoc1"
		peugeotSocTime="$RAMDISKDIR/peugeotsoctime1"
		socOnlineIntervall=60 # update every 10 minutes if script is called every 10 seconds
		meterFile="$RAMDISKDIR/llkwhs1"
		ladungaktivFile="$RAMDISKDIR/ladungaktivlp2"
		akkug=$akkuglp2
		efficiency=$wirkungsgradlp2
		username=$mypeugeot_userlp2
		password=$mypeugeot_passlp2
		clientId=$mypeugeot_clientidlp2
		clientSecret=$mypeugeot_clientsecretlp2
		soccalc=$mypeugeot_soccalclp2
		chargestat=$(</var/www/html/openWB/ramdisk/chargestats1)
		;;
	*)
		# defaults to first charge point for backward compatibility
		# set CHARGEPOINT in case it is empty (needed for logging)
		CHARGEPOINT=1
		manualSocFile="$RAMDISKDIR/manual_soc_lp1"
		manualMeterFile="$RAMDISKDIR/manual_soc_meter_lp1"
		socFile="$RAMDISKDIR/soc"
		soctimerfile="$RAMDISKDIR/soctimer"
		socIntervall=1 # update every 20 seconds if script is called every 10 seconds
		peugeotSocFile="$RAMDISKDIR/peugeotsoc"
		peugeotSocTime="$RAMDISKDIR/peugeotsoctime"
		socOnlineIntervall=60 # update every 10 minutes if script is called every 10 seconds
		meterFile="$RAMDISKDIR/llkwh"
		ladungaktivFile="$RAMDISKDIR/ladungaktivlp1"
		akkug=$akkuglp1
		efficiency=$wirkungsgradlp1
		username=$mypeugeot_userlp1
		password=$mypeugeot_passlp1
		clientId=$mypeugeot_clientidlp1
		clientSecret=$mypeugeot_clientsecretlp1
		soccalc=$mypeugeot_soccalclp1
		chargestat=$(</var/www/html/openWB/ramdisk/chargestat)
		;;
esac

incrementTimer(){
	case $dspeed in
		1)
			# Regelgeschwindigkeit 10 Sekunden
			ticksize=1
			;;
		2)
			# Regelgeschwindigkeit 20 Sekunden
			ticksize=2
			;;
		3)
			# Regelgeschwindigkeit 60 Sekunden
			ticksize=1
			;;
		*)
			# Regelgeschwindigkeit unbekannt
			ticksize=1
			;;
	esac
	soctimer=$((soctimer+$ticksize))
	echo $soctimer > $soctimerfile
}

soctimer=$(<$soctimerfile)
openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: timer = $soctimer"

if (($soccalc == 0)); then #manual calculation not enabled, using existing logic
	if (( timer < $socOnlineIntervall )); then
		incrementTimer
	else
		echo 0 > $soctimerfile
		sudo python $MODULEDIR/peugeotsoc.py $CHARGEPOINT $username $password $clientId $clientSecret $soccalc
	fi
else	# manual calculation enabled, combining PSA module with manual calc method
	# if charging started this round fetch once from myPeugeot out of order
	if [[ $(<$ladungaktivFile) == 1 ]] && [ "$ladungaktivFile" -nt "$manualSocFile" ]; then
		openwbDebugLog ${DMOD} 0 "Lp$CHARGEPOINT: Ladestatus changed to charging. Fetching SoC from myPeugeot out of order."
		soctimer=0
		echo 0 > $soctimerfile
		sudo python $MODULEDIR/peugeotsoc.py $CHARGEPOINT $username $password $clientId $clientSecret $soccalc
		echo $(<$peugeotSocFile) > $socFile
		echo $(<$peugeotSocFile) > $manualSocFile
		openwbDebugLog ${DMOD} 0 "Lp$CHARGEPOINT: Fetched from myPeugeot: $(<$peugeotSocFile)%"
	fi

	# if charging ist not active fetch SoC from myPeugeot
	if [[ $chargestat == "0" ]]; then
		if (( soctimer < $socOnlineIntervall )); then
			openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: Nothing to do yet. Incrementing timer. Extralong myPeugeot wait: $soctimer"
			incrementTimer
		else
			openwbDebugLog ${DMOD} 0 "Lp$CHARGEPOINT: Fetching SoC from myPeugeot"
			echo 0 > $soctimerfile
			sudo python $MODULEDIR/peugeotsoc.py $CHARGEPOINT $username $password $clientId $clientSecret $soccalc
			dateofSoc=$(($(stat -c %Y "$socFile"))) # getting file mofified date in epoch
			diff=$(($dateofSoc - $(<$peugeotSocTime)))
			openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: Time of known SoC:   $(date -d @$dateofSoc +'%F %T')" # debug logging in readable time format
			openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: Time of fetched SoC: $(date -d @$(<$peugeotSocTime) +'%F %T')"
			openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: Fetched SoC time difference is $diff s"
			
			# if fetched SoC is newer than manualSoC
			if (( $diff < 0 )); then
				echo $(<$peugeotSocFile) > $socFile
				echo $(<$peugeotSocFile) > $manualSocFile
				openwbDebugLog ${DMOD} 0 "Lp$CHARGEPOINT: Fetched from myPeugeot: $(<$peugeotSocFile)% and using it."
			# if SoC is 0, so probably there ist no valid SoC known
			elif (( $(($(<$socFile))) == 0 )); then
				echo $(<$peugeotSocFile) > $socFile
				echo $(<$peugeotSocFile) > $manualSocFile
				openwbDebugLog ${DMOD} 0 "Lp$CHARGEPOINT: Fetched from myPeugeot: $(<$peugeotSocFile)% and using it as previous SoC was 0."
			else
				openwbDebugLog ${DMOD} 0 "Lp$CHARGEPOINT: Fetched from myPeugeot: $(<$peugeotSocFile)% but skipping as not newer than current known SoC."
			fi
		fi
	# if charging is active calculate SoC manually
	else
		if (( soctimer < socIntervall )); then
			openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: Nothing to do yet. Incrementing timer."
			incrementTimer
		else
			openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: Calculating manual SoC"
			# reset timer
			echo 0 > $soctimerfile

			# read current meter
			if [[ -f "$meterFile" ]]; then
				currentMeter=$(<$meterFile)
				openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: currentMeter: $currentMeter"

				# read manual Soc
				if [[ -f "$manualSocFile" ]]; then
					manualSoc=$(<$manualSocFile)
				else
					# set manualSoc to 0 as a starting point
					manualSoc=0
					echo $manualSoc > $manualSocFile
				fi
				openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: manual SoC: $manualSoc"

				# read manualMeterFile if file exists and manualMeterFile is newer than manualSocFile
				if [[ -f "$manualMeterFile" ]] && [ "$manualMeterFile" -nt "$manualSocFile" ]; then
					manualMeter=$(<$manualMeterFile)
				else
					# manualMeterFile does not exist or is outdated
					# update manualMeter with currentMeter
					manualMeter=$currentMeter
					echo $manualMeter > $manualMeterFile
				fi
				openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: manualMeter: $manualMeter"

				# read current soc
				if [[ -f "$socFile" ]]; then
					currentSoc=$(<$socFile)
				else
					currentSoc=$manualSoc
					echo $currentSoc > $socFile
				fi
				openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: currentSoc: $currentSoc"

				# calculate newSoc
				currentMeterDiff=$(echo "scale=5;$currentMeter - $manualMeter" | bc)
				openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: currentMeterDiff: $currentMeterDiff"
				currentEffectiveMeterDiff=$(echo "scale=5;$currentMeterDiff * $efficiency / 100" | bc)
				openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: currentEffectiveMeterDiff: $currentEffectiveMeterDiff ($efficiency %)"
				currentSocDiff=$(echo "scale=5;100 / $akkug * $currentEffectiveMeterDiff" | bc | sed 's/\..*$//')
				openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: currentSocDiff: $currentSocDiff"
				newSoc=$(echo "$manualSoc + $currentSocDiff" | bc)
				if (( newSoc > 100 )); then
					openwbDebugLog ${DMOD} 0 "Lp$CHARGEPOINT: newSoC above 100, setting to 100."
					newSoc=100
				fi
				if (( newSoc < 0 )); then
					openwbDebugLog ${DMOD} 0 "Lp$CHARGEPOINT: newSoC below 100, setting to 0."
					newSoc=0
				fi
				openwbDebugLog ${DMOD} 1 "Lp$CHARGEPOINT: newSoc: $newSoc"
				echo $newSoc > $socFile
			else
				# no current meter value for calculation -> Exit
				openwbDebugLog ${DMOD} 0 "Lp$CHARGEPOINT: ERROR: no meter value for calculation! ($meterFile)"
			fi
		fi
	fi
fi