#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;
}