static int _vacation_user_load(mod_instance_t mi, user_t user) {
module_t mod = mi->mod;
vacation_t v;
os_t os;
os_object_t o;
v = (vacation_t) calloc(1, sizeof(struct _vacation_st));
user->module_data[mod->index] = v;
if(storage_get(mod->mm->sm->st, "vacation-settings", jid_user(user->jid), NULL, &os) == st_SUCCESS) {
if(os_iter_first(os)) {
o = os_iter_object(os);
if(os_object_get_time(os, o, "start", &v->start) &&
os_object_get_time(os, o, "end", &v->end) &&
os_object_get_str(os, o, "message", &v->msg))
v->msg = strdup(v->msg);
else {
v->start = 0;
v->end = 0;
v->msg = NULL;
}
}
os_free(os);
}
pool_cleanup(user->p, (void (*))(void *) _vacation_user_free, v);
return 0;
}
/*
* get group's descriptive name by it's text id
* returned value needs to be freed by caller
*/
static const char *_roster_publish_get_group_name(sm_t sm, roster_publish_t rp, const char *groupid)
{
os_t os;
os_object_t o;
char *str;
char *group;
#ifndef NO_SM_CACHE
_roster_publish_group_cache_t group_cached;
#endif
if(!groupid) return groupid;
#ifndef NO_SM_CACHE
/* check for remembered group value in cache */
if( rp->group_cache_ttl ) {
if( rp->group_cache ) {
group_cached = xhash_get(rp->group_cache, groupid);
if( group_cached != NULL ) {
if( (time(NULL) - group_cached->time) >= rp->group_cache_ttl ) {
log_debug(ZONE,"group cache: expiring cached value for %s",groupid);
xhash_zap(rp->group_cache, groupid);
free(group_cached);
} else {
log_debug(ZONE,"group cache: returning cached value for %s",groupid);
return strdup(group_cached->groupname);
}
}
} else {
log_debug(ZONE,"group cache: creating cache");
rp->group_cache = xhash_new(401);
}
}
#endif
if(storage_get(sm->st, "published-roster-groups", groupid, NULL, &os) == st_SUCCESS && os_iter_first(os)) {
o = os_iter_object(os);
if( os_object_get_str(os, o, "groupname", &str) && str ) {
group=strdup(str);
} else {
group=NULL;
}
os_free(os);
#ifndef NO_SM_CACHE
if( rp->group_cache_ttl && group ) {
log_debug(ZONE,"group cache: updating cache value for %s",groupid);
group_cached = calloc(1, sizeof(struct _roster_publish_group_cache_st));
group_cached->time = time(NULL);
group_cached->groupid = strdup(groupid);
group_cached->groupname = strdup(group);
xhash_put(rp->group_cache, group_cached->groupid, group_cached);
}
#endif
return group;
} else {
return NULL;
}
}
/** Send archiving preferences */
void send_arch_prefs(mod_instance_t mi, sess_t sess, pkt_t pkt) {
module_t mod = mi->mod;
int prefs;
int archive=default_mode;
int section;
int check;
char buff[2060]; // 2048 is jid_user maximum length
char* ret_str=buff;
os_t os = NULL;
os_object_t o = NULL;
pkt_t reply;
// Create a new packet
log_debug(ZONE, "Construction of reply with current settings");
reply = pkt_create(sess->user->sm, "iq", "result", NULL, NULL);
// Defaults
log_debug(ZONE, "Getting defaults");
prefs = nad_append_elem(reply->nad, nad_add_namespace(reply->nad, archive_uri, NULL), "prefs", 2);
// Load defaults
snprintf(buff, 2060, "(jid=%s)", jid_user(sess->jid));
if((storage_get(sess->user->sm->st, tbl_name "_settings", jid_user(sess->jid), buff, &os) == st_SUCCESS) &&
(os_iter_first(os)) && ((o=os_iter_object(os))!=NULL))
os_object_get_int(os, o, "setting", &archive);
// Set defaults
switch(archive) {
case A_ALWAYS:
nad_set_attr(reply->nad, prefs, -1,"default", "always", 6);
break;
case A_ROSTER:
nad_set_attr(reply->nad, prefs, -1,"default", "roster", 6);
break;
default:
nad_set_attr(reply->nad, prefs, -1,"default", "never", 5);
break;
}
// Cleanup
if(o != NULL) {
os_object_free(o);
o=NULL;
}
if(os != NULL) {
os_free(os);
os=NULL;
}
// Always archiving
log_debug(ZONE, "Getting what to archive always");
section = nad_append_elem(reply->nad, -1, "always", 3);
if(storage_get(sess->user->sm->st, tbl_name "_settings", jid_user(sess->jid), "(setting=1)", &os) == st_SUCCESS)
if(os_iter_first(os))
do {
o = os_iter_object(os);
if((o != NULL) && (os_object_get_str(os, o, "jid", &ret_str)) && (ret_str != NULL)) {
nad_append_elem(reply->nad, -1, "jid", 4);
nad_append_cdata(reply->nad, ret_str, strlen(ret_str), 5);
}
} while(os_iter_next(os));
// Cleanup
if(o != NULL) {
os_object_free(o);
o=NULL;
}
if(os != NULL) {
os_free(os);
os=NULL;
}
// Never archiving
log_debug(ZONE, "Getting what to never archive");
section = nad_append_elem(reply->nad, -1, "never", 3);
if(storage_get(sess->user->sm->st, tbl_name "_settings", jid_user(sess->jid), "(setting=0)", &os) == st_SUCCESS)
if(os_iter_first(os))
do {
o = os_iter_object(os);
if((o != NULL) && (os_object_get_str(os, o, "jid", &ret_str)) && (ret_str != NULL)) {
nad_append_elem(reply->nad, -1, "jid", 4);
nad_append_cdata(reply->nad, ret_str, strlen(ret_str), 5);
}
} while(os_iter_next(os));
// Cleanup
if(o != NULL) {
os_object_free(o);
o=NULL;
}
if(os != NULL) {
os_free(os);
os=NULL;
}
// Send packet
pkt_id(pkt, reply);
pkt_sess(reply, sess);
pkt_free(pkt);
}
