JFIFxxC      C  " }!1AQa"q2#BR$3br %&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz w!1AQaq"2B #3Rbr#!/usr/bin/perl # verify.cgi # Verify the signature on a file require './gnupg-lib.pl'; &ReadParseMime(); # Get file data if ($in{'mode'} == 0) { $in{'upload'} || &error($text{'verify_eupload'}); $data = $in{'upload'}; } elsif ($in{'mode'} == 1) { $in{'local'} || &error($text{'verify_eupload'}); -r $in{'local'} || &error($text{'verify_elocal'}); $data = &read_file_contents($in{'local'}); } elsif ($in{'mode'} == 3) { $data = $in{'text'}; $data =~ s/\r//g; } # Get signature data if ($in{'sigmode'} == 0) { $in{'sigupload'} || &error($text{'verify_esigupload'}); $sigdata = $in{'sigupload'}; } elsif ($in{'sigmode'} == 1) { $in{'siglocal'} || &error($text{'verify_esigupload'}); -r $in{'siglocal'} || &error($text{'verify_esiglocal'}); $sigdata = &read_file_contents($in{'siglocal'}); } elsif ($in{'mode'} == 3) { $sigdata = $in{'sigtext'}; $sigdata =~ s/\r//g; } else { $sigdata = undef; } ($code, $message) = &verify_data($data, $sigdata); &ui_print_header(undef, $text{'verify_title'}, ""); $red = ""; $end = ""; if ($code == 0 || $code == 1) { print &text('verify_good', &html_escape($message)),"

\n"; if ($code == 1) { print "$red$text{'verify_warning'}$end

\n"; } } elsif ($code == 2) { print "$red",&text('verify_bad', &html_escape($message)),"$end

\n"; } elsif ($code == 3) { print "$red",&text('verify_noid', &html_escape($message)),"$end

\n"; } else { print "$red",&text('verify_failed', "

$message
"),"$end

\n"; } &ui_print_footer("", $text{'index_return'});