<?php
/**
 * ---------------------------------------------------------------------
 * GLPI - Gestionnaire Libre de Parc Informatique
 * Copyright (C) 2015-2018 Teclib' and contributors.
 *
 * http://glpi-project.org
 *
 * based on GLPI - Gestionnaire Libre de Parc Informatique
 * Copyright (C) 2003-2014 by the INDEPNET Development Team.
 *
 * ---------------------------------------------------------------------
 *
 * LICENSE
 *
 * This file is part of GLPI.
 *
 * GLPI is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * GLPI is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with GLPI. If not, see <http://www.gnu.org/licenses/>.
 * ---------------------------------------------------------------------
 */

include ('../inc/includes.php');

Session::checkRight("reports", READ);

Html::header(Report::getTypeName(Session::getPluralNumber()), $_SERVER['PHP_SELF'], "tools", "report");

if (empty($_POST["date1"]) && empty($_POST["date2"])) {
   $year           = date("Y")-1;
   $_POST["date1"] = date("Y-m-d", mktime(1, 0, 0, date("m"), date("d"), $year));
   $_POST["date2"] = date("Y-m-d");
}

if (!empty($_POST["date1"])
    && !empty($_POST["date2"])
    && (strcmp($_POST["date2"], $_POST["date1"]) < 0)) {

   $tmp            = $_POST["date1"];
   $_POST["date1"] = $_POST["date2"];
   $_POST["date2"] = $tmp;
}

$stat = new Stat();
$chart_opts =  [
   'width'  => '90%',
   'legend' => false
];

Report::title();

echo "<div class='center'><form method='post' name='form' action='".$_SERVER['PHP_SELF']."'>";
echo "<table class='tab_cadre'><tr class='tab_bg_2'>";
echo "<td class='right'>".__('Start date')."</td><td>";
Html::showDateField("date1", ['value' => $_POST["date1"]]);
echo "</td><td rowspan='2' class='center'>";
echo "<input type='submit' class='submit' name='submit' value=\"".__s('Display report')."\"></td>".
     "</tr>";
echo "<tr class='tab_bg_2'><td class='right'>".__('End date')."</td><td>";
Html::showDateField("date2", ['value' => $_POST["date2"]]);
echo "</td></tr>";
echo "</table>";
Html::closeForm();
echo "</div>";


$valeurtot           = 0;
$valeurnettetot      = 0;
$valeurnettegraphtot = [];
$valeurgraphtot      = [];


