1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
|
/*
* Copyright (c) 2005 Atheme Development Group
* Rights to this code are as documented in doc/LICENSE.
*
* This file contains code for the Memoserv DELETE function
*
*/
#include "atheme.h"
DECLARE_MODULE_V1
(
"memoserv/delete", false, _modinit, _moddeinit,
PACKAGE_STRING,
VENDOR_STRING
);
static void ms_cmd_delete(sourceinfo_t *si, int parc, char *parv[]);
command_t ms_delete = { "DELETE", N_("Deletes memos."),
AC_AUTHENTICATED, 1, ms_cmd_delete, { .path = "memoserv/delete" } };
command_t ms_del = { "DEL", N_("Alias for DELETE"),
AC_AUTHENTICATED, 1, ms_cmd_delete, { .path = "memoserv/delete" } };
void _modinit(module_t *m)
{
service_named_bind_command("memoserv", &ms_delete);
service_named_bind_command("memoserv", &ms_del);
}
void _moddeinit(module_unload_intent_t intent)
{
service_named_unbind_command("memoserv", &ms_delete);
service_named_unbind_command("memoserv", &ms_del);
}
static void ms_cmd_delete(sourceinfo_t *si, int parc, char *parv[])
{
/* Misc structs etc */
mowgli_node_t *n, *tn;
unsigned int i = 0, delcount = 0, memonum = 0;
unsigned int deleteall = 0, deleteold = 0;
mymemo_t *memo;
char *errptr = NULL;
/* We only take 1 arg, and we ignore all others */
char *arg1 = parv[0];
/* Does the arg exist? */
if (!arg1)
{
command_fail(si, fault_needmoreparams,
STR_INSUFFICIENT_PARAMS, "DELETE");
command_fail(si, fault_needmoreparams, _("Syntax: DELETE ALL|OLD|message id"));
return;
}
/* Do we have any memos? */
if (!si->smu->memos.count)
{
command_fail(si, fault_nochange, _("You have no memos to delete."));
return;
}
/* Do we want to delete all memos? */
if (!strcasecmp("all",arg1))
{
deleteall = 1;
}
else if (!strcasecmp("old",arg1))
{
deleteold = 1;
}
else
{
memonum = strtoul(arg1, &errptr, 10);
/* Make sure they didn't slip us an alphabetic index */
if (!memonum || (errptr && *errptr))
{
command_fail(si, fault_badparams, _("Invalid message index."));
return;
}
/* If int, does that index exist? And do we have something to delete? */
if (memonum > si->smu->memos.count)
{
command_fail(si, fault_nosuch_key, _("The specified memo doesn't exist."));
return;
}
}
delcount = 0;
/* Iterate through memos, doing deletion */
MOWGLI_ITER_FOREACH_SAFE(n, tn, si->smu->memos.head)
{
i++;
memo = (mymemo_t*) n->data;
if (i == memonum || deleteall ||
(deleteold && memo->status & MEMO_READ))
{
delcount++;
if (!(memo->status & MEMO_READ))
si->smu->memoct_new--;
/* Free to node pool, remove from chain */
mowgli_node_delete(n, &si->smu->memos);
mowgli_node_free(n);
free(memo);
}
}
command_success_nodata(si, ngettext(N_("%d memo deleted."), N_("%d memos deleted."), delcount), delcount);
return;
}
/* vim:cinoptions=>s,e0,n0,f0,{0,}0,^0,=s,ps,t0,c3,+s,(2s,us,)20,*30,gs,hs
* vim:ts=8
* vim:sw=8
* vim:noexpandtab
*/
|
