summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xeditcomponents.cgi14
1 files changed, 13 insertions, 1 deletions
diff --git a/editcomponents.cgi b/editcomponents.cgi
index fc45b52c8..4ee147453 100755
--- a/editcomponents.cgi
+++ b/editcomponents.cgi
@@ -123,7 +123,7 @@ sub EmitFormElements ($$$$$)
$initialqacontactid ? DBID_to_name ($initialqacontactid) : '');
print " <TH ALIGN=\"right\">Component:</TH>\n";
- print " <TD><INPUT SIZE=64 MAXLENGTH=255 NAME=\"component\" VALUE=\"" .
+ print " <TD><INPUT SIZE=64 MAXLENGTH=64 NAME=\"component\" VALUE=\"" .
value_quote($component) . "\">\n";
print " <INPUT TYPE=HIDDEN NAME=\"product\" VALUE=\"" .
value_quote($product) . "\"></TD>\n";
@@ -386,6 +386,12 @@ if ($action eq 'new') {
exit;
}
+ if (length($component) > 64) {
+ print "Sorry, the name of a component is limited to 64 characters.";
+ PutTrailer($localtrailer);
+ exit;
+ }
+
my $description = trim($::FORM{description} || '');
if ($description eq '') {
@@ -710,6 +716,12 @@ if ($action eq 'update') {
my $initialqacontact = trim($::FORM{initialqacontact} || '');
my $initialqacontactold = trim($::FORM{initialqacontactold} || '');
+ if (length($component) > 64) {
+ print "Sorry, the name of a component is limited to 64 characters.";
+ PutTrailer($localtrailer);
+ exit;
+ }
+
# Note that the order of this tests is important. If you change
# them, be sure to test for WHERE='$component' or WHERE='$componentold'