blockedlog.class.php

<?php
/* Copyright (C) 2017      ATM Consulting      <contact@atm-consulting.fr>
 * Copyright (C) 2017-2020 Laurent Destailleur <eldy@destailleur.fr>
 *
 * This program 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 3 of the License, or
 * (at your option) any later version.
 *
 * This program 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 this program. If not, see <https://www.gnu.org/licenses/>.
 *
 * See https://medium.com/@lhartikk/a-blockchain-in-200-lines-of-code-963cc1cc0e54
 */


class BlockedLog
{
  public $id;

  public $entity;

  public $error = '';

  public $errors = array();

  public $signature = '';

  public $signature_line = '';

  public $amounts = null;

  public $action = '';

  public $element = '';

  public $fk_object = 0;

  public $certified = false;

  public $fk_user = 0;

  public $date_creation;

  public $date_modification;

  public $date_object = 0;

  public $ref_object = '';

  public $object_data = null;
  public $object_version = '';

  public $user_fullname = '';

  public $trackedevents = array();



  public function __construct(DoliDB $db)
  {
    global $conf;

    $this->db = $db;

    $this->trackedevents = array();

    if ($conf->facture->enabled) $this->trackedevents['BILL_VALIDATE'] = 'logBILL_VALIDATE';
    if ($conf->facture->enabled) $this->trackedevents['BILL_DELETE'] = 'logBILL_DELETE';
    if ($conf->facture->enabled) $this->trackedevents['BILL_SENTBYMAIL'] = 'logBILL_SENTBYMAIL';
    if ($conf->facture->enabled) $this->trackedevents['DOC_DOWNLOAD'] = 'BlockedLogBillDownload';
    if ($conf->facture->enabled) $this->trackedevents['DOC_PREVIEW'] = 'BlockedLogBillPreview';

    if ($conf->facture->enabled) $this->trackedevents['PAYMENT_CUSTOMER_CREATE'] = 'logPAYMENT_CUSTOMER_CREATE';
    if ($conf->facture->enabled) $this->trackedevents['PAYMENT_CUSTOMER_DELETE'] = 'logPAYMENT_CUSTOMER_DELETE';

    /* Supplier
    if ($conf->fournisseur->enabled) $this->trackedevents['BILL_SUPPLIER_VALIDATE']='BlockedLogSupplierBillValidate';
    if ($conf->fournisseur->enabled) $this->trackedevents['BILL_SUPPLIER_DELETE']='BlockedLogSupplierBillDelete';
    if ($conf->fournisseur->enabled) $this->trackedevents['BILL_SUPPLIER_SENTBYMAIL']='BlockedLogSupplierBillSentByEmail'; // Trigger key does not exists, we want just into array to list it as done
    if ($conf->fournisseur->enabled) $this->trackedevents['SUPPLIER_DOC_DOWNLOAD']='BlockedLogSupplierBillDownload';    // Trigger key does not exists, we want just into array to list it as done
    if ($conf->fournisseur->enabled) $this->trackedevents['SUPPLIER_DOC_PREVIEW']='BlockedLogSupplierBillPreview';    // Trigger key does not exists, we want just into array to list it as done

    if ($conf->fournisseur->enabled) $this->trackedevents['PAYMENT_SUPPLIER_CREATE']='BlockedLogSupplierBillPaymentCreate';
    if ($conf->fournisseur->enabled) $this->trackedevents['PAYMENT_SUPPLIER_DELETE']='BlockedLogsupplierBillPaymentCreate';
    */

    if ($conf->don->enabled) $this->trackedevents['DON_VALIDATE'] = 'logDON_VALIDATE';
    if ($conf->don->enabled) $this->trackedevents['DON_DELETE'] = 'logDON_DELETE';
    //if ($conf->don->enabled) $this->trackedevents['DON_SENTBYMAIL']='logDON_SENTBYMAIL';

    if ($conf->don->enabled) $this->trackedevents['DONATION_PAYMENT_CREATE'] = 'logDONATION_PAYMENT_CREATE';
    if ($conf->don->enabled) $this->trackedevents['DONATION_PAYMENT_DELETE'] = 'logDONATION_PAYMENT_DELETE';

    /*
    if ($conf->salary->enabled) $this->trackedevents['PAYMENT_SALARY_CREATE']='BlockedLogSalaryPaymentCreate';
    if ($conf->salary->enabled) $this->trackedevents['PAYMENT_SALARY_MODIFY']='BlockedLogSalaryPaymentCreate';
    if ($conf->salary->enabled) $this->trackedevents['PAYMENT_SALARY_DELETE']='BlockedLogSalaryPaymentCreate';
    */

    if ($conf->adherent->enabled) $this->trackedevents['MEMBER_SUBSCRIPTION_CREATE'] = 'logMEMBER_SUBSCRIPTION_CREATE';
    if ($conf->adherent->enabled) $this->trackedevents['MEMBER_SUBSCRIPTION_MODIFY'] = 'logMEMBER_SUBSCRIPTION_MODIFY';
    if ($conf->adherent->enabled) $this->trackedevents['MEMBER_SUBSCRIPTION_DELETE'] = 'logMEMBER_SUBSCRIPTION_DELETE';


    if ($conf->banque->enabled) $this->trackedevents['PAYMENT_VARIOUS_CREATE'] = 'logPAYMENT_VARIOUS_CREATE';
    if ($conf->banque->enabled) $this->trackedevents['PAYMENT_VARIOUS_MODIFY'] = 'logPAYMENT_VARIOUS_MODIFY';
    if ($conf->banque->enabled) $this->trackedevents['PAYMENT_VARIOUS_DELETE'] = 'logPAYMENT_VARIOUS_DELETE';

    // $conf->global->BANK_ENABLE_POS_CASHCONTROL must be set to 1 by all external POS modules
    $moduleposenabled = (!empty($conf->cashdesk->enabled) || !empty($conf->takepos->enabled) || !empty($conf->global->BANK_ENABLE_POS_CASHCONTROL));
    if ($moduleposenabled) $this->trackedevents['CASHCONTROL_VALIDATE'] = 'logCASHCONTROL_VALIDATE';

    if (!empty($conf->global->BLOCKEDLOG_ADD_ACTIONS_SUPPORTED)) {
      $tmparrayofmoresupportedevents = explode(',', $conf->global->BLOCKEDLOG_ADD_ACTIONS_SUPPORTED);
      foreach ($tmparrayofmoresupportedevents as $val) {
        $this->trackedevents[$val] = 'log'.$val;
      }
    }
  }

