Commit | Line | Data |
---|---|---|
9bb8bf21 | 1 | <?php |
2 | /*************************************************************************** | |
a7f778a5 | 3 | * Copyright (C) 2003-2009 Polytechnique.org * |
9bb8bf21 | 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 MMList extends XmlrpcClient | |
23 | { | |
35fff9b0 | 24 | public function __construct($user, $pass = null, $fqdn = null) |
9bb8bf21 | 25 | { |
26 | global $globals; | |
35fff9b0 FB |
27 | if ($user instanceof PlUser) { |
28 | $fqdn = $pass; | |
29 | $uid = $user->id(); | |
30 | $pass = $user->password(); | |
31 | } else { | |
32 | $uid = $user; | |
33 | } | |
9bb8bf21 | 34 | |
35 | $dom = is_null($fqdn) ? $globals->mail->domain : $fqdn; | |
36 | $url = "http://$uid:$pass@{$globals->lists->rpchost}:{$globals->lists->rpcport}/$dom"; | |
37 | parent::__construct($url); | |
81e9c63f | 38 | if ($globals->debug & DEBUG_BT) { |
d3f26be9 | 39 | $this->bt = new PlBacktrace('MMList'); |
eaf30d86 | 40 | } |
9bb8bf21 | 41 | } |
9bb8bf21 | 42 | } |
43 | ||
a7de4ef7 | 44 | // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: |
9bb8bf21 | 45 | ?> |