feat: tinkerforge warp: disable phase auto switch on startup

Author: lehmanju

charger/warp-http.go

@@ -76,6 +76,10 @@ func NewWarpHTTPFromConfig(other map[string]any) (api.Charger, error) {
 		}
 	}
 
+	if err := wb.disablePhaseAutoSwitch(); err != nil {
+		wb.log.INFO.Printf("disabling phase auto switch skipped: %v", err)
+	}
+
 	return decorateWarpHTTP(wb, currentPower, totalEnergy, currents, voltages, identity, phases, getPhases), nil
 }
 
@@ -248,6 +252,19 @@ func (wb *WarpHTTP) identify() (string, error) {
 	return res.AuthorizationInfo.TagId, err
 }
 
+func (wb *WarpHTTP) disablePhaseAutoSwitch() error {
+	uri := fmt.Sprintf("%s/evse/phase_auto_switch", wb.uri)
+	data := map[string]bool{"enabled": false}
+
+	req, err := request.New(http.MethodPut, uri, request.MarshalJSON(data), request.JSONEncoding)
+	if err != nil {
+		return err
+	}
+
+	var res interface{}
+	return wb.DoJSON(req, &res)
+}
+
 func (wb *WarpHTTP) emState() (warp.EmState, error) {
 	var res warp.EmState
 	uri := fmt.Sprintf("%s/power_manager/state", wb.emURI)