migrate payments.
[platal.git] / include / money / cyberpaiement.inc.php
CommitLineData
0337d704 1<?php
2/***************************************************************************
50a40a33 3 * Copyright (C) 2003-2006 Polytechnique.org *
0337d704 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
22class 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;
49
50 $roboturl = str_replace("https://","http://",$globals->baseurl)
a2558f2b 51 ."/payment/cyber_return/".Session::getInt('uid')."?CHAMPBPX";
0337d704 52 if (Cookie::has(session_name())) {
53 $returnurl .= "?".SID;
54 }
237b6585 55 $req = $globals->xdb->query("SELECT IF(nom_usage!='', nom_usage, nom) AS nom FROM auth_user_md5 WHERE user_id = {?}",Session::get('uid'));
56 $name = $req->fetchOneCell();
0337d704 57
58 // on constuit la reference de la transaction
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,
72 'CHAMP008' => $pay->mail);
73 $this->infos['client'] = Array(
237b6585 74 'CHAMP100' => $name,
0337d704 75 'CHAMP101' => Session::get('prenom'),
76 'CHAMP102' => '.',
77 'CHAMP103' => '.',
78 'CHAMP104' => Session::get('bestalias').'@polytechnique.org',
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?>