// Copyright (C) 1999,2000 Bruce Guenter <bruceg@em.ca>
//
// 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 2 of the License, 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

#include <config.h>
#include <ctype.h>
#include "vdomain.h"
#include "misc/pwcrypt.h"
#include "misc/autodelete.h"
#include "misc/strtou.h"

static const response
  resp_invalid_number(response::err, "Invalid number"),
  resp_attribute_changed(response::ok, "Attribute value changed");

response vdomain::chattr(mystring username, unsigned attr, mystring newval)
{
  autodelete<vpwentry> vpw = table()->getbyname(username);
  if(!vpw)
    RETURN(err, "Invalid or unknown virtual user");
  return chattr(vpw, attr, newval);
}

static response chunsigned(unsigned* value, mystring newval)
{
  const char* end;
  *value = strtou(newval.c_str(), &end);
  if(*end)
    return resp_invalid_number;
  else
    return resp_attribute_changed;
}

response vdomain::chpass(vpwentry* vpw, mystring pass)
{
  vpw->pass = pwcrypt(pass);
  RETURN(ok, "Password changed");
}

response vdomain::chdest(vpwentry* vpw, mystring dest)
{
  if(!!dest) {
    for(mystring_iter iter = dest; iter; ++iter) {
      response r = validate_forward(*iter);
      if(!r)
	return r;
    }
  }
  vpw->forwards = dest;
  RETURN(ok, "Forwarding address(es) changed");
}

static response chbool(bool* value, mystring newval)
{
  const char* end;
  unsigned i = strtou(newval.c_str(), &end);
  if(*end)
    return resp_invalid_number;
  *value = !!i;
  return resp_attribute_changed;
}
  
#define CHATTR(V,X) do{ response tmp=ch##X(&(V),newval); if(!tmp) return tmp; okmsg=tmp.msg; }while(0)

response vdomain::chattr(const vpwentry* vpw, unsigned attr, mystring newval)
{
  vpwentry newpw(*vpw);
  mystring okmsg;
  switch(attr) {
  case ATTR_PASS:              CHATTR(newpw,pass); break;
  case ATTR_DEST:              CHATTR(newpw,dest); break;
  case ATTR_HARDQUOTA:         CHATTR(newpw.hardquota,unsigned); break;
  case ATTR_SOFTQUOTA:         CHATTR(newpw.softquota,unsigned); break;
  case ATTR_MSGSIZE:           CHATTR(newpw.msgsize,unsigned); break;
  case ATTR_MSGCOUNT:          CHATTR(newpw.msgcount,unsigned); break;
  case ATTR_EXPIRY:            CHATTR(newpw.expiry,unsigned); break;
  case ATTR_MAILBOX_ENABLED:   CHATTR(newpw.is_mailbox_enabled,bool); break;
  case ATTR_PERSONAL:
    newpw.personal = newval;
    okmsg = "Personal information changed.";
    break;
  default:
    RETURN(bad, "Invalid attribute type");
  }
  if(!table()->set(&newpw))
    RETURN(err, "Error changing the password table");
  RETURN(ok, okmsg);
}