  public function getObjectLink()
  {
    global $langs;

    if ($this->element === 'facture') {
      require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';

      $object = new Facture($this->db);
      if ($object->fetch($this->fk_object) > 0) {
        return $object->getNomUrl(1);
      } else {
        $this->error++;
      }
    }
    if ($this->element === 'invoice_supplier') {
      require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.facture.class.php';

      $object = new FactureFournisseur($this->db);
      if ($object->fetch($this->fk_object) > 0) {
        return $object->getNomUrl(1);
      } else {
        $this->error++;
      }
    } elseif ($this->element === 'payment') {
      require_once DOL_DOCUMENT_ROOT.'/compta/paiement/class/paiement.class.php';

      $object = new Paiement($this->db);
      if ($object->fetch($this->fk_object) > 0) {
        return $object->getNomUrl(1);
      } else {
        $this->error++;
      }
    } elseif ($this->element === 'payment_supplier') {
      require_once DOL_DOCUMENT_ROOT.'/fourn/class/paiementfourn.class.php';

      $object = new PaiementFourn($this->db);
      if ($object->fetch($this->fk_object) > 0) {
        return $object->getNomUrl(1);
      } else {
        $this->error++;
      }
    } elseif ($this->element === 'payment_donation') {
      require_once DOL_DOCUMENT_ROOT.'/don/class/paymentdonation.class.php';

      $object = new PaymentDonation($this->db);
      if ($object->fetch($this->fk_object) > 0) {
        return $object->getNomUrl(1);
      } else {
        $this->error++;
      }
    } elseif ($this->element === 'payment_various') {
      require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/paymentvarious.class.php';

      $object = new PaymentVarious($this->db);
      if ($object->fetch($this->fk_object) > 0) {
        return $object->getNomUrl(1);
      } else {
        $this->error++;
      }
    } elseif ($this->element === 'don' || $this->element === 'donation') {
      require_once DOL_DOCUMENT_ROOT.'/don/class/don.class.php';

      $object = new Don($this->db);
      if ($object->fetch($this->fk_object) > 0) {
        return $object->getNomUrl(1);
      } else {
        $this->error++;
      }
    } elseif ($this->element === 'subscription') {
      require_once DOL_DOCUMENT_ROOT.'/adherents/class/subscription.class.php';

      $object = new Subscription($this->db);
      if ($object->fetch($this->fk_object) > 0) {
        return $object->getNomUrl(1);
      } else {
        $this->error++;
      }
    } elseif ($this->element === 'cashcontrol') {
      require_once DOL_DOCUMENT_ROOT.'/compta/cashcontrol/class/cashcontrol.class.php';

      $object = new CashControl($this->db);
      if ($object->fetch($this->fk_object) > 0) {
        return $object->getNomUrl(1);
      } else {
        $this->error++;
      }
    } elseif ($this->action == 'MODULE_SET')
    {
      return '<i class="opacitymedium">System to track events into unalterable logs were enabled</i>';
    } elseif ($this->action == 'MODULE_RESET')
    {
      if ($this->signature == '0000000000') {
        return '<i class="opacitymedium">System to track events into unalterable logs were disabled after some recording were done. We saved a special Fingerprint to track the chain as broken.</i>';
      } else {
        return '<i class="opacitymedium">System to track events into unalterable logs were disabled. This is possible because no record were done yet.</i>';
      }
    }

    return '<i class="opacitymedium">'.$langs->trans('ImpossibleToReloadObject', $this->element, $this->fk_object).'</i>';
  }

