modules/payment/money/cyberpaiement.inc.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2007 Polytechnique.org                              *
   4  *  http://opensource.polytechnique.org/                                   *
   5  *                                                                         *
   6  *  This program is free software; you can redistribute it and/or modify   *
   7  *  it under the terms of the GNU General Public License as published by   *
   8  *  the Free Software Foundation; either version 2 of the License, or      *
   9  *  (at your option) any later version.                                    *
  10  *                                                                         *
  11  *  This program is distributed in the hope that it will be useful,        *
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
  14  *  GNU General Public License for more details.                           *
  15  *                                                                         *
  16  *  You should have received a copy of the GNU General Public License      *
  17  *  along with this program; if not, write to the Free Software            *
  18  *  Foundation, Inc.,                                                      *
  19  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  20  ***************************************************************************/
  21
  22 class CyberPayment
  23 {
  24     // {{{ properties
  25
  26     var $val;
  27
  28     var $urlform;
  29     var $nomsite = "la BP Lorraine Champagne";
  30     var $infos;
  31
  32     // }}}
  33     // {{{ constructor
  34
  35     function CyberPayment($val)
  36     {
  37         $this->val = strtr(sprintf("%.02f", (float)$val), '.', ',');
  38     }
  39
  40     // }}}
  41     // {{{ function form()
  42
  43     function prepareform(&$pay)
  44     {
  45         // toute la doc se trouve sur
  46         // http://www.cyberpaiement.tm.fr/donnees.htm
  47
  48         global $globals, $platal;
  49
  50         $roboturl = str_replace("https://","http://", $globals->baseurl)
  51             . '/' . $platal->ns . "payment/cyber_return/".S::v('uid')."?comment=".urlencode(Env::v('comment'))."&CHAMPBPX";
  52         $req = XDB::query("SELECT IF(nom_usage!='', nom_usage, nom) AS nom
  53                              FROM auth_user_md5
  54                             WHERE user_id = {?}",S::v('uid'));
  55         $name = $req->fetchOneCell();
  56
  57         // on constuit la reference de la transaction
  58         require_once 'xorg.misc.inc.php';
  59         $prefix = ($pay->flags->hasflag('unique')) ? str_pad("",15,"0") : rand_url_id();
  60         $fullref = substr("$prefix-xorg-{$pay->id}",-15);
  61
  62         $this->urlform = "https://ecom.cimetz.com/telepaie/cgishell.exe/epaie01.exe";
  63         $this->infos['commercant'] = Array(
  64                 'CHAMP000' => 510879,
  65                 'CHAMP001' => 5965,
  66                 'CHAMP002' => 5429159012,
  67                 'CHAMP003' => "I",
  68                 'CHAMP004' => "Polytechnique.org",
  69                 'CHAMP005' => $roboturl,
  70                 'CHAMP006' => "Polytechnique.org",
  71                 'CHAMP007' => $globals->baseurl . '/' . $platal->ns,
  72                 'CHAMP008' => $pay->mail);
  73         $this->infos['client'] = Array(
  74                 'CHAMP100' => $name,
  75                 'CHAMP101' => S::v('prenom'),
  76                 'CHAMP102' => '.',
  77                 'CHAMP103' => '.',
  78                 'CHAMP104' => S::v('bestalias').'@' . $globals->mail->domain,
  79                 'CHAMP106' => '.',
  80                 'CHAMP107' => '.',
  81                 'CHAMP108' => '.',
  82                 'CHAMP109' => '.',
  83                 'CHAMP110' => '.');
  84         $this->infos['commande'] = Array(
  85                 'CHAMP200' => $fullref,
  86                 'CHAMP201' => $this->val,
  87                 'CHAMP202' => "EUR");
  88         $this->infos['divers'] = Array('CHAMP900' => '01');
  89     }
  90
  91     // }}}
  92 }
  93
  94 $api = 'CyberPayment';
  95
  96 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
  97 ?>