Initial import of the CDE 2.1.30 sources from the Open Group.
This commit is contained in:
Peter Howkins
620
cde/lib/csa/convert4-2.c
Normal file
620
cde/lib/csa/convert4-2.c
Normal file
@@ -0,0 +1,620 @@
|
||||
/* $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 <malloc.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);
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user