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

642 lines
14 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-2.c /main/1 1996/04/21 19:22:37 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.
*/
#include <EUSCompat.h>
#include <string.h>
#include <stdlib.h>
#include "rtable2.h"
#include "rtable4.h"
#include "convert4-2.h"
/*
* forward declaration of static functions
*/
static void free_excpt2(Except_2 *e);
static Buffer_2 buffer4_to_buffer2(Buffer_4 b);
static Period_2 period4_to_period2(Period_4 *p);
static Tag_2 tag4_to_tag2(Tag_4 *t);
static Attribute_2 * attr4_to_attr2(Attribute_4 *a4);
static Except_2 * except4_to_except2(Except_4 *e4);
static Abb_Appt_2 * abb4_to_abb2(Abb_Appt_4 *a4);
static Reminder_2 * reminder4_to_reminder2(Reminder_4 *r4);
static Table_Res_Type_2 tablerestype4_to_tablerestype2(Table_Res_Type_4 t);
static void tablereslist4_to_tablereslist2(Table_Res_List_4 *from,
Table_Res_List_2 *to);
static Table_Args_Type_2 argstag4_to_argstag2(Table_Args_Type_4 t);
static void args4_to_args2(Args_4 *from, Args_2 *to);
static Table_Args_2 * tableargs4_to_tableargs2(Table_Args_4 *a4);
static Registration_2 * reg4_to_reg2(Registration_4 *r4);
/**************** DATA TYPE (4->2) CONVERSION ROUTINES **************/
extern void
_DtCm_id4_to_id2(Id_4 *from, Id_2 *to)
{
if ((from==NULL) || (to==NULL)) return;
to->tick = from->tick;
to->key = from->key;
}
extern Uid_2 *
_DtCm_uid4_to_uid2(Uid_4 *ui4)
{
Uid_2 *ui2, *head, *prev;
prev = head = NULL;
while (ui4 != NULL) {
ui2 = (Uid_2 *)calloc(1, sizeof(Uid_2));
_DtCm_id4_to_id2(&(ui4->appt_id), &(ui2->appt_id));
ui2->next = NULL;
if (head == NULL)
head = ui2;
else
prev->next = ui2;
prev = ui2;
ui4 = ui4->next;
}
return(head);
}
extern Appt_2 *
_DtCm_appt4_to_appt2(Appt_4 *a4)
{
Appt_2 *a2, *head, *prev;
struct Attribute_4 *item;
prev = head = NULL;
while (a4 != NULL) {
a2 = (Appt_2 *)calloc(1, sizeof(Appt_2));
_DtCm_id4_to_id2(&(a4->appt_id), &(a2->appt_id));
a2->tag = tag4_to_tag2(a4->tag);
a2->duration = a4->duration;
a2->ntimes = a4->ntimes;
a2->what = buffer4_to_buffer2(a4->what);
a2->script = "";
a2->period = period4_to_period2(&(a4->period));
a2->author = buffer4_to_buffer2(a4->author);
a2->client_data = buffer4_to_buffer2(a4->client_data);
a2->attr = attr4_to_attr2(a4->attr);
/* Pick the mailto field out of the attribute list
client data field; put it back into the appt struct
proper.
*/
item = a4->attr;
while(item!=NULL) {
if (strcmp(item->attr, "ml")==0) {
a2->mailto=buffer4_to_buffer2(item->clientdata);
break;
}
item=item->next;
}
a2->exception = except4_to_except2(a4->exception);
a2->next = NULL;
if (head == NULL)
head = a2;
else
prev->next = a2;
prev = a2;
a4 = a4->next;
}
return(head);
}
extern Access_Status_2
_DtCm_accstat4_to_accstat2(Access_Status_4 s)
{
switch(s) {
case access_ok_4:
return(access_ok_2);
case access_added_4:
return(access_added_2);
case access_removed_4:
return(access_removed_2);
case access_failed_4:
return(access_failed_2);
case access_exists_4:
return(access_exists_2);
case access_partial_4:
return(access_partial_2);
case access_other_4:
default:
return(access_other_2);
}
}
extern Table_Res_2 *
_DtCm_tableres4_to_tableres2(Table_Res_4 *r4)
{
Table_Res_2 *r2;
if (r4==NULL) return((Table_Res_2 *)NULL);
r2 = (Table_Res_2 *)calloc(1, sizeof(Table_Res_2));
r2->status = _DtCm_accstat4_to_accstat2(r4->status);
tablereslist4_to_tablereslist2(&(r4->res), &(r2->res));
return(r2);
}
extern Access_Entry_2 *
_DtCm_acclist4_to_acclist2(Access_Entry_4 *l4)
{
Access_Entry_2 *l2, *head, *prev;
prev = head = NULL;
while (l4 != NULL) {
l2 = (Access_Entry_2 *)calloc(1, sizeof(Access_Entry_2));
l2->who = buffer4_to_buffer2(l4->who);
l2->access_type = l4->access_type;
l2->next = NULL;
if (head == NULL)
head = l2;
else
prev->next = l2;
prev = l2;
l4 = l4->next;
}
return(head);
}
extern Access_Args_2 *
_DtCm_accargs4_to_accargs2(Access_Args_4 *a4)
{
Access_Args_2 *a2;
if (a4==NULL) return((Access_Args_2 *)NULL);
a2 = (Access_Args_2 *)calloc(1, sizeof(Access_Args_2));
a2->target = buffer4_to_buffer2(a4->target);
a2->access_list = _DtCm_acclist4_to_acclist2(a4->access_list);
return(a2);
}
extern Range_2 *
_DtCm_range4_to_range2(Range_4 *r4)
{
Range_2 *r2, *head, *prev;
prev = head = NULL;
while (r4 != NULL) {
r2 = (Range_2 *)calloc(1, sizeof(Range_2));
r2->key1 = r4->key1;
r2->key2 = r4->key2;
r2->next = NULL;
if (head == NULL)
head = r2;
else
prev->next = r2;
prev = r2;
r4 = r4->next;
}
return(head);
}
extern Registration_Status_2
_DtCm_regstat4_to_regstat2(Registration_Status_4 s)
{
switch (s) {
case registered_4:
return(registered_2);
case failed_4:
return(failed_2);
case deregistered_4:
return(deregistered_2);
case confused_4:
return(confused_2);
case reg_notable_4:
default:
return(failed_2);
}
}
extern Table_Status_2
_DtCm_tablestat4_to_tablestat2(Table_Status_4 s)
{
switch(s) {
case ok_4:
return(ok_2);
case duplicate_4:
return(duplicate_2);
case badtable_4:
return(badtable_2);
case notable_4:
return(notable_2);
case denied_4:
return(denied_2);
case other_4:
default:
return(other_2);
}
}
extern Uid_2 *
_DtCm_uidopt4_to_uid2(Uidopt_4 *uidopt)
{
Uid_2 *uid2, *head, *prev;
prev = head = NULL;
while (uidopt != NULL) {
uid2 = (Uid_2 *)calloc(1, sizeof(Uid_2));
_DtCm_id4_to_id2(&(uidopt->appt_id), &(uid2->appt_id));
uid2->next = NULL;
if (head == NULL)
head = uid2;
else
prev->next = uid2;
prev = uid2;
uidopt = uidopt->next;
}
return(head);
}
extern void
_DtCm_free_attr2(Attribute_2 *a)
{
Attribute_2 *ptr;
while (a != NULL) {
ptr = a->next;
if (a->attr != NULL)
free(a->attr);
if (a->value != NULL)
free(a->value);
free(a);
a = ptr;
}
}
extern void
_DtCm_free_appt2(Appt_2 *a)
{
Appt_2 *ptr;
while (a != NULL) {
ptr = a->next;
if (a->what != NULL)
free(a->what);
if (a->mailto != NULL)
free(a->mailto);
if (a->script != NULL)
free(a->script);
if (a->author != NULL)
free(a->author);
if (a->client_data != NULL)
free(a->client_data);
if (a->attr != NULL)
_DtCm_free_attr2(a->attr);
if (a->exception != NULL)
free_excpt2(a->exception);
free(a);
a = ptr;
}
}
static void
free_excpt2(Except_2 *e)
{
Except_2 *ptr;
while (e != NULL) {
ptr = e->next;
free(e);
e = ptr;
}
}
static Buffer_2
buffer4_to_buffer2(Buffer_4 b)
{
Buffer_2 copy;
if (b!=NULL)
copy = strdup(b);
else
copy = calloc(1, 1);
return(copy);
}
/*
* Repeating event types beyond "yearly" are mapped to "single"
* because the old front end does not recognize any other types
* Worse yet it uses Period_2 to index into an array which
* contains strings up to "yearly", any period types beyond that
* would index beyond the array and cause the front end to dump core.
*/
static Period_2
period4_to_period2(Period_4 *p)
{
if (p==NULL) return(otherPeriod_2);
switch (p->period) {
case single_4:
return(single_2);
case daily_4:
return(daily_2);
case weekly_4:
return(weekly_2);
case biweekly_4:
return(biweekly_2);
case monthly_4:
return(monthly_2);
case yearly_4:
return(yearly_2);
default:
return(single_2);
}
}
static Tag_2
tag4_to_tag2(Tag_4 *t)
{
if (t==NULL) return(otherTag_2);
switch(t->tag) {
case appointment_4:
return(appointment_2);
case reminder_4:
return(reminder_2);
case otherTag_4:
case holiday_4:
case toDo_4:
default:
return(otherTag_2);
}
}
static Attribute_2 *
attr4_to_attr2(Attribute_4 *a4)
{
Attribute_2 *a2, *head, *prev;
prev = head = NULL;
while (a4 != NULL) {
a2 = (Attribute_2 *)calloc(1, sizeof(Attribute_2));
a2->next = NULL;
a2->attr = strdup(a4->attr);
a2->value = strdup(a4->value);
if (head == NULL)
head = a2;
else
prev->next = a2;
prev = a2;
a4 = a4->next;
}
return(head);
}
static Except_2 *
except4_to_except2(Except_4 *e4)
{
Except_2 *e2, *head, *prev;
prev = head = NULL;
while (e4 != NULL) {
e2 = (Except_2 *)calloc(1, sizeof(Except_2));
e2->ordinal = e4->ordinal;
e2->next=NULL;
if (head == NULL)
head = e2;
else
prev->next = e2;
prev = e2;
e4 = e4->next;
}
return(head);
}
static Abb_Appt_2 *
abb4_to_abb2(Abb_Appt_4 *a4)
{
Abb_Appt_2 *a2, *head, *prev;
prev = head = NULL;
while (a4 != NULL) {
a2 = (Abb_Appt_2 *)calloc(1, sizeof(Abb_Appt_2));
_DtCm_id4_to_id2(&(a4->appt_id), &(a2->appt_id));
a2->what = buffer4_to_buffer2(a4->what);
a2->duration = a4->duration;
a2->period = period4_to_period2(&(a4->period));
a2->next = NULL;
if (head == NULL)
head = a2;
else
prev->next = a2;
prev = a2;
a4 = a4->next;
}
return(head);
}
static void
apptid4_to_apptid2(Apptid_4 *from, Apptid_2 *to)
{
if (from==NULL || to==NULL) return;
_DtCm_id4_to_id2(from->oid, to->oid);
to->new_appt = _DtCm_appt4_to_appt2(from->new_appt);
}
static Reminder_2 *
reminder4_to_reminder2(Reminder_4 *r4)
{
Reminder_2 *r2, *head, *prev;
Attribute_2 *attr2;
prev = head = NULL;
while (r4 != NULL) {
r2 = (Reminder_2 *)calloc(1, sizeof(Reminder_2));
_DtCm_id4_to_id2(&(r4->appt_id), &(r2->appt_id));
r2->tick = r4->tick;
attr2 = attr4_to_attr2(&(r4->attr));
r2->attr = *attr2;
free(attr2);
r2->next = NULL;
if (head == NULL)
head = r2;
else
prev->next = r2;
prev = r2;
r4 = r4->next;
}
return(head);
}
static Table_Res_Type_2
tablerestype4_to_tablerestype2(Table_Res_Type_4 t)
{
switch(t) {
case AP_4:
return(AP_2);
case RM_4:
return(RM_2);
case AB_4:
return(AB_2);
case ID_4:
return(ID_2);
default:
return(AP_2);
}
}
static void
tablereslist4_to_tablereslist2(Table_Res_List_4 *from, Table_Res_List_2 *to)
{
if (from==NULL || to==NULL) return;
to->tag = tablerestype4_to_tablerestype2(from->tag);
switch (from->tag) {
case AP_4:
to->Table_Res_List_2_u.a = _DtCm_appt4_to_appt2(
from->Table_Res_List_4_u.a);
break;
case RM_4:
to->Table_Res_List_2_u.r = reminder4_to_reminder2(
from->Table_Res_List_4_u.r);
break;
case AB_4:
to->Table_Res_List_2_u.b = abb4_to_abb2(
from->Table_Res_List_4_u.b);
break;
case ID_4:
to->Table_Res_List_2_u.i = _DtCm_uid4_to_uid2(
from->Table_Res_List_4_u.i);
default:
return;
}
}
static Table_Args_Type_2
argstag4_to_argstag2(Table_Args_Type_4 t)
{
switch(t) {
case TICK_4:
return(TICK_2);
case APPTID_4:
return(APPTID_2);
case UID_4:
return(UID_2);
case APPT_4:
return(APPT_2);
case RANGE_4:
return(RANGE_2);
default:
return(TICK_2);
}
}
static void
args4_to_args2(Args_4 *from, Args_2 *to)
{
if (from==NULL || to==NULL) return;
to->tag = argstag4_to_argstag2(from->tag);
switch(from->tag) {
case TICK_4:
to->Args_2_u.tick = from->Args_4_u.tick;
break;
case APPTID_4:
to->Args_2_u.apptid.oid = (Id_2 *)calloc(1, sizeof(Id_2));
apptid4_to_apptid2(
&(from->Args_4_u.apptid),
&(to->Args_2_u.apptid));
break;
case UID_4:
to->Args_2_u.key = _DtCm_uid4_to_uid2(from->Args_4_u.key);
break;
case APPT_4:
to->Args_2_u.appt = _DtCm_appt4_to_appt2(from->Args_4_u.appt);
break;
case RANGE_4:
to->Args_2_u.range = _DtCm_range4_to_range2(from->Args_4_u.range);
break;
default:
break;
}
}
static Table_Args_2 *
tableargs4_to_tableargs2(Table_Args_4 *a4)
{
Table_Args_2 *a2;
if (a4==NULL) return((Table_Args_2 *)NULL);
a2 = (Table_Args_2 *)calloc(1, sizeof(Table_Args_2));
a2->target = buffer4_to_buffer2(a4->target);
args4_to_args2(&(a4->args), &(a2->args));
return(a2);
}
static Registration_2 *
reg4_to_reg2(Registration_4 *r4)
{
Registration_2 *r2, *head, *prev;
prev = head = NULL;
while (r4 != NULL) {
r2 = (Registration_2 *)calloc(1, sizeof(Registration_2));
r2->target = buffer4_to_buffer2(r4->target);
r2->prognum = r4->prognum;
r2->versnum = r4->versnum;
r2->procnum = r4->procnum;
r2->next = NULL;
if (head == NULL)
head = r2;
else
prev->next = r2;
prev = r2;
r4 = r4->next;
}
return(head);
}