1*4882a593Smuzhiyundiff -Nru webmin-1.570.bak/mediatomb/index.cgi webmin-1.570/mediatomb/index.cgi 2*4882a593Smuzhiyun--- webmin-1.570.bak/mediatomb/index.cgi 1969-12-31 16:00:00.000000000 -0800 3*4882a593Smuzhiyun+++ webmin-1.570/mediatomb/index.cgi 2011-10-26 10:00:05.992522036 -0700 4*4882a593Smuzhiyun@@ -0,0 +1,13 @@ 5*4882a593Smuzhiyun+#!/usr/bin/perl 6*4882a593Smuzhiyun+# index.cgi 7*4882a593Smuzhiyun+# Display MediaTomb option categories 8*4882a593Smuzhiyun+ 9*4882a593Smuzhiyun+require './mediatomb-lib.pl'; 10*4882a593Smuzhiyun+ 11*4882a593Smuzhiyun+ui_print_header(undef, $text{'index_title'}, "", undef, 1, 1); 12*4882a593Smuzhiyun+ 13*4882a593Smuzhiyun+ 14*4882a593Smuzhiyun+$ipaddress = &get_my_address(); 15*4882a593Smuzhiyun+print &text('index_desc', $ipaddress),"<p>\n"; 16*4882a593Smuzhiyun+ 17*4882a593Smuzhiyun+ui_print_footer("/", $text{'index'}); 18*4882a593Smuzhiyundiff -Nru webmin-1.570.bak/mediatomb/lang/en webmin-1.570/mediatomb/lang/en 19*4882a593Smuzhiyun--- webmin-1.570.bak/mediatomb/lang/en 1969-12-31 16:00:00.000000000 -0800 20*4882a593Smuzhiyun+++ webmin-1.570/mediatomb/lang/en 2011-10-26 10:01:13.340522186 -0700 21*4882a593Smuzhiyun@@ -0,0 +1,2 @@ 22*4882a593Smuzhiyun+index_title=MediaTomb 23*4882a593Smuzhiyun+index_desc=MediaTomb is an open source (GPL) UPnP MediaServer with a nice web user interface. You can access it via <a href='http://$1:49153'>here</a>. 24*4882a593Smuzhiyundiff -Nru webmin-1.570.bak/mediatomb/mediatomb-lib.pl webmin-1.570/mediatomb/mediatomb-lib.pl 25*4882a593Smuzhiyun--- webmin-1.570.bak/mediatomb/mediatomb-lib.pl 1969-12-31 16:00:00.000000000 -0800 26*4882a593Smuzhiyun+++ webmin-1.570/mediatomb/mediatomb-lib.pl 2011-10-26 10:01:34.692522079 -0700 27*4882a593Smuzhiyun@@ -0,0 +1,31 @@ 28*4882a593Smuzhiyun+#!/usr/bin/perl 29*4882a593Smuzhiyun+# mediatomb-lib.pl 30*4882a593Smuzhiyun+# Common functions for the MediaTomb module 31*4882a593Smuzhiyun+ 32*4882a593Smuzhiyun+BEGIN { push(@INC, ".."); }; 33*4882a593Smuzhiyun+use WebminCore; 34*4882a593Smuzhiyun+&init_config(); 35*4882a593Smuzhiyun+ 36*4882a593Smuzhiyun+sub get_my_address 37*4882a593Smuzhiyun+{ 38*4882a593Smuzhiyun+my $myip; 39*4882a593Smuzhiyun+if (&foreign_check("net")) { 40*4882a593Smuzhiyun+ # Try to get ethernet interface 41*4882a593Smuzhiyun+ &foreign_require("net", "net-lib.pl"); 42*4882a593Smuzhiyun+ my @act = &net::active_interfaces(); 43*4882a593Smuzhiyun+ my @ifaces = grep { &net::iface_type($_->{'fullname'}) =~ /ether/i } 44*4882a593Smuzhiyun+ @act; 45*4882a593Smuzhiyun+ @ifaces = ( $act[0] ) if (!@ifaces && @act); 46*4882a593Smuzhiyun+ if (@ifaces) { 47*4882a593Smuzhiyun+ return wantarray ? ( map { $_->{'address'} } @ifaces ) 48*4882a593Smuzhiyun+ : $ifaces[0]->{'address'}; 49*4882a593Smuzhiyun+ } 50*4882a593Smuzhiyun+ } 51*4882a593Smuzhiyun+$myip = &to_ipaddress(&get_system_hostname()); 52*4882a593Smuzhiyun+if ($myip) { 53*4882a593Smuzhiyun+ # Can resolve hostname .. use that 54*4882a593Smuzhiyun+ return wantarray ? ( $myip ) : $myip; 55*4882a593Smuzhiyun+ } 56*4882a593Smuzhiyun+return wantarray ? ( ) : undef; 57*4882a593Smuzhiyun+} 58*4882a593Smuzhiyun+ 59*4882a593Smuzhiyundiff -Nru webmin-1.570.bak/mediatomb/module.info webmin-1.570/mediatomb/module.info 60*4882a593Smuzhiyun--- webmin-1.570.bak/mediatomb/module.info 1969-12-31 16:00:00.000000000 -0800 61*4882a593Smuzhiyun+++ webmin-1.570/mediatomb/module.info 2011-10-26 09:59:50.428528369 -0700 62*4882a593Smuzhiyun@@ -0,0 +1,3 @@ 63*4882a593Smuzhiyun+desc=MediaTomb 64*4882a593Smuzhiyun+category=others 65*4882a593Smuzhiyun+longdesc=MediaTomb access module 66