"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "tools/url_handler.pl" between
tin-2.4.4.tar.xz and tin-2.4.5.tar.xz

About: TIN is a threaded NNTP and spool based UseNet newsreader.

url_handler.pl  (tin-2.4.4.tar.xz):url_handler.pl  (tin-2.4.5.tar.xz)
skipping to change at line 14 skipping to change at line 14
# URLs must start with a scheme and shell metas should be already quoted # URLs must start with a scheme and shell metas should be already quoted
# (tin doesn't recognize URLs without a scheme and it quotes the metas) # (tin doesn't recognize URLs without a scheme and it quotes the metas)
use strict; use strict;
use warnings; use warnings;
(my $pname = $0) =~ s#^.*/##; (my $pname = $0) =~ s#^.*/##;
die "Usage: $pname URL" if $#ARGV != 0; die "Usage: $pname URL" if $#ARGV != 0;
# version Number # version Number
my $version = "0.1.2"; my $version = "0.1.3";
my ($method, $url, $match, @try); my ($method, $url, $match, @try);
$method = $url = $ARGV[0]; $method = $url = $ARGV[0];
$method =~ s#^([^:]+):.*#$1#io; $method =~ s#^([^:]+):.*#$1#io;
# shell escape # shell escape
$url =~ s#([\&\;\`\'\\\"\|\*\?\~\<\>\^\(\)\[\]\{\}\$\010\013\020\011])#\\$1#g; $url =~ s#([\&\;\`\'\\\"\|\*\?\~\<\>\^\(\)\[\]\{\}\$\010\013\020\011])#\\$1#g;
if ($ENV{"BROWSER_".uc($method)}) { if ($ENV{"BROWSER_".uc($method)}) {
push(@try, split(/:/, $ENV{"BROWSER_".uc($method)})); push(@try, split(/:/, $ENV{"BROWSER_".uc($method)}));
skipping to change at line 130 skipping to change at line 130
=item $BROWSER="firefox -a firefox -remote openURL\(%s\):opera:konqueror:links2 -g:lynx:w3m" =item $BROWSER="firefox -a firefox -remote openURL\(%s\):opera:konqueror:links2 -g:lynx:w3m"
=back =back
=head1 SECURITY =head1 SECURITY
B<url_handler.pl> was designed to work together with L<tin(1)> which only B<url_handler.pl> was designed to work together with L<tin(1)> which only
issues shell escaped absolute URLs thus B<url_handler.pl> does not try hard issues shell escaped absolute URLs thus B<url_handler.pl> does not try hard
to shell escape its input nor does it convert relative URLs into absolute to shell escape its input nor does it convert relative URLs into absolute
ones! If you use B<url_handler.pl> from other applications be sure to at ones! If you use B<url_handler.pl> from other applications be sure to at
least shell escaped its input! least shell escape its input!
=head1 AUTHOR =head1 AUTHOR
Urs Janssen E<lt>urs@tin.orgE<gt> Urs Janssen E<lt>urs@tin.orgE<gt>
=head1 SEE ALSO =head1 SEE ALSO
L<http://www.catb.org/~esr/BROWSER/> L<http://www.catb.org/~esr/BROWSER/>
L<http://www.dwheeler.com/browse/secure_browser.html> L<http://www.dwheeler.com/browse/secure_browser.html>
 End of changes. 2 change blocks. 
2 lines changed or deleted 2 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)