<?php

namespace ADBRimoImport\ADBAddressHelper;

class AddressHelper {
  private $log;
  private $db;
  private $netzgebiet;
  private $NetworkHelper;
  
  public function __construct($dependencies = []) {
    foreach(["log", "db", "netzgebiet"] as $type) {
      if(array_key_exists($type, $dependencies)) {
        $this->$type = $dependencies[$type];
      }
    }
    
    // load network helper
    if($this->netzgebiet && $this->netzgebiet->extref) {
      // get netzgebiet extref and make classname
      $network_extref = $this->netzgebiet->extref;
      $network_id = preg_replace('/[^a-zA-Z0-9]/', '_', $network_extref);
      $network_helper_name = "ADBRimoImport\\ADBAddressHelper\\Network\\Network_$network_id";
      
      // find network helper class
      $network_helper_dir = __DIR__."/Network";
      $network_helper_filename = "Network-$network_extref";
      
      $dir = opendir($network_helper_dir);
      while($filename = readdir($dir)) {
        if(preg_match('/^'.$network_helper_filename.'-/', $filename)) {
          require_once($network_helper_dir."/$filename");
        }
      }
      
      $network_helper = new $network_helper_name();
      $this->NetworkHelper = $network_helper;
    } else {
      die("Netzgebiet hat keine extref (".$this->netzgebiet->id.": ".$this->netzgebiet->name.")");
    }
    
  }
  
  
  public function splitStreetHausnummer($strasse_hausnummer) {
    $strasse_name = "";
    $hausnummer_name = "";
    $addresszusatz = "";
    
    $m = [];
    if(preg_match('/^(\D+)\s+(\d+[a-z0-9\/&#._-]*)(?:\s+((?:gesch(?:ae|ä)ft|werkstatt|betrieb und wohnungen|stg|paketlogistik|cafe|pavillon|pfarrheim|[^ ]*haus|[^ ]*geb(?:ae|ä)ude|[^ ]*halle|[^ ]*schule|Öhlmühle)(?:\s+[a-z0-9]+)?))?/i', $strasse_hausnummer, $m)) {
      $strasse_name = trim($m[1]);
      $hausnummer_name = trim($m[2]);
      if(array_key_exists(3, $m)) {
        $addresszusatz = trim($m[3]);
      }
    } elseif(preg_match('/^(.+)\s+(\d+[a-z0-9\/&#._-]*)(.+)?/i', $strasse_hausnummer, $m)) {
      $strasse_name = trim($m[1]);
      $hausnummer_name = trim($m[2]);
      if(array_key_exists(3, $m)) {
        $addresszusatz = trim($m[3]);
      }
    } elseif(preg_match('/^(.+)/i', $strasse_hausnummer, $m)) {
      // ignore GST objects
      return false;
      $strasse_name = trim($m[1]);
    }
    
    return [$strasse_name, $hausnummer_name, $addresszusatz];
  }
  
