10 |
jpm |
1 |
<?php
|
|
|
2 |
/**
|
|
|
3 |
* Description: a SOAP Calendar Server
|
|
|
4 |
*/
|
|
|
5 |
if (!@include('SOAP'.DIRECTORY_SEPARATOR.'Server.php')) {
|
|
|
6 |
die('You must have PEAR::SOAP installed');
|
|
|
7 |
}
|
|
|
8 |
|
|
|
9 |
if (!@include 'Calendar'.DIRECTORY_SEPARATOR.'Calendar.php') {
|
|
|
10 |
define('CALENDAR_ROOT', '../../');
|
|
|
11 |
}
|
|
|
12 |
|
|
|
13 |
class Calendar_Server
|
|
|
14 |
{
|
|
|
15 |
var $__dispatch_map = array();
|
|
|
16 |
var $__typedef = array();
|
|
|
17 |
|
|
|
18 |
function Calendar_Server()
|
|
|
19 |
{
|
|
|
20 |
$this->__dispatch_map['getMonth'] =
|
|
|
21 |
array('in' => array('year' => 'int', 'month'=>'int'),
|
|
|
22 |
'out' => array('month' => '{urn:PEAR_SOAP_Calendar}Month'),
|
|
|
23 |
);
|
|
|
24 |
$this->__typedef['Month'] = array (
|
|
|
25 |
'monthname' => 'string',
|
|
|
26 |
'days' => '{urn:PEAR_SOAP_Calendar}MonthDays'
|
|
|
27 |
);
|
|
|
28 |
$this->__typedef['MonthDays'] = array (array ('{urn:PEAR_SOAP_Calendar}Day'));
|
|
|
29 |
$this->__typedef['Day'] = array (
|
|
|
30 |
'isFirst' => 'int',
|
|
|
31 |
'isLast' => 'int',
|
|
|
32 |
'isEmpty' => 'int',
|
|
|
33 |
'day' => 'int' );
|
|
|
34 |
}
|
|
|
35 |
|
|
|
36 |
function __dispatch($methodname)
|
|
|
37 |
{
|
|
|
38 |
if (isset($this->__dispatch_map[$methodname]))
|
|
|
39 |
return $this->__dispatch_map[$methodname];
|
|
|
40 |
return NULL;
|
|
|
41 |
}
|
|
|
42 |
|
|
|
43 |
function getMonth($year, $month)
|
|
|
44 |
{
|
|
|
45 |
require_once(CALENDAR_ROOT.'Month'.DIRECTORY_SEPARATOR.'Weekdays.php');
|
|
|
46 |
$Month = & new Calendar_Month_Weekdays($year,$month);
|
|
|
47 |
if (!$Month->isValid()) {
|
|
|
48 |
$V = & $Month->getValidator();
|
|
|
49 |
$errorMsg = '';
|
|
|
50 |
while ($error = $V->fetch()) {
|
|
|
51 |
$errorMsg .= $error->toString()."\n";
|
|
|
52 |
}
|
|
|
53 |
return new SOAP_Fault($errorMsg, 'Client');
|
|
|
54 |
} else {
|
|
|
55 |
$monthname = date('F Y', $Month->getTimeStamp());
|
|
|
56 |
$days = array();
|
|
|
57 |
$Month->build();
|
|
|
58 |
while ($Day = & $Month->fetch()) {
|
|
|
59 |
$day = array(
|
|
|
60 |
'isFirst' => (int)$Day->isFirst(),
|
|
|
61 |
'isLast' => (int)$Day->isLast(),
|
|
|
62 |
'isEmpty' => (int)$Day->isEmpty(),
|
|
|
63 |
'day' => (int)$Day->thisDay(),
|
|
|
64 |
);
|
|
|
65 |
$days[] = $day;
|
|
|
66 |
}
|
|
|
67 |
return array('monthname' => $monthname, 'days' => $days);
|
|
|
68 |
}
|
|
|
69 |
}
|
|
|
70 |
}
|
|
|
71 |
|
|
|
72 |
$server = new SOAP_Server();
|
|
|
73 |
$server->_auto_translation = true;
|
|
|
74 |
$calendar = new Calendar_Server();
|
|
|
75 |
$server->addObjectMap($calendar, 'urn:PEAR_SOAP_Calendar');
|
|
|
76 |
|
|
|
77 |
if (strtoupper($_SERVER['REQUEST_METHOD'])=='POST') {
|
|
|
78 |
$server->service($GLOBALS['HTTP_RAW_POST_DATA']);
|
|
|
79 |
} else {
|
|
|
80 |
require_once 'SOAP'.DIRECTORY_SEPARATOR.'Disco.php';
|
|
|
81 |
$disco = new SOAP_DISCO_Server($server, "PEAR_SOAP_Calendar");
|
|
|
82 |
if (isset($_SERVER['QUERY_STRING']) &&
|
|
|
83 |
strcasecmp($_SERVER['QUERY_STRING'], 'wsdl')==0) {
|
|
|
84 |
header("Content-type: text/xml");
|
|
|
85 |
echo $disco->getWSDL();
|
|
|
86 |
} else {
|
|
|
87 |
echo 'This is a PEAR::SOAP Calendar Server. For client try <a href="8.php">here</a><br />';
|
|
|
88 |
echo 'For WSDL try <a href="?wsdl">here</a>';
|
|
|
89 |
}
|
|
|
90 |
exit;
|
|
|
91 |
}
|
|
|
92 |
?>
|