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
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
|
/*======================================================================
FILE: regression-classify.c
SPDX-FileCopyrightText: 2002 Paul Lindner <lindner@users.sf.net>
SPDX-License-Identifier: LGPL-2.1-only OR MPL-2.0
======================================================================*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <stdio.h> /* for printf */
#include <errno.h>
#include <string.h> /* For strerror */
#include <libical/ical.h>
#include <libicalss/icalss.h>
#include "regression.h"
/* Gets a note about the purpose of the property*/
static const char *get_note(icalcomponent *c)
{
icalproperty *p;
const char *note = 0;
if (c != 0) {
for (p = icalcomponent_get_first_property(c, ICAL_X_PROPERTY);
p != 0; p = icalcomponent_get_next_property(c, ICAL_X_PROPERTY)) {
if (strcmp(icalproperty_get_x_name(p), "X-LIC-NOTE") == 0) {
note = icalproperty_get_x(p);
}
}
}
if (note == 0) {
note = "None";
}
return note;
}
/* Gets the expected result about the purpose of the property*/
static const char *get_expect(icalcomponent *c)
{
icalproperty *p;
const char *note = 0;
if (c != 0) {
for (p = icalcomponent_get_first_property(c, ICAL_X_PROPERTY);
p != 0; p = icalcomponent_get_next_property(c, ICAL_X_PROPERTY)) {
if (strcmp(icalproperty_get_x_name(p), "X-LIC-EXPECT") == 0) {
note = icalproperty_get_x(p);
}
}
}
if (note == 0) {
note = "None";
}
return note;
}
void test_classify(void)
{
icalcomponent *c, *match;
int i = 0;
int error_count = 0;
/* Open up the two storage files, one for the incoming components,
one for the calendar */
icalfileset_options options = { O_RDONLY, 0644, 0, NULL };
icalset *incoming = icalset_new(ICAL_FILE_SET, TEST_DATADIR "/incoming.ics", &options);
icalset *cal = icalset_new(ICAL_FILE_SET, TEST_DATADIR "/calendar.ics", &options);
icalset *f = icalset_new(ICAL_FILE_SET, TEST_DATADIR "/classify.ics", &options);
ok("opening file classify.ics", (f != 0));
ok("opening file calendar.ics", (cal != 0));
ok("opening file incoming.ics", (incoming != 0));
/* some basic tests.. */
if (f) {
c = icalset_get_first_component(f);
match = icalset_get_next_component(f);
ok("test two vcalendars for SEQUENCE with icalclassify()",
(icalclassify(c, match, "A@example.com") == ICAL_XLICCLASS_REQUESTRESCHEDULE));
icalset_free(f);
}
assert(incoming != 0);
assert(cal != 0);
/* Iterate through all of the incoming components */
for (c = icalset_get_first_component(incoming); c != 0;
c = icalset_get_next_component(incoming)) {
icalproperty_xlicclass class;
icalcomponent *match = 0;
const char *this_uid;
const char *this_note = get_note(c);
const char *expected_result = get_expect(c);
const char *actual_result;
char msg[128];
i++;
/* Check this component against the restrictions imposed by
iTIP. An errors will be inserted as X-LIC-ERROR properties
in the component. The Parser will also insert errors if it
cannot parse the component */
icalcomponent_check_restrictions(c);
/* If there are any errors, print out the component */
error_count = icalcomponent_count_errors(c);
snprintf(msg, sizeof(msg), "%s - parsing", this_note);
int_is(msg, error_count, 0);
if (error_count != 0) {
if (VERBOSE) {
printf("----- Component has errors ------- \n%s-----------------\n",
icalcomponent_as_ical_string(c));
}
}
/* Use one of the icalcomponent convenience routines to get
the UID. This routine will save you from having to use
icalcomponent_get_inner(),
icalcomponent_get_first_property(), checking the return
value, and then calling icalproperty_get_uid. There are
several other convenience routines for DTSTART, DTEND,
DURATION, SUMMARY, METHOD, and COMMENT */
this_uid = icalcomponent_get_uid(c);
if (this_uid != 0) {
/* Look in the calendar for a component with the same UID
as the incoming component. We should really also be
checking the RECURRENCE-ID. Another way to do this
operation is to us icalset_find_match(), which does use
the RECURRENCE-ID. */
match = icalset_fetch(cal, this_uid);
}
/* Classify the incoming component. The third argument is the
calid of the user who owns the calendar. In a real program,
you would probably switch() on the class. */
class = icalclassify(c, match, "A@example.com");
/** eventually test this too.. **/
(void)get_note(match);
actual_result = icalproperty_enum_to_string(class);
snprintf(msg, sizeof(msg), "expecting %s", expected_result);
str_is(msg, expected_result, actual_result);
if (VERBOSE) {
printf("Test %d\n"
"Incoming: %s\n"
"Matched: %s\n"
"Classification: %s\n\n",
i, this_note, get_note(match), icalproperty_enum_to_string(class));
}
}
icalset_free(incoming);
icalset_free(cal);
}
|
