# vim: set et ts=4 sw=4:
#*****************************************************************************
# 
#  Copyright (c) 2013-2014 Matteo Pasotti <matteo.pasotti@gmail.com>
# 
#  This program is free software; you can redistribute it and/or modify
#  it under the terms of the GNU General Public License version 2, as
#  published by the Free Software Foundation.
# 
#  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.
# 
#*****************************************************************************
package AdminPanel::Shared::Hosts; 

use Moose;
use diagnostics;
use Config::Hosts;
use utf8;

# costants by Config::Hosts
my $is_ip = 1;
my $is_host = -1;
my $is_none = 0;

has 'configHosts' => (
	is => 'rw',
	init_arg => undef,
	builder => '_initialize'
);

sub _initialize {
	my $self = shift();
	$self->configHosts(Config::Hosts->new());
}

=pod

=head2 _getHosts

=head3 OUTPUT

    @result: array of hashes; each one of them represent a host definition from the hosts configuration file
    
    NOTE: the 'hosts' item into each hash is an array: it contains the hostname and -eventually- the aliases

=head3 DESCRIPTION

retrieve data from the hosts file (/etc/hosts) using the Config::Hosts module

=cut

sub _getHosts {
	my $self = shift();
	# $self->configHosts(Config::Hosts->new());
	my $hosts = $self->configHosts->read_hosts();
	my @result = ();
	while( my ($key, $value) = each($hosts)){
		if($self->configHosts->determine_ip_or_host($key) == $is_ip){
			my $tmp = {};
			$tmp = $self->configHosts->query_host($key);
			$tmp->{'ip'} = $key;
			push @result,$tmp; 
		}
	}
	return @result;
}

sub _insertHost {
	my $self = shift();
	# remember that the order matters!
	my $ip = shift();
	my @host_definitions = @_;
	# $self->configHosts = Config::Hosts->new();
	return $self->configHosts->insert_host(ip => $ip, hosts => @host_definitions);
}

sub _dropHost {
	my $self = shift();
	my $host_ip = shift();
	return $self->configHosts->delete_host($host_ip);
}

sub _modifyHost {
    my $self = shift();
    my $host_ip = shift();
    my @host_definitions = @_;
    return $self->configHosts->update_host($host_ip, hosts => @host_definitions);
}

sub _writeHosts {
	my $self = shift();
	return $self->configHosts->write_hosts();
}

