/**
 * cs_sync.C: This file contains code for the ChanServ SYNC functions.
 *
 * Copyright © 2007 Pippijn van Steenhoven / The Ermyth Team
 * Rights to this code are as documented in COPYING.
 *
 *
 * Portions of this file were derived from sources bearing the following license:
 * Copyright © 2006 Atheme Development Group
 * Rights to this code are as documented in doc/pod/license.pod.
 *
 * $Id: cs_sync.C,v 1.6 2007/09/22 14:27:27 pippijn Exp $
 */

#include "atheme.h"
#include <ermyth/module.h>
#include <account/mychan.h>
#include <account/myuser.h>
#include <account/chanacs.h>

static char const rcsid[] = "$Id: cs_sync.C,v 1.6 2007/09/22 14:27:27 pippijn Exp $";

REGISTER_MODULE ("chanserv/sync", false, "The Ermyth Team <http://ermyth.xinutec.org>");

static void cs_cmd_sync (sourceinfo_t *si, int parc, char *parv[]);

command_t const cs_sync = { "SYNC", "Forces channel statuses to flags.", AC_NONE, 1, cs_cmd_sync };

E cmdvec cs_cmdtree;
E helpvec cs_helptree;

bool
_modinit (module *m)
{
  cs_cmdtree << cs_sync;
  help_addentry (cs_helptree, "SYNC", "help/chanserv/sync", NULL);

  return true;
}

void
_moddeinit ()
{
  cs_cmdtree >> cs_sync;
  help_delentry (cs_helptree, "SYNC");
}

static void
cs_cmd_sync (sourceinfo_t *si, int parc, char *parv[])
{
  chanuser_t *cu;
  mychan_t *mc;
  node_t *n, *tn;
  char *name = parv[0];
  int fl;

  if (!name)
    {
      command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "SYNC");
      command_fail (si, fault::needmoreparams, "Syntax: SYNC <#channel>");
      return;
    }

  if (!(mc = mychan_t::find (name)))
    {
      command_fail (si, fault::nosuch_target, "\2%s\2 is not registered.", name);
      return;
    }

  if (mc->find_metadata ("private:close:closer"))
    {
      command_fail (si, fault::noprivs, "\2%s\2 is closed.", name);
      return;
    }

  if (!mc->chan)
    {
      command_fail (si, fault::nosuch_target, "\2%s\2 does not exist.", name);
      return;
    }

  if (!chanacs_source_has_flag (mc, si, CA_RECOVER))
    {
      command_fail (si, fault::noprivs, "You are not authorized to perform this operation.");
      return;
    }

  verbose (mc, "\2%s\2 used SYNC.", get_source_name (si));
  logcommand (si, CMDLOG_SET, "%s SYNC", mc->name);

  LIST_FOREACH_SAFE (n, tn, mc->chan->members.head)
  {
    cu = (chanuser_t *) n->data;

    if (is_internal_client (cu->user))
      continue;

    fl = chanacs_user_flags (mc, cu->user);
    if (fl & CA_AKICK && !(fl & CA_REMOVE))
      {
	if (mc->chan->nummembers <= (mc->flags & MC_GUARD ? 2 : 1))
	  {
	    mc->flags |= MC_INHABIT;
	    if (!(mc->flags & MC_GUARD))
	      join (mc->name, chansvs.nick);
	  }
	/* XXX duplicate the whole thing in cs_join()? */
	phandler->kick (chansvs.nick, mc->name, cu->user->nick, "User is banned from this channel");
	continue;
      }
    if (ircd->uses_owner)
      {
	if (cu->user->myuser->should_owner (mc))
	  {
	    if (!(ircd->owner_mode & cu->modes))
	      {
		modestack_mode_param (chansvs.nick, mc->chan, MTYPE_ADD, ircd->owner_mchar[1], CLIENT_NAME (cu->user));
		cu->modes |= ircd->owner_mode;
	      }
	  }
	else if (ircd->owner_mode & cu->modes)
	  {
	    modestack_mode_param (chansvs.nick, mc->chan, MTYPE_DEL, ircd->owner_mchar[1], CLIENT_NAME (cu->user));
	    cu->modes &= ~ircd->owner_mode;
	  }
      }
    if (ircd->uses_protect)
      {
	if (cu->user->myuser->should_protect (mc))
	  {
	    if (!(ircd->protect_mode & cu->modes))
	      {
		modestack_mode_param (chansvs.nick, mc->chan, MTYPE_ADD, ircd->protect_mchar[1], CLIENT_NAME (cu->user));
		cu->modes |= ircd->protect_mode;
	      }
	  }
	else if (ircd->protect_mode & cu->modes)
	  {
	    modestack_mode_param (chansvs.nick, mc->chan, MTYPE_DEL, ircd->protect_mchar[1], CLIENT_NAME (cu->user));
	    cu->modes &= ~ircd->protect_mode;
	  }
      }
    if (fl & (CA_AUTOOP | CA_OP))
      {
	if (fl & CA_AUTOOP && !(CMODE_OP & cu->modes))
	  {
	    modestack_mode_param (chansvs.nick, mc->chan, MTYPE_ADD, 'o', CLIENT_NAME (cu->user));
	    cu->modes |= CMODE_OP;
	  }
	continue;
      }
    if ((CMODE_OP & cu->modes))
      {
	modestack_mode_param (chansvs.nick, mc->chan, MTYPE_DEL, 'o', CLIENT_NAME (cu->user));
	cu->modes &= ~CMODE_OP;
      }
    if (ircd->uses_halfops)
      {
	if (fl & (CA_AUTOHALFOP | CA_HALFOP))
	  {
	    if (fl & CA_AUTOHALFOP && !(ircd->halfops_mode & cu->modes))
	      {
		modestack_mode_param (chansvs.nick, mc->chan, MTYPE_ADD, ircd->halfops_mchar[1], CLIENT_NAME (cu->user));
		cu->modes |= ircd->halfops_mode;
	      }
	    continue;
	  }
	if (ircd->halfops_mode & cu->modes)
	  {
	    modestack_mode_param (chansvs.nick, mc->chan, MTYPE_DEL, ircd->halfops_mchar[1], CLIENT_NAME (cu->user));
	    cu->modes &= ~ircd->halfops_mode;
	  }
      }
    if (fl & (CA_AUTOVOICE | CA_VOICE))
      {
	if (fl & CA_AUTOVOICE && !(CMODE_VOICE & cu->modes))
	  {
	    modestack_mode_param (chansvs.nick, mc->chan, MTYPE_ADD, 'v', CLIENT_NAME (cu->user));
	    cu->modes |= CMODE_VOICE;
	  }
	continue;
      }
    if ((CMODE_VOICE & cu->modes))
      {
	modestack_mode_param (chansvs.nick, mc->chan, MTYPE_DEL, 'v', CLIENT_NAME (cu->user));
	cu->modes &= ~CMODE_VOICE;
      }
  }

  command_success_nodata (si, "Sync complete for \2%s\2.", mc->name);
}

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