charge.php

<?php
/* Copyright (C) 2018       Thibault FOUCART        <support@ptibogxiv.net>
 * Copyright (C) 2019       Frédéric France         <frederic.france@netlogic.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/>.
 */

// Put here all includes required by your class file

require '../main.inc.php';
require_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php';
require_once DOL_DOCUMENT_ROOT.'/adherents/class/adherent.class.php';
require_once DOL_DOCUMENT_ROOT.'/stripe/class/stripe.class.php';
//require_once DOL_DOCUMENT_ROOT.'/core/lib/stripe.lib.php';
require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
require_once DOL_DOCUMENT_ROOT.'/commande/class/commande.class.php';
require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
if (!empty($conf->accounting->enabled)) require_once DOL_DOCUMENT_ROOT.'/accountancy/class/accountingjournal.class.php';

// Load translation files required by the page
$langs->loadLangs(array('compta', 'salaries', 'bills', 'hrm', 'stripe'));

// Security check
$socid = GETPOST("socid", "int");
if ($user->socid) $socid = $user->socid;
//$result = restrictedArea($user, 'salaries', '', '', '');

$limit = GETPOST('limit', 'int') ? GETPOST('limit', 'int') : $conf->liste_limit;
$rowid = GETPOST("rowid", 'alpha');
$sortfield = GETPOST("sortfield", 'alpha');
$sortorder = GETPOST("sortorder", 'alpha');
$page = GETPOSTISSET('pageplusone') ? (GETPOST('pageplusone') - 1) : GETPOST("page", 'int');
if (empty($page) || $page == -1) { $page = 0; }     // If $page is not defined, or '' or -1
$offset = $limit * $page;
$pageprev = $page - 1;
$pagenext = $page + 1;



/*
 * View
 */

$form = new Form($db);
$societestatic = new Societe($db);
$memberstatic = new Adherent($db);
$acc = new Account($db);
$stripe = new Stripe($db);

llxHeader('', $langs->trans("StripeChargeList"));

if (!empty($conf->stripe->enabled) && (empty($conf->global->STRIPE_LIVE) || GETPOST('forcesandbox', 'alpha')))
{
  $service = 'StripeTest';
  $servicestatus = '0';
  dol_htmloutput_mesg($langs->trans('YouAreCurrentlyInSandboxMode', 'Stripe'), '', 'warning');
} else {
  $service = 'StripeLive';
  $servicestatus = '1';
}

$stripeacc = $stripe->getStripeAccount($service);
/*if (empty($stripeaccount))
{
  print $langs->trans('ErrorStripeAccountNotDefined');
}*/

