summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoey Hess <joey@kodama.kitenet.net>2008-06-30 23:04:37 -0400
committerJoey Hess <joey@kodama.kitenet.net>2008-06-30 23:04:37 -0400
commit622033f5d64604762736eaadd1d3e6f3121b645c (patch)
tree528d435991d3898d1500acb5644988a290b69df3
parent0a37c45f32b6a0cf92eb046deabf933fb48ac197 (diff)
minor improvements
-rw-r--r--IkiWiki/Plugin/attachment.pm28
1 files changed, 15 insertions, 13 deletions
diff --git a/IkiWiki/Plugin/attachment.pm b/IkiWiki/Plugin/attachment.pm
index 7af399fc0..48a1c58b4 100644
--- a/IkiWiki/Plugin/attachment.pm
+++ b/IkiWiki/Plugin/attachment.pm
@@ -8,7 +8,7 @@ use CGI;
$CGI::DISABLE_UPLOADS=0;
# TODO move to admin prefs
-$config{valid_attachments}="(*.mp3 and maxsize(15mb)) or (* and maxsize(.50kb))";
+$config{valid_attachments}="(*.mp3 and maxsize(15mb)) or (* and maxsize(50kb))";
sub import { #{{{
hook(type => "formbuilder_setup", id => "attachment", call => \&formbuilder_setup);
@@ -49,12 +49,14 @@ sub formbuilder (@) { #{{{
error(gettext("bad attachment filename"));
}
- # Check that the attachment matches the configured
- # pagespec.
- my $result=pagespec_match($filename, $config{valid_attachments},
- tempfile => $tempfile);
- if (! $result) {
- error(gettext("attachment rejected")." ($result)");
+ # Use a pagespec to test that the attachment is valid.
+ if (exists $config{valid_attachments} &&
+ length $config{valid_attachments}) {
+ my $result=pagespec_match($filename, $config{valid_attachments},
+ tempfile => $tempfile);
+ if (! $result) {
+ error(gettext("attachment rejected")." ($result)");
+ }
}
my $fh=$q->upload('attachment');
@@ -75,20 +77,20 @@ sub parsesize { #{{{
no warnings;
my $base=$size+0; # force to number
use warnings;
- my $exponent=1;
+ my $multiple=1;
if ($size=~/kb?$/i) {
- $exponent=10;
+ $multiple=2**10;
}
elsif ($size=~/mb?$/i) {
- $exponent=20;
+ $multiple=2**20;
}
elsif ($size=~/gb?$/i) {
- $exponent=30;
+ $multiple=2**30;
}
elsif ($size=~/tb?$/i) {
- $exponent=40;
+ $multiple=2**40;
}
- return $base * 2**$exponent;
+ return $base * $multiple;
} #}}}
sub match_maxsize ($$;@) { #{{{