<?php

include_once ("mc_gen_include.inc.php");
include_once ("htmlMimeMail.php");
require_once "DB.php";

// Get absolute system path (e.g. "/data0/srv/www/htsdocs/xxxx")
function getAbsoluteSystemPath () {
  $dirName = dirname(__FILE__);     
  $dirName = str_replace("\\", "/", $dirName);
  $lastSlashPos = strrpos($dirName,"/");
  $path = substr($dirName, 0, $lastSlashPos);
  return $path;
}

// Triggers the script for sending an internal mail
function sendInternalMail ($errMsg) {
	if ($errMsg != "") :
	   $path = getAbsoluteSystemPath();
     $result = "";
     // $cmd = "php " . $path . "/include/automailer_internal.php comegetsome97531 " . $errMsg . " &";
     $cmd = "php automailer_internal.php comegetsome97531 \"" . $errMsg . "\" &";
     exec($cmd . " > /dev/null &");
  endif;
}

// *****************************************************************************
// Current timestamp
$currentTime = date("Y-m-d H:i:s");

// Define start time for b2b_object only !!!!
$constAmStarttimeInDays = 30;
$startTime = getDateTime("datetime_plus_offset", array(0,0,0,0,-($constAmStarttimeInDays),0), "Y-m-d") . " 00:00:00";
$whereClauseStarttime = " bo_createtime >= '" . $startTime . "' AND ";

getSecHttpVars("0", array("filedata", "filename", "metadata"));

//writeToFile("uploader_post.log", "[" . $currentTime . " | " . trim($_SERVER['REMOTE_ADDR']) . "]\n" . var_export($HTTP_POST_VARS, true) . "\n");
//writeToFile("uploader_post_raw.log", "[" . $currentTime . " | " . trim($_SERVER['REMOTE_ADDR']) . "]\n" . file_get_contents("php://input") . "\n");

// DB-Config
$dbhost = "172.16.0.111:3711";  // EXTERNAL_DB_METAOBJECT
$dblogin = "phoenix";
$dbpassword = "AdAdgkS13";
$dbname = "phoenix";
$dsn = "mysql://$dblogin:$dbpassword@$dbhost/$dbname";
$db = DB::connect($dsn, false);

if (mysql_errno())
  writeToFile("upload.log", "DB-Error:" . " | " . $currentTime . " | " . date("Y-m-d H:i:s") . " | " . trim($_SERVER['REMOTE_ADDR']) . " | " . $filename . mysql_error());    

if (DB::isError($db))
    die ("$PHP_SELF: " . $db->getMessage());

$db->setFetchMode(DB_FETCHMODE_ASSOC);
$db->query('SET NAMES latin1');

// calling client IP
$currentClientIP = trim($_SERVER['REMOTE_ADDR']);

$opState = "OK";
$filename = trim($filename);

// 30.08.2016 CA: "Filename empty" and "No file data" shall be ignored from now on because those data will never ever be sent correctly
if ($filename == "")
  $filename = trim($_SERVER['REMOTE_ADDR']) . "_" . date("YmdHis") . ".jpg";
if ($filedata == "")
  $filedata = "No file data";

