static CSA_return_code
_DtCmsCreateCallog(char *user, cms_create_args *args, _DtCmsCalendar **newcal)
{
CSA_return_code stat;
_DtCmsCalendar *cal;
int i, index;
char datestr[80];
char *calname;
char *log;
char *username;
cms_attribute_value val;
cms_access_entry aentry;
int nidx = 0, oidx = 0;
char *name, *owner;
/*
* if calendar name is a user name, make sure that
* it's the same as the sender.
*/
calname = _DtCmGetPrefix(args->cal, '@');
username = _DtCmGetPrefix(user, '@');
if (_DtCmIsUserName(calname) && strcmp(calname, username)) {
free(calname);
free(username);
return (CSA_E_NO_AUTHORITY);
}
log = _DtCmsGetLogFN(calname);
free(calname);
free(username);
/* create internal calendar data structure */
if ((cal = _DtCmsMakeCalendar(user, args->cal)) == NULL) {
free(log);
return (CSA_E_INSUFFICIENT_MEMORY);
}
/* fill in information */
_csa_tick_to_iso8601(time(0), datestr);
if ((stat = _DtCm_set_string_attrval(datestr,
&cal->attrs[CSA_CAL_ATTR_DATE_CREATED_I].value,
CSA_VALUE_DATE_TIME)) != CSA_SUCCESS) {
_DtCmsFreeCalendar(cal);
free(log);
return (stat);
}
/* initialize access list to be "WORLD", VIEW_PUBLIC */
aentry.user = WORLD;
aentry.rights = CSA_VIEW_PUBLIC_ENTRIES;
aentry.next = NULL;
val.item.access_list_value = &aentry;
val.type = CSA_VALUE_ACCESS_LIST;
if ((stat = _DtCmUpdateAccessListAttrVal(&val,
&cal->attrs[CSA_CAL_ATTR_ACCESS_LIST_I].value)) != CSA_SUCCESS) {
_DtCmsFreeCalendar(cal);
free(log);
return (stat);
}
/* set product identifier */
if ((stat = _DtCm_set_string_attrval(_DtCM_PRODUCT_IDENTIFIER,
&cal->attrs[CSA_CAL_ATTR_PRODUCT_IDENTIFIER_I].value,
CSA_VALUE_STRING)) != CSA_SUCCESS) {
_DtCmsFreeCalendar(cal);
free(log);
return (stat);
}
/* set CSA version */
if ((stat = _DtCm_set_string_attrval(_DtCM_SPEC_VERSION_SUPPORTED,
&cal->attrs[CSA_CAL_ATTR_VERSION_I].value, CSA_VALUE_STRING))
!= CSA_SUCCESS) {
_DtCmsFreeCalendar(cal);
free(log);
return (stat);
}
/* we dont use the values specified by client */
for (i = 0; i < args->num_attrs; i++) {
if (strcmp(args->attrs[i].name.name,
CSA_CAL_ATTR_CALENDAR_NAME) == 0) {
nidx = i;
name = args->attrs[i].name.name;
args->attrs[i].name.name = NULL;
} else if (strcmp(args->attrs[i].name.name,
CSA_CAL_ATTR_CALENDAR_OWNER) == 0) {
oidx = i;
owner = args->attrs[i].name.name;
args->attrs[i].name.name = NULL;
}
}
/* initialize calendar attribute with info provided by caller */
if ((stat = _DtCmUpdateAttributes(args->num_attrs, args->attrs,
&cal->num_attrs, &cal->attrs, &cal->cal_tbl, B_TRUE,
NULL, B_FALSE)) != CSA_SUCCESS) {
_DtCmsFreeCalendar(cal);
free(log);
return (stat);
}
if (nidx) args->attrs[nidx].name.name = name;
if (oidx) args->attrs[oidx].name.name = owner;
/* use passed in char set if client does not supply one */
if (cal->attrs[CSA_CAL_ATTR_CHARACTER_SET_I].value == NULL &&
args->char_set && *args->char_set != NULL) {
if ((stat = _DtCm_set_string_attrval(args->char_set,
&cal->attrs[CSA_CAL_ATTR_CHARACTER_SET_I].value,
CSA_VALUE_STRING)) != CSA_SUCCESS) {
_DtCmsFreeCalendar(cal);
free(log);
return (stat);
}
}
/* create file */
if ((stat = _DtCmsCreateLogV2(user, log)) != CSA_SUCCESS) {
_DtCmsFreeCalendar(cal);
free(log);
return (stat);
}
/* dump file */
if ((stat = _DtCmsAppendCalAttrsByFN(log, cal->num_attrs, cal->attrs))
!= CSA_SUCCESS) {
free(log);
unlink(log);
_DtCmsFreeCalendar(cal);
return (stat);
}
free(log);
_DtCmsPutInCalList(cal);
*newcal = cal;
return (stat);
}
extern void
_DtCmsCollectOne(_DtCmsCalendar *cal)
{
Rb_Status status;
CSA_return_code stat;
char *bak, *temp, *clog;
if (cal == NULL)
return;
status = rb_check_tree(APPT_TREE(cal));
clog = _DtCmsGetLogFN(cal->calendar);
temp = _DtCmsGetTmpFN(cal->calendar);
bak = _DtCmsGetBakFN(cal->calendar);
if (status != rb_ok || clog==NULL || temp==NULL || bak==NULL) {
fprintf(stderr, "%s: cannot acquire files to execute garbage collection.\n", pgname);
fprintf(stderr, "possible causes: cannot find home directory.\n");
fprintf(stderr, "\tNIS or your host server might be down.\n");
fprintf(stderr, "damage: none\n\n");
goto cleanup;
}
/* Make sure that the temp file does not exist before garbage collect */
unlink (temp);
if (cal->fversion == _DtCMS_VERSION1)
stat = _DtCmsCreateLogV1(cal->owner, temp);
else
stat = _DtCmsCreateLogV2(cal->owner, temp);
if (stat != CSA_SUCCESS) {
if (stat == (CSA_X_DT_E_BACKING_STORE_PROBLEM))
print_file_error(temp,
"file error during garbage collection");
else {
fprintf(stderr, "%s: file error on %s during garbage collection\n",
pgname, temp);
fprintf(stderr, "Reason: getpwnam() failed. %s%s\n",
"No passwd entry for owner of ",
cal->calendar);
fprintf(stderr, "damage: none\n\n");
}
goto cleanup;
}
if (cal->fversion == _DtCMS_VERSION1)
stat = _DtCmsDumpDataV1(temp, cal);
else
stat = _DtCmsDumpDataV2(temp, cal);
if (stat != CSA_SUCCESS) {
print_file_error(temp,
(stat == (CSA_X_DT_E_BACKING_STORE_PROBLEM) ?
"file error during garbage collection" :
"can't dump data structure to file during garbage collection"));
goto cleanup;
}
/* mv -f .callog .calbak; mv -f temp .callog */
if (rename (clog, bak) < 0) {
perror ("rpc.cmsd: Can't backup callog to .calbak.\nreason:");
goto cleanup;
}
if (rename (temp, clog) < 0) {
perror("rpc.cmsd: Can't move .caltemp to callog.\nreason:");
fprintf(stderr, "%s: you may recover %s from %s.\n", pgname,
clog, bak);
}
cleanup:
if (bak != NULL) {
free(bak);
bak = NULL;
}
if (temp != NULL) {
free(temp);
temp = NULL;
}
if (clog != NULL) {
free(clog);
clog = NULL;
}
}
