File: appointment.php

package info (click to toggle)
openchange 1%3A2.2-5
  • links: PTS, VCS
  • area: main
  • in suites: jessie-kfreebsd
  • size: 11,872 kB
  • sloc: ansic: 87,153; python: 9,391; sh: 3,958; perl: 2,537; cpp: 1,410; makefile: 1,380; sql: 702; yacc: 540; php: 440; lex: 341; xml: 14
file content (95 lines) | stat: -rw-r--r-- 3,180 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
<?php
/*
   OpenChange PHP bindings examples

   Copyright (C) 2013-2014 Javier Amor Garcia

   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 <http://www.gnu.org/licenses/>.
*/

include('./test-helpers.php');
include('./config.php');

# values to be set
$tagBody1 = "body1";
$tagBody2 = "body2";
$unixtime1 = 1380204166;
$unixtime2 = $unixtime1 + 100;


$mapi = new MAPIProfileDB($dbPath);
ok($mapi, "MAPIProfileDB open");
is($mapi->path(), $dbPath  , "MAPI DB correct path");

#$mapi->debug(true, 10);

$mapiProfile = $mapi->getProfile($profileName);
ok($mapiProfile, "Get profile $profileName");

$session = $mapiProfile->logon();
ok ($session, "Profile logon");

$mailbox = $session->mailbox();
ok ($mailbox, "Get default mailbox");
diag("Mailbox name "  . $mailbox->getName());

$calendar = $mailbox->calendar();
diag("Calendar folder " . $calendar->getName() . "/" . $calendar->getFolderType());
ok($calendar, "Get calendar");


$message = $calendar->openMessage($appointmentId, MAPIMessage::RW);
ok($message, "Appointment $appointmentId opened in RW mode");
is($message->getID(), $appointmentId, "Check opened message Id (msut be $appointment_id)");

diag("Changing PidTagBody to '$tagBody1'");
$message->set(PidTagBody, $tagBody1);

diag("Changing  PidLidAppointmentEndWhole to $unixtime1 (09/26/2013 @ 10:02am in EST.)");
$message->set(PidLidAppointmentEndWhole, $unixtime1);

$message->save();
unset($message);

diag("--After saving changes:");
$message = $calendar->openMessage($appointmentId, MAPIMessage::RW);
ok($message, "Reopen message in RW mode after saving changes");
is($message->get(PidTagBody), $tagBody1, "Checking that PidTagBody has correctly been changed");
is($message->get(PidLidAppointmentEndWhole), $unixtime1, "Checking that PidLidAppointmentEndWhole has correctly been changed");


diag("Changing PidTagBody again to $tagBody2");
$message->set(PidTagBody, $tagBody2);
diag("Changing  PidLidAppointmentEndWhole to 100 seconds more");
$message->set(PidLidAppointmentEndWhole, $unixtime2);
$message->save();
unset($message);

diag("--After last changes:");
$message = $calendar->openMessage($appointmentId, MAPIMessage::RO);
ok($message, "Reopen message in RO mode after saving the last changes");
is($message->get(PidTagBody), $tagBody2, "Checking that PidTagBody has changed again");
is($message->get(PidLidAppointmentEndWhole), $unixtime2, "Checking that PidLidAppointmentEndWhole has changed again");

# workaround against shutdown problem
unset($message);
#unset($calendar);
#unset($mailbox);
#unset($session);
#unset($mapiProfile);
#unset($mapi);

endTestSuite("appointment.php");

?>