#!/usr/bin/perl -w

use esmith::templates;
use esmith::ethernet;

my @adapters = split(/\n/, esmith::ethernet::probeAdapters());

# Expand templates for every adapters found
foreach my $adapter (@adapters){
    my (undef, undef, undef, undef, $nic) = split(/\t/, $adapter, 5);
    esmith::templates::processTemplate({
        MORE_DATA => { THIS_DEVICE => $nic },
        TEMPLATE_PATH => '/etc/sysconfig/network-scripts/ifcfg-ethX',
        OUTPUT_FILENAME => "/etc/sysconfig/network-scripts/ifcfg-$nic"
    });
    esmith::templates::processTemplate({
        MORE_DATA => { THIS_DEVICE => $nic },
        TEMPLATE_PATH => '/etc/sysconfig/network-scripts/route-ethX',
        OUTPUT_FILENAME => "/etc/sysconfig/network-scripts/route-$nic"
    });
    esmith::templates::processTemplate({
        MORE_DATA => { THIS_DEVICE => $nic },
        TEMPLATE_PATH => '/var/lib/dhclient/dhclient.conf',
        OUTPUT_FILENAME => "/var/lib/dhclient/dhclient-$nic.conf"
    });
}