if ($currentClientIP != "") :
   if ($filename != "") :   
      if ($filedata != "") :

         // Set and check upload counter for AMOK mail
         if ($currentClientIP != "" && $filename != "") :
            if (!existsEntry("temp.app_upload",array("appu_ip",$currentClientIP,"appu_file",$filename))) :
               insertStmt("temp.app_upload", array("appu_ip", $currentClientIP, "appu_file", $filename, "appu_cnt", "1"));
            else :
               $cnt = getFieldValueFromClause("temp.app_upload","appu_cnt","appu_ip = '" . $currentClientIP . "' AND appu_file = '" . $filename . "'");
               $cnt++;
               updateStmt("temp.app_upload","appu_ip",$currentClientIP,array("appu_cnt",$cnt),"appu_file = '" . $filename . "'");
            endif;

            $cnt = getFieldValueFromClause("temp.app_upload","appu_cnt","appu_ip = '" . $currentClientIP . "' AND appu_file = '" . $filename . "'");
            if ($cnt == "") : $cnt = "0"; endif;
            if (($cnt % 10) == 0) : 
               sendInternalMail("AMOK-FILE " . $filename . " [" . $currentClientIP . "] UPLOAD-COUNTER: " . $cnt);
            endif;
         endif;

         // **** Write data into DB ****
         // Get external databases (e.g. APP properties, mobile data, etc.)
         $dbhostArray = getGlobalDbEnvironments();
         $dbhostArrayLen = count($dbhostArray);
         $dbConnectionArray = array();
         if ($dbhostArrayLen > 0) :
            $dbConnectionArray["app_property"] = getDbConnectionSpecial($dbhostArray["as_intern"], "sysadmin", $dblogin, $dbpassword);
            if ($dbConnectionArray["app_property"] != "") :

               // Get cust_id, hq_id and usr_id from table conf_prop
               $sqlquery = "SELECT cust_id, hq_id, usr_id FROM sysadmin.conf_prop WHERE prop_id = '1' AND cp_val = '" . $currentClientIP . "'";
               $result = $dbConnectionArray["app_property"]->query($sqlquery);
               if (DB::isError($result)) die ("$PHP_SELF: " . $result->getMessage());
               $confPropRowMatched = false;
               while ($row = $result->fetch_assoc()):
                     $custId = $row["cust_id"];
                     $hqId = $row["hq_id"];
                     $usrId = $row["usr_id"];
                     $confPropRowMatched = true;
               endwhile;
               $result->free();

               if ($confPropRowMatched) :

                  // Get tr_id from "metadata"
                  // <metadata><context>pp</context><type>jpg</type><cust>moebel_live</cust><jb_id>380311</jb_id></metadata>
                  $xmlContext = getSingleTagContent($metadata, "<context>", "</context>");
                  $xmlType = getSingleTagContent($metadata, "<type>", "</type>");
                  $xmlCust = getSingleTagContent($metadata, "<cust>", "</cust>");
                  $xmlJbId = getSingleTagContent($metadata, "<jb_id>", "</jb_id>");

                  // Get special database from information in 
                  $moMnemonicTargetDb = getOperationalDatabase($custId);
                  if ($moMnemonicTargetDb != "") :
                     $remDb = $db;
                     $db = getDbConnectionSpecial($moMnemonicTargetDb, $dbname, $dblogin, $dbpassword);

                     if ($custId == "3" || $custId == "103") :

                       // Decode BASE64 and uncompress
                       $filedata = base64_decode($filedata);
                       $filedata = gzinflate($filedata);
                       
                       // Get cr_id from usr_id
                       $crId = getFieldValueFromId("phoenix.courier","usr_id", $usrId,"cr_id");
                       if ($crId != "" && $crId != "0") :

                          // Generate output file by writing $filedata
                          $path = "../upload/mbl_foto/";
                          // if (file_exists($path . $filename)) :
                          //    unlink($path . $filename);
                          // endif;
                          writeToFile($path . $filename, $filedata);
                          // sleep(2);
                          // if (!file_exists($path . $filename)) :
                          //    $opState = "ERR 113 : No bo_ext_id0 ID!";
                          // endif;

                          // Get b2b object
                          $boId = getFieldValueFromClause("phoenix_log.b2b_objects", "bo_id", $whereClauseStarttime . "bo_type = '101' AND bo_ext_id1=" . $crId . " AND bo_obj_data = '" . $filename . "'");
                          if ($boId != "" && $boId != "0") :

                             $res = updateStmt("phoenix_log.b2b_objects","bo_ext_id0",$boId,array("bo_state", "1"), "bo_type = '105'");
                             /*
                             if ($db->affected_rows = 0) :
                                $opState = "ERR 112 : No update by 105!";
                             endif;
                             */
                             $boIdNew101 = $boId;  // For error handling ONLY
                          else :
                             $sqlStmt = "INSERT INTO phoenix_log.b2b_objects (bo_ver,bo_type,bo_state,bo_ext_id0,bo_ext_id1,bo_ext_id2,bo_obj_data,bo_createtime)" .
                                        " VALUES ('0','101','1','0','$crId','0','$filename','$currentTime')";
                             $res = $db->query($sqlStmt);
                             if (DB::isError($res)) : die ("$PHP_SELF: " . $res->getMessage()); endif;
                             $boIdNew101 = getLastInsertID();
                             // $opState = "ERR 111 : No bo_ext_id0 ID!";
                          endif;
                       else :
                          // $opState = "ERR 110 : No courier ID!";
                       endif;


                     elseif ($custId == "6" || $custId == "106" || $custId == "11") :

                       // Decode BASE64 and uncompress
                       $filedata = base64_decode($filedata);
                       $filedata = gzinflate($filedata);
                       $filedata = base64_encode($filedata);
                       // writeToFile("debug.log", $filedata);
                       $filedataArray = str_split($filedata, 32768);  // 32K
                       $filedataArrayLen = count($filedataArray);
                       for ($i = 0; $i < $filedataArrayLen; $i++) :
                           $tmpChunk = $filedataArray[$i];
                           $filedataArray[$i] = "<![CDATA[" . $tmpChunk . "]]>";
                       endfor;
                       // writeToFile("debug2.log", $tmpOut);
                       // Write main file
                       // writeToFile($filename, $filedata);

                        // $bo_ext_id0 = "";
                        $bo_ext_id0 = $xmlJbId;
                        /*
                        if ($xmlCust == "moebel_live") :
                           if ($xmlJbId != "" && is_numeric($xmlJbId)) :
                               $bo_ext_id0 = getFieldValueFromClause("phoenix.tour","tr_id","jb_id = '" . $xmlJbId . "' AND tr_sort = '2'");  // equals tr_id
                           endif;
                        endif;
                        */

                        // **** Insert data sets into b2b_objects ***
                        if (!existsEntry("phoenix_log.b2b_objects",array("bo_type","101","bo_ext_id0",$bo_ext_id0,"bo_obj_data",$filename))) :
                           // Insert "101"
                           $sqlStmt = "INSERT INTO phoenix_log.b2b_objects (bo_ver,bo_type,bo_state,bo_ext_id0,bo_ext_id1,bo_ext_id2,bo_obj_data,bo_createtime)" .
                                      " VALUES ('0','101','0','$bo_ext_id0','$usrId','0','$filename','$currentTime')";
                           $res = $db->query($sqlStmt);
                           if (DB::isError($res)) : die ("$PHP_SELF: " . $res->getMessage()); endif;                                     
                           $boIdNew101 = getLastInsertID();
                           
                           // Insert "102"
                           for ($i = 0; $i < $filedataArrayLen; $i++) :
                               $sqlStmt = "INSERT INTO phoenix_log.b2b_objects (bo_ver,bo_type,bo_state,bo_ext_id0,bo_ext_id1,bo_ext_id2,bo_obj_data,bo_createtime)" .
                                          " VALUES ('0','102','0','$boIdNew101','$usrId','$i','$filedataArray[$i]','$currentTime')";
                               $res = $db->query($sqlStmt);
                               if (DB::isError($res)) : die ("$PHP_SELF: " . $res->getMessage()); endif;                                     
                               $boIdNew102 = getLastInsertID();
                           endfor;
                        endif;
                     endif;

                     $db = $remDb;
                  else :
                     $opState = "ERR 107 : No target database specified!";
                  endif;
               else :
                  $opState = "ERR 106 : No row in table conf_prop matched!";
               endif;
            else :
               $opState = "ERR 105 : metaobject not reachable!";
            endif;
         else :
            $opState = "ERR 104 : No global environment definitions found!";
         endif;
      else :
         $opState = "ERR 103 : No file data!";
      endif;
   else :
      $opState = "ERR 102 : Filename empty!";
   endif;
else :
   $opState = "ERR 101 : Unknown client IP!";
endif;

// Write metadata to log
$logFilename = "upload.log";
if ($custId != "" && is_numeric($custId)) :
   $logFilename = "upload_" . $custId . ".log";
endif;
writeToFile($logFilename, $custId . " | " . $currentTime . " | " . date("Y-m-d H:i:s") . " | OLD_VERSION | " . $currentClientIP . " | " . $filename . " | " . $metadata . " | " . $opState . " | " . $boIdNew101 . " | " . $boIdNew102);

// Write file data by error
if (($opState != "OK" || ($boIdNew101 == "" || !is_numeric($boIdNew101))) && $filename != "" && $filedata != "") :
   $errPath = "../upload/photos_err/";
   writeToFile($errPath . $filename, $filedata);
   $opState = "OK";
endif;

// Response
//echo $opState;
// 01.09.2016 CA: always respond "OK" because the data will never be sent correctly if they are wrong
echo "OK";
?>