/***************************************************************************
 *   Copyright (C) 2002 by Bernd Gehrmann and Harald Fernengel             *
 *   bernd@kdevelop.org, harry@kdevelop.org                                *
 *                                                                         *
 *   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.                                   *
 *                                                                         *
 ***************************************************************************/

#include "misc.h"

#include <tqstring.h>
#include <tdeemailsettings.h>

#include <pwd.h>
#include <sys/types.h>
#include <unistd.h>
#include <tdeglobal.h>
#include <kstandarddirs.h>
#include <tdeconfig.h>

void AppWizardUtil::guessAuthorAndEmail(TQString *author, TQString *email)
{
  KEMailSettings emailConfig;
  emailConfig.setProfile( emailConfig.defaultProfileName() );
  TQString fromAddr = emailConfig.getSetting( KEMailSettings::EmailAddress );
  TQString name = emailConfig.getSetting( KEMailSettings::RealName );

  if ( !fromAddr.isEmpty() && !name.isEmpty() ) {
    *author = name;
    *email = fromAddr;
    return;
  }

  struct passwd *pw = ::getpwuid(getuid());
  // pw==0 => the system must be really messed up
  if (!pw)
      return;

  char hostname[512];

  // I guess we don't have to support users with longer host names ;-)
  (void) ::gethostname(hostname, sizeof hostname);

  if ( name.isEmpty() )
    *author = TQString::fromLocal8Bit( pw->pw_gecos );
  else
    *author = name;
  if ( fromAddr.isEmpty() )
    *email = TQString(pw->pw_name) + "@" + hostname;
  else
    *email = fromAddr;
}