YaST/Tips/Custom Modules/Static network configuration

From openSUSE

/**
 * File:	clients/inst_static_network.ycp
 * Package:	installation
 * Summary:	Configure static network with default values
 * Authors:	Jordi Massaguer Pla <jordi.massaguer@opentrends.net>
 * Copyright (c) 2007 Departament d'Educació de la Generalitat de Catalunya
 * $Id: inst_static_network.ycp,v 1.1.1.1 2007/01/30 11:44:01 jmassaguer Exp $
 *
 * Writes:
 * .etc.install.inf
 */

{
    textdomain "installation";

    SCR::Write(.etc.install_inf.IP, "192.168.0.201");
    SCR::Write(.etc.install_inf.Netmask, "255.255.255.0");
    SCR::Write(.etc.install_inf.NetConfig, "static");
    SCR::Write(.etc.install_inf.Netdevice, "eth0");
    SCR::Write(.etc.install_inf.Gateway, "192.168.0.254");
    SCR::Write(.etc.install_inf.Nameserver, "213.176.161.16");
    SCR::Write(.etc.install_inf.Machinename, "servidor");
    SCR::Write(.etc.install_inf.Domainname, "intracentre");
    string ip = (string) SCR::Read(.etc.install_inf.IP);
    string netmask = (string) SCR::Read(.etc.install_inf.Netmask);
    string netconfig = (string) SCR::Read(.etc.install_inf.NetConfig);
    string netdevice = (string) SCR::Read(.etc.install_inf.Netdevice);
    string gateway = (string) SCR::Read(.etc.install_inf.Gateway);
    string nameserver = (string) SCR::Read(.etc.install_inf.Nameserver);
    string machinename = (string) SCR::Read(.etc.install_inf.Machinename);
    string domainname = (string) SCR::Read(.etc.install_inf.Domainname);
    y2milestone("inst_static_network IP: %1",ip);	
    y2milestone("inst_static_network netmask: %1",netmask);	
    y2milestone("inst_static_network netconfig: %1",netconfig);	
    y2milestone("inst_static_network netdevice: %1",netdevice);	
    y2milestone("inst_static_network gateway: %1",gateway);	
    y2milestone("inst_static_network nameserver: %1",nameserver);	
    y2milestone("inst_static_network machinename: %1",machinename);	
    y2milestone("inst_static_network domainname: %1",domainname);	

    return `next;
}