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
129
130
131
132
133
134
135
|
/*
* Copyright (c) 2011 William Pitcock <nenolod@dereferenced.org>
*
* Rights to this code are as documented in doc/LICENSE.
*/
#include "atheme.h"
#include "exttarget.h"
DECLARE_MODULE_V1
(
"exttarget/server", false, _modinit, _moddeinit,
PACKAGE_STRING,
VENDOR_STRING
);
static mowgli_patricia_t **exttarget_tree = NULL;
typedef struct {
myentity_t parent;
stringref server;
} server_exttarget_t;
static chanacs_t *server_ext_match_user(chanacs_t *ca, user_t *u)
{
server_exttarget_t *ent;
mowgli_node_t *n;
ent = (server_exttarget_t *) ca->entity;
if (match(ent->server, u->server->name) == 0)
return ca;
return NULL;
}
static chanacs_t *server_ext_match_entity(chanacs_t *ca, myentity_t *mt)
{
if (ca->entity == mt)
return ca;
return NULL;
}
static bool server_ext_can_register_channel(myentity_t *mt)
{
return false;
}
static bool server_ext_allow_foundership(myentity_t *mt)
{
return false;
}
static entity_chanacs_validation_vtable_t server_ext_validate = {
.match_entity = server_ext_match_entity,
.match_user = server_ext_match_user,
.can_register_channel = server_ext_can_register_channel,
.allow_foundership = server_ext_allow_foundership,
};
static mowgli_heap_t *server_ext_heap = NULL;
static mowgli_patricia_t *server_exttarget_tree = NULL;
static void server_ext_delete(server_exttarget_t *e)
{
return_if_fail(e != NULL);
mowgli_patricia_delete(server_exttarget_tree, e->server);
strshare_unref(e->server);
strshare_unref(entity(e)->name);
mowgli_heap_free(server_ext_heap, e);
}
static myentity_t *server_validate_f(const char *param)
{
char *name;
server_exttarget_t *ext;
size_t namelen;
if (param == NULL)
return NULL;
if (*param == '\0')
return NULL;
/* if we already have an object, return it from our tree. */
if ((ext = mowgli_patricia_retrieve(server_exttarget_tree, param)) != NULL)
return entity(ext);
ext = mowgli_heap_alloc(server_ext_heap);
ext->server = strshare_get(param);
/* name the entity... $server:param */
#define NAMEPREFIX "$server:"
namelen = sizeof NAMEPREFIX + strlen(param);
name = smalloc(namelen);
memcpy(name, NAMEPREFIX, sizeof NAMEPREFIX - 1);
memcpy(name + sizeof NAMEPREFIX - 1, param, namelen - sizeof NAMEPREFIX + 1);
entity(ext)->name = strshare_get(name);
free(name);
#undef NAMEPREFIX
/* hook up the entity's validation table. */
entity(ext)->chanacs_validate = &server_ext_validate;
entity(ext)->type = ENT_EXTTARGET;
/* initialize the object. */
object_init(object(ext), entity(ext)->name, (destructor_t) server_ext_delete);
/* add the object to the exttarget tree. */
mowgli_patricia_add(server_exttarget_tree, ext->server, ext);
/* return the object as initially unowned by sinking the reference count. */
return object_sink_ref(ext);
}
void _modinit(module_t *m)
{
MODULE_TRY_REQUEST_SYMBOL(m, exttarget_tree, "exttarget/main", "exttarget_tree");
mowgli_patricia_add(*exttarget_tree, "server", server_validate_f);
server_exttarget_tree = mowgli_patricia_create(irccasecanon);
server_ext_heap = mowgli_heap_create(sizeof(server_exttarget_t), 32, BH_LAZY);
}
void _moddeinit(module_unload_intent_t intent)
{
mowgli_heap_destroy(server_ext_heap);
mowgli_patricia_delete(*exttarget_tree, "server");
mowgli_patricia_destroy(server_exttarget_tree, NULL, NULL);
}
|
