From 5f042e841a435995e62f0cc8e8c4e9bd9f2c9c15 Mon Sep 17 00:00:00 2001 From: "mkanat%kerio.com" <> Date: Mon, 7 Mar 2005 21:55:33 +0000 Subject: Bug 283924: Move ValidateComment out of CGI.pl Patch By Max Kanat-Alexander r=LpSolit, a=justdave --- Bugzilla/Bug.pm | 15 +++++++++++++++ 1 file changed, 15 insertions(+) (limited to 'Bugzilla') diff --git a/Bugzilla/Bug.pm b/Bugzilla/Bug.pm index b2261e1ee..b9229d98e 100755 --- a/Bugzilla/Bug.pm +++ b/Bugzilla/Bug.pm @@ -44,6 +44,13 @@ use Bugzilla::User; use Bugzilla::Util; use Bugzilla::Error; +use base qw(Exporter); +@Bugzilla::Bug::EXPORT = qw( + ValidateComment +); + +use constant MAX_COMMENT_LENGTH => 65535; + sub fields { # Keep this ordering in sync with bugzilla.dtd my @fields = qw(bug_id alias creation_ts short_desc delta_ts @@ -585,6 +592,14 @@ sub CountOpenDependencies { return @dependencies; } +sub ValidateComment ($) { + my ($comment) = @_; + + if (defined($comment) && length($comment) > MAX_COMMENT_LENGTH) { + ThrowUserError("comment_too_long"); + } +} + sub AUTOLOAD { use vars qw($AUTOLOAD); my $attr = $AUTOLOAD; -- cgit v1.2.3-24-g4f1b