extern void
format_abbrev_appt(Dtcm_appointment *appt, char *b, Boolean show_am,
DisplayType display)
{
int hr, mn;
Tick tick;
Lines *lines=NULL;
Boolean am = True;
struct tm *tm;
_Xltimeparams localtime_buf;
if(appt==NULL || b==NULL) return;
_csa_iso8601_to_tick(appt->time->value->item.string_value, &tick);
tm = _XLocaltime(&tick, localtime_buf);
hr = tm->tm_hour;
mn = tm->tm_min;
if (showtime_set(appt) && !magic_time(tick)) {
if (display == HOUR12) {
am = adjust_hour(&hr);
if (show_am)
sprintf(b, "%2d:%02d%s ", hr, mn, am ?
"a" : "p");
else
sprintf(b, "%2d:%02d ", hr, mn);
}
else
sprintf(b, "%02d%02d ", hr, mn);
}
lines = text_to_lines(appt->what->value->item.string_value, 1);
if (lines != NULL && lines->s != NULL) {
(void) cm_strcat(b, lines->s);
destroy_lines(lines);
}
}
/*
* Format the appointment in the character array passed (assumed to be pointing
* to allocated space) to contain the time followed by the what string. The
* appointment string is truncated at "max" chars or at DEFAULT_APPT_LEN if
* max is 0.
*/
extern void
format_appt(Dtcm_appointment *appt, char *b, DisplayType display, int max) {
int hr, mn, len, i = 0, j = 0;
Tick tick;
struct tm *tm;
register char *what_ptr;
_Xltimeparams localtime_buf;
if (!appt || !b)
return;
_csa_iso8601_to_tick(appt->time->value->item.string_value, &tick);
tm = _XLocaltime(&tick, localtime_buf);
hr = tm->tm_hour;
mn = tm->tm_min;
if (showtime_set(appt) && !magic_time(tick)) {
if (display == HOUR12) {
adjust_hour(&hr);
sprintf(b, "%2d:%02d ", hr, mn);
} else
sprintf(b, "%02d%02d ", hr, mn);
i = cm_strlen(b);
}
if (appt->what->value->item.string_value) {
if (max <= 0)
max = DEFAULT_APPT_LEN;
len = max - i;
what_ptr = appt->what->value->item.string_value;
while ((i < len) && *what_ptr != '\n' && *what_ptr)
b[i++] = *what_ptr++;
b[i] = '\0';
}
}
/*
* Format the appointment in the character array passed (assumed to be pointing
* to allocated space) to contain the formatted string for the group
* appointment editor. The string is truncated at "max" chars or at
* DEFAULT_GAPPT_LEN if max is 0.
*/
extern void
format_gappt(Dtcm_appointment *appt, char *name, char *b, DisplayType display,
int max) {
int hr, mn, i, j;
Tick tick;
char *what_ptr;
struct tm *tm;
_Xltimeparams localtime_buf;
if (!appt || !b)
return;
_csa_iso8601_to_tick(appt->time->value->item.string_value, &tick);
if ((tick > 0) && !magic_time(tick) &&
showtime_set(appt)) {
tm = _XLocaltime(&tick, localtime_buf);
hr = tm->tm_hour;
mn = tm->tm_min;
if (display == HOUR12) {
adjust_hour(&hr);
sprintf(b, "%2d:%02d ", hr, mn);
} else
sprintf(b, "%02d%02d ", hr, mn);
} else
sprintf(b, "%6s", " ");
if (max <= 0)
max = DEFAULT_GAPPT_LEN;
i = cm_strlen(b);
j = 0;
while (j < 10 && i < max && name && name[j])
b[i++] = name[j++];
while (j < 11 && i < max)
b[i++] = ' ', ++j;
if (i >= max) {
b[i - 1] = '\0';
return;
}
b[i] = '\0';
if (appt->what->value->item.string_value) {
what_ptr = appt->what->value->item.string_value;
while (i < max && *what_ptr != '\n' && *what_ptr)
b[i++] = *what_ptr++;
b[i] = '\0';
}
}
extern void
reminder_driver(XtPointer client_data, XtIntervalId *interval_id) {
Calendar *c = (Calendar *)client_data;
Tick run_tick;
int i;
if (c->view->next_alarm_id != *interval_id || !c->view->next_alarm) {
c->view->next_alarm_id = 0;
reset_timer(c);
return;
}
/*
* do not handle the reminder if the time it's to happen
* is earlier than the current time
*/
_csa_iso8601_to_tick(c->view->next_alarm[0].run_time, &run_tick);
if (now() >= run_tick) {
for (i = 0; i < c->view->next_alarm_count; i++) {
if (strcmp(c->view->next_alarm[i].attribute_name, CSA_ENTRY_ATTR_AUDIO_REMINDER)==0)
ring_it(client_data, interval_id);
else if (strcmp(c->view->next_alarm[i].attribute_name, CSA_ENTRY_ATTR_FLASHING_REMINDER)==0)
flash_it(client_data, interval_id);
else if (strcmp(c->view->next_alarm[i].attribute_name, CSA_ENTRY_ATTR_POPUP_REMINDER)==0)
open_it(client_data, interval_id, &c->view->next_alarm[i]);
else if (strcmp(c->view->next_alarm[i].attribute_name, CSA_ENTRY_ATTR_MAIL_REMINDER)==0)
mail_it(client_data, interval_id, &c->view->next_alarm[i]);
}
}
c->view->next_alarm_id = 0;
reset_timer(c);
}
/*
* Format 2 lines of appt data
*/
extern void
format_line2(Dtcm_appointment *appt, char *buf1, char *buf2,
DisplayType display) {
Tick tick, end_tick = 0;
int hour1, min1, hour2, min2;
Lines *lines;
char *s1, *s2;
struct tm *tm;
_Xltimeparams localtime_buf;
_csa_iso8601_to_tick(appt->time->value->item.string_value, &tick);
if (appt->end_time)
_csa_iso8601_to_tick(appt->end_time->value->item.string_value,
&end_tick);
/*
* Extract an appointment and format it into 2 lines of no more
* then maxchars
*/
*buf1 = *buf2 = NULL;
if (appt == NULL || appt->what->value->item.string_value == NULL) return;
tm = _XLocaltime(&tick, localtime_buf);
hour1 = tm->tm_hour;
min1 = tm->tm_min;
if (!showtime_set(appt) || magic_time(tick)) {
lines = (Lines *) text_to_lines(appt->what->value->item.string_value, 1);
if (lines==NULL) return;
strncpy(buf2, lines->s, 256);
destroy_lines(lines);
return;
}
s1 = s2 = "am";
if (display == HOUR12 && !adjust_hour(&hour1))
s1="pm";
if (end_tick) {
hour2 = hour(end_tick);
min2 = minute(end_tick);
if (display == HOUR12 && !adjust_hour(&hour2))
s2="pm";
}
if (end_tick == 0 ||
(hour1 == hour2 && min1 == min2 && (strcmp(s1, s2) == 0))) {
if (display == HOUR24)
sprintf(buf1, "%02d%.2d", hour1, min1);
else
sprintf(buf1, "%d:%.2d%s", hour1, min1, s1);
}
else {
if (display == HOUR12)
sprintf(buf1, "%d:%.2d%s-%d:%.2d%s", hour1, min1, s1,
hour2, min2, s2);
else
sprintf(buf1, "%02d%02d-%02d%02d", hour1, min1,
hour2, min2);
}
lines = (Lines *) text_to_lines(appt->what->value->item.string_value, 1);
if (lines == NULL || lines->s == NULL ||
(cm_strlen(lines->s) == 1 && lines->s[0] == ' '))
buf2[0] = NULL;
else
sprintf(buf2, " %s", lines->s);
destroy_lines(lines);
}
/*
* Format 2 lines of appt data
*/
extern void
format_maxchars(Dtcm_appointment *appt, char *buf1, int maxchars,
DisplayType display) {
Tick tick, end_tick = 0;
int hour1, min1, hour2, min2;
Lines *lines;
char *s1, *s2;
struct tm *tm;
_Xltimeparams localtime_buf;
_csa_iso8601_to_tick(appt->time->value->item.string_value, &tick);
if (appt->end_time)
_csa_iso8601_to_tick(appt->end_time->value->item.string_value,
&end_tick);
*buf1 = NULL;
if (appt == NULL || appt->what->value->item.string_value == NULL) return;
tm = _XLocaltime(&tick, localtime_buf);
hour1 = tm->tm_hour;
min1 = tm->tm_min;
if (showtime_set(appt) && !magic_time(tick)) {
s1 = s2 = "am";
if (display == HOUR12 && !adjust_hour(&hour1))
s1="pm";
if (end_tick) {
hour2 = hour(end_tick);
if (display == HOUR12 && !adjust_hour(&hour2))
s2="pm";
min2 = minute(end_tick);
}
if (end_tick == 0 || hour1 == hour2 && min1 == min2) {
if (display == HOUR24)
sprintf(buf1, "%02d%02d ", hour1, min1);
else
sprintf(buf1, "%d:%.2d%s ", hour1, min1, s1);
}
else {
if (display == HOUR12)
sprintf(buf1, "%d:%.2d%s-%d:%.2d%s ",
hour1, min1, s1, hour2, min2, s2);
else
sprintf(buf1, "%02d%02d-%02d%02d ",
hour1, min1, hour2, min2);
}
}
lines = (Lines *) text_to_lines(appt->what->value->item.string_value, 10);
while (lines != NULL) {
if ((cm_strlen(buf1) + cm_strlen(lines->s)) < (maxchars-2)) {
cm_strcat(buf1, lines->s);
lines = lines->next;
if (lines != NULL)
cm_strcat(buf1, " - ");
}
else {
strncat(buf1, lines->s, (maxchars - cm_strlen(buf1)-1));
break;
}
}
destroy_lines(lines);
}
extern Boolean
dssw_attrs_to_form(DSSW *dssw, Dtcm_appointment *appt) {
int start_hr, stop_hr;
char *what;
time_t tick, end_tick = 0;
Boolean showtime;
Props *p = (Props *)dssw->cal->properties;
DisplayType dt = get_int_prop(p, CP_DEFAULTDISP);
_csa_iso8601_to_tick(appt->time->value->item.date_time_value, &tick);
showtime = showtime_set(appt);
if (appt->end_time)
_csa_iso8601_to_tick(appt->end_time->value->item.\
date_time_value, &end_tick);
what = appt->what->value->item.string_value;
/*
** Set the date, start, stop, and what fields
*/
if (!showtime || magic_time(tick)) {
dssw->start_val.val[0] = '\0';
dssw->stop_val.val[0] = '\0';
} else {
if ((start_hr = hour(tick)) < 12)
dssw->start_val.block = TIME_AM;
else
dssw->start_val.block = TIME_PM;
if (dt == HOUR12) {
if (start_hr == 0)
start_hr = 12;
else if (start_hr > 12)
start_hr -= 12;
sprintf(dssw->start_val.val, "%2d:%02d", start_hr,
minute(tick));
} else
sprintf(dssw->start_val.val, "%02d%02d", start_hr,
minute(tick));
if (end_tick) {
if ((stop_hr = hour(end_tick)) < 12)
dssw->stop_val.block = TIME_AM;
else
dssw->stop_val.block = TIME_PM;
if (dt == HOUR12) {
if (stop_hr == 0)
stop_hr = 12;
else if (stop_hr > 12)
stop_hr -= 12;
sprintf(dssw->stop_val.val, "%2d:%02d", stop_hr,
minute(end_tick));
} else
sprintf(dssw->stop_val.val, "%02d%02d", stop_hr,
minute(end_tick));
} else {
/* no end time */
sprintf(dssw->stop_val.val, "\0");
dssw->stop_val.block = TIME_AM;
}
}
/* limit the size of the text pulled out of the appointment. */
if (what) {
strncpy(dssw->what_val, what, WHAT_LEN - 1);
dssw->what_val[WHAT_LEN-1] = NULL;
}
set_dssw_vals(dssw, tick);
return True;
}
/*
** Functions to build and popup the postup reminder
*/
extern void
postup_show_proc(Calendar *c, CSA_reminder_reference *r) {
int start_hr, stop_hr;
char text[BUFSIZ];
time_t st, sp = 0;
Lines *lines, *l = NULL;
Props *p = (Props *)c->properties;
Widget pu_frame, pu_base_form,
pu_text_form, separator,
pu_form, button_form, pu_date,
pu_range, pu_image, pu_close, line, last_line;
Boolean start_am, stop_am;
XmString xmstr;
CSA_return_code stat;
DisplayType dis_t = get_int_prop(p, CP_DEFAULTDISP);
OrderingType ord_t = get_int_prop(p, CP_DATEORDERING);
SeparatorType sep_t = get_int_prop(p, CP_DATESEPARATOR);
Dtcm_appointment *appt;
char *title;
if (!c->postup)
c->postup = XtAppCreateShell("calendar_postup", "Dtcm",
xmDialogShellWidgetClass, c->xcontext->display,
NULL, 0);
/*
** Create the Motif objects
*/
title = XtNewString(catgets(c->DT_catd, 1, 839, "Calendar : Reminder"));
pu_frame = XtVaCreatePopupShell("pu_frame",
topLevelShellWidgetClass, c->postup,
XmNtitle, title,
XmNmwmFunctions, MWM_FUNC_MOVE | MWM_FUNC_CLOSE,
XmNdeleteResponse, XmDESTROY,
NULL);
XtFree(title);
pu_base_form = XtVaCreateWidget("pu_base_form",
xmFormWidgetClass, pu_frame,
NULL);
pu_text_form = XtVaCreateWidget("pu_test_form",
xmFormWidgetClass, pu_base_form,
XmNtopAttachment, XmATTACH_FORM,
XmNleftAttachment, XmATTACH_FORM,
XmNtopAttachment, XmATTACH_FORM,
XmNleftOffset, 1,
XmNrightOffset, 1,
XmNtopOffset, 1,
NULL);
pu_image = XtVaCreateWidget("pu_image",
xmLabelGadgetClass, pu_text_form,
XmNleftAttachment, XmATTACH_FORM,
XmNtopAttachment, XmATTACH_FORM,
XmNtopOffset, 5,
XmNlabelType, XmPIXMAP,
XmNlabelPixmap, ((Props_pu *)c->properties_pu)->postup_pixmap,
NULL);
button_form = XtVaCreateWidget("pu_form",
xmFormWidgetClass, pu_base_form,
XmNbottomAttachment, XmATTACH_FORM,
XmNbottomOffset, 2,
XmNleftOffset, 1,
XmNrightOffset, 1,
XmNleftAttachment, XmATTACH_FORM,
XmNrightAttachment, XmATTACH_FORM,
XmNfractionBase, 3,
NULL);
xmstr = XmStringCreateLocalized(catgets(c->DT_catd, 1, 680, "Close"));
pu_close = XtVaCreateManagedWidget("close",
xmPushButtonWidgetClass, button_form,
XmNtopAttachment, XmATTACH_FORM,
XmNbottomAttachment, XmATTACH_FORM,
XmNleftAttachment, XmATTACH_POSITION,
XmNrightAttachment, XmATTACH_POSITION,
XmNleftPosition, 1,
XmNrightPosition, 2,
XmNbottomOffset, 1,
XmNlabelString, xmstr,
NULL);
XmStringFree(xmstr);
separator = XtVaCreateWidget("separator",
xmSeparatorGadgetClass,
pu_base_form,
XmNleftAttachment, XmATTACH_FORM,
XmNrightAttachment, XmATTACH_FORM,
XmNbottomAttachment, XmATTACH_WIDGET,
XmNbottomWidget, button_form,
XmNtopAttachment, XmATTACH_WIDGET,
XmNtopWidget, pu_text_form,
XmNtopOffset, 1,
NULL);
pu_form = XtVaCreateWidget("pu_form",
xmFormWidgetClass, pu_text_form,
XmNtopAttachment, XmATTACH_FORM,
XmNtopOffset, 1,
XmNleftAttachment, XmATTACH_WIDGET,
XmNleftWidget, pu_image,
XmNverticalSpacing, 10,
NULL);
pu_date = XtVaCreateWidget("pu_date",
xmLabelGadgetClass, pu_form,
XmNleftAttachment, XmATTACH_FORM,
XmNtopAttachment, XmATTACH_FORM,
NULL);
pu_range = XtVaCreateWidget("pu_range",
xmLabelGadgetClass, pu_form,
XmNleftAttachment, XmATTACH_FORM,
XmNtopAttachment, XmATTACH_WIDGET,
XmNtopWidget, pu_date,
XmNtopOffset, 8,
NULL);
XtAddCallback(pu_close, XmNactivateCallback, close_cb, pu_frame);
appt = allocate_appt_struct(appt_read,
c->general->version,
CSA_ENTRY_ATTR_START_DATE_I,
CSA_ENTRY_ATTR_END_DATE_I,
CSA_ENTRY_ATTR_SUMMARY_I,
CSA_X_DT_ENTRY_ATTR_SHOWTIME_I,
NULL);
stat = query_appt_struct(c->cal_handle, r->entry, appt);
backend_err_msg(c->frame, c->calname, stat,
((Props_pu *)c->properties_pu)->xm_error_pixmap);
if (stat != CSA_SUCCESS) {
free_appt_struct(&appt);
return;
}
_csa_iso8601_to_tick(appt->time->value->item.date_time_value, &st);
if (appt->end_time)
_csa_iso8601_to_tick(appt->end_time->value->\
item.date_time_value, &sp);
l = lines = text_to_lines(appt->what->value->item.string_value, 5);
last_line = 0;
while (l) {
xmstr = XmStringCreateLocalized(l->s);
line = XtVaCreateWidget("text_line",
xmLabelGadgetClass, pu_text_form,
XmNlabelString, xmstr,
XmNleftAttachment, XmATTACH_WIDGET,
XmNleftWidget, pu_form,
XmNleftOffset, 15,
NULL);
XmStringFree(xmstr);
if (last_line)
XtVaSetValues(line,
XmNtopAttachment, XmATTACH_WIDGET,
XmNtopWidget, last_line,
XmNtopOffset, 8,
NULL);
else
XtVaSetValues(line,
XmNtopAttachment, XmATTACH_FORM,
XmNtopOffset, 8,
NULL);
last_line = line;
l = l->next;
}
if (lines)
destroy_lines(lines);
/*
** Now fill in the correct information
*/
set_date_in_widget(st, pu_date, ord_t, sep_t);
if (!showtime_set(appt) || magic_time(st))
text[0] = '\0';
else {
start_hr = hour(st);
if (sp) stop_hr = hour(sp);
if (dis_t == HOUR12) {
start_am = adjust_hour(&start_hr);
if (sp) {
/* NL_COMMENT
Message 1087 : This message is used to form
the alarm string that appears in the
reminder popup. In the C locale it would
look something like this:
``From 11:00am to 1:00pm''
In the printf conversion string the $n are:
$1 -> start hour
$2 -> start minute
$3 -> am or pm
$4 -> stop hour
$5 -> stop minute
$6 -> am or pm
*/
char *am = XtNewString(catgets(c->DT_catd,
1, 4, "am"));
char *pm = XtNewString(catgets(c->DT_catd,
1, 3, "pm"));
stop_am = adjust_hour(&stop_hr);
sprintf(text, catgets(c->DT_catd, 1, 1087,
"From %1$2d:%2$02d%3$s to %4$2d:%5$02d%6$s"),
start_hr, minute(st),
(start_am) ? am : pm,
stop_hr, minute(sp),
(stop_am) ? am : pm
);
XtFree(am);
XtFree(pm);
} else {
/* NL_COMMENT
Message 1088 : This message is used to form
the alarm string that appears in the
reminder popup. It is used when an appt
does not have and ``end'' time. In the
C locale it would look something like this:
``11:00am''
In the printf conversion string the $n are:
$1 -> start hour
$2 -> start minute
$3 -> am or pm
*/
char *meridian =
XtNewString ((start_am) ?
catgets(c->DT_catd, 1, 4, "am"):
catgets(c->DT_catd, 1, 3, "pm"));
sprintf(text, catgets(c->DT_catd, 1, 1088,
"%1$2d:%2$02d%3$s"),
start_hr, minute(st), meridian
);
XtFree(meridian);
}
} else {
if (sp) {
/* NL_COMMENT
Message 1089 : This message is used to form
the alarm string that appears in the
reminder popup. This string is used when
a user has asked that times be displayed
in 24 hour format. In the C locale it
would look something like this:
``From 0100 to 1600''
In the printf conversion string the $n are:
$1 -> start hour
$2 -> start minute
$3 -> stop hour
$4 -> stop minute
*/
sprintf(text, catgets(c->DT_catd, 1, 1089,
"From %1$02d%2$02d to %3$02d%4$02d"),
start_hr, minute(st), stop_hr,
minute(sp));
} else {
/* NL_COMMENT
Message 1090 : This message is used to form
the alarm string that appears in the
reminder popup. This string is used when
an appt does not have an end time and the
user has asked that times be displayed
in 24 hour format. In the C locale it
would look something like this:
``1600''
In the printf conversion string the $n are:
$1 -> start hour
$2 -> start minute
*/
sprintf(text, catgets(c->DT_catd, 1, 1090,
"%1$02d%2$02d"),
start_hr, minute(st));
}
}
}
free_appt_struct(&appt);
xmstr = XmStringCreateLocalized(text);
XtVaSetValues(pu_range, XmNlabelString, xmstr,
NULL);
XmStringFree(xmstr);
ManageChildren(pu_form);
ManageChildren(pu_base_form);
ManageChildren(pu_text_form);
XtManageChild(pu_base_form);
XtVaSetValues(button_form, XmNdefaultButton, pu_close, NULL);
XtVaSetValues(button_form, XmNcancelButton, pu_close, NULL);
XtPopup(pu_frame, XtGrabNone);
DtWsmOccupyAllWorkspaces(c->xcontext->display, XtWindow(pu_frame));
}
extern void
mail_it(XtPointer client_data, XtIntervalId *interval_id, CSA_reminder_reference *r) {
Calendar *c = (Calendar *)client_data;
int hr;
Lines *lines = NULL, *l = NULL;
Props *p = (Props *)c->properties;
Boolean pm;
DisplayType dt = get_int_prop(p, CP_DEFAULTDISP);
Dtcm_appointment *appt;
char subbuf[BUFSIZ], bodybuf[BUFSIZ];
char datebuf[200], startbuf[100], stopbuf[100];
char whatbuf[BUFSIZ];
char *to;
CSA_return_code stat;
Tick start, stop;
char *addr_data = NULL;
appt = allocate_appt_struct(appt_read,
c->general->version,
CSA_ENTRY_ATTR_START_DATE_I,
CSA_ENTRY_ATTR_SUMMARY_I,
CSA_ENTRY_ATTR_ORGANIZER_I,
CSA_X_DT_ENTRY_ATTR_SHOWTIME_I,
CSA_ENTRY_ATTR_END_DATE_I,
CSA_ENTRY_ATTR_MAIL_REMINDER_I,
NULL);
stat = query_appt_struct(c->cal_handle, r->entry, appt);
backend_err_msg(c->frame, c->calname, stat,
((Props_pu *)c->properties_pu)->xm_error_pixmap);
if (stat != CSA_SUCCESS) {
free_appt_struct(&appt);
return;
}
/* compose to field */
if (appt->mail->value->item.reminder_value->reminder_data.data == NULL ||
(appt->mail->value->item.reminder_value->reminder_data.size == 0)) {
/* empty recipient */
if (debug)
fprintf(stderr, "%s", catgets(c->DT_catd, 1, 1,
"dtcm: empty recipient in mail reminder\n"));
to = appt->author->value->item.calendar_user_value->user_name;
} else {
addr_data = calloc(appt->mail->value->item.reminder_value->reminder_data.size + 1, 1);
strncpy(addr_data, (char *) appt->mail->value->item.reminder_value->reminder_data.data, appt->mail->value->item.reminder_value->reminder_data.size);
to = addr_data;
}
/* compose subject field */
lines = text_to_lines(appt->what->value->item.string_value, 5);
sprintf(subbuf, catgets(c->DT_catd, 1, 2, "Reminder- %s"),
(lines) ? lines->s : "\0");
/* compose message body */
_csa_iso8601_to_tick(appt->time->value->item.date_time_value, &start);
format_tick(start, ORDER_MDY, SEPARATOR_SLASH, datebuf);
if (showtime_set(appt) && !magic_time(start)) {
hr = hour(start);
pm = (dt == HOUR12 && !adjust_hour(&hr)) ? True : False;
if (dt == HOUR12) {
sprintf(startbuf, "%2d:%02d %s", hr, minute(start),
pm ? "pm" :
"am");
} else {
sprintf(startbuf, "%02d%02d", hr, minute(start));
}
} else
startbuf[0] = '\0';
if (showtime_set(appt) && !magic_time(start) && appt->end_time) {
_csa_iso8601_to_tick(appt->end_time->value->\
item.date_time_value, &stop);
hr = hour(stop);
pm = (dt == HOUR12 && !adjust_hour(&hr)) ? True : False;
if (dt == HOUR12) {
sprintf(stopbuf, "%2d:%02d %s", hr, minute(stop),
pm ? catgets(c->DT_catd, 1, 3, "pm") :
catgets(c->DT_catd, 1, 4, "am"));
} else {
sprintf(stopbuf, "%02d%02d", hr, minute(stop));
}
} else
stopbuf[0] = '\0';
if (l = lines) {
sprintf(whatbuf, "%s\n", l->s);
l = l->next;
} else
whatbuf[0] = '\0';
while(l != NULL) {
strcat(whatbuf, "\t\t");
strcat(whatbuf, l->s);
strcat(whatbuf, "\n");
l = l->next;
}
if (lines)
destroy_lines(lines);
if (stopbuf[0] != '\0') {
sprintf(bodybuf, catgets(c->DT_catd, 1, 7, "\n\n\t** Calendar Appointment **\n\n\tDate:\t%s\n\tStart:\t%s\n\tEnd:\t%s\n\tWhat:\t%s"),
datebuf, startbuf, stopbuf, whatbuf);
} else {
sprintf(bodybuf, catgets(c->DT_catd, 1, 1100, "\n\n\t** Calendar To Do Item **\n\n\tDue Date:\t%s\n\tTime Due:\t%s\n\tWhat:\t\t%s"),
datebuf, startbuf, whatbuf);
}
if (debug) {
fprintf(stderr, "to = `%s`\n", to);
fprintf(stderr, "subject = `%s`\n", subbuf);
fprintf(stderr, "body = `%s`\n", bodybuf);
}
(void)submit_mail(to, subbuf, bodybuf);
free_appt_struct(&appt);
if (addr_data)
free(addr_data);
}
/*
* Insert the appointment into the calendar.
*
* Returns:
* 1 Success
* 0 User overuled. Appointment not inserted.
* -1 Failure
*/
static int
schedule_appt(Calendar *c, Dtcm_appointment *a) {
char date_buf[MAXNAMELEN], buf[BUFSIZ], buf2[BUFSIZ];
int answer;
Editor *e = (Editor *)c->editor;
ToDo *t = (ToDo *)c->todo;
Props *p = (Props *)c->properties;
CSA_entry_handle entry;
OrderingType ot = get_int_prop(p, CP_DATEORDERING);
SeparatorType st = get_int_prop(p, CP_DATESEPARATOR);
Tick tick;
int rc;
if (strcmp(c->calname, c->view->current_calendar) != 0) {
/*
* Make sure user really meant to insert appointment
* into somebody elses calendar.
*/
char *ident = XtNewString(catgets(c->DT_catd, 1, 923, "Cancel"));
char *title = XtNewString(catgets(c->DT_catd, 1, 212,
"Calendar : Schedule Appointment"));
sprintf(buf, "%s", catgets(c->DT_catd, 1, 210, "The appointment will be scheduled in the calendar\nyou are currently browsing. Do you still want to schedule it?"));
sprintf(buf2, "%s %s", catgets(c->DT_catd, 1, 211, "Schedule in"),
c->view->current_calendar);
answer = dialog_popup(c->frame,
DIALOG_TITLE, title,
DIALOG_TEXT, buf,
BUTTON_IDENT, 1, ident,
BUTTON_IDENT, 2, buf2,
NULL);
XtFree(title);
XtFree(ident);
if (answer == 1)
return 0;
}
if (a->end_time) {
if (!editor_created(e))
{
e_make_editor(c);
XtUnmanageChild(e->base_form_mgr);
e->editor_is_up = False;
}
if ((rc = editor_insert(a, &entry, c)) == True) {
_csa_iso8601_to_tick(a->time->value->item.string_value, &tick);
format_tick(tick, ot, st, date_buf);
sprintf(buf, catgets(c->DT_catd, 1, 214,
"Appointment scheduled: %s"), date_buf);
set_message(c->message_text, buf);
return 1;
} else {
set_message(c->message_text, "");
if ( rc == 2)
return 0;
return -1;
}
} else {
if (!t->frame)
{
t_make_todo(c);
XtUnmanageChild(t->frame);
t->todo_is_up = False;
}
if (todo_insert(a, &entry, c)) {
/*
* No messages displayed on calendar for todo.
*/
return 1;
} else {
/*
* No messages displayed on calendar for todo.
*/
return -1;
}
}
}
extern CSA_return_code
_DtCm_table_delete(
Calendar *cal,
_DtCm_libentry *entry,
CSA_enum scope)
{
CSA_return_code stat = CSA_SUCCESS;
Table_Res_4 *res = NULL;
_DtCm_Connection *conn;
Uidopt_4 key;
cms_attribute *rtype;
DP(("table.c: _DtCm_table_delete\n"));
if (cal == NULL || entry == NULL)
return (CSA_E_INVALID_PARAMETER);
_csa_iso8601_to_tick(entry->e->attrs[CSA_ENTRY_ATTR_START_DATE_I].\
value->item.string_value, &key.appt_id.tick);
/* if this is an one-time appt, make sure the scope is do_all */
rtype = &entry->e->attrs[CSA_X_DT_ENTRY_ATTR_REPEAT_TYPE_I];
if (rtype->value == NULL ||
rtype->value->item.sint32_value == CSA_X_DT_REPEAT_ONETIME)
scope = CSA_SCOPE_ALL;
if ((stat = _DtCm_scope_to_options4(scope, &key.option)) != CSA_SUCCESS)
return (stat);
key.appt_id.key = entry->e->key.id;
key.next = NULL;
conn = &cal->conn;
if ((key.option == do_forward_4) && (conn->ci->vers_out < TABLEVERS_4))
return (CSA_E_NOT_SUPPORTED);
conn->retry = B_FALSE;
switch(conn->ci->vers_out) {
Table_Args_2 a2;
Table_Args_3 a3;
Table_Args_4 a4;
Table_Res_2 *res2;
Table_Res_3 *res3;
case TABLEVERS_2:
a2.target = cal->name;
a2.args.tag = UID_2;
a2.args.Args_2_u.key = _DtCm_uidopt4_to_uid2(&key);
if (key.option == do_all_4)
res2 = _DtCm_rtable_delete_2(&a2, conn);
else
res2 = _DtCm_rtable_delete_instance_2(&a2, conn);
res = _DtCm_tableres2_to_tableres4(res2);
if (a2.args.Args_2_u.key != NULL)
free(a2.args.Args_2_u.key);
if (res2 != NULL)
xdr_free((xdrproc_t)_DtCm_xdr_Table_Res_2, (char*)res2);
break;
case TABLEVERS_3:
a3.target = cal->name;
a3.args.tag = UID_3;
a3.args.Args_3_u.key = _DtCm_uidopt4_to_uid3(&key);
a3.pid = getpid();
if (key.option == do_all_4)
res3 = _DtCm_rtable_delete_3(&a3, conn);
else
res3 = _DtCm_rtable_delete_instance_3(&a3, conn);
res = _DtCm_tableres3_to_tableres4(res3);
if (a3.args.Args_3_u.key != NULL)
free(a3.args.Args_3_u.key);
if (res3 != NULL)
xdr_free((xdrproc_t)_DtCm_xdr_Table_Res_3, (char*)res3);
break;
case TABLEVERS_4:
a4.target = cal->name;
a4.args.tag = UIDOPT_4;
a4.args.Args_4_u.uidopt = &key;
a4.pid = getpid();
res = _DtCm_rtable_delete_4(&a4, conn);
break;
default:
stat = CSA_E_FAILURE;
break;
}
if (res!=NULL) {
switch(res->status) {
case access_ok_4:
if (res->res.Table_Res_List_4_u.a == NULL)
stat = CSA_X_DT_E_ENTRY_NOT_FOUND |
CSA_E_INVALID_ENTRY_HANDLE;
break;
case access_failed_4:
stat = CSA_E_NO_AUTHORITY;
break;
case access_other_4:
stat = CSA_E_INVALID_PARAMETER;
break;
case access_notable_4:
case access_partial_4:
case access_incomplete_4:
stat = CSA_E_FAILURE;
break;
default:
/* remote system error */
DP((errfmt, "table_delete", res->status));
stat = CSA_E_FAILURE;
break;
}
xdr_free((xdrproc_t)_DtCm_xdr_Table_Res_4, (char*)res);
} else {
stat = (conn->stat == RPC_SUCCESS) ? CSA_E_SERVICE_UNAVAILABLE :
_DtCm_clntstat_to_csastat(conn->stat);
}
return(stat);
}
extern CSA_return_code
_DtCm_table_update(
Calendar *cal,
_DtCm_libentry *oentry,
uint num_attrs,
CSA_attribute * attrs,
CSA_enum scope,
_DtCm_libentry **nentry)
{
CSA_return_code stat = CSA_SUCCESS;
Table_Res_4 *res = NULL;
_DtCm_Connection *conn;
Id_4 key;
Options_4 opt;
Appt_4 *appt4;
_DtCm_libentry *temp;
DP(("table.c: _DtCm_table_update_one\n"));
if (cal == NULL || oentry == NULL || nentry == NULL)
return (CSA_E_INVALID_PARAMETER);
/* convert scope to option */
if ((stat = _DtCm_scope_to_options4(scope, &opt)) != CSA_SUCCESS)
return (stat);
_csa_iso8601_to_tick(oentry->e->attrs[CSA_ENTRY_ATTR_START_DATE_I].\
value->item.string_value, &key.tick);
key.key = oentry->e->key.id;
/* create new appt4 from old entry and new attribute values */
temp = oentry->next;
oentry->next = NULL;
stat = _DtCm_libentries_to_appt4(oentry, &appt4);
oentry->next = temp;
if (stat != CSA_SUCCESS)
return (stat);
/* use do_all for old backends */
if (appt4->period.period == single_4)
opt = do_all_4;
/* apply the new attribute values to the appointment */
if ((stat = _DtCm_attrs_to_apptdata(num_attrs, attrs, appt4))
!= CSA_SUCCESS) {
_DtCm_free_appt4(appt4);
return (stat);
}
/* if the backend's version is less than 4, then it does
* not support repeating event types beyond yearly
* nor does it support do_forward
*/
conn = &cal->conn;
if (conn->ci->vers_out < TABLEVERS_4 &&
(appt4->period.period > yearly_4 || scope >= CSA_SCOPE_FORWARD)) {
_DtCm_free_appt4(appt4);
return (CSA_E_NOT_SUPPORTED);
}
conn->retry = B_FALSE;
switch(conn->ci->vers_out) {
Table_Args_2 a2;
Table_Args_3 a3;
Table_Args_4 a4;
Table_Res_2 *res2;
Table_Res_3 *res3;
case TABLEVERS_2:
a2.target = cal->name;
a2.args.tag = APPTID_2;
a2.args.Args_2_u.apptid.oid = (Id_2 *)calloc(1, sizeof(Id_2));
_DtCm_id4_to_id2(&key, a2.args.Args_2_u.apptid.oid);
a2.args.Args_2_u.apptid.new_appt = _DtCm_appt4_to_appt2(appt4);
if (opt == do_all_4)
res2 = _DtCm_rtable_change_2(&a2, conn);
else
res2 = _DtCm_rtable_change_instance_2(&a2, conn);
res = _DtCm_tableres2_to_tableres4(res2);
free(a2.args.Args_2_u.apptid.oid);
if (a2.args.Args_2_u.apptid.new_appt != NULL)
_DtCm_free_appt2(a2.args.Args_2_u.apptid.new_appt);
if (res2 != NULL)
xdr_free((xdrproc_t)_DtCm_xdr_Table_Res_2, (char*)res2);
break;
case TABLEVERS_3:
a3.target = cal->name;
a3.args.tag = APPTID_3;
a3.args.Args_3_u.apptid.oid = (Id_3 *)calloc(1, sizeof(Id_3));
_DtCm_id4_to_id3(&key, a3.args.Args_3_u.apptid.oid);
a3.args.Args_3_u.apptid.new_appt = _DtCm_appt4_to_appt3(appt4);
a3.pid = getpid();
if (opt == do_all_4)
res3 = _DtCm_rtable_change_3(&a3, conn);
else
res3 = _DtCm_rtable_change_instance_3(&a3, conn);
res = _DtCm_tableres3_to_tableres4(res3);
free(a3.args.Args_3_u.apptid.oid);
if (a3.args.Args_3_u.apptid.new_appt != NULL)
_DtCm_free_appt3(a3.args.Args_3_u.apptid.new_appt);
if (res3 != NULL)
xdr_free((xdrproc_t)_DtCm_xdr_Table_Res_3, (char*)res3);
break;
case TABLEVERS_4:
a4.target = cal->name;
a4.args.tag = APPTID_4;
a4.args.Args_4_u.apptid.oid = &key;
a4.args.Args_4_u.apptid.new_appt = appt4;
a4.args.Args_4_u.apptid.option = opt;
a4.pid = getpid();
res = _DtCm_rtable_change_4(&a4, conn);
break;
default:
stat = CSA_E_FAILURE;
break;
}
_DtCm_free_appt4(appt4);
if (res != NULL) {
switch(res->status) {
case access_ok_4:
if (res->res.Table_Res_List_4_u.a) {
stat = _DtCm_appt4_to_libentries(cal->name,
res->res.Table_Res_List_4_u.a, nentry);
}
break;
case access_failed_4:
stat = CSA_E_NO_AUTHORITY;
break;
case access_notable_4:
stat = CSA_E_CALENDAR_NOT_EXIST;
break;
case access_other_4:
case access_partial_4:
case access_incomplete_4:
stat = CSA_E_FAILURE;
break;
default:
/* remote system error */
DP((errfmt, "_DtCm_table_update", res->status));
stat = CSA_E_FAILURE;
break;
}
xdr_free((xdrproc_t)_DtCm_xdr_Table_Res_4, (char*)res);
} else {
stat = (conn->stat == RPC_SUCCESS) ? CSA_E_SERVICE_UNAVAILABLE :
_DtCm_clntstat_to_csastat(conn->stat);
}
return(stat);
}
