// 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 "daemon.h"

#include "misc/pwentry.h"

#include "misc/lookup.h"

static bool write_buf(int fd, const char* buf, unsigned length)

{

  mystring str(buf, length);

  response resp(response::ok, str);

  return resp.write(fd);

}

CMD_FD(listdomain)

  // Usage: listdomain domainname password

{

  mystring domain = args[0];

  mystring password = args[1];

  args[1] = LOG_ADMINPASS;

  logcommand(args);

  mystring baseuser(find_virtual(args[0]));

  if(!baseuser)

    RETURN(err, "Invalid or unknown domain name: " + args[0]);

  pwentry* pw;

  mystring v;

  if(!lookup_baseuser(baseuser, pw, v))

    RETURN(err, "Invalid or unknown base user name: " + baseuser);

  if(!pw->authenticate(password))

    RETURN(err, "Invalid or incorrect password");

  state = new saved_state(pw);

  vpwtable* table = state->domain.table();

  vpwtable_reader* reader = table->start_read();

  if(!*reader)

    RETURN(err, "Base user has no virtual password table");

  if(!write_buf(fd, "", 0))

    RETURN(err, "Failed while writing initial OK response");

  vpwentry* entry;

  while((entry = reader->get()) != 0) {

    mystring code = entry->to_record();

    unsigned length = entry->name.length() + 1 + code.length();

    char buf[length];

    memcpy(buf, entry->name.c_str(), entry->name.length()+1);

    memcpy(buf+entry->name.length()+1, code.c_str(), code.length());

    if(!write_buf(fd, buf, length))

      RETURN(err, "Failed while writing list entry");

    delete entry;

  }

  delete reader;

  RETURN(ok, "");

}