  public function findAddressFromRimoBuilding($building) {
    $hausnummer = false;
    
    echo "===================================\n";
    
    $rimo_id = trim($building->id);
    
    if(!$rimo_id) {
      return false;
    }
    
    $name = trim($building->name);
    
    $strasse_hausnummer = trim($building->address->name);
    [$strasse_name, $hausnummer_name, $addresszusatz] = $this->splitStreetHausnummer($strasse_hausnummer);
    $strasse_name = $this->db->escape($strasse_name);
    $hausnummer_name = $this->db->escape($hausnummer_name);
    $addresszusatz = $this->db->escape($addresszusatz);
    
    $gem_kz = $this->db->escape(trim($building->municipality->name));
    $gem_name = $this->db->escape(trim($building->municipality->userLabel));
    
    $ort_name = $this->db->escape(trim($building->address->city));
    $plz_name = $this->db->escape(trim($building->address->zipCode));
    
    $lat = $building->address->latitude;
    $long = $building->address->longitude;
    $unit_count = $building->homesCount;
    $lot_num = $building->address->lotNumber;
    $fcp_name = false;
    
    $addr_dbg_str = "strasse: $strasse_name | hausnummer: $hausnummer_name | zusatz: $addresszusatz | gemkz: $gem_kz | gem_name: $gem_name | ort_name: $ort_name | plz_name: $plz_name";
    echo "$addr_dbg_str\n";
    
    // pass variables by ref, so they can be manipulated directly
    $this->NetworkHelper->checkAddress([
      "strasse_name" => &$strasse_name,
      "hausnummer_name" => &$hausnummer_name,
      "addresszusatz" => &$addresszusatz,
      "gem_kz" => &$gem_kz,
      "gem_name" => &$gem_name,
      "ort_name" => &$ort_name,
      "plz_name" => &$plz_name
    ]);
    
    
    $gemeinde = \ADBGemeindeModel::getFirst(["kennziffer" => $gem_kz]);
    if(!$gemeinde) {
      $this->log->warning("[WW] ($addr_dbg_str) Gemeinde nicht gefunden");
      echo "Gemeinde $gem_name $gem_kz nicht gefunden\n";
      return false;
    }
    $gemeinde_id = $gemeinde->id;
    
    $adrcd = false;
    $adr = trim($building->foreignId2);
    $adr_parts = explode("-", $adr);
    if(count($adr_parts)) {
      $adrcd = $adr_parts[0];
    }
    
    $hausnummer = \ADBHausnummerModel::getFirst(["rimo_id" => $rimo_id]);
    
    if($hausnummer) {
      echo "found hausnummer from rimo_id $rimo_id\n";
    }
    
    if($adrcd && !$hausnummer) {
      // get Hausnummer to update
      $hausnummer = \ADBHausnummerModel::getFirst(['adrcd' => $adrcd]);
      if(!$hausnummer) {
        //echo "Hausnummer adrcd $adrcd not found\n";
      } else {
        echo "found hausnummer from adrcd $adrcd\n";
        //echo "Hausnummer adrcd $adrcd gefunden!\n";
      }
    }
    
    if(!$hausnummer) {
      $hausnummer = $this->findHausnummerByStreet($strasse_name, $hausnummer_name, $gemeinde_id);
      if(!$hausnummer) {
         // hausnummer anlegen
        
        $strasse = \ADBStrasseModel::getFirst(["gemeinde_id" => $gemeinde_id, "name" => $strasse_name]);
        //if(!$strasse) die("Strasse $strasse_name (gemeinde_id $gemeinde_id; gem_kz $gem_kz) nicht gefunden\n");
        if(!$strasse) {
          $strasse = $this->createStreet($gemeinde_id, $strasse_name);
          echo "[EE] Konnte Strasse $strasse_name in Gemeinde $gemeinde_id nicht anlegen\n";
          if(!$strasse) return false;
        }
        
        $plz = \ADBPlzModel::getFirst(["gemeinde_id" => $gemeinde_id, "plz" => $plz_name]);
        if(!$plz) die("PLZ $plz_name nicht gefunden\n");
        
        $ortschaft = \ADBOrtschaftModel::getFirst(["gemeinde_id" => $gemeinde_id, "name" => $ort_name]);
        if(!$ortschaft) die("$strasse_hausnummer: ortschaft $ort_name nicht gefunden\n");
        
        $hausnummer_data = [
          "netzgebiet_id" => $this->netzgebiet->id,
          "adrcd" => ($adrcd) ? $adrcd : null,
          "extref" => $name,
          "ortschaft_id" => $ortschaft->id,
          "plz_id" => $plz->id,
          "strasse_id" => $strasse->id,
          "hausnummer" => $hausnummer_name,
          "zusatz" => ($addresszusatz) ? $addresszusatz : null,
          "grund_nr" => ($lot_num) ? $lot_num : null,
          "gps_lat" => $lat,
          "gps_long" => $long,
          "unit_count" => ($unit_count) ? $unit_count : 1,
          "freigabe" => $this->netzgebiet->default_freigabe,
          "rimo_id" => $rimo_id,
          "rimo_fcp_name" => ($fcp_name) ? $fcp_name : null
        ];
        $hausnummer = \ADBHausnummerModel::create($hausnummer_data);
        //var_dump($hausnummer);exit;
        //echo "----------------------\ncreating hausnummer:\n";
        //print_r($hausnummer);
        $hausnummer->save();
      }
    }
    
    // update hausnummer
    if($hausnummer->netzgebiet_id != $this->netzgebiet->id) {
      $hausnummer->netzgebiet_id = $this->netzgebiet->id;
      //$hausnummer->save();
    }
    if($hausnummer->extref != $this->netzgebiet->extref) {
      $hausnummer->extref = $this->netzgebiet->extref;
      //$hausnummer->save();
    }
    if($lat && $long) {
      $hausnummer->gps_lat = (float)$lat;
      $hausnummer->gps_long = (float)$long;
    }
    if($rimo_id) $hausnummer->rimo_id = $rimo_id;
    if($fcp_name) $hausnummer->rimo_fcp_name = $fcp_name;
    //$hausnummer->freigabe = $this->netzgebiet->default_freigabe;
    $hausnummer->save();
    //echo ">>>>>>>>>>>>>>>>>>>\nupdating hausnummer:";
    //print_r($hausnummer);exit;
    return $hausnummer;
    
  }
  
  
  public function findHausnummerByStreet($strasse_name, $hausnummer_name, $gemeinde_id) {
    $strasse_search = [$strasse_name];

    if(strpos($strasse_name, ' ') !== false) $strasse_search[] = str_replace(' ', '-', $strasse_name);
    if(strpos($strasse_name, '-') !== false) $strasse_search[] = str_replace('-', ' ', $strasse_name);
    if(strpos($strasse_name, '.') !== false) $strasse_search[] = str_replace('.', '. ', $strasse_name);
    if(strpos($strasse_name, '.') !== false) $strasse_search[] = str_replace('.', '.-', $strasse_name);
    if(strpos($strasse_name, '. ') !== false) $strasse_search[] = str_replace('. ', '.', $strasse_name);
    if(strpos($strasse_name, '. ') !== false) $strasse_search[] = str_replace('. ', '.-', $strasse_name);
    if(strpos($strasse_name, '.') !== false) $strasse_search[] = str_replace('.-', '.', $strasse_name);
    if(strpos($strasse_name, '.') !== false) $strasse_search[] = str_replace('.-', '. ', $strasse_name);

    foreach($strasse_search as $search) {
      if(strpos($search, 'ß') !== false) $strasse_search[] = str_replace('ß', 'ss', $search);
      if(strpos($search, 'ä') !== false) $strasse_search[] = str_replace('ä', 'ae', $search);
      if(strpos($search, 'ö') !== false) $strasse_search[] = str_replace('ö', 'oe', $search);
      if(strpos($search, 'ü') !== false) $strasse_search[] = str_replace('ü', 'ue', $search);

      if(strpos($search, 'ss') !== false) $strasse_search[] = str_replace('ss', 'ß', $search);
      if(strpos($search, 'ae') !== false) $strasse_search[] = str_replace('ae', 'ä', $search);
      if(strpos($search, 'oe') !== false) $strasse_search[] = str_replace('oe', 'ö', $search);
      if(strpos($search, 'ue') !== false) $strasse_search[] = str_replace('ue', 'ü', $search);
    }
    
    $sql = "SELECT * FROM view_hausnummer WHERE gemeinde_id = $gemeinde_id AND strasse IN ('". implode("', '", $strasse_search)."') AND hausnummer='$hausnummer_name'";
    //echo "$sql\n";
    /*if(preg_match('/^Tobelbader/i',$strasse_name)) {
      echo "$sql\n";
    }*/
    $res = $this->db->query($sql);

    if($this->db->num_rows($res)) {
      // get Hausnummer to update
      //echo "Hausnummer per Suche gefunden\n";
      $data = $this->db->fetch_object($res);
      return new \ADBHausnummer($data->hausnummer_id);
    }
    return false;
  }
  
  private function createStreet($gemeinde_id, $strasse_name) {
    if(!$gemeinde_id || !$strasse_name) return null;
    
    $strasse = \ADBStrasseModel::create([
      "gemeinde_id" => $gemeinde_id,
      "name" => $strasse_name
    ]);
    
    if(!$strasse->save()) {
      return null;
    }
    return $strasse;
    
  }
  
  public function createHausnummer($hausnummer_data = []) {
    $hausnummer = \ADBHausnummerModel::create($hausnummer_data);
    //var_dump($hausnummer);exit;
    return $hausnummer->save();
  }
}