  public function getUser()
  {
    global $langs, $cachedUser;

    if (empty($cachedUser))$cachedUser = array();

    if (empty($cachedUser[$this->fk_user])) {
      $u = new User($this->db);
      if ($u->fetch($this->fk_user) > 0) {
        $cachedUser[$this->fk_user] = $u;
      }
    }

    if (!empty($cachedUser[$this->fk_user])) {
      return $cachedUser[$this->fk_user]->getNomUrl(1);
    }

    return $langs->trans('ImpossibleToRetrieveUser', $this->fk_user);
  }

  public function setObjectData(&$object, $action, $amounts, $fuser = null)
  {
    global $langs, $user, $mysoc;

    if (is_object($fuser)) $user = $fuser;

    // Generic fields

    // action
    $this->action = $action;
    // amount
    $this->amounts = $amounts;
    // date
    if ($object->element == 'payment' || $object->element == 'payment_supplier')
    {
      $this->date_object = $object->datepaye;
    } elseif ($object->element == 'payment_salary')
    {
      $this->date_object = $object->datev;
    } elseif ($object->element == 'payment_donation' || $object->element == 'payment_various')
    {
      $this->date_object = $object->datepaid ? $object->datepaid : $object->datep;
    } elseif ($object->element == 'subscription')
    {
      $this->date_object = $object->dateh;
    } elseif ($object->element == 'cashcontrol')
    {
      $this->date_object = $object->date_creation;
    } else {
      $this->date_object = $object->date;
    }
    // ref
    $this->ref_object = ((!empty($object->newref)) ? $object->newref : $object->ref); // newref is set when validating a draft, ref is set in other cases
    // type of object
    $this->element = $object->element;
    // id of object
    $this->fk_object = $object->id;


    // Set object_data
    $this->object_data = new stdClass();
    // Add fields to exclude
    $arrayoffieldstoexclude = array(
      'table_element', 'fields', 'ref_previous', 'ref_next', 'origin', 'origin_id', 'oldcopy', 'picto', 'error', 'errors', 'model_pdf', 'modelpdf', 'last_main_doc', 'civility_id', 'contact', 'contact_id',
      'table_element_line', 'ismultientitymanaged', 'isextrafieldmanaged',
      'linkedObjectsIds',
      'linkedObjects',
      'fk_delivery_address',
      'context',
      'projet'          // There is already ->fk_project
    );
    // Add more fields to exclude depending on object type
    if ($this->element == 'cashcontrol') {
      $arrayoffieldstoexclude = array_merge($arrayoffieldstoexclude, array(
        'name', 'lastname', 'firstname', 'region', 'region_id', 'region_code', 'state', 'state_id', 'state_code', 'country', 'country_id', 'country_code',
        'total_ht', 'total_tva', 'total_ttc', 'total_localtax1', 'total_localtax2',
        'barcode_type', 'barcode_type_code', 'barcode_type_label', 'barcode_type_coder', 'mode_reglement_id', 'cond_reglement_id', 'mode_reglement', 'cond_reglement', 'shipping_method_id',
        'fk_incoterms', 'label_incoterms', 'location_incoterms', 'lines')
      );
    }

    // Add thirdparty info
    if (empty($object->thirdparty) && method_exists($object, 'fetch_thirdparty')) $object->fetch_thirdparty();
    if (!empty($object->thirdparty))
    {
      $this->object_data->thirdparty = new stdClass();

      foreach ($object->thirdparty as $key=>$value)
      {
        if (in_array($key, $arrayoffieldstoexclude)) continue; // Discard some properties
        if (!in_array($key, array(
        'name', 'name_alias', 'ref_ext', 'address', 'zip', 'town', 'state_code', 'country_code', 'idprof1', 'idprof2', 'idprof3', 'idprof4', 'idprof5', 'idprof6', 'phone', 'fax', 'email', 'barcode',
        'tva_intra', 'localtax1_assuj', 'localtax1_value', 'localtax2_assuj', 'localtax2_value', 'managers', 'capital', 'typent_code', 'forme_juridique_code', 'code_client', 'code_fournisseur'
        ))) continue; // Discard if not into a dedicated list
        if (!is_object($value)) $this->object_data->thirdparty->{$key} = $value;
      }
    }

    // Add company info
    if (!empty($mysoc))
    {
      $this->object_data->mycompany = new stdClass();

      foreach ($mysoc as $key=>$value)
      {
        if (in_array($key, $arrayoffieldstoexclude)) continue; // Discard some properties
        if (!in_array($key, array(
        'name', 'name_alias', 'ref_ext', 'address', 'zip', 'town', 'state_code', 'country_code', 'idprof1', 'idprof2', 'idprof3', 'idprof4', 'idprof5', 'idprof6', 'phone', 'fax', 'email', 'barcode',
        'tva_intra', 'localtax1_assuj', 'localtax1_value', 'localtax2_assuj', 'localtax2_value', 'managers', 'capital', 'typent_code', 'forme_juridique_code', 'code_client', 'code_fournisseur'
        ))) continue; // Discard if not into a dedicated list
        if (!is_object($value)) $this->object_data->mycompany->{$key} = $value;
      }
    }

    // Add user info
    if (!empty($user))
    {
      $this->fk_user = $user->id;
      $this->user_fullname = $user->getFullName($langs);
    }

    // Field specific to object
    if ($this->element == 'facture')
    {
      foreach ($object as $key=>$value)
      {
        if (in_array($key, $arrayoffieldstoexclude)) continue; // Discard some properties
        if (!in_array($key, array(
          'ref', 'ref_client', 'ref_supplier', 'date', 'datef', 'datev', 'type', 'total_ht', 'total_tva', 'total_ttc', 'localtax1', 'localtax2', 'revenuestamp', 'datepointoftax', 'note_public', 'lines'
        ))) continue; // Discard if not into a dedicated list
        if ($key == 'lines')
        {
          $lineid = 0;
          foreach ($value as $tmpline)  // $tmpline is object FactureLine
          {
            $lineid++;
            foreach ($tmpline as $keyline => $valueline)
            {
              if (!in_array($keyline, array(
                'ref', 'multicurrency_code', 'multicurrency_total_ht', 'multicurrency_total_tva', 'multicurrency_total_ttc', 'qty', 'product_type', 'vat_src_code', 'tva_tx', 'info_bits', 'localtax1_tx', 'localtax2_tx', 'total_ht', 'total_tva', 'total_ttc', 'total_localtax1', 'total_localtax2'
              ))) continue; // Discard if not into a dedicated list

              if (empty($this->object_data->invoiceline[$lineid]) || !is_object($this->object_data->invoiceline[$lineid])) {    // To avoid warning
                $this->object_data->invoiceline[$lineid] = new stdClass();
              }

              $this->object_data->invoiceline[$lineid]->{$keyline} = $valueline;
            }
          }
        } elseif (!is_object($value)) $this->object_data->{$key} = $value;
      }

      if (!empty($object->newref)) $this->object_data->ref = $object->newref;
    } elseif ($this->element == 'invoice_supplier')
    {
      foreach ($object as $key => $value)
      {
        if (in_array($key, $arrayoffieldstoexclude)) continue; // Discard some properties
        if (!in_array($key, array(
        'ref', 'ref_client', 'ref_supplier', 'date', 'datef', 'type', 'total_ht', 'total_tva', 'total_ttc', 'localtax1', 'localtax2', 'revenuestamp', 'datepointoftax', 'note_public'
        ))) continue; // Discard if not into a dedicated list
        if (!is_object($value)) $this->object_data->{$key} = $value;
      }

      if (!empty($object->newref)) $this->object_data->ref = $object->newref;
    } elseif ($this->element == 'payment' || $this->element == 'payment_supplier' || $this->element == 'payment_donation' || $this->element == 'payment_various')
    {
      $datepayment = $object->datepaye ? $object->datepaye : ($object->datepaid ? $object->datepaid : $object->datep);
      $paymenttypeid = $object->paiementid ? $object->paiementid : ($object->paymenttype ? $object->paymenttype : $object->type_payment);

      $this->object_data->ref = $object->ref;
      $this->object_data->date = $datepayment;
      $this->object_data->type_code = dol_getIdFromCode($this->db, $paymenttypeid, 'c_paiement', 'id', 'code');
      $this->object_data->payment_num = $object->num_payment;
      //$this->object_data->fk_account = $object->fk_account;
      $this->object_data->note = $object->note;
      //var_dump($this->object_data);exit;

      $totalamount = 0;

      if (!is_array($object->amounts) && $object->amount)
      {
        $object->amounts = array($object->id => $object->amount);
      }

      $paymentpartnumber = 0;
      foreach ($object->amounts as $objid => $amount)
      {
        if (empty($amount)) continue;

        $totalamount += $amount;

        $tmpobject = null;
        if ($this->element == 'payment_supplier')
        {
          include_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.facture.class.php';
          $tmpobject = new FactureFournisseur($this->db);
        } elseif ($this->element == 'payment')
        {
          include_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
          $tmpobject = new Facture($this->db);
        } elseif ($this->element == 'payment_donation')
        {
          include_once DOL_DOCUMENT_ROOT.'/don/class/don.class.php';
          $tmpobject = new Don($this->db);
        } elseif ($this->element == 'payment_various')
        {
          include_once DOL_DOCUMENT_ROOT.'/compta/bank/class/paymentvarious.class.php';
          $tmpobject = new PaymentVarious($this->db);
        }

        if (!is_object($tmpobject))
        {
          continue;
        }

        $result = $tmpobject->fetch($objid);

        if ($result <= 0)
        {
          $this->error = $tmpobject->error;
          $this->errors = $tmpobject->errors;
          dol_syslog("Failed to fetch object with id ".$objid, LOG_ERR);
          return -1;
        }

        $paymentpart = new stdClass();
        $paymentpart->amount = $amount;

        if (!in_array($this->element, array('payment_donation', 'payment_various')))
        {
          $result = $tmpobject->fetch_thirdparty();
          if ($result == 0)
          {
            $this->error = 'Failed to fetch thirdparty for object with id '.$tmpobject->id;
            $this->errors[] = $this->error;
            dol_syslog("Failed to fetch thirdparty for object with id ".$tmpobject->id, LOG_ERR);
            return -1;
          } elseif ($result < 0)
          {
            $this->error = $tmpobject->error;
            $this->errors = $tmpobject->errors;
            return -1;
          }

          $paymentpart->thirdparty = new stdClass();
          foreach ($tmpobject->thirdparty as $key=>$value)
          {
            if (in_array($key, $arrayoffieldstoexclude)) continue; // Discard some properties
            if (!in_array($key, array(
            'name', 'name_alias', 'ref_ext', 'address', 'zip', 'town', 'state_code', 'country_code', 'idprof1', 'idprof2', 'idprof3', 'idprof4', 'idprof5', 'idprof6', 'phone', 'fax', 'email', 'barcode',
            'tva_intra', 'localtax1_assuj', 'localtax1_value', 'localtax2_assuj', 'localtax2_value', 'managers', 'capital', 'typent_code', 'forme_juridique_code', 'code_client', 'code_fournisseur'
            ))) continue; // Discard if not into a dedicated list
            if (!is_object($value)) $paymentpart->thirdparty->{$key} = $value;
          }
        }

        // Init object to avoid warnings
        if ($this->element == 'payment_donation') $paymentpart->donation = new stdClass();
        else $paymentpart->invoice = new stdClass();

        if ($this->element != 'payment_various')
        {
          foreach ($tmpobject as $key=>$value)
          {
            if (in_array($key, $arrayoffieldstoexclude)) continue; // Discard some properties
            if (!in_array($key, array(
            'ref', 'ref_client', 'ref_supplier', 'date', 'datef', 'type', 'total_ht', 'total_tva', 'total_ttc', 'localtax1', 'localtax2', 'revenuestamp', 'datepointoftax', 'note_public'
            ))) continue; // Discard if not into a dedicated list
            if (!is_object($value))
            {
              if ($this->element == 'payment_donation') $paymentpart->donation->{$key} = $value;
              elseif ($this->element == 'payment_various') $paymentpart->various->{$key} = $value;
              else $paymentpart->invoice->{$key} = $value;
            }
          }

          $paymentpartnumber++; // first payment will be 1
          $this->object_data->payment_part[$paymentpartnumber] = $paymentpart;
        }
      }

      $this->object_data->amount = $totalamount;

      if (!empty($object->newref)) $this->object_data->ref = $object->newref;
    } elseif ($this->element == 'payment_salary')
    {
      $this->object_data->amounts = array($object->amount);

      if (!empty($object->newref)) $this->object_data->ref = $object->newref;
    } elseif ($this->element == 'subscription')
    {
      foreach ($object as $key=>$value)
      {
        if (in_array($key, $arrayoffieldstoexclude)) continue; // Discard some properties
        if (!in_array($key, array(
          'id', 'datec', 'dateh', 'datef', 'fk_adherent', 'amount', 'import_key', 'statut', 'note'
        ))) continue; // Discard if not into a dedicated list
        if (!is_object($value)) $this->object_data->{$key} = $value;
      }

      if (!empty($object->newref)) $this->object_data->ref = $object->newref;
    } else // Generic case
    {
      foreach ($object as $key=>$value)
      {
        if (in_array($key, $arrayoffieldstoexclude)) continue; // Discard some properties
        if (!is_object($value)) $this->object_data->{$key} = $value;
      }

      if (!empty($object->newref)) $this->object_data->ref = $object->newref;
    }

    return 1;
  }

