/*
 * IRC - Internet Relay Chat, ircd/m_privs.c
 * Copyright (C) 1990 Jarkko Oikarinen and
 *                    University of Oulu, Computing Center
 *
 * See file AUTHORS in IRC package for additional names of
 * the programmers.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 1, or (at your option)
 * any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */
/** @file
 * @brief Report operators' privileges to others
 * @version $Id: m_privs.c 1810 2007-05-20 14:15:58Z entrope $
 */

#include "config.h"

#include "client.h"
#include "hash.h"
#include "ircd.h"
#include "ircd_log.h"
#include "ircd_reply.h"
#include "ircd_string.h"
#include "msg.h"
#include "numeric.h"
#include "numnicks.h"
#include "send.h"

/** Handle a local operator's privilege query.
 * @param[in] cptr Client that sent us the message.
 * @param[in] sptr Original source of message.
 * @param[in] parc Number of arguments.
 * @param[in] parv Argument vector.
 * @see \ref m_functions
 */
int mo_privs(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
{
  struct Client *acptr;
  char *name;
  char *p = 0;
  int i;

  if (parc < 2)
    return client_report_privs(sptr, sptr);

  for (i = 1; i < parc; i++) {
    for (name = ircd_strtok(&p, parv[i], " "); name;
	 name = ircd_strtok(&p, 0, " ")) {
      if (!(acptr = FindUser(name)))
        send_reply(sptr, ERR_NOSUCHNICK, name);
      else if (MyUser(acptr))
	client_report_privs(sptr, acptr);
      else
        sendcmdto_one(cptr, CMD_PRIVS, acptr, "%s%s", NumNick(acptr));
    }
  }

  return 0;
}

/** Handle a remote user's privilege query.
 * @param[in] cptr Client that sent us the message.
 * @param[in] sptr Original source of message.
 * @param[in] parc Number of arguments.
 * @param[in] parv Argument vector.
 * @see \ref m_functions
 */
int ms_privs(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
{
  struct Client *acptr;
  char *numnick, *p = 0;
  char buf[512] = "";
  int i;
  int what = PRIV_ADD;
  int modified = 0;
  char *tmp;

  if (IsServer(sptr)) {
    acptr = parc > 1 ? findNUser(parv[1]) : NULL;

    if (!acptr)
      return 0;

    if (parc < 3) {
      if (acptr) {
        memset(&cli_privs(acptr), 0, sizeof(struct Privs));
        clear_privs(acptr);
      }
      return 0;
    }

    for (i=2; i<parc; i++) {
      strcat(buf, parv[i]);
      strcat(buf, " ");
    }

    for (i = 2; i < parc; i++) {
      if (*parv[i] == '+') { what = PRIV_ADD; parv[i]++; }
      if (*parv[i] == '-') { what = PRIV_DEL; parv[i]++; }
      /* sigh, this can be simplified in 1.4 */
      if (strstr(parv[i], ",")) {
        for (tmp = ircd_strtok(&p, parv[i], ","); tmp;
             tmp = ircd_strtok(&p, 0, ",")) {
          if (!strcmp(tmp, "PRIV_NONE")) {
            memset(&cli_privs(acptr), 0, sizeof(struct Privs));
            clear_privs(acptr);
            break;
          } else {
            client_modify_priv_by_name(acptr, tmp, what);
          }
          if (!modified)
            modified = 1;
        }
      } else {
        for (tmp = ircd_strtok(&p, parv[i], " "); tmp;
             tmp = ircd_strtok(&p, 0, " ")) {
          if (!strcmp(tmp, "PRIV_NONE")) {
            memset(&cli_privs(acptr), 0, sizeof(struct Privs));
            clear_privs(acptr);
            break;
          } else {
            client_modify_priv_by_name(acptr, tmp, what);
          }
          if (!modified)
            modified = 1;
        }
      }
    }

    if (MyConnect(acptr) && modified)
      sendcmdto_one(&me, CMD_NOTICE, acptr, "%C :Your privileges were modified", acptr);

    sendcmdto_serv_butone(sptr, CMD_PRIVS, cptr, "%C %s", acptr, buf);
  } else {
    if (parc < 2)
      return protocol_violation(cptr, "PRIVS with no arguments");

    for (i = 1; i < parc; i++) {
      for (numnick = ircd_strtok(&p, parv[i], " "); numnick;
        numnick = ircd_strtok(&p, 0, " ")) {
        if (!(acptr = findNUser(numnick)))
          continue;
        else if (MyUser(acptr))
          client_report_privs(sptr, acptr);
        else
          sendcmdto_one(sptr, CMD_PRIVS, acptr, "%s%s", NumNick(acptr));
      }
    }
  }

  return 0;
}