2 * CDE - Common Desktop Environment
4 * Copyright (c) 1993-2012, The Open Group. All rights reserved.
6 * These libraries and programs are free software; you can
7 * redistribute them and/or modify them under the terms of the GNU
8 * Lesser General Public License as published by the Free Software
9 * Foundation; either version 2 of the License, or (at your option)
12 * These libraries and programs are distributed in the hope that
13 * they will be useful, but WITHOUT ANY WARRANTY; without even the
14 * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
15 * PURPOSE. See the GNU Lesser General Public License for more
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with these libraries and programs; if not, write
20 * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
21 * Floor, Boston, MA 02110-1301 USA
23 /* $XConsortium: cmxdr.c /main/1 1996/04/21 19:22:14 drk $ */
25 * (c) Copyright 1993, 1994 Hewlett-Packard Company
26 * (c) Copyright 1993, 1994 International Business Machines Corp.
27 * (c) Copyright 1993, 1994 Novell, Inc.
28 * (c) Copyright 1993, 1994 Sun Microsystems, Inc.
32 * xdr routines for xapia csa data structures
35 #include <EUSCompat.h>
40 /* Functions generated by rtable4.x */
42 * time_t is a typedef which is system dependent
45 xdr_time_t(XDR *xdrs, time_t *objp)
47 if (!xdr_long(xdrs, objp))
54 * cms_name - a user name or calendar name which is
55 * variable length character string
59 xdr_cms_name(XDR *xdrs, cms_name *objp)
61 if (!xdr_string(xdrs, objp, ~0))
67 * cms_access_entry - data structure for the access list attribute
71 xdr_cms_access_entry(XDR *xdrs, cms_access_entry *objp)
73 if (!xdr_string(xdrs, &objp->user, ~0))
75 if (!xdr_u_int(xdrs, &objp->rights))
77 if (!xdr_pointer(xdrs, (char **)&objp->next, sizeof (cms_access_entry),
78 (xdrproc_t) xdr_cms_access_entry))
84 * cms_key consists of the time and the unique
85 * identifier of the entry.
89 xdr_cms_key(XDR *xdrs, cms_key *objp)
91 if (!xdr_time_t(xdrs, &objp->time))
93 if (!xdr_long(xdrs, &objp->id))
99 xdr_CSA_opaque_data(XDR *xdrs, CSA_opaque_data *objp)
101 if (!xdr_bytes(xdrs, (char **)&objp->data, (u_int *) &objp->size, ~0))
107 xdr_CSA_reminder(XDR *xdrs, CSA_reminder *objp)
109 if (!xdr_string(xdrs, &objp->lead_time, ~0))
111 if (!xdr_string(xdrs, &objp->snooze_time, ~0))
113 if (!xdr_u_long(xdrs, &objp->repeat_count))
115 if (!xdr_CSA_opaque_data(xdrs, &objp->reminder_data))
121 xdr_CSA_date_time_entry(XDR *xdrs, CSA_date_time_entry *objp)
123 if (!xdr_string(xdrs, &objp->date_time, ~0))
125 if (!xdr_pointer(xdrs, (char **)&objp->next,
126 sizeof (CSA_date_time_entry), (xdrproc_t) xdr_CSA_date_time_entry))
132 xdr_cms_attribute_value(XDR *xdrs, cms_attribute_value *objp)
134 if (!xdr_int(xdrs, &objp->type))
137 switch (objp->type) {
138 case CSA_VALUE_SINT32:
139 case CSA_VALUE_ENUMERATED:
140 if (!xdr_long(xdrs, &objp->item.sint32_value))
143 case CSA_VALUE_BOOLEAN:
144 case CSA_VALUE_FLAGS:
145 case CSA_VALUE_UINT32:
146 if (!xdr_u_long(xdrs, &objp->item.uint32_value))
149 case CSA_VALUE_STRING:
150 case CSA_VALUE_CALENDAR_USER:
151 case CSA_VALUE_DATE_TIME:
152 case CSA_VALUE_DATE_TIME_RANGE:
153 case CSA_VALUE_TIME_DURATION:
154 if (!xdr_string(xdrs, &objp->item.string_value, ~0))
157 case CSA_VALUE_ACCESS_LIST:
158 if (!xdr_pointer(xdrs, (char **)&objp->item.access_list_value,
159 sizeof (cms_access_entry),
160 (xdrproc_t) xdr_cms_access_entry))
163 case CSA_VALUE_DATE_TIME_LIST:
164 if (!xdr_pointer(xdrs,
165 (char **)&objp->item.date_time_list_value,
166 sizeof (CSA_date_time_entry),
167 (xdrproc_t) xdr_CSA_date_time_entry))
170 case CSA_VALUE_REMINDER:
171 if (!xdr_pointer(xdrs,
172 (char **)&objp->item.reminder_value,
173 sizeof (CSA_reminder), (xdrproc_t) xdr_CSA_reminder))
176 case CSA_VALUE_OPAQUE_DATA:
177 if (!xdr_pointer(xdrs, (char **)&objp->item.opaque_data_value,
178 sizeof (CSA_opaque_data), (xdrproc_t) xdr_CSA_opaque_data))
186 * num contains the hashed number for the associated name assigned
187 * by the server. Client should not change its value.
188 * If it's zero, name is not hashed yet.
192 xdr_cms_attr_name(XDR *xdrs, cms_attr_name *objp)
194 if (!xdr_short(xdrs, &objp->num))
196 if (!xdr_string(xdrs, &objp->name, ~0))
206 xdr_cms_attribute(XDR *xdrs, cms_attribute *objp)
208 if (!xdr_cms_attr_name(xdrs, &objp->name))
210 if (!xdr_pointer(xdrs, (char **)&objp->value,
211 sizeof (CSA_attribute_value), (xdrproc_t) xdr_cms_attribute_value))
218 * An entry is identified by an identifier unique within the calendar
219 * and has a variable number of attributes associated with it.
223 xdr_cms_entry(XDR *xdrs, cms_entry *objp)
225 if (!xdr_cms_key(xdrs, &objp->key))
227 if (!xdr_array(xdrs, (char **)&objp->attrs, (u_int *) &objp->num_attrs,
228 ~0, sizeof (cms_attribute), (xdrproc_t) xdr_cms_attribute))
230 if (!xdr_pointer(xdrs, (char **)&objp->next, sizeof (cms_entry),
231 (xdrproc_t) xdr_cms_entry))
238 * cms_enumerate_calendar_attr_res
240 * If stat is CSA_SUCCESS, names contains an array of names.
244 xdr_cms_enumerate_calendar_attr_res(XDR *xdrs, cms_enumerate_calendar_attr_res *objp)
246 if (!xdr_u_long(xdrs, &objp->stat))
248 if (!xdr_array(xdrs, (char **)&objp->names, (u_int *) &objp->num_names,
249 ~0, sizeof (cms_attr_name), (xdrproc_t) xdr_cms_attr_name))
256 * cms_list_calendars_res
258 * If stat is CSA_SUCCESS, names contains an array of names.
262 xdr_cms_list_calendars_res(XDR *xdrs, cms_list_calendars_res *objp)
264 if (!xdr_u_long(xdrs, &objp->stat))
266 if (!xdr_array(xdrs, (char **)&objp->names, (u_int *) &objp->num_names,
267 ~0, sizeof (cms_name), (xdrproc_t) xdr_cms_name))
274 * cms_open_args - used by CMS_OPEN_CALENDAR
278 xdr_cms_open_args(XDR *xdrs, cms_open_args *objp)
280 if (!xdr_string(xdrs, &objp->cal, ~0))
282 if (!xdr_int(xdrs, &objp->pid))
289 * cms_open_res - returned by CMS_OPEN_CALENDAR
291 * If stat is DtCm_OK,
292 * svr_vers contains the version number of the server,
293 * file_vers contains the version number of the callog file,
294 * user_access is the calling user's access right to the calendar
295 * num_attrs indicates the size of the array pointed to by attrs,
296 * and attrs contains an array of calendar attributes.
300 xdr_cms_open_res(XDR *xdrs, cms_open_res *objp)
302 if (!xdr_u_long(xdrs, &objp->stat))
304 if (!xdr_int(xdrs, &objp->svr_vers))
306 if (!xdr_int(xdrs, &objp->file_vers))
308 if (!xdr_u_int(xdrs, &objp->user_access))
310 if (!xdr_array(xdrs, (char **)&objp->attrs, &objp->num_attrs,
311 ~0, sizeof (cms_attribute), (xdrproc_t) xdr_cms_attribute))
318 * cms_create_args - used by CMS_CREATE_CALENDAR
322 xdr_cms_create_args(XDR *xdrs, cms_create_args *objp)
324 if (!xdr_string(xdrs, &objp->cal, ~0))
326 if (!xdr_string(xdrs, &objp->char_set, ~0))
328 if (!xdr_int(xdrs, &objp->pid))
330 if (!xdr_array(xdrs, (char **)&objp->attrs, (u_int *) &objp->num_attrs,
331 ~0, sizeof (cms_attribute), (xdrproc_t) xdr_cms_attribute))
338 * cms_remove_args - used by CMS_REMOVE_CALENDAR
342 xdr_cms_remove_args(XDR *xdrs, cms_remove_args *objp)
344 if (!xdr_string(xdrs, &objp->cal, ~0))
346 if (!xdr_int(xdrs, &objp->pid))
353 * cms_register_args - used by CMS_REGISTER and CMS_UNREGISTER
357 xdr_cms_register_args(XDR *xdrs, cms_register_args *objp)
359 if (!xdr_string(xdrs, &objp->cal, ~0))
361 if (!xdr_u_int(xdrs, &objp->update_type))
363 if (!xdr_u_long(xdrs, &objp->prognum))
365 if (!xdr_u_long(xdrs, &objp->versnum))
367 if (!xdr_u_long(xdrs, &objp->procnum))
369 if (!xdr_int(xdrs, &objp->pid))
376 * cms_get_cal_attr_res - used by CMS_GET_CALENDAR_ATTR
378 * If stat is CSA_SUCCESS, attrs contains an array of attributes.
382 xdr_cms_get_cal_attr_res(XDR *xdrs, cms_get_cal_attr_res *objp)
384 if (!xdr_u_long(xdrs, &objp->stat))
386 if (!xdr_array(xdrs, (char **)&objp->attrs, (u_int *) &objp->num_attrs,
387 ~0, sizeof (cms_attribute), (xdrproc_t) xdr_cms_attribute))
394 * cms_get_cal_attr_args - used by CMS_GET_CALENDAR_ATTR
398 xdr_cms_get_cal_attr_args(XDR *xdrs, cms_get_cal_attr_args *objp)
400 if (!xdr_string(xdrs, &objp->cal, ~0))
402 if (!xdr_array(xdrs, (char **)&objp->names, (u_int *) &objp->num_names,
403 ~0, sizeof (cms_attr_name), (xdrproc_t) xdr_cms_attr_name))
410 * cms_set_cal_attr_args - used by CMS_SET_CALENDAR_ATTR
414 xdr_cms_set_cal_attr_args(XDR *xdrs, cms_set_cal_attr_args *objp)
416 if (!xdr_string(xdrs, &objp->cal, ~0))
418 if (!xdr_int(xdrs, &objp->pid))
420 if (!xdr_array(xdrs, (char **)&objp->attrs, (u_int *) &objp->num_attrs,
421 ~0, sizeof (cms_attribute), (xdrproc_t) xdr_cms_attribute))
428 * cms_archive_res - used by CMS_ARCHIVE
430 * If stat is CSA_SUCCESS, data contains the data to be archived
434 xdr_cms_archive_res(XDR *xdrs, cms_archive_res *objp)
436 if (!xdr_u_long(xdrs, &objp->stat))
438 if (!xdr_string(xdrs, &objp->data, ~0))
445 * cms_archive_args - used by CMS_ARCHIVE
449 xdr_cms_archive_args(XDR *xdrs, cms_archive_args *objp)
451 if (!xdr_string(xdrs, &objp->cal, ~0))
453 if (!xdr_bool(xdrs, &objp->delete))
455 if (!xdr_string(xdrs, &objp->char_set, ~0))
457 if (!xdr_array(xdrs, (char **)&objp->attrs, (u_int *) &objp->num_attrs,
458 ~0, sizeof (cms_attribute), (xdrproc_t) xdr_cms_attribute))
460 if (!xdr_array(xdrs, (char **)&objp->ops, (u_int *) &objp->num_attrs,
461 ~0, sizeof (CSA_enum), (xdrproc_t) xdr_long))
468 * cms_restore_args - used by CMS_RESTORE
472 xdr_cms_restore_args(XDR *xdrs, cms_restore_args *objp)
474 if (!xdr_string(xdrs, &objp->cal, ~0))
476 if (!xdr_string(xdrs, &objp->data, ~0))
478 if (!xdr_string(xdrs, &objp->char_set, ~0))
480 if (!xdr_array(xdrs, (char **)&objp->attrs, (u_int *) &objp->num_attrs,
481 ~0, sizeof (cms_attribute), (xdrproc_t) xdr_cms_attribute))
483 if (!xdr_array(xdrs, (char **)&objp->ops, (u_int *) &objp->num_attrs,
484 ~0, sizeof (CSA_enum), (xdrproc_t) xdr_long))
495 xdr_cms_reminder_ref(XDR *xdrs, cms_reminder_ref *objp)
497 if (!xdr_string(xdrs, &objp->reminder_name, ~0))
499 if (!xdr_string(xdrs, &objp->entryid, ~0))
501 if (!xdr_cms_key(xdrs, &objp->key))
503 if (!xdr_time_t(xdrs, &objp->runtime))
505 if (!xdr_pointer(xdrs, (char **)&objp->next, sizeof (cms_reminder_ref),
506 (xdrproc_t) xdr_cms_reminder_ref))
513 * cms_reminder_res - used by CMS_LOOKUP_REMINDER
515 * If stat is CSA_SUCCESS, rems contains an array of reminders.
519 xdr_cms_reminder_res(XDR *xdrs, cms_reminder_res *objp)
521 if (!xdr_u_long(xdrs, &objp->stat))
523 if (!xdr_pointer(xdrs, (char **)&objp->rems, sizeof (cms_reminder_ref),
524 (xdrproc_t) xdr_cms_reminder_ref))
531 * cms_reminder_args - used by CMS_LOOKUP_REMINDER
535 xdr_cms_reminder_args(XDR *xdrs, cms_reminder_args *objp)
537 if (!xdr_string(xdrs, &objp->cal, ~0))
539 if (!xdr_time_t(xdrs, &objp->tick))
541 if (!xdr_array(xdrs, (char **)&objp->names, (u_int *) &objp->num_names,
542 ~0, sizeof (cms_attr_name), (xdrproc_t) xdr_cms_attr_name))
551 * If stat is CSA_SUCCESS, entries contains an array of entries.
555 xdr_cms_entries_res(XDR *xdrs, cms_entries_res *objp)
557 if (!xdr_u_long(xdrs, &objp->stat))
559 if (!xdr_pointer(xdrs, (char **)&objp->entries, sizeof (cms_entry),
560 (xdrproc_t) xdr_cms_entry))
567 * cms_lookup_entries_args - used by CMS_LOOKUP_ENTRIES
571 xdr_cms_lookup_entries_args(XDR *xdrs, cms_lookup_entries_args *objp)
573 if (!xdr_string(xdrs, &objp->cal, ~0))
575 if (!xdr_string(xdrs, &objp->char_set, ~0))
577 if (!xdr_array(xdrs, (char **)&objp->attrs, (u_int *) &objp->num_attrs,
578 ~0, sizeof (cms_attribute), (xdrproc_t) xdr_cms_attribute))
580 if (!xdr_array(xdrs, (char **)&objp->ops, (u_int *) &objp->num_attrs,
581 ~0, sizeof (CSA_enum), (xdrproc_t) xdr_long))
588 * cms_enumerate_args - used by CMS_ENUERATE_SEQUENCE
592 xdr_cms_enumerate_args(XDR *xdrs, cms_enumerate_args *objp)
594 if (!xdr_string(xdrs, &objp->cal, ~0))
596 if (!xdr_long(xdrs, &objp->id))
598 if (!xdr_long(xdrs, &objp->start))
600 if (!xdr_long(xdrs, &objp->end))
606 * If stat is CSA_SUCCESS, attrs contains an array of
611 xdr_cms_get_entry_attr_res_item(
613 cms_get_entry_attr_res_item *objp)
615 if (!xdr_u_long(xdrs, &objp->stat))
617 if (!xdr_cms_key(xdrs, &objp->key))
619 if (!xdr_array(xdrs, (char **)&objp->attrs, (u_int *) &objp->num_attrs,
620 ~0, sizeof (cms_attribute), (xdrproc_t) xdr_cms_attribute))
622 if (!xdr_pointer(xdrs, (char **)&objp->next,
623 sizeof (cms_get_entry_attr_res_item),
624 (xdrproc_t) xdr_cms_get_entry_attr_res_item))
631 * cms_get_entry_attr_res - used by CMS_GET_ENTRY_ATTR
633 * If stat is CSA_SUCCESS, entries contains an array of
634 * cms_get_entry_attr_res_item structures.
638 xdr_cms_get_entry_attr_res(XDR *xdrs, cms_get_entry_attr_res *objp)
640 if (!xdr_u_long(xdrs, &objp->stat))
642 if (!xdr_pointer(xdrs, (char **)&objp->entries,
643 sizeof (cms_get_entry_attr_res_item),
644 (xdrproc_t) xdr_cms_get_entry_attr_res_item))
651 * cms_get_entry_attr_args - used by CMS_GET_ENTRY_ATTR
655 xdr_cms_get_entry_attr_args(XDR *xdrs, cms_get_entry_attr_args *objp)
657 if (!xdr_string(xdrs, &objp->cal, ~0))
659 if (!xdr_array(xdrs, (char **)&objp->keys, (u_int *) &objp->num_keys,
660 ~0, sizeof (cms_key), (xdrproc_t) xdr_cms_key))
662 if (!xdr_array(xdrs, (char **)&objp->names, (u_int *) &objp->num_names,
663 ~0, sizeof (cms_attr_name), (xdrproc_t) xdr_cms_attr_name))
672 * If stat is CSA_SUCCESS, entry points to an entry.
676 xdr_cms_entry_res(XDR *xdrs, cms_entry_res *objp)
678 if (!xdr_u_long(xdrs, &objp->stat))
680 if (!xdr_pointer(xdrs, (char **)&objp->entry, sizeof (cms_entry),
681 (xdrproc_t) xdr_cms_entry))
688 * cms_insert_args - used by CMS_INSERT_ENTRY
692 xdr_cms_insert_args(XDR *xdrs, cms_insert_args *objp)
694 if (!xdr_string(xdrs, &objp->cal, ~0))
696 if (!xdr_int(xdrs, &objp->pid))
698 if (!xdr_array(xdrs, (char **)&objp->attrs, (u_int *) &objp->num_attrs,
699 ~0, sizeof (cms_attribute), (xdrproc_t) xdr_cms_attribute))
706 * cms_update_args - used by CMS_UPDATE_ENTRY
710 xdr_cms_update_args(XDR *xdrs, cms_update_args *objp)
712 if (!xdr_string(xdrs, &objp->cal, ~0))
714 if (!xdr_int(xdrs, &objp->pid))
716 if (!xdr_cms_key(xdrs, &objp->entry))
718 if (!xdr_int(xdrs, &objp->scope))
720 if (!xdr_array(xdrs, (char **)&objp->attrs, (u_int *) &objp->num_attrs,
721 ~0, sizeof (cms_attribute), (xdrproc_t) xdr_cms_attribute))
728 * cms_delete_args - used by CMS_DELETE_ENTRY
732 xdr_cms_delete_args(XDR *xdrs, cms_delete_args *objp)
734 if (!xdr_string(xdrs, &objp->cal, ~0))
736 if (!xdr_int(xdrs, &objp->pid))
738 if (!xdr_cms_key(xdrs, &objp->entry))
740 if (!xdr_int(xdrs, &objp->scope))