  public function fetch($id)
  {

    global $langs;

    dol_syslog(get_class($this)."::fetch id=".$id, LOG_DEBUG);

    if (empty($id))
    {
      $this->error = 'BadParameter';
      return -1;
    }

    $langs->load("blockedlog");

    $sql = "SELECT b.rowid, b.date_creation, b.signature, b.signature_line, b.amounts, b.action, b.element, b.fk_object, b.entity,";
    $sql .= " b.certified, b.tms, b.fk_user, b.user_fullname, b.date_object, b.ref_object, b.object_data, b.object_version";
    $sql .= " FROM ".MAIN_DB_PREFIX."blockedlog as b";
    if ($id) $sql .= " WHERE b.rowid = ".$id;

    $resql = $this->db->query($sql);
    if ($resql)
    {
      if ($this->db->num_rows($resql))
      {
        $obj = $this->db->fetch_object($resql);

        $this->id = $obj->rowid;
        $this->entity = $obj->entity;
        $this->ref        = $obj->rowid;

        $this->date_creation = $this->db->jdate($obj->date_creation);
        $this->tms        = $this->db->jdate($obj->tms);

        $this->amounts      = (double) $obj->amounts;
        $this->action = $obj->action;
        $this->element      = $obj->element;

        $this->fk_object = $obj->fk_object;
        $this->date_object = $this->db->jdate($obj->date_object);
        $this->ref_object = $obj->ref_object;

        $this->fk_user = $obj->fk_user;
        $this->user_fullname = $obj->user_fullname;

        $this->object_data = $this->dolDecodeBlockedData($obj->object_data);
        $this->object_version = $obj->object_version;

        $this->signature    = $obj->signature;
        $this->signature_line = $obj->signature_line;
        $this->certified    = ($obj->certified == 1);

        return 1;
      } else {
        $this->error = $langs->trans("RecordNotFound");
        return 0;
      }
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }


  public function dolDecodeBlockedData($data, $mode = 0)
  {
    try {
      //include_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
      //include_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
      $aaa = unserialize($data);
      //$aaa = unserialize($data);
    } catch (Exception $e) {
      //print $e->getErrs);
    }
    return $aaa;
  }


  public function setCertified()
  {

    $res = $this->db->query("UPDATE ".MAIN_DB_PREFIX."blockedlog SET certified=1 WHERE rowid=".$this->id);
    if ($res === false) return false;

    return true;
  }

  public function create($user, $forcesignature = '')
  {

    global $conf, $langs, $hookmanager;

    $langs->load('blockedlog');

    $error = 0;

    // Clean data
    $this->amounts = (double) $this->amounts;

    dol_syslog(get_class($this).'::create action='.$this->action.' fk_user='.$this->fk_user.' user_fullname='.$this->user_fullname, LOG_DEBUG);

    // Check parameters/properties
    if (!isset($this->amounts)) // amount can be 0 for some events (like when module is disabled)
    {
      $this->error = $langs->trans("BlockLogNeedAmountsValue");
      dol_syslog($this->error, LOG_WARNING);
      return -1;
    }

    if (empty($this->element)) {
      $this->error = $langs->trans("BlockLogNeedElement");
      dol_syslog($this->error, LOG_WARNING);
      return -2;
    }

    if (empty($this->action)) {
      $this->error = $langs->trans("BadParameterWhenCallingCreateOfBlockedLog");
      dol_syslog($this->error, LOG_WARNING);
      return -3;
    }
    if (empty($this->fk_user)) $this->user_fullname = '(Anonymous)';

    $this->date_creation = dol_now();

    $this->db->begin();

    $previoushash = $this->getPreviousHash(1, 0); // This get last record and lock database until insert is done

    $keyforsignature = $this->buildKeyForSignature();

    $this->signature_line = dol_hash($keyforsignature, '5'); // Not really usefull
    $this->signature = dol_hash($previoushash.$keyforsignature, '5');
    if ($forcesignature) $this->signature = $forcesignature;
    //var_dump($keyforsignature);var_dump($previoushash);var_dump($this->signature_line);var_dump($this->signature);

    $sql = "INSERT INTO ".MAIN_DB_PREFIX."blockedlog (";
    $sql .= " date_creation,";
    $sql .= " action,";
    $sql .= " amounts,";
    $sql .= " signature,";
    $sql .= " signature_line,";
    $sql .= " element,";
    $sql .= " fk_object,";
    $sql .= " date_object,";
    $sql .= " ref_object,";
    $sql .= " object_data,";
    $sql .= " object_version,";
    $sql .= " certified,";
    $sql .= " fk_user,";
    $sql .= " user_fullname,";
    $sql .= " entity";
    $sql .= ") VALUES (";
    $sql .= "'".$this->db->idate($this->date_creation)."',";
    $sql .= "'".$this->db->escape($this->action)."',";
    $sql .= $this->amounts.",";
    $sql .= "'".$this->db->escape($this->signature)."',";
    $sql .= "'".$this->db->escape($this->signature_line)."',";
    $sql .= "'".$this->db->escape($this->element)."',";
    $sql .= $this->fk_object.",";
    $sql .= "'".$this->db->idate($this->date_object)."',";
    $sql .= "'".$this->db->escape($this->ref_object)."',";
    $sql .= "'".$this->db->escape(serialize($this->object_data))."',";
    $sql .= "'".$this->db->escape($this->object_version)."',";
    $sql .= "0,";
    $sql .= $this->fk_user.",";
    $sql .= "'".$this->db->escape($this->user_fullname)."',";
    $sql .= ($this->entity ? $this->entity : $conf->entity);
    $sql .= ")";

    $res = $this->db->query($sql);
    if ($res)
    {
      $id = $this->db->last_insert_id(MAIN_DB_PREFIX."blockedlog");

      if ($id > 0)
      {
        $this->id = $id;

        $this->db->commit();

        return $this->id;
      } else {
        $this->db->rollback();
        return -2;
      }
    } else {
      $this->error = $this->db->error();
      $this->db->rollback();
      return -1;
    }

    // The commit will release the lock so we can insert nex record
  }

  public function checkSignature($previoushash = '')
  {
    if (empty($previoushash))
    {
      $previoushash = $this->getPreviousHash(0, $this->id);
    }
    // Recalculate hash
    $keyforsignature = $this->buildKeyForSignature();

    $signature_line = dol_hash($keyforsignature, '5'); // Not really usefull
    $signature = dol_hash($previoushash.$keyforsignature, '5');
    //var_dump($previoushash); var_dump($keyforsignature); var_dump($signature_line); var_dump($signature);

    $res = ($signature === $this->signature);

    if (!$res) {
      $this->error = 'Signature KO';
    }

    return $res;
  }

  private function buildKeyForSignature()
  {
    //print_r($this->object_data);
    if (((int) $this->object_version) > 12) {
      return $this->date_creation.'|'.$this->action.'|'.$this->amounts.'|'.$this->ref_object.'|'.$this->date_object.'|'.$this->user_fullname.'|'.print_r($this->object_data, true);
    } else {
      return $this->date_creation.'|'.$this->action.'|'.$this->amounts.'|'.$this->ref_object.'|'.$this->date_object.'|'.$this->user_fullname.'|'.print_r($this->object_data, true);
    }
  }


  public function getPreviousHash($withlock = 0, $beforeid = 0)
  {
    global $conf;

    $previoussignature = '';

    $sql = "SELECT rowid, signature FROM ".MAIN_DB_PREFIX."blockedlog";
    $sql .= " WHERE entity=".$conf->entity;
    if ($beforeid) $sql .= " AND rowid < ".(int) $beforeid;
    $sql .= " ORDER BY rowid DESC LIMIT 1";
    $sql .= ($withlock ? " FOR UPDATE " : "");

    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
      if ($obj)
      {
        $previoussignature = $obj->signature;
      }
    } else {
      dol_print_error($this->db);
      exit;
    }

    if (empty($previoussignature))
    {
      // First signature line (line 0)
      $previoussignature = $this->getSignature();
    }

    return $previoussignature;
  }

