/* Stubby version of getty for Hurd
   Copyright (C) 1996 Free Software Foundation, Inc.
   Written by Michael I. Bushnell, p/BSG.

   This file is part of the GNU Hurd.

   The GNU Hurd 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, or (at
   your option) any later version.

   The GNU Hurd 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, USA. */

#include <syslog.h>
#include <unistd.h>
#include <ttyent.h>
#include <stdio.h>
#include <fcntl.h>
#include <sys/stat.h>
#include <errno.h>
#include <error.h>
#include <sys/utsname.h>
#include <stdlib.h>

/* XXX */
extern int login_tty (int);
extern char *localhost ();

#define _PATH_DEV "/dev"
#define _PATH_LOGIN "/bin/login"

/* Print a suitable welcome banner */
static void
print_banner (int fd, char *ttyname)
{
  int cc;
  char *s;
  struct utsname u;
  char *hostname = localhost ();
  char *t;

  if (uname (&u))
    u.sysname[0] = u.release[0] = '\0';

  t = rindex (ttyname, '/');
  if (t)
    t++;
  else
    t = ttyname;

  cc = asprintf (&s, "\r\n\n%s %s (%s) (%s)\r\n\n",
		 u.sysname, u.release, hostname ?: "?", t);
  write (fd, s, cc);
}

int
main (int argc, char **argv)
{
  char *linespec, *ttyname;
  int tty;
  struct ttyent *tt;
  char *arg;

  openlog ("getty", LOG_ODELAY|LOG_CONS|LOG_PID, LOG_AUTH);
  
  /* Nothing to do .... */
  if (argc != 3)
    {
      syslog (LOG_ERR, "Bad syntax");
      closelog ();
      exit (1);
    }

  /* Don't do anything with this for now. */
  linespec = argv[1];

  tt = getttynam (argv[1]);
  asprintf (&ttyname, "%s/%s", _PATH_DEV, argv[2]);
  
  chown (ttyname, 0, 0);
  chmod (ttyname, 0600);
  revoke (ttyname);
  sleep (2);			/* leave DTR down for a bit */
  
  do
    {
      tty = open (ttyname, O_RDWR);
      if (tty == -1)
	{
	  syslog (LOG_ERR, "%s: %m", ttyname);
	  closelog ();
	  sleep (60);
	}
    }
  while (tty == -1);

  print_banner (tty, ttyname);

  login_tty (tty);
  
  asprintf (&arg, "TERM=%s", tt ? tt->ty_type : "unknown");

  if (tt && strcmp (tt->ty_type, "dialup") == 0)
    /* Dialup lines time out (which is login's default).  */
    execl (_PATH_LOGIN, "login", "-e", arg, 0);
  else
    /* Hardwired lines don't.  */
    execl (_PATH_LOGIN, "login", "-e", arg, "-aNOAUTH_TIMEOUT", 0);

  syslog (LOG_ERR, "%s: %m", _PATH_LOGIN);

  return 1;
}