/*
 * Copyright (c) 2003-2004 E. Will et al.
 * Copyright (c) 2005-2008 Atheme Development Group
 * Copyright (c) 2008-2010 ShadowIRCd Development Group
 * Copyright (c) 2013 PonyChat Development Group
 * Rights to this code are documented in doc/LICENSE.
 *
 * This file contains protocol support for ponychat-ircd.
 *
 */

#include "atheme.h"
#include "uplink.h"
#include "pmodule.h"
#include "protocol/shadowircd.h"

DECLARE_MODULE_V1("protocol/elemental-ircd", true, _modinit, NULL, PACKAGE_STRING, "Elemental-IRCd Development Team http://github.com/elemental-ircd/elemental-ircd");

/* *INDENT-OFF* */

ircd_t elemental_ircd = {
    "Elemental-IRCd 7.0",		/* IRCd name */
    "$$",                           /* TLD Prefix, used by Global. */
    true,                           /* Whether or not we use IRCNet/TS6 UID */
    false,                          /* Whether or not we use RCOMMAND */
    true,                           /* Whether or not we support channel owners. */
    true,                           /* Whether or not we support channel protection. */
    true,                           /* Whether or not we support halfops. */
    false,				/* Whether or not we use P10 */
    false,				/* Whether or not we use vHosts. */
    CMODE_EXLIMIT | CMODE_PERM | CMODE_IMMUNE, /* Oper-only cmodes */
    CSTATUS_OWNER,                  /* Integer flag for owner channel flag. */
    CSTATUS_PROTECT,                  /* Integer flag for protect channel flag. */
    CSTATUS_HALFOP,                   /* Integer flag for halfops. */
    "+q",                           /* Mode we set for owner. */
    "+a",                           /* Mode we set for protect. */
    "+h",                           /* Mode we set for halfops. */
    PROTOCOL_SHADOWIRCD,		/* Protocol type */
    CMODE_PERM,                     /* Permanent cmodes */
    CMODE_IMMUNE,                   /* Oper-immune cmode */
    "beIy",                         /* Ban-like cmodes */
    'e',                            /* Except mchar */
    'I',                            /* Invex mchar */
    IRCD_CIDR_BANS | IRCD_HOLDNICK  /* Flags */
};

struct cmode_ elemental_mode_list[] = {
    { 'i', CMODE_INVITE },
    { 'm', CMODE_MOD    },
    { 'n', CMODE_NOEXT  },
    { 'p', CMODE_PRIV   },
    { 's', CMODE_SEC    },
    { 't', CMODE_TOPIC  },
    { 'c', CMODE_NOCOLOR},
    { 'r', CMODE_REGONLY},
    { 'z', CMODE_OPMOD  },
    { 'g', CMODE_FINVITE},
    { 'L', CMODE_EXLIMIT},
    { 'P', CMODE_PERM   },
    { 'F', CMODE_FTARGET},
    { 'Q', CMODE_DISFWD },
    { 'M', CMODE_IMMUNE },
    { 'C', CMODE_NOCTCP },
    { 'A', CMODE_ADMINONLY },
    { 'O', CMODE_OPERONLY },
    { 'S', CMODE_SSLONLY },
    { 'D', CMODE_NOACTIONS },
    { 'T', CMODE_NONOTICE },
    { 'G', CMODE_NOCAPS },
    { 'E', CMODE_NOKICKS },
    { 'd', CMODE_NONICKS },
    { 'K', CMODE_NOREPEAT },
    { 'J', CMODE_KICKNOREJOIN },
    { '\0', 0 }
};

struct cmode_ elemental_status_mode_list[] = {
    { 'q', CSTATUS_OWNER },
    { 'a', CSTATUS_PROTECT },
    { 'o', CSTATUS_OP    },
    { 'h', CSTATUS_HALFOP },
    { 'v', CSTATUS_VOICE },
    { '\0', 0 }
};

struct cmode_ elemental_prefix_mode_list[] = {
    { '~', CSTATUS_OWNER },
    { '&', CSTATUS_PROTECT },
    { '@', CSTATUS_OP    },
    { '%', CSTATUS_HALFOP },
    { '+', CSTATUS_VOICE },
    { '\0', 0 }
};

struct cmode_ elemental_user_mode_list[] = {
    { 'a', UF_ADMIN    },
    { 'i', UF_INVIS    },
    { 'o', UF_IRCOP    },
    { 'D', UF_DEAF     },
    { '\0', 0 }
};

/* login to our uplink */
static unsigned int elemental_server_login(void)
{
    int ret = 1;

    if (!me.numeric) {
        ircd->uses_uid = false;
        ret = sts("PASS %s :TS", curr_uplink->send_pass);
    } else if (strlen(me.numeric) == 3 && isdigit((unsigned char)*me.numeric)) {
        ircd->uses_uid = true;
        ret = sts("PASS %s TS 6 :%s", curr_uplink->send_pass, me.numeric);
    } else {
        slog(LG_ERROR, "Invalid numeric (SID) %s", me.numeric);
    }
    if (ret == 1)
        return 1;

    me.bursting = true;

    sts("CAPAB :QS EX IE KLN UNKLN ENCAP TB SERVICES EUID EOPMOD MLOCK QAOHV");
    sts("SERVER %s 1 :%s%s", me.name, me.hidden ? "(H) " : "", me.desc);
    sts("SVINFO %d 3 0 :%lu", ircd->uses_uid ? 6 : 5,
        (unsigned long)CURRTIME);

    return 0;
}

void _modinit(module_t * m)
{
    MODULE_TRY_REQUEST_DEPENDENCY(m, "protocol/charybdis");

    server_login = &elemental_server_login;
    mode_list = elemental_mode_list;
    user_mode_list = elemental_user_mode_list;
    status_mode_list = elemental_status_mode_list;
    prefix_mode_list = elemental_prefix_mode_list;

    ircd = &elemental_ircd;

    m->mflags = MODTYPE_CORE;

    pmodule_loaded = true;
}

/* 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
 */