  public function getLog($element, $fk_object, $limit = 0, $sortfield = '', $sortorder = '', $search_fk_user = -1, $search_start = -1, $search_end = -1, $search_ref = '', $search_amount = '', $search_code = '')
  {
    global $conf, $cachedlogs;

    /* $cachedlogs allow fastest search */
    if (empty($cachedlogs)) $cachedlogs = array();

    if ($element == 'all') {
      $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."blockedlog
           WHERE entity=".$conf->entity;
    } elseif ($element == 'not_certified') {
      $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."blockedlog
           WHERE entity=".$conf->entity." AND certified = 0";
    } elseif ($element == 'just_certified') {
      $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."blockedlog
           WHERE entity=".$conf->entity." AND certified = 1";
    } else {
      $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."blockedlog
           WHERE entity=".$conf->entity." AND element='".$element."' AND fk_object=".(int) $fk_object;
    }

    if ($search_fk_user > 0)  $sql .= natural_search("fk_user", $search_fk_user, 2);
    if ($search_start > 0)    $sql .= " AND date_creation >= '".$this->db->idate($search_start)."'";
    if ($search_end > 0)      $sql .= " AND date_creation <= '".$this->db->idate($search_end)."'";
    if ($search_ref != '')    $sql .= natural_search("ref_object", $search_ref);
    if ($search_amount != '') $sql .= natural_search("amounts", $search_amount, 1);
    if ($search_code != '' && $search_code != '-1')   $sql .= natural_search("action", $search_code, 3);

    $sql .= $this->db->order($sortfield, $sortorder);
    $sql .= $this->db->plimit($limit + 1); // We want more, because we will stop into loop later with error if we reach max

    $res = $this->db->query($sql);
    if ($res) {
      $results = array();

      $i = 0;
      while ($obj = $this->db->fetch_object($res))
      {
        $i++;
        if ($i > $limit)
        {
          // Too many record, we will consume too much memory
          return -2;
        }

        if (!isset($cachedlogs[$obj->rowid]))
        {
          $b = new BlockedLog($this->db);
          $b->fetch($obj->rowid);

          $cachedlogs[$obj->rowid] = $b;
        }

        $results[] = $cachedlogs[$obj->rowid];
      }

      return $results;
    }

    return -1;
  }

