int auth_change_password(uint64_t user_idnr, const char *new_pass, const char *enctype)
{
C c; S s; volatile int t = FALSE;
const char *encoding = enctype?enctype:"";
if (strlen(new_pass) > 128) {
TRACE(TRACE_ERR, "new password length is insane");
return -1;
}
c = db_con_get();
TRY
s = db_stmt_prepare(c, "UPDATE %susers SET passwd = ?, encryption_type = ? WHERE user_idnr=?", DBPFX);
db_stmt_set_str(s, 1, new_pass);
db_stmt_set_str(s, 2, encoding);
db_stmt_set_u64(s, 3, user_idnr);
db_stmt_exec(s);
t = TRUE;
CATCH(SQLException)
LOG_SQLERROR;
t = DM_EQUERY;
FINALLY
db_con_close(c);
END_TRY;
return t;
}
/* Move message to Trash if the message is in INBOX mailbox and date less then passed date. */
int do_move_old (int days, char * mbinbox_name, char * mbtrash_name)
{
Connection_T c; ResultSet_T r; ResultSet_T r1; PreparedStatement_T s; PreparedStatement_T s1;
int skip = 1;
char expire [DEF_FRAGSIZE];
uint64_t mailbox_to;
uint64_t mailbox_from;
memset(expire,0,sizeof(expire));
snprintf(expire, DEF_FRAGSIZE-1, db_get_sql(SQL_EXPIRE), days);
c = db_con_get();
s = db_stmt_prepare(c,"SELECT msg.message_idnr, mb.owner_idnr, mb.mailbox_idnr FROM %smessages msg "
"JOIN %sphysmessage phys ON msg.physmessage_id = phys.id "
"JOIN %smailboxes mb ON msg.mailbox_idnr = mb.mailbox_idnr "
"WHERE mb.name = ? AND msg.status < %d "
"AND phys.internal_date < %s",
DBPFX, DBPFX, DBPFX, MESSAGE_STATUS_DELETE, expire);
s1 = db_stmt_prepare(c, "SELECT mailbox_idnr FROM %smailboxes WHERE owner_idnr = ? AND name = ?", DBPFX);
db_stmt_set_str(s, 1, mbinbox_name);
TRY
r = db_stmt_query(s);
while (db_result_next(r))
{
skip = 1;
uint64_t id = db_result_get_u64(r, 0);
uint64_t user_id = db_result_get_u64(r, 1);
mailbox_from = db_result_get_u64(r, 2);
db_stmt_set_u64(s1,1,user_id);
db_stmt_set_str(s1,2,mbtrash_name);
r1 = db_stmt_query(s1);
if (db_result_next(r1)) {
mailbox_to = db_result_get_u64(r1, 0);
skip = 0;
}
if (!skip) {
db_move_message(id, mailbox_to);
db_mailbox_seq_update(mailbox_to, 0);
db_mailbox_seq_update(mailbox_from, 0);
}
else {
qprintf("User(%" PRIu64 ") doesn't has mailbox(%s)\n", user_id, mbtrash_name);
}
}
CATCH(SQLException)
LOG_SQLERROR;
return -1;
FINALLY
db_con_close(c);
END_TRY;
return 0;
}
int dm_sievescript_rename(uint64_t user_idnr, char *scriptname, char *newname)
{
int active = 0;
Connection_T c; ResultSet_T r; PreparedStatement_T s; volatile int t = FALSE;
assert(scriptname);
/*
* According to the draft RFC, a script with the same
* name as an existing script should *atomically* replace it.
*/
c = db_con_get();
TRY
db_begin_transaction(c);
s = db_stmt_prepare(c,"SELECT active FROM %ssievescripts WHERE owner_idnr = ? AND name = ?", DBPFX);
db_stmt_set_u64(s,1, user_idnr);
db_stmt_set_str(s,2, newname);
r = db_stmt_query(s);
if (db_result_next(r)) {
active = db_result_get_int(r,0);
db_con_clear(c);
s = db_stmt_prepare(c, "DELETE FROM %ssievescripts WHERE owner_idnr = ? AND name = ?", DBPFX);
db_stmt_set_u64(s, 1, user_idnr);
db_stmt_set_str(s, 2, newname);
db_stmt_exec(s);
}
db_con_clear(c);
s = db_stmt_prepare(c, "UPDATE %ssievescripts SET name = ?, active = ? WHERE owner_idnr = ? AND name = ?", DBPFX);
db_stmt_set_str(s, 1, newname);
db_stmt_set_int(s, 2, active);
db_stmt_set_u64(s, 3, user_idnr);
db_stmt_set_str(s, 4, scriptname);
db_stmt_exec(s);
t = db_commit_transaction(c);
CATCH(SQLException)
LOG_SQLERROR;
t = DM_EQUERY;
db_rollback_transaction(c);
FINALLY
db_con_close(c);
END_TRY;
return t;
}
int dm_sievescript_isactive_byname(uint64_t user_idnr, const char *scriptname)
{
Connection_T c; ResultSet_T r; PreparedStatement_T s; volatile int t = TRUE;
c = db_con_get();
TRY
if (scriptname) {
s = db_stmt_prepare(c, "SELECT name FROM %ssievescripts WHERE owner_idnr = ? AND active = 1 AND name = ?", DBPFX);
db_stmt_set_u64(s, 1, user_idnr);
db_stmt_set_str(s, 2, scriptname);
} else {
s = db_stmt_prepare(c, "SELECT name FROM %ssievescripts WHERE owner_idnr = ? AND active = 1", DBPFX);
db_stmt_set_u64(s, 1, user_idnr);
}
r = db_stmt_query(s);
if (! db_result_next(r)) t = FALSE;
CATCH(SQLException)
LOG_SQLERROR;
t = DM_EQUERY;
FINALLY
db_con_close(c);
END_TRY;
return t;
}
int dm_sievescript_activate(uint64_t user_idnr, char *scriptname)
{
Connection_T c; PreparedStatement_T s; volatile gboolean t = FALSE;
assert(scriptname);
c = db_con_get();
TRY
db_begin_transaction(c);
s = db_stmt_prepare(c,"UPDATE %ssievescripts SET active = 0 WHERE owner_idnr = ? ", DBPFX);
db_stmt_set_u64(s, 1, user_idnr);
db_stmt_exec(s);
db_con_clear(c);
s = db_stmt_prepare(c,"UPDATE %ssievescripts SET active = 1 WHERE owner_idnr = ? AND name = ?", DBPFX);
db_stmt_set_u64(s, 1, user_idnr);
db_stmt_set_str(s, 2, scriptname);
db_stmt_exec(s);
db_commit_transaction(c);
t = TRUE;
CATCH(SQLException)
LOG_SQLERROR;
db_rollback_transaction(c);
FINALLY
db_con_close(c);
END_TRY;
return t;
}
static GList *user_get_deliver_to(const char *username)
{
INIT_QUERY;
C c; R r; S s;
GList *d = NULL;
snprintf(query, DEF_QUERYSIZE-1,
"SELECT deliver_to FROM %saliases "
"WHERE lower(alias) = lower(?) "
"AND lower(alias) <> lower(deliver_to)",
DBPFX);
c = db_con_get();
TRY
s = db_stmt_prepare(c, query);
db_stmt_set_str(s, 1, username);
r = db_stmt_query(s);
while (db_result_next(r))
d = g_list_prepend(d, g_strdup(db_result_get(r,0)));
CATCH(SQLException)
LOG_SQLERROR;
FINALLY
db_con_close(c);
END_TRY;
return d;
}
/* Delete message from mailbox if it is Trash and the message date less then passed date */
int do_erase_old(int days, char * mbtrash_name)
{
Connection_T c; PreparedStatement_T s; ResultSet_T r;
char expire [DEF_FRAGSIZE];
memset(expire,0,sizeof(expire));
snprintf(expire, DEF_FRAGSIZE-1, db_get_sql(SQL_EXPIRE), days);
c = db_con_get();
s = db_stmt_prepare(c,"SELECT msg.message_idnr FROM %smessages msg "
"JOIN %sphysmessage phys ON msg.physmessage_id = phys.id "
"JOIN %smailboxes mb ON msg.mailbox_idnr = mb.mailbox_idnr "
"WHERE mb.name = ? AND msg.status < %d "
"AND phys.internal_date < %s ",
DBPFX, DBPFX, DBPFX, MESSAGE_STATUS_DELETE, expire);
db_stmt_set_str(s, 1, mbtrash_name);
TRY
r = db_stmt_query(s);
while(db_result_next(r))
{
uint64_t id = db_result_get_u64(r, 0);
qprintf("Deleting message id(%" PRIu64 ")\n", id);
db_set_message_status(id,MESSAGE_STATUS_PURGE);
}
CATCH(SQLException)
LOG_SQLERROR;
return -1;
FINALLY
db_con_close(c);
END_TRY;
return 0;
}
int dm_sievescript_add(uint64_t user_idnr, char *scriptname, char *script)
{
Connection_T c; ResultSet_T r; PreparedStatement_T s; volatile int t = FALSE;
assert(scriptname);
c = db_con_get();
TRY
db_begin_transaction(c);
s = db_stmt_prepare(c,"SELECT COUNT(*) FROM %ssievescripts WHERE owner_idnr = ? AND name = ?", DBPFX);
db_stmt_set_u64(s, 1, user_idnr);
db_stmt_set_str(s, 2, scriptname);
r = db_stmt_query(s);
if (db_result_next(r)) {
db_con_clear(c);
s = db_stmt_prepare(c,"DELETE FROM %ssievescripts WHERE owner_idnr = ? AND name = ?", DBPFX);
db_stmt_set_u64(s, 1, user_idnr);
db_stmt_set_str(s, 2, scriptname);
db_stmt_exec(s);
}
db_con_clear(c);
s = db_stmt_prepare(c,"INSERT INTO %ssievescripts (owner_idnr, name, script, active) VALUES (?,?,?,1)", DBPFX);
db_stmt_set_u64(s, 1, user_idnr);
db_stmt_set_str(s, 2, scriptname);
db_stmt_set_blob(s, 3, script, strlen(script));
db_stmt_exec(s);
t = db_commit_transaction(c);
CATCH(SQLException)
LOG_SQLERROR;
db_rollback_transaction(c);
t = DM_EQUERY;
FINALLY
db_con_close(c);
END_TRY;
return t;
}
int dm_sievescript_delete(uint64_t user_idnr, char *scriptname)
{
Connection_T c; PreparedStatement_T s; volatile gboolean t = FALSE;
assert(scriptname);
c = db_con_get();
TRY
s = db_stmt_prepare(c,"DELETE FROM %ssievescripts WHERE owner_idnr = ? AND name = ?", DBPFX);
db_stmt_set_u64(s, 1, user_idnr);
db_stmt_set_str(s, 2, scriptname);
db_stmt_exec(s);
t = TRUE;
CATCH(SQLException)
LOG_SQLERROR;
FINALLY
db_con_close(c);
END_TRY;
return t;
}
int dm_sievescript_getbyname(uint64_t user_idnr, char *scriptname, char **script)
{
Connection_T c; ResultSet_T r; PreparedStatement_T s; volatile int t = FALSE;
assert(scriptname);
c = db_con_get();
TRY
s = db_stmt_prepare(c, "SELECT script FROM %ssievescripts WHERE owner_idnr = ? AND name = ?", DBPFX);
db_stmt_set_u64(s, 1, user_idnr);
db_stmt_set_str(s, 2, scriptname);
r = db_stmt_query(s);
if (db_result_next(r))
*script = g_strdup(db_result_get(r,0));
CATCH(SQLException)
LOG_SQLERROR;
t = DM_EQUERY;
FINALLY
db_con_close(c);
END_TRY;
return t;
}
static void db_getmailbox_info(T M, Connection_T c)
{
/* query mailbox for LIST results */
ResultSet_T r;
char *mbxname, *name, *pattern;
struct mailbox_match *mailbox_like = NULL;
GString *fqname, *qs;
int i=0, prml;
PreparedStatement_T stmt;
stmt = db_stmt_prepare(c,
"SELECT "
"CASE WHEN user_id IS NULL THEN 0 ELSE 1 END, " // subscription
"owner_idnr, name, no_select, no_inferiors "
"FROM %smailboxes b LEFT OUTER JOIN %ssubscription s ON "
"b.mailbox_idnr = s.mailbox_id WHERE b.mailbox_idnr = ?",
DBPFX, DBPFX);
db_stmt_set_u64(stmt, 1, M->id);
r = db_stmt_query(stmt);
if (db_result_next(r)) {
/* subsciption */
M->is_subscribed = db_result_get_bool(r, i++);
/* owner_idnr */
M->owner_id = db_result_get_u64(r, i++);
/* name */
name = g_strdup(db_result_get(r,i++));
if (MATCH(name, "INBOX")) {
M->is_inbox = TRUE;
M->is_subscribed = TRUE;
}
mbxname = mailbox_add_namespace(name, M->owner_id, M->owner_id);
fqname = g_string_new(mbxname);
fqname = g_string_truncate(fqname,IMAP_MAX_MAILBOX_NAMELEN);
MailboxState_setName(M, fqname->str);
g_string_free(fqname,TRUE);
g_free(mbxname);
/* no_select */
M->no_select=db_result_get_bool(r,i++);
/* no_inferior */
M->no_inferiors=db_result_get_bool(r,i++);
/* no_children search pattern*/
pattern = g_strdup_printf("%s/%%", name);
mailbox_like = mailbox_match_new(pattern);
g_free(pattern);
g_free(name);
}
db_con_clear(c);
qs = g_string_new("");
g_string_printf(qs, "SELECT COUNT(*) AS nr_children FROM %smailboxes WHERE owner_idnr = ? ", DBPFX);
if (mailbox_like && mailbox_like->insensitive)
g_string_append_printf(qs, "AND name %s ? ", db_get_sql(SQL_INSENSITIVE_LIKE));
if (mailbox_like && mailbox_like->sensitive)
g_string_append_printf(qs, "AND name %s ? ", db_get_sql(SQL_SENSITIVE_LIKE));
stmt = db_stmt_prepare(c, qs->str);
prml = 1;
db_stmt_set_u64(stmt, prml++, M->owner_id);
if (mailbox_like && mailbox_like->insensitive)
db_stmt_set_str(stmt, prml++, mailbox_like->insensitive);
if (mailbox_like && mailbox_like->sensitive)
db_stmt_set_str(stmt, prml++, mailbox_like->sensitive);
r = db_stmt_query(stmt);
if (db_result_next(r)) {
int nr_children = db_result_get_int(r,0);
M->no_children=nr_children ? 0 : 1;
} else {
M->no_children=1;
}
mailbox_match_free(mailbox_like);
g_string_free(qs, TRUE);
}
