/* modules/m_alias.c - main module for aliases * Copyright (c) 2016 Elizabeth Myers * * Permission to use, copy, modify, and/or distribute this software for any * purpose with or without fee is hereby granted, provided that the above * copyright notice and this permission notice is present in all copies. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. */ #include "stdinc.h" #include "client.h" #include "parse.h" #include "msg.h" #include "modules.h" #include "s_conf.h" #include "s_serv.h" #include "hash.h" #include "ircd.h" #include "match.h" #include "numeric.h" #include "send.h" #include "packet.h" static const char alias_desc[] = "Provides the system for services aliases"; static int _modinit(void); static void _moddeinit(void); static int reload_aliases(hook_data *); static void m_alias(struct MsgBuf *, struct Client *, struct Client *, int, const char **); mapi_hfn_list_av1 alias_hfnlist[] = { { "rehash", (hookfn)reload_aliases }, { NULL, NULL }, }; DECLARE_MODULE_AV2(alias, _modinit, _moddeinit, NULL, NULL, alias_hfnlist, NULL, NULL, alias_desc); static rb_dlink_list alias_messages; static const struct MessageEntry alias_msgtab[] = {{m_alias, 2}, {m_alias, 2}, mg_ignore, mg_ignore, mg_ignore, {m_alias, 2}}; static inline void create_aliases(void) { rb_dictionary_iter iter; struct alias_entry *alias; s_assert(rb_dlink_list_length(&alias_messages) > 0); RB_DICTIONARY_FOREACH(alias, &iter, alias_dict) { struct Message *message = rb_malloc(sizeof(struct Message)); message->cmd = alias->name; memcpy(message->handlers, alias_msgtab, sizeof(alias_msgtab)); mod_add_cmd(message); rb_dlinkAddAlloc(message, &alias_messages); } } static inline void destroy_aliases(void) { rb_dlink_node *ptr, *nptr; RB_DLINK_FOREACH_SAFE(ptr, nptr, alias_messages.head) { mod_del_cmd((struct Message *)ptr->data); rb_free(ptr->data); rb_dlinkDestroy(ptr, &alias_messages); } } static int _modinit(void) { create_aliases(); return 0; } static void _moddeinit(void) { destroy_aliases(); } static int reload_aliases(hook_data *data) { destroy_aliases(); /* Clear old aliases */ create_aliases(); return 0; } /* The below was mostly taken from the old do_alias */ static void m_alias(struct MsgBuf *msgbuf, struct Client *client_p, struct Client *source_p, int parc, const char **parv) { struct Client *target_p; struct alias_entry *aptr = rb_dictionary_retrieve(alias_dict, msgbuf->cmd); char *p; if(aptr == NULL) { /* This shouldn't happen... */ if(IsPerson(client_p)) sendto_one(client_p, form_str(ERR_UNKNOWNCOMMAND), me.name, client_p->name, msgbuf->cmd); return; } else if(parc < 2) { sendto_one(client_p, form_str(ERR_NEEDMOREPARAMS), me.name, EmptyString(client_p->name) ? "*" : client_p->name, msgbuf->cmd); return; } if(!IsFloodDone(client_p) && client_p->localClient->receiveM > 20) flood_endgrace(client_p); p = strchr(aptr->target, '@'); if(p != NULL) { /* user@server */ target_p = find_server(NULL, p + 1); if(target_p != NULL && IsMe(target_p)) target_p = NULL; } else { /* nick, must be +S */ target_p = find_named_person(aptr->target); if(target_p != NULL && !IsService(target_p)) target_p = NULL; } if(target_p == NULL) { sendto_one_numeric(client_p, ERR_SERVICESDOWN, form_str(ERR_SERVICESDOWN), aptr->target); return; } if(EmptyString(parv[1])) { sendto_one(client_p, form_str(ERR_NOTEXTTOSEND), me.name, target_p->name); return; } /* increment the hitcounter on this alias */ aptr->hits++; sendto_one(target_p, ":%s PRIVMSG %s :%s", get_id(client_p, target_p), p != NULL ? aptr->target : get_id(target_p, target_p), parv[1]); }