1;
/diff/lst?id=14aba3799e410fe16e5c54ec74a81ac8dcad206d'>diff</a><a href='/software/ldetect-lst/stats/lst'>stats</a></td><td class='form'><form class='right' method='get' action='/software/ldetect-lst/log/lst'>
<input type='hidden' name='id' value='14aba3799e410fe16e5c54ec74a81ac8dcad206d'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/software/ldetect-lst/commit/?id=14aba3799e410fe16e5c54ec74a81ac8dcad206d'>root</a>/<a href='/software/ldetect-lst/commit/lst?id=14aba3799e410fe16e5c54ec74a81ac8dcad206d'>lst</a></div><div class='content'><div class='cgit-panel'><b>diff options</b><form method='get'><input type='hidden' name='id' value='14aba3799e410fe16e5c54ec74a81ac8dcad206d'/><table><tr><td colspan='2'/></tr><tr><td class='label'>context:</td><td class='ctrl'><select name='context' onchange='this.form.submit();'><option value='1'>1</option><option value='2'>2</option><option value='3' selected='selected'>3</option><option value='4'>4</option><option value='5'>5</option><option value='6'>6</option><option value='7'>7</option><option value='8'>8</option><option value='9'>9</option><option value='10'>10</option><option value='15'>15</option><option value='20'>20</option><option value='25'>25</option><option value='30'>30</option><option value='35'>35</option><option value='40'>40</option></select></td></tr><tr><td class='label'>space:</td><td class='ctrl'><select name='ignorews' onchange='this.form.submit();'><option value='0' selected='selected'>include</option><option value='1'>ignore</option></select></td></tr><tr><td class='label'>mode:</td><td class='ctrl'><select name='dt' onchange='this.form.submit();'><option value='0' selected='selected'>unified</option><option value='1'>ssdiff</option><option value='2'>stat only</option></select></td></tr><tr><td/><td class='ctrl'><noscript><input type='submit' value='reload'/></noscript></td></tr></table></form></div><table summary='commit info' class='commit-info'>
<tr><th>author</th><td>Thierry Vignaud &lt;tvignaud@mandriva.org&gt;</td><td class='right'>2005-02-08 19:14:17 +0000</td></tr>
<tr><th>committer</th><td>Thierry Vignaud &lt;tvignaud@mandriva.org&gt;</td><td class='right'>2005-02-08 19:14:17 +0000</td></tr>
<tr><th>commit</th><td colspan='2' class='sha1'><a href='/software/ldetect-lst/commit/lst?id=14aba3799e410fe16e5c54ec74a81ac8dcad206d'>14aba3799e410fe16e5c54ec74a81ac8dcad206d</a> (<a href='/software/ldetect-lst/patch/lst?id=14aba3799e410fe16e5c54ec74a81ac8dcad206d'>patch</a>)</td></tr>
<tr><th>tree</th><td colspan='2' class='sha1'><a href='/software/ldetect-lst/tree/?id=14aba3799e410fe16e5c54ec74a81ac8dcad206d'>5713f2806c7fe9924af986ad830d761acf8a813e</a> /<a href='/software/ldetect-lst/tree/lst?id=14aba3799e410fe16e5c54ec74a81ac8dcad206d'>lst</a></td></tr>
<tr><th>parent</th><td colspan='2' class='sha1'><a href='/software/ldetect-lst/commit/lst?id=45a3fa15ffc256ac0219e84d12e2656285d7a023'>45a3fa15ffc256ac0219e84d12e2656285d7a023</a> (<a href='/software/ldetect-lst/diff/lst?id=14aba3799e410fe16e5c54ec74a81ac8dcad206d&amp;id2=45a3fa15ffc256ac0219e84d12e2656285d7a023'>diff</a>)</td></tr><tr><th>download</th><td colspan='2' class='sha1'><a href='/software/ldetect-lst/snapshot/ldetect-lst-14aba3799e410fe16e5c54ec74a81ac8dcad206d.tar'>ldetect-lst-14aba3799e410fe16e5c54ec74a81ac8dcad206d.tar</a><br/><a href='/software/ldetect-lst/snapshot/ldetect-lst-14aba3799e410fe16e5c54ec74a81ac8dcad206d.tar.gz'>ldetect-lst-14aba3799e410fe16e5c54ec74a81ac8dcad206d.tar.gz</a><br/><a href='/software/ldetect-lst/snapshot/ldetect-lst-14aba3799e410fe16e5c54ec74a81ac8dcad206d.tar.bz2'>ldetect-lst-14aba3799e410fe16e5c54ec74a81ac8dcad206d.tar.bz2</a><br/><a href='/software/ldetect-lst/snapshot/ldetect-lst-14aba3799e410fe16e5c54ec74a81ac8dcad206d.tar.xz'>ldetect-lst-14aba3799e410fe16e5c54ec74a81ac8dcad206d.tar.xz</a><br/><a href='/software/ldetect-lst/snapshot/ldetect-lst-14aba3799e410fe16e5c54ec74a81ac8dcad206d.zip'>ldetect-lst-14aba3799e410fe16e5c54ec74a81ac8dcad206d.zip</a><br/></td></tr></table>
<div class='commit-subject'>add 2 missing entries from kernel-2.6.10-1mdk</div><div class='commit-msg'></div><div class='diffstat-header'><a href='/software/ldetect-lst/diff/?id=14aba3799e410fe16e5c54ec74a81ac8dcad206d'>Diffstat</a> (limited to 'lst')</div><table summary='diffstat' class='diffstat'>