<?php

include "config.php";

$elementTypes = array();
$count = 0;
$countDelete = 0;
$countModifyDelete = 0;
$countModify = 0;
$countCreate = 0;
$mode = '';
$curNodeAttrs = null;
$curNodeTags = null;
$id = 0;
$latitude = 0;
$longitude = 0;

$mysqli = new mysqli(MYSQL_HOST, MYSQL_USER, MYSQL_PASSWORD, MYSQL_DB);

if($mysqli->connect_errno) {
  echo "Error while connecting to DB : $mysqli->error \n" ;
  exit(1);
}
$mysqli->autocommit(FALSE);

if (! ($deleteStmt = $mysqli->prepare("DELETE FROM position WHERE id=?"))) {
  echo "Error while preparing delete position statement : " . $mysqli->error ;
  exit(1);
}
$deleteStmt->bind_param('d', $id);

if (! ($deleteTagStmt = $mysqli->prepare("DELETE FROM tag WHERE id=?"))) {
  echo "Error while preparing delete tag statement : " . $mysqli->error ;
  exit(1);
}
$deleteTagStmt->bind_param('d', $id);

if (USE_STATISTICS) {
  if (! ($deleteStatsStmt = $mysqli->prepare("DELETE FROM statistics WHERE id=?"))) {
    echo "Error while preparing delete statistics statement : " . $mysqli->error ;
    exit(1);
  }
  $deleteStatsStmt->bind_param('d', $id);
}

if (! ($insertStmt = $mysqli->prepare("INSERT INTO position (id, latitude, longitude) VALUES (?, ?, ?)"))) {
  echo "Error while preparing insert position statement : " . $mysqli->error ;
  exit(1);
}
$insertStmt->bind_param('dii', $id, $latitude, $longitude);

if (! ($insertTagStmt = $mysqli->prepare("INSERT INTO tag (id, k, v) VALUES (?, ?, ?)"))) {
  echo "Error while preparing insert tag statement : " . $mysqli->error ;
  exit(1);
}
$insertTagStmt->bind_param('dss', $id, $k, $v);

if (USE_STATISTICS) {
  if (! ($insertStatsStmt = $mysqli->prepare("INSERT INTO statistics (id, ts, version) VALUES (?, ?, ?)"))) {
    echo "Error while preparing insert statistics statement : " . $mysqli->error ;
    exit(1);
  }
  $insertStatsStmt->bind_param('dsi', $id, $ts, $version);
}

function printDebug() {
  global $elementTypes, $count, $countDelete, $countModifyDelete, $countModify, $countCreate;

  echo "== $count ==============================\n";
  foreach($elementTypes as $k => $v) {
    echo "$k : $v\n";
  }
  echo "++++++ Surveillance nodes : ++++++\n";
  echo "$countDelete deletions\n";
  echo "$countModifyDelete modifications --> deletions\n";
  echo "$countModify modifications\n";
  echo "$countCreate creations\n";
}

function printDebugCurNode() {
  global $curNodeAttrs, $curNodeTags, $mode;

  echo "=============\n";
  echo "$mode : " . $curNodeAttrs['id'] ." (". $curNodeAttrs['lat'] . " x " . $curNodeAttrs['lon'] . ") :  " . $curNodeAttrs['user'] . "\n";
  if (! empty($curNodeAttrs)) {
    echo "  => Attributes :\n";
    foreach($curNodeAttrs as $k => $v) {
      echo "   $k : $v\n";
    }
  } else {
     echo "  => No attributes\n";
  }
  if (! empty($curNodeTags)) {
    echo "  => Tags :\n";
    foreach($curNodeTags as $k => $v) {
      echo "   $k : $v\n";
    }
  } else {
     echo "  => No tags\n";
  }
}

function startElement ($parser, $name, $attrs) {
  global $elementTypes, $count, $mode, $curNodeAttrs, $curNodeTags;
  $count++;

  if (array_key_exists($name, $elementTypes)) {
    $elementTypes[$name] += 1;
  } else {
    $elementTypes[$name] = 1;
  }

  if ($name == 'modify' || $name == 'delete' or $name == 'create') {
    $mode = $name;

  } else if ($name == 'node') {
    $curNodeAttrs = $attrs;
    $curNodeTags = array();

  } else if ($name == 'tag') {
    $curNodeTags[$attrs['k']] = $attrs['v'];
  }
}