if (!$rowid) {
  $option = array('limit' => $limit + 1);
  $num = 0;

  if (GETPOSTISSET('starting_after_'.$page)) $option['starting_after'] = GETPOST('starting_after_'.$page, 'alphanohtml');

  try {
    if ($stripeacc)
    {
      $list = \Stripe\Charge::all($option, array("stripe_account" => $stripeacc));
    } else {
      $list = \Stripe\Charge::all($option);
    }

    $num = count($list->data);

    $totalnboflines = '';

    $param = '';
    //if (!empty($contextpage) && $contextpage != $_SERVER["PHP_SELF"]) $param .= '&contextpage='.urlencode($contextpage);
    if ($limit > 0 && $limit != $conf->liste_limit) $param .= '&limit='.urlencode($limit);
    $param .= '&starting_after_'.($page + 1).'='.$list->data[($limit - 1)]->id;
    //$param.='&ending_before_'.($page+1).'='.$list->data[($limit-1)]->id;

    $moreforfilter = '';
  } catch (Exception $e) {
    print $e->getMessage();
  }

  print '<form method="POST" action="'.$_SERVER["PHP_SELF"].'">';
  if ($optioncss != '') print '<input type="hidden" name="optioncss" value="'.$optioncss.'">';
  print '<input type="hidden" name="token" value="'.newToken().'">';
  print '<input type="hidden" name="formfilteraction" id="formfilteraction" value="list">';
  print '<input type="hidden" name="action" value="list">';
  print '<input type="hidden" name="sortfield" value="'.$sortfield.'">';
  print '<input type="hidden" name="sortorder" value="'.$sortorder.'">';
  print '<input type="hidden" name="page" value="'.$page.'">';

  $title = $langs->trans("StripeChargeList");
  $title .= ($stripeacc ? ' (Stripe connection with Stripe OAuth Connect account '.$stripeacc.')' : ' (Stripe connection with keys from Stripe module setup)');

  print_barre_liste($title, $page, $_SERVER["PHP_SELF"], $param, $sortfield, $sortorder, '', $num, $totalnboflines, 'title_accountancy.png', 0, '', 'hidepaginationprevious', $limit);

  print '<div class="div-table-responsive">';
  print '<table class="tagtable liste'.($moreforfilter ? " listwithfilterbefore" : "").'">'."\n";

  print '<tr class="liste_titre">';
  print_liste_field_titre("Ref", $_SERVER["PHP_SELF"], "", "", "", "", $sortfield, $sortorder);
  print_liste_field_titre("StripeCustomerId", $_SERVER["PHP_SELF"], "", "", "", "", $sortfield, $sortorder);
  print_liste_field_titre("Customer", $_SERVER["PHP_SELF"], "", "", "", "", $sortfield, $sortorder);
  print_liste_field_titre("Origin", $_SERVER["PHP_SELF"], "", "", "", "", $sortfield, $sortorder);
  print_liste_field_titre("DatePayment", $_SERVER["PHP_SELF"], "", "", "", '', $sortfield, $sortorder, 'center ');
  print_liste_field_titre("Type", $_SERVER["PHP_SELF"], "", "", "", '', $sortfield, $sortorder, 'left ');
  print_liste_field_titre("Paid", $_SERVER["PHP_SELF"], "", "", "", '', $sortfield, $sortorder, 'right ');
  print_liste_field_titre("Status", $_SERVER["PHP_SELF"], "", "", "", '', '', '', 'right ');
  print "</tr>\n";

  //print $list;
  $i = 0;
  foreach ($list->data as $charge)
  {
    if ($i >= $limit) {
      break;
    }

    if ($charge->refunded == '1') {
      $status = img_picto($langs->trans("refunded"), 'statut6');
    } elseif ($charge->paid == '1') {
      $status = img_picto($langs->trans((string) $charge->status), 'statut4');
    } else {
      $label = $langs->trans("Message").": ".$charge->failure_message."<br>";
      $label .= $langs->trans("Network").": ".$charge->outcome->network_status."<br>";
      $label .= $langs->trans("Status").": ".$langs->trans((string) $charge->outcome->seller_message);
      $status = $form->textwithpicto(img_picto($langs->trans((string) $charge->status), 'statut8'), $label, -1);
    }

    if ($charge->payment_method_details->type == 'card') {
      $type = $langs->trans("card");
    } elseif ($charge->source->type == 'card') {
      $type = $langs->trans("card");
    } elseif ($charge->payment_method_details->type == 'three_d_secure') {
      $type = $langs->trans("card3DS");
    } elseif ($charge->payment_method_details->type == 'sepa_debit') {
      $type = $langs->trans("sepadebit");
    } elseif ($charge->payment_method_details->type == 'ideal') {
      $type = $langs->trans("iDEAL");
    }

    // Why this ?
    /*if (! empty($charge->payment_intent)) {
     if (empty($stripeacc)) {       // If the Stripe connect account not set, we use common API usage
     $charge = \Stripe\PaymentIntent::retrieve($charge->payment_intent);
     } else {
     $charge = \Stripe\PaymentIntent::retrieve($charge->payment_intent, array("stripe_account" => $stripeacc));
     }
     }*/

    // The metadata FULLTAG is defined by the online payment page
    $FULLTAG = $charge->metadata->FULLTAG;

    // Save into $tmparray all metadata
    $tmparray = dolExplodeIntoArray($FULLTAG, '.', '=');
    // Load origin object according to metadata
    if (!empty($tmparray['CUS']) && $tmparray['CUS'] > 0)
    {
      $societestatic->fetch($tmparray['CUS']);
    } elseif (!empty($charge->metadata->dol_thirdparty_id) && $charge->metadata->dol_thirdparty_id > 0)
    {
      $societestatic->fetch($charge->metadata->dol_thirdparty_id);
    } else {
      $societestatic->id = 0;
    }
    if (!empty($tmparray['MEM']) && $tmparray['MEM'] > 0)
    {
      $memberstatic->fetch($tmparray['MEM']);
    } else {
      $memberstatic->id = 0;
    }

    print '<tr class="oddeven">';

    if (!empty($stripeacc)) $connect = $stripeacc.'/';

    // Ref
    $url = 'https://dashboard.stripe.com/'.$connect.'test/payments/'.$charge->id;
    if ($servicestatus)
    {
      $url = 'https://dashboard.stripe.com/'.$connect.'payments/'.$charge->id;
    }
    print "<td>";
    print "<a href='".$url."' target='_stripe'>".img_picto($langs->trans('ShowInStripe'), 'globe')." ".$charge->id."</a>";
    if ($charge->payment_intent) print '<br><span class="opacitymedium">'.$charge->payment_intent.'</span>';
    print "</td>\n";

    // Stripe customer
    print "<td>";
    if (!empty($conf->stripe->enabled) && !empty($stripeacc)) $connect = $stripeacc.'/';
    $url = 'https://dashboard.stripe.com/'.$connect.'test/customers/'.$charge->customer;
    if ($servicestatus)
    {
      $url = 'https://dashboard.stripe.com/'.$connect.'customers/'.$charge->customer;
    }
    if (!empty($charge->customer))
    {
      print '<a href="'.$url.'" target="_stripe">'.img_picto($langs->trans('ShowInStripe'), 'globe').' '.$charge->customer.'</a>';
    }
    print "</td>\n";

    // Link
    print "<td>";
    if ($societestatic->id > 0)
    {
      print $societestatic->getNomUrl(1);
    } elseif ($memberstatic->id > 0)
    {
      print $memberstatic->getNomUrl(1);
    }
    print "</td>\n";

    // Origin
    print "<td>";
    if ($charge->metadata->dol_type == "order" || $charge->metadata->dol_type == "commande") {
      $object = new Commande($db);
      $object->fetch($charge->metadata->dol_id);
      if ($object->id > 0) {
        print "<a href='".DOL_URL_ROOT."/commande/card.php?id=".$object->id."'>".img_picto('', 'object_order')." ".$object->ref."</a>";
      } else {
        print $FULLTAG;
      }
    } elseif ($charge->metadata->dol_type == "invoice" || $charge->metadata->dol_type == "facture") {
      print $charge->metadata->dol_type.' '.$charge->metadata->dol_id.' - ';
      $object = new Facture($db);
      $object->fetch($charge->metadata->dol_id);
      if ($object->id > 0) {
        print "<a href='".DOL_URL_ROOT."/compta/facture/card.php?facid=".$charge->metadata->dol_id."'>".img_picto('', 'object_invoice')." ".$object->ref."</a>";
      } else {
        print $FULLTAG;
      }
    } else {
      print $FULLTAG;
    }
    print "</td>\n";

    // Date payment
    print '<td class="center">'.dol_print_date($charge->created, '%d/%m/%Y %H:%M')."</td>\n";
    // Type
    print '<td>';
    print $type;
    print '</td>';
    // Amount
    print '<td class="right">'.price(($charge->amount - $charge->amount_refunded) / 100, 0, '', 1, - 1, - 1, strtoupper($charge->currency))."</td>";
    // Status
    print '<td class="right">';
    print $status;
    print "</td>\n";

    print "</tr>\n";

    $i++;
  }

  print '</table>';
  print '</div>';
  print '</form>';
}

// End of page
llxFooter();
$db->close();