cdesktopenv/cde/lib/csa/convert4-5.c

510 lines
13 KiB
C

/*
* CDE - Common Desktop Environment
*
* Copyright (c) 1993-2012, The Open Group. All rights reserved.
*
* These libraries and programs are free software; you can
* redistribute them and/or modify them under the terms of the GNU
* Lesser General Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* These libraries and programs are distributed in the hope that
* they will be useful, but WITHOUT ANY WARRANTY; without even the
* implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU Lesser General Public License for more
* details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with these libraries and programs; if not, write
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
* Floor, Boston, MA 02110-1301 USA
*/
/* $XConsortium: convert4-5.c /main/1 1996/04/21 19:22:49 drk $ */
/*
* (c) Copyright 1993, 1994 Hewlett-Packard Company
* (c) Copyright 1993, 1994 International Business Machines Corp.
* (c) Copyright 1993, 1994 Novell, Inc.
* (c) Copyright 1993, 1994 Sun Microsystems, Inc.
*/
/*
* Routines to convert data types used in version 4 to version 5.
*/
#include <EUSCompat.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include "csa.h"
#include "attr.h"
#include "cmsdata.h"
#include "convert4-5.h"
#include "free.h"
#include "iso8601.h"
#include "lutil.h"
#define V4_ATTR_NUM 13
/*
* forward declaration of static functions
*/
static unsigned int accesstype4_to_accessright(int access);
static CSA_return_code eventtype4_to_attrs(Event_Type_4 tag, uint num_attrs,
cms_attribute *attrs);
static CSA_return_code _RepeatInfoToRule(Appt_4 *a4,
cms_attribute_value **attrval);
/*****************************************************************************
* extern functions
*****************************************************************************/
extern CSA_return_code
_DtCm_accessentry4_to_cmsaccesslist(
Access_Entry_4 *a4,
cms_access_entry **alist)
{
CSA_return_code stat = CSA_SUCCESS;
cms_access_entry *to, *head, *prev;
head = prev = NULL;
while (a4 != NULL) {
if ((to = (cms_access_entry *)calloc(1,
sizeof(cms_access_entry))) == NULL) {
stat = CSA_E_INSUFFICIENT_MEMORY;
break;
}
if (a4->who && (to->user = strdup(a4->who)) == NULL) {
free(to);
stat = CSA_E_INSUFFICIENT_MEMORY;
break;
}
to->rights = accesstype4_to_accessright(a4->access_type);
to->next = NULL;
if (head == NULL)
head = to;
else
prev->next = to;
prev = to;
a4 = a4->next;
}
if (stat != CSA_SUCCESS) {
_DtCm_free_cms_access_entry(head);
head = NULL;
}
*alist = head;
return (stat);
}
extern CSA_return_code
_DtCm_appt4_to_attrs(
char *calname,
Appt_4 *a4,
uint num_attrs,
cms_attribute *attrs,
boolean_t rerule)
{
CSA_return_code stat = CSA_SUCCESS;
Attribute_4 *reminders = a4->attr;
char buf[BUFSIZ];
CSA_opaque_data opq;
int index, ntimes;
char *ptr1, *ptr2;
if (a4 == NULL || num_attrs < _DtCM_DEFINED_ENTRY_ATTR_SIZE)
return (CSA_E_INVALID_PARAMETER);
/* exception info is not converted since it's not used
* and we don't have an attribute for it yet
*/
while (stat == CSA_SUCCESS && reminders != NULL) {
if ((index =
_DtCm_old_reminder_name_to_index(reminders->attr)) >= 0) {
if ((stat = _DtCmAttr4ToReminderValue(reminders,
&attrs[index].value)) != CSA_SUCCESS) {
break;
}
}
reminders = reminders->next;
}
/* only contains the id now, need to
* add calendar name and location info
*/
if (a4->appt_id.key > 0) {
ptr1 = strchr(calname, '@');
ptr2 = (ptr1 ? strchr(ptr1, '.') : NULL);
if (ptr1) {
snprintf(buf, sizeof buf, "%ld:%s%s%s", a4->appt_id.key, calname,
(ptr2 == NULL ? "." : ""),
(ptr2 == NULL ? _DtCmGetLocalDomain(ptr1+1) :
""));
} else {
snprintf(buf, sizeof buf, "%ld:%s@%s", a4->appt_id.key, calname,
_DtCmGetHostAtDomain());
}
opq.size = strlen(buf);
opq.data = (unsigned char *)buf;
}
if (a4->period.period != single_4 &&
a4->ntimes == _DtCM_OLD_REPEAT_FOREVER)
ntimes = CSA_X_DT_DT_REPEAT_FOREVER;
else
ntimes = a4->ntimes;
/* convert tick to iso8601 */
if (stat != CSA_SUCCESS || (a4->appt_id.key > 0 &&
(stat = _DtCm_set_opaque_attrval(&opq,
&attrs[CSA_ENTRY_ATTR_REFERENCE_IDENTIFIER_I].value))))
;
else if ((stat = _csa_tick_to_iso8601(a4->appt_id.tick, buf) ?
CSA_E_INVALID_DATE_TIME : CSA_SUCCESS) ||
(stat = _DtCm_set_string_attrval(buf,
&attrs[CSA_ENTRY_ATTR_START_DATE_I].value,CSA_VALUE_DATE_TIME)))
;
else if (stat = eventtype4_to_attrs(a4->tag->tag, num_attrs, attrs))
;
else if (stat = _DtCm_set_sint32_attrval(a4->tag->showtime,
&attrs[CSA_X_DT_ENTRY_ATTR_SHOWTIME_I].value))
;
else if ((stat = _csa_tick_to_iso8601(a4->appt_id.tick + a4->duration,
buf) ? CSA_E_INVALID_DATE_TIME : CSA_SUCCESS) ||
(stat = _DtCm_set_string_attrval(buf,
&attrs[CSA_ENTRY_ATTR_END_DATE_I].value, CSA_VALUE_DATE_TIME)))
;
else if (stat = _DtCm_set_string_attrval(a4->what,
&attrs[CSA_ENTRY_ATTR_SUMMARY_I].value, CSA_VALUE_STRING))
;
else if (stat = _DtCm_set_user_attrval(a4->author,
&attrs[CSA_ENTRY_ATTR_ORGANIZER_I].value))
;
else if (stat = _DtCm_set_uint32_attrval(_DtCm_apptstatus4_to_status(
a4->appt_status), &attrs[CSA_ENTRY_ATTR_STATUS_I].value))
;
else if (stat = _DtCm_set_uint32_attrval(
_DtCm_privacy4_to_classification(a4->privacy),
&attrs[CSA_ENTRY_ATTR_CLASSIFICATION_I].value))
;
else if (rerule && (stat = _RepeatInfoToRule(a4,
&attrs[CSA_ENTRY_ATTR_RECURRENCE_RULE_I].value)))
;
else if (!rerule &&
((stat = _DtCm_set_uint32_attrval(ntimes,
&attrs[CSA_X_DT_ENTRY_ATTR_REPEAT_TIMES_I].value)) ||
(stat = _DtCm_set_sint32_attrval(_DtCm_interval4_to_rtype(
a4->period.period),
&attrs[CSA_X_DT_ENTRY_ATTR_REPEAT_TYPE_I].value)) ||
(a4->period.period == nthWeekday_4 &&
(stat = _DtCm_set_sint32_attrval(a4->period.nth, &attrs\
[CSA_X_DT_ENTRY_ATTR_REPEAT_OCCURRENCE_NUM_I].value))) ||
(a4->period.period >= everyNthDay_4 &&
a4->period.period <= everyNthMonth_4 &&
(stat = _DtCm_set_uint32_attrval(a4->period.nth, &attrs\
[CSA_X_DT_ENTRY_ATTR_REPEAT_INTERVAL_I].value))) ||
(a4->period.enddate != 0 &&
((stat = _csa_tick_to_iso8601(a4->period.enddate, buf) ?
CSA_E_INVALID_DATE_TIME : CSA_SUCCESS) ||
(stat = _DtCm_set_string_attrval(buf, &attrs\
[CSA_X_DT_ENTRY_ATTR_SEQUENCE_END_DATE_I].value,
CSA_VALUE_DATE_TIME))))))
;
else {
return (CSA_SUCCESS);
}
/* something wrong, need cleanup */
/* free up all attribute values set so far */
return (stat);
}
extern int
_DtCm_eventtype4_to_type(Event_Type_4 tag)
{
switch (tag) {
case appointment_4:
case holiday_4:
return (CSA_TYPE_EVENT);
case toDo_4:
return (CSA_TYPE_TODO);
case reminder_4:
case otherTag_4:
default:
return (CSA_X_DT_TYPE_OTHER);
}
}
extern char *
_DtCm_eventtype4_to_subtype(Event_Type_4 tag)
{
switch (tag) {
case appointment_4:
return (CSA_SUBTYPE_APPOINTMENT);
case holiday_4:
return (CSA_SUBTYPE_HOLIDAY);
case toDo_4:
case reminder_4:
case otherTag_4:
default:
return ("");
}
}
extern CSA_sint32
_DtCm_interval4_to_rtype(Interval_4 val)
{
switch (val) {
case single_4:
return (CSA_X_DT_REPEAT_ONETIME);
case weekly_4:
return (CSA_X_DT_REPEAT_WEEKLY);
case daily_4:
return (CSA_X_DT_REPEAT_DAILY);
case biweekly_4:
return (CSA_X_DT_REPEAT_BIWEEKLY);
case monthly_4:
return (CSA_X_DT_REPEAT_MONTHLY_BY_DATE);
case yearly_4:
return (CSA_X_DT_REPEAT_YEARLY);
case nthWeekday_4:
return (CSA_X_DT_REPEAT_MONTHLY_BY_WEEKDAY);
case everyNthDay_4:
return (CSA_X_DT_REPEAT_EVERY_NDAY);
case everyNthWeek_4:
return (CSA_X_DT_REPEAT_EVERY_NWEEK);
case everyNthMonth_4:
return (CSA_X_DT_REPEAT_EVERY_NMONTH);
case monThruFri_4:
return (CSA_X_DT_REPEAT_MON_TO_FRI);
case monWedFri_4:
return (CSA_X_DT_REPEAT_MONWEDFRI);
case tueThur_4:
return (CSA_X_DT_REPEAT_TUETHUR);
case daysOfWeek_4:
return (CSA_X_DT_REPEAT_WEEKDAYCOMBO);
case otherPeriod_4:
default:
return (CSA_X_DT_REPEAT_OTHER);
}
}
extern CSA_sint32
_DtCm_apptstatus4_to_status(Appt_Status_4 stat)
{
switch (stat) {
case active_4:
return (CSA_X_DT_STATUS_ACTIVE);
case completed_4:
return (CSA_STATUS_COMPLETED);
case pendingAdd_4:
return (CSA_X_DT_STATUS_ADD_PENDING);
case pendingDelete_4:
return (CSA_X_DT_STATUS_DELETE_PENDING);
case committed_4:
return (CSA_X_DT_STATUS_COMMITTED);
case cancelled_4:
return (CSA_X_DT_STATUS_CANCELLED);
default:
return (CSA_X_DT_STATUS_ACTIVE);
}
}
extern CSA_sint32
_DtCm_privacy4_to_classification(Privacy_Level_4 p)
{
switch (p) {
case public_4:
return (CSA_CLASS_PUBLIC);
case semiprivate_4:
return (CSA_CLASS_CONFIDENTIAL);
case private_4:
return (CSA_CLASS_PRIVATE);
default:
return (CSA_CLASS_PUBLIC);
}
}
/******************************************************************************
* static functions used within the file
******************************************************************************/
/*
* Static functions used within the file.
*/
/*
* DtCM_PERMIT_ACCESS is added for backward compatibility
*/
static unsigned int
accesstype4_to_accessright(int access)
{
unsigned int newaccess = 0;
if (access & access_read_4)
newaccess |= CSA_X_DT_BROWSE_ACCESS;
if (access & access_write_4)
newaccess |= CSA_X_DT_INSERT_ACCESS;
if (access & access_delete_4)
newaccess |= CSA_X_DT_DELETE_ACCESS;
return (newaccess);
}
extern CSA_return_code
_DtCmAttr4ToReminderValue(
Attribute_4 *remval,
cms_attribute_value **attrval)
{
CSA_reminder rval;
char timestr[BUFSIZ];
/*
* rval is just a place holder, values will be
* copied in _DtCm_set_reminder_attrval
*/
_csa_duration_to_iso8601(atoi(remval->value), timestr);
rval.lead_time = timestr;
if (remval->clientdata && *remval->clientdata != '\0') {
rval.reminder_data.size = strlen(remval->clientdata);
rval.reminder_data.data = (unsigned char *)remval->clientdata;
} else {
rval.reminder_data.size = 0;
rval.reminder_data.data = NULL;
}
rval.snooze_time = NULL;
rval.repeat_count = 0;
return (_DtCm_set_reminder_attrval(&rval, attrval));
}
static CSA_return_code
eventtype4_to_attrs(Event_Type_4 tag, uint num_attrs, cms_attribute *attrs)
{
CSA_return_code stat;
switch (tag) {
case appointment_4:
if ((stat = _DtCm_set_uint32_attrval(CSA_TYPE_EVENT,
&attrs[CSA_ENTRY_ATTR_TYPE_I].value)) != CSA_SUCCESS)
return (stat);
return (_DtCm_set_string_attrval(CSA_SUBTYPE_APPOINTMENT,
&attrs[CSA_ENTRY_ATTR_SUBTYPE_I].value,
CSA_VALUE_STRING));
case toDo_4:
return (_DtCm_set_uint32_attrval(CSA_TYPE_TODO,
&attrs[CSA_ENTRY_ATTR_TYPE_I].value));
case holiday_4:
if ((stat = _DtCm_set_uint32_attrval(CSA_TYPE_EVENT,
&attrs[CSA_ENTRY_ATTR_TYPE_I].value)) != CSA_SUCCESS)
return (stat);
return (_DtCm_set_string_attrval(CSA_SUBTYPE_HOLIDAY,
&attrs[CSA_ENTRY_ATTR_SUBTYPE_I].value,
CSA_VALUE_STRING));
case reminder_4:
case otherTag_4:
default:
return (_DtCm_set_uint32_attrval(CSA_X_DT_TYPE_OTHER,
&attrs[CSA_ENTRY_ATTR_TYPE_I].value));
}
}
static CSA_return_code
_RepeatInfoToRule(Appt_4 *a4, cms_attribute_value **attrval)
{
char buf[BUFSIZ], datestr[25];
uint duration;
if (a4->period.period == single_4 || a4->period.period == otherPeriod_4) {
*attrval = NULL;
return (CSA_SUCCESS);
}
if (a4->ntimes == _DtCM_OLD_REPEAT_FOREVER) {
duration = 0;
} else if (a4->period.period >= everyNthDay_4 &&
a4->period.period <= everyNthMonth_4) {
duration = ((a4->ntimes % a4->period.nth) ? 1 : 0) +
a4->ntimes/a4->period.nth;
} else
duration = a4->ntimes;
switch (a4->period.period) {
case daily_4:
snprintf(buf, sizeof buf, "D1 #%d ", duration);
break;
case weekly_4:
snprintf(buf, sizeof buf, "W1 #%d ", duration);
break;
case biweekly_4:
snprintf(buf, sizeof buf, "W2 #%d ", duration);
break;
case monthly_4:
snprintf(buf, sizeof buf, "MD1 #%d ", duration);
break;
case yearly_4:
snprintf(buf, sizeof buf, "YM1 #%d ", duration);
break;
case nthWeekday_4:
snprintf(buf, sizeof buf, "MP1 #%d ", duration);
break;
case everyNthDay_4:
snprintf(buf, sizeof buf, "D%d #%d ", a4->period.nth, duration);
break;
case everyNthWeek_4:
snprintf(buf, sizeof buf, "W%d #%d ", a4->period.nth, duration);
break;
case everyNthMonth_4:
snprintf(buf, sizeof buf, "MD%d #%d ", a4->period.nth, duration);
break;
case monThruFri_4:
snprintf(buf, sizeof buf, "W1 MO TU WE TH FR #%d ", duration);
break;
case monWedFri_4:
snprintf(buf, sizeof buf, "W1 MO WE FR #%d ", duration);
break;
case tueThur_4:
snprintf(buf, sizeof buf, "W1 TU TH #%d ", duration);
break;
case daysOfWeek_4:
snprintf(buf, sizeof buf, "W1 #%d ", duration);
/* XXX strcat is unsafe here */
if (a4->period.nth & 0x1) strcat(buf, "SU ");
if (a4->period.nth & 0x2) strcat(buf, "MO ");
if (a4->period.nth & 0x4) strcat(buf, "TU ");
if (a4->period.nth & 0x8) strcat(buf, "WE ");
if (a4->period.nth & 0x10) strcat(buf, "TH ");
if (a4->period.nth & 0x20) strcat(buf, "FR ");
if (a4->period.nth & 0x40) strcat(buf, "SA ");
break;
}
if (a4->period.enddate) {
if (_csa_tick_to_iso8601(a4->period.enddate, datestr))
return (CSA_E_INVALID_DATE_TIME);
strcat(buf, datestr);
}
return (_DtCm_set_string_attrval(buf, attrval, CSA_VALUE_STRING));
}