function endElement ($parser, $name) {
  if (USE_STATISTICS) {
    global $mode, $deleteStmt, $deleteTagStmt, $deleteStatsStmt, $insertStmt, $insertTagStmt, $insertStatsStmt, $selectStmt, $id, $latitude, $longitude, $k, $v, $ts, $version, $curNodeAttrs, $curNodeTags, $mysqli, $countDelete, $countModifyDelete, $countModify, $countCreate;
  } else {
    global $mode, $deleteStmt, $deleteTagStmt, $insertStmt, $insertTagStmt, $selectStmt, $id, $latitude, $longitude, $k, $v, $curNodeAttrs, $curNodeTags, $mysqli, $countDelete, $countModifyDelete, $countModify, $countCreate;
  }

  if ($name == 'modify' || $name == 'delete' or $name == 'create') {
    $mode = '';
  } else if ($name == 'node') {
    if ($mode == 'delete') {
      $id = $curNodeAttrs['id'];

      if (USE_STATISTICS) {
        if (! $deleteStatsStmt->execute()) {
          echo "***** Error : Deleting statistics $id : ". $deleteStatsStmt->error . "\n";
        }
      }

      if (! $deleteTagStmt->execute()) {
        echo "***** Error : Deleting tags $id : ". $deleteTagStmt->error . "\n";
      }
      if (! $deleteStmt->execute()) {
        echo "***** Error : Deleting $id : ". $deleteStmt->error . "\n";
      }
      if ($deleteStmt->affected_rows > 0) {
        $countDelete++;
        $mysqli->commit();
        printDebugCurNode();
      }

    } else if ($mode == 'modify' || $mode == 'create') {
      if (! empty($curNodeTags)
          && array_key_exists('man_made', $curNodeTags)
          && $curNodeTags['man_made'] == 'surveillance') {

        printDebugCurNode();

        $id = $curNodeAttrs['id'];

        if ($mode == 'modify') {
          $countModify++;

          if (USE_STATISTICS) {
            if (! $deleteStatsStmt->execute()) {
              echo "***** Error : Deleting statistics $id for modification : ". $deleteStatsStmt->error . "\n";
            }
          }

          if (! $deleteTagStmt->execute()) {
            echo "***** Error : Deleting tags $id for modification : ". $deleteTagStmt->error . "\n";
          }
          if (! $deleteStmt->execute()) {
            echo "***** Error : Deleting $id for modification : ". $deleteStmt->error . "\n";
          }
        } else {
          $countCreate++;
        }

        $latitude = (int) ($curNodeAttrs['lat'] * 10000000);
        $longitude = (int) ($curNodeAttrs['lon'] * 10000000);

        if (! $insertStmt->execute()) {
          echo "***** Error : inserting $id ($latitude x $longitude) : ". $insertStmt->error . "\n";
        }

        $k = 'lat';
        $v = $curNodeAttrs['lat'];
        if (! $insertTagStmt->execute()) {
          echo "***** Error : inserting latitude $v for $id : ". $insertTagStmt->error . "\n";
        }

        $k = 'lon';
        $v = $curNodeAttrs['lon'];
        if (! $insertTagStmt->execute()) {
          echo "***** Error : inserting longitude $v for $id : ". $insertTagStmt->error . "\n";
        }

        $k = 'userid';
        $v = $curNodeAttrs['user'];
        if (! $insertTagStmt->execute()) {
          echo "***** Error : inserting user $v for $id : ". $insertTagStmt->error . "\n";
        }

        $k = 'version';
        $v = $curNodeAttrs['version'];
        if (! $insertTagStmt->execute()) {
          echo "***** Error : inserting version $v for $id : ". $insertTagStmt->error . "\n";
        }

        $k = 'timestamp';
        $v = $curNodeAttrs['timestamp'];
        if (! $insertTagStmt->execute()) {
          echo "***** Error : inserting timestamp $v for $id : ". $insertTagStmt->error . "\n";
        }

        foreach($curNodeTags as $k => $v) {
          if (! $insertTagStmt->execute()) {
            echo "***** Error : inserting tag $k => $v for $id : ". $insertTagStmt->error . "\n";
          }
        }

        if (USE_STATISTICS) {
          $ts = $curNodeAttrs['timestamp'];
          $version = $curNodeAttrs['version'];
          if (! $insertStatsStmt->execute()) {
            echo "***** Error : inserting ts $ts, version $version for $id : ". $insertStatsStmt->error . "\n";
          }
        }

        $mysqli->commit();
      } else if ($mode == 'modify') {
        // delete former surveillance nodes that were modified to non-surveillance nodes
        $id = $curNodeAttrs['id'];

        if (USE_STATISTICS) {
          if (! $deleteStatsStmt->execute()) {
            echo "***** Error : Deleting statistics $id for non-surveillance node : ". $deleteStatsStmt->error . "\n";
          }
        }
        if (! $deleteTagStmt->execute()) {
          echo "***** Error : Deleting tags $id for non-surveillance node : ". $deleteTagStmt->error . "\n";
        }
        if (! $deleteStmt->execute()) {
          echo "***** Error : Deleting $id for non-surveillance node : ". $deleteStmt->error . "\n";
        }

        if ($deleteStmt->affected_rows > 0) {
          $countModifyDelete++;
          $mysqli->commit();
          printDebugCurNode();
          echo "  ==> delete because modified to non-surveillance node\n";
        }
      }
    }

    $curNodeAttrs = null;
    $curNodeTags = null;
  }
}

$file="change_file.osc";

$xml_parser = xml_parser_create();
xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, false);
xml_set_element_handler($xml_parser, "startElement", "endElement");

if (!($fp = fopen($file, "r"))) {
  die("could not open XML input");
}

while ($data = fread($fp, 4096)) {
  if (!xml_parse($xml_parser, $data, feof($fp))) {
    die(sprintf("XML error: %s at line %d",
                xml_error_string(xml_get_error_code($xml_parser)),
                xml_get_current_line_number($xml_parser)));
  }
}

$sql="UPDATE sync_state SET v='" . $_SERVER['argv'][1] ."' WHERE k='sequenceNumber';";
$mysqli->query($sql);
$mysqli->commit();

printDebug();
$mysqli->close();

?>