/** Display an infocom report
 *
 * @param string $itemtype  item type
 * @param string $begin     begin date
 * @param string $end       end date
**/
function display_infocoms_report($itemtype, $begin, $end) {
   global $DB, $valeurtot, $valeurnettetot, $valeurnettegraphtot, $valeurgraphtot, $CFG_GLPI, $stat, $chart_opts;

   $itemtable = getTableForItemType($itemtype);
   $query = "SELECT `glpi_infocoms`.*,
                    `$itemtable`.`name` AS name,
                    `$itemtable`.`ticket_tco`,
                    `glpi_entities`.`completename` AS entname,
                    `glpi_entities`.`id` AS entID
             FROM `glpi_infocoms`
             INNER JOIN `$itemtable` ON (`$itemtable`.`id` = `glpi_infocoms`.`items_id`
                                         AND `glpi_infocoms`.`itemtype` = '$itemtype')
             LEFT JOIN `glpi_entities` ON (`$itemtable`.`entities_id` = `glpi_entities`.`id`)
             WHERE `$itemtable`.`is_template` = 0 ".
                   getEntitiesRestrictRequest("AND", $itemtable);

   if (!empty($begin)) {
      $query .= " AND (`glpi_infocoms`.`buy_date` >= '$begin'
                       OR `glpi_infocoms`.`use_date` >= '$begin') ";
   }

   if (!empty($end)) {
      $query .= " AND (`glpi_infocoms`.`buy_date` <= '$end'
                       OR `glpi_infocoms`.`use_date` <= '$end') ";
   }

   $query .= " ORDER BY entname ASC, `buy_date`, `use_date`";

   $display_entity = Session::isMultiEntitiesMode();

   $result = $DB->query($query);
   if (($DB->numrows($result) > 0)
       && ($item = getItemForItemtype($itemtype))) {

      echo "<h2>".$item->getTypeName(1)."</h2>";

      echo "<table class='tab_cadre'><tr><th>".__('Name')."</th>";
      if ($display_entity) {
         echo "<th>".__('Entity')."</th>";
      }

      echo "<th>"._x('price', 'Value')."</th><th>".__('ANV')."</th>";
      echo "<th>".__('TCO')."</th><th>".__('Date of purchase')."</th>";
      echo "<th>".__('Startup date')."</th><th>".__('Warranty expiration date')."</th></tr>";

      $valeursoustot      = 0;
      $valeurnettesoustot = 0;
      $valeurnettegraph   = [];
      $valeurgraph        = [];

      while ($line=$DB->fetch_assoc($result)) {
         if (isset($line["is_global"]) && $line["is_global"]
             && $item->getFromDB($line["items_id"])) {
            $line["value"] *= Computer_Item::countForItem($item);
         }

         if ($line["value"]>0) {
            $valeursoustot += $line["value"];
         }
         $valeurnette = Infocom::Amort($line["sink_type"], $line["value"], $line["sink_time"],
                                       $line["sink_coeff"], $line["buy_date"], $line["use_date"],
                                       $CFG_GLPI["date_tax"], "n");

         $tmp         = Infocom::Amort($line["sink_type"], $line["value"], $line["sink_time"],
                                       $line["sink_coeff"], $line["buy_date"], $line["use_date"],
                                       $CFG_GLPI["date_tax"], "all");

         if (is_array($tmp) && (count($tmp) > 0)) {
            foreach ($tmp["annee"] as $key => $val) {
               if ($tmp["vcnetfin"][$key] > 0) {
                  if (!isset($valeurnettegraph[$val])) {
                     $valeurnettegraph[$val] = 0;
                  }
                  $valeurnettegraph[$val] += $tmp["vcnetdeb"][$key];
               }
            }
         }

         if (!empty($line["buy_date"])) {
            $year = substr($line["buy_date"], 0, 4);
            if ($line["value"] > 0) {
               if (!isset($valeurgraph[$year])) {
                  $valeurgraph[$year] = 0;
               }
               $valeurgraph[$year] += $line["value"];
            }
         }

         $valeurnette = str_replace([" ", "-"], ["", ""], $valeurnette);
         if (!empty($valeurnette)) {
            $valeurnettesoustot += $valeurnette;
         }

         echo "<tr class='tab_bg_1'><td>".$line["name"]."</td>";
         if ($display_entity) {
            echo "<td>".$line['entname']."</td>";
         }

         echo "<td class='right'>".Html::formatNumber($line["value"])."</td>".
              "<td class='right'>".Html::formatNumber($valeurnette)."</td>".
              "<td class='right'>".Infocom::showTco($line["ticket_tco"], $line["value"])."</td>".
              "<td>".Html::convDate($line["buy_date"])."</td>".
              "<td>".Html::convDate($line["use_date"])."</td>".
              "<td>".Infocom::getWarrantyExpir($line["buy_date"], $line["warranty_duration"]).
              "</td></tr>";
      }

      $valeurtot      += $valeursoustot;
      $valeurnettetot += $valeurnettesoustot;

      $tmpmsg = sprintf(__('Total: Value=%1$s - Account net value=%2$s'),
                        Html::formatNumber($valeursoustot),
                        Html::formatNumber($valeurnettesoustot));
      echo "<tr><td colspan='6' class='center'><h3>$tmpmsg</h3></td></tr>";

      if (count($valeurnettegraph) > 0) {
         echo "<tr><td colspan='8' class='center'>";
         ksort($valeurnettegraph);
         $valeurnettegraphdisplay = array_map('round', $valeurnettegraph);

         foreach ($valeurnettegraph as $key => $val) {
            if (!isset($valeurnettegraphtot[$key])) {
               $valeurnettegraphtot[$key] = 0;
            }
            $valeurnettegraphtot[$key] += $valeurnettegraph[$key];
         }

         $stat->displayLineGraph(
            sprintf(
                __('%1$s account net value'),
                $item->getTypeName(1)
            ),
            array_keys($valeurnettegraphdisplay), [
               [
                  'data' => $valeurnettegraphdisplay
               ]
            ], $chart_opts
         );
         echo "</td></tr>";
      }

      if (count($valeurgraph) > 0) {
         echo "<tr><td colspan='8' class='center'>";

         ksort($valeurgraph);
         $valeurgraphdisplay = array_map('round', $valeurgraph);

         foreach ($valeurgraph as $key => $val) {
            if (!isset($valeurgraphtot[$key])) {
               $valeurgraphtot[$key] = 0;
            }
            $valeurgraphtot[$key] += $valeurgraph[$key];
         }

         $stat->displayLineGraph(
            sprintf(
                __('%1$s value'),
                $item->getTypeName(1)
            ),
            array_keys($valeurgraphdisplay), [
               [
                  'data' => $valeurgraphdisplay
               ]
            ], $chart_opts
         );
         echo "</td></tr>";
      }
      echo "</table>";
      return true;
   }
   return false;
}

$types = ['Computer', 'Monitor', 'NetworkEquipment', 'Peripheral', 'Phone', 'Printer'];

$i = 0;
echo "<table><tr><td class='top'>";

while (count($types) > 0) {
   $type = array_shift($types);

   if (display_infocoms_report($type, $_POST["date1"], $_POST["date2"])) {
      echo "</td>";
      $i++;

      if (($i%2) == 0) {
         echo "</tr><tr>";
      }
      echo "<td class='top'>";
   }
}

if (($i%2) == 0) {
   echo "&nbsp;</td><td>&nbsp;";
}

echo "</td></tr></table>";


$tmpmsg = sprintf(__('Total: Value=%1$s - Account net value=%2$s'),
                  Html::formatNumber($valeurtot),
                  Html::formatNumber($valeurnettetot));
echo "<div class='center'><h3>$tmpmsg</h3></div>";

if (count($valeurnettegraphtot) > 0) {
   $valeurnettegraphtotdisplay = array_map('round', $valeurnettegraphtot);

   $stat->displayLineGraph(
      __('Total account net value'),
      array_keys($valeurnettegraphtotdisplay), [
         [
            'data' => $valeurnettegraphtotdisplay
         ]
      ], $chart_opts
   );
}
if (count($valeurgraphtot) > 0) {
   $valeurgraphtotdisplay = array_map('round', $valeurgraphtot);

   $stat->displayLineGraph(
      __('Total value'),
      array_keys($valeurgraphtotdisplay), [
         [
            'data' => $valeurgraphtotdisplay
         ]
      ], $chart_opts
   );
}

Html::footer();
