netcfg/netcfg-static.c

/* 
   netcfg-static.c - Configure a static network for the debian-installer
   Author - David Whedon

   Copyright (C) 2000-2001  David Whedon <dwhedon@debian.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.
   
   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 <ctype.h>
#include <net/if.h>
#include <sys/socket.h>
#include <sys/ioctl.h>
#include <string.h>
#include <stdlib.h>
#include <stdio.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <cdebconf/debconfclient.h>
#include "utils.h"
#include "netcfg.h"


static char *interface = NULL;
static char *hostname = NULL;
static char *domain = NULL;
static u_int32_t ipaddress = 0;
static u_int32_t nameserver_array[4] = { 0 };
static u_int32_t network = 0;
static u_int32_t broadcast = 0;
static u_int32_t netmask = 0;
static u_int32_t gateway = 0;
static u_int32_t pointopoint = 0;
static struct debconfclient *client;

char *
debconf_input (char *priority, char *template)
{
  client->command (client, "fset", template, "seen", "false", NULL);
  client->command (client, "input", priority, template, NULL);
  client->command (client, "go", NULL);
  client->command (client, "get", template, NULL);
  return client->value;
}


static void
netcfg_get_static ()
{
  char *ptr;

  ipaddress = network = broadcast = netmask = gateway = pointopoint = 0;

  ptr = debconf_input ("critical", "netcfg/get_ipaddress");
  dot2num (&ipaddress, ptr);

  client->command (client, "subst", "netcfg/confirm_static",
		   "ipaddress",
		   (ipaddress ? num2dot (ipaddress) : "<none>"), NULL);

  if (strncmp (interface, "plip", 4) == 0
      || strncmp (interface, "slip", 4) == 0)
    {
      ptr = debconf_input ("critical", "netcfg/get_pointopoint");
      dot2num (&pointopoint, ptr);

      dot2num (&netmask, "255.255.255.255");
      network = ipaddress;
      gateway = pointopoint;
    }
  else
    {
      ptr = debconf_input ("critical", "netcfg/get_netmask");
      dot2num (&netmask, ptr);

      ptr = debconf_input ("critical", "netcfg/get_gateway");
      dot2num (&gateway, ptr);

      network = ipaddress & netmask;

      if (gateway && ((gateway & netmask) != network))
	{
	  client->command (client, "input", "high",
			   "netcfg/gateway_unreachable", NULL);
	  client->command (client, "go", NULL);
	}
    }

  client->command (client, "subst", "netcfg/confirm_static", "netmask",
		   (netmask ? num2dot (netmask) : "<none>"), NULL);

  client->command (client, "subst", "netcfg/confirm_static", "gateway",
		   (gateway ? num2dot (gateway) : "<none>"), NULL);

  client->command (client, "subst", "netcfg/confirm_static", "pointopoint",
		   (pointopoint ? num2dot (pointopoint) : "<none>"), NULL);

  broadcast = (network | ~netmask);
}


static int
netcfg_write_static ()
{
  FILE *fp;

  if ((fp = file_open (NETWORKS_FILE)))
    {
      fprintf (fp, "localnet %s\n", num2dot (network));
      fclose (fp);
    }
  else
    goto error;

  if ((fp = file_open (INTERFACES_FILE)))
    {
      fprintf (fp,
	       "\n# This entry was created during the Debian installation\n");
      fprintf (fp, "# (network, broadcast and gateway are optional)\n");
      fprintf (fp, "iface %s inet static\n", interface);
      fprintf (fp, "\taddress %s\n", num2dot (ipaddress));
      fprintf (fp, "\tnetmask %s\n", num2dot (netmask));
      fprintf (fp, "\tnetwork %s\n", num2dot (network));
      fprintf (fp, "\tbroadcast %s\n", num2dot (broadcast));
      if (gateway)
	fprintf (fp, "\tgateway %s\n", num2dot (gateway));
      if (pointopoint)
	fprintf (fp, "\tpointopoint %s\n", num2dot (pointopoint));
      fclose (fp);
    }
  else
    goto error;

  return 0;
error:
  return -1;
}

static int
netcfg_activate_static ()
{
  int rv = 0;
  char buf[128];
#ifdef __GNU__
/* I had to do something like this ? */
/*  execlog ("settrans /servers/socket/2 -fg");  */
  execlog ("settrans /servers/socket/2 --goaway");
  snprintf (buf, sizeof (buf),
	    "settrans -fg /servers/socket/2 /hurd/pfinet --interface=%s --address=%s",
	    interface, num2dot (ipaddress));
  snprintfcat (buf, sizeof (buf) " --netmask=%s", num2dot (netmask));
  buf[sizeof (buf) - 1] = '\0';

  if (gateway)
    snprintf (buf, sizeof (buf), " --gateway=%s", num2dot (gateway));

  rv |= execlog (buf);

#else
  execlog ("/sbin/ifconfig lo 127.0.0.1");

  snprintf (buf, sizeof (buf), "/sbin/ifconfig %s %s", 
	    interface, num2dot (ipaddress));
  snprintfcat (buf, sizeof (buf), " netmask %s", num2dot (netmask));
  snprintfcat (buf, sizeof (buf), " broadcast %s", num2dot (broadcast));
  buf[sizeof (buf) - 1] = '\0';

  if (pointopoint)
    snprintfcat (buf, sizeof (buf), " pointopoint %s", num2dot (pointopoint));

  rv |= execlog (buf);

  if (gateway)
    {
      snprintf (buf, sizeof (buf), "/sbin/route add default gateway %s",
		num2dot (gateway));
      rv |= execlog (buf);
    }
#endif

  if (rv != 0)
    {
      client->command (client, "input", "critical", "netcfg/error_cfg", NULL);
      client->command (client, "go", NULL);
    }
  return 0;
}

int
main (int argc, char *argv[])
{
  int finished = 0;
  char *ptr;
  char *nameservers = NULL;
  client = debconfclient_new ();
  client->command (client, "title", "Static Network Configuration", NULL);


  do
    {
      netcfg_get_common (client, &interface, &hostname, &domain,
			 &nameservers);

      client->command (client, "subst", "netcfg/confirm_static", "interface",
		       interface, NULL);

      client->command (client, "subst", "netcfg/confirm_static",
		       "hostname", hostname, NULL);

      client->command (client, "subst", "netcfg/confirm_static", "domain",
		       (domain ? domain : "<none>"), NULL);

      client->command (client, "subst", "netcfg/confirm_static",
		       "nameservers", (nameservers ? nameservers : "<none>"),
		       NULL);
      netcfg_nameservers_to_array (nameservers, nameserver_array);

      netcfg_get_static ();

      ptr = debconf_input ("medium", "netcfg/confirm_static");

      if (strstr (ptr, "true"))
	finished = 1;

    }
  while (!finished);

  netcfg_write_common (ipaddress, domain, hostname, nameserver_array);
  netcfg_write_static ();
  netcfg_activate_static ();

  return 0;
}