  public function getSignature()
  {
    global $db, $conf, $mysoc;

    if (empty($conf->global->BLOCKEDLOG_ENTITY_FINGERPRINT)) { // creation of a unique fingerprint
      require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php';
      require_once DOL_DOCUMENT_ROOT.'/core/lib/security.lib.php';
      require_once DOL_DOCUMENT_ROOT.'/core/lib/security2.lib.php';

      $fingerprint = dol_hash(print_r($mysoc, true).getRandomPassword(1), '5');

      dolibarr_set_const($db, 'BLOCKEDLOG_ENTITY_FINGERPRINT', $fingerprint, 'chaine', 0, 'Numeric Unique Fingerprint', $conf->entity);

      $conf->global->BLOCKEDLOG_ENTITY_FINGERPRINT = $fingerprint;
    }

    return $conf->global->BLOCKEDLOG_ENTITY_FINGERPRINT;
  }


  public function alreadyUsed($ignoresystem = 0)
  {
    global $conf;

    $result = false;

    $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."blockedlog";
    $sql .= " WHERE entity = ".$conf->entity;
    if ($ignoresystem) $sql .= " AND action not in ('MODULE_SET','MODULE_RESET')";
    $sql .= $this->db->plimit(1);

    $res = $this->db->query($sql);
    if ($res !== false)
    {
      $obj = $this->db->fetch_object($res);
      if ($obj) $result = true;
    } else dol_print_error($this->db);

    dol_syslog("Module Blockedlog alreadyUsed with ignoresystem=".$ignoresystem." is ".$result);

    return $result;
  }
}