#include "config.h"
#include "struct.h"
#include "common.h"
#include "sys.h"
#include "numeric.h"
#include "msg.h"
#include "channel.h"
#include <time.h>
#include <sys/stat.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#ifdef _WIN32
#include <io.h>
#endif
#include <fcntl.h>
#include "h.h"
#ifdef STRIPBADWORDS
#include "badwords.h"
#endif
#ifdef _WIN32
#include "version.h"
#endif

// Channel Mode  Flag. Change Z to whatever you want but MUST be one character.
#define FLAG_NOREPEAT                'Z'
#define IsNoRepeat(x)                ((x)->mode.extmode & MODE_NOREPEAT)

Cmode_t                                MODE_NOREPEAT = 0L;
Cmode                                *ModeNoRepeat;

static char                        *cb_chanmsg(aClient *, aClient *, aChannel *, char *, int);
static Hook                        *HookChanMsg;


typedef struct _norepeat norepeat;
struct _norepeat {
    norepeat *prev,*next;
    aClient *cptr;
    aChannel *chptr;
    char msg[BUFSIZE];
};
norepeat *norepeat_last;

norepeat *new_norepeat(void);
void remove_norepeat(norepeat *);
norepeat *find_norepeat(aClient *,aChannel *);


ModuleHeader MOD_HEADER(NoRepeat)
  = {
        "NoRepeat",
        "v0.1",
        "+Z No repeat by penna",
        "3.2-b8-1",
        NULL
    };

DLLFUNC int MOD_INIT(NoRepeat)(ModuleInfo *modinfo)
{
        CmodeInfo ModeNR;
#ifndef STATIC_LINKING
        ModuleSetOptions(modinfo->handle, MOD_OPT_PERM);
#endif
        memset(&ModeNoRepeat, 0, sizeof ModeNoRepeat);

        ModeNR.paracount        = 0;
        ModeNR.is_ok                = extcmode_default_requirechop;
        ModeNR.flag                = FLAG_NOREPEAT;
        ModeNoRepeat                = CmodeAdd(modinfo->handle, ModeNR, &MODE_NOREPEAT);

#ifndef STATIC_LINKING
        if (ModuleGetError(modinfo->handle) != MODERR_NOERROR || !ModeNoRepeat)
        {
            config_error("Error adding channel mode +%c when loading module %s: %s",
                ModeNR.flag,MOD_HEADER(NoRepeat).name,ModuleGetErrorStr(modinfo->handle));
        }
#else
        if (!ModeNoRepeat)
        {
            config_error("Error adding channel mode +%c when loading module %s:",
                ModeNR.flag,MOD_HEADER(NoRepeat).name);
        }
#endif

        HookChanMsg                = HookAddPCharEx(modinfo->handle,HOOKTYPE_CHANMSG,cb_chanmsg);
       
        return MOD_SUCCESS;
}

DLLFUNC int MOD_LOAD(NoRepeat)(int module_load)
{
        return MOD_SUCCESS;
}

DLLFUNC int MOD_UNLOAD(NoRepeat)(int module_unload)
{
        if (ModeNoRepeat)
                CmodeDel(ModeNoRepeat);
        HookDel(HookChanMsg);

        return MOD_SUCCESS;
}

DLLFUNC char *cb_chanmsg(aClient *cptr, aClient *sptr, aChannel *chptr, char *text, int notice)
{
    static char retbuf[4096];
    norepeat *nr;
   
    if (!IsNoRepeat(chptr) || !MyClient(sptr))
        return text;
   
    nr = find_norepeat(cptr,chptr);
    if (nr == NULL)
    {
        nr = new_norepeat();
        nr->cptr = cptr;
        nr->chptr = chptr;
    }
    if (!strcmp(nr->msg,text))
        return NULL;
       
    strcpy(nr->msg,text);
    return text;
}

norepeat *new_norepeat(void)
{
    norepeat *nr;

    nr = (norepeat *)malloc(sizeof(norepeat));
    memset(nr,0, sizeof(norepeat));

    nr->next = norepeat_last;
    norepeat_last = nr;
    if (nr->next)
        nr->next->prev = nr;

    return nr;
}

void remove_norepeat(norepeat *nr)
{
    if (nr->prev)
        nr->prev->next = nr->next;
    else
    {
        norepeat_last = nr->next;
        if (norepeat_last)
            norepeat_last->prev = NULL;
    }
    if (nr->next)
        nr->next->prev = nr->prev;

    free(nr);
    nr = NULL;
}

norepeat *find_norepeat(aClient *cptr,aChannel *chptr)
{
    norepeat *nr;
    for (nr = norepeat_last;nr;nr = nr->next)
    {
        if ((nr->cptr == cptr) && (nr->chptr == chptr))
            return nr;
    }
    return NULL;
}