User: sits
Date: 06/07/20 23:25:28
Modified: bin install.pl
lib Codestriker.pm
lib/Codestriker/Http Input.pm
Log:
Reduce the size of the email fields from 255 to 200, as now that we are
using utf8, this made some tables go over the 1000 byte limit that
affects some MySQL installations.
Index: install.pl
===================================================================
RCS file: /cvsroot/codestriker/codestriker/bin/install.pl,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -r1.10 -r1.11
--- install.pl 15 Jun 2006 06:46:18 -0000 1.10
+++ install.pl 21 Jul 2006 06:25:27 -0000 1.11
@@ -339,7 +339,7 @@
my $topic_table =
table(name => "topic",
columns => [col(name=>"id", type=>$INT32, pk=>1),
- col(name=>"author", type=>$VARCHAR, length=>255),
+ col(name=>"author", type=>$VARCHAR, length=>200),
col(name=>"title", type=>$VARCHAR, length=>255),
col(name=>"description", type=>$TEXT),
col(name=>"document", type=>$TEXT),
@@ -361,7 +361,7 @@
my $topichistory_table =
table(name => "topichistory",
columns => [col(name=>"topicid", type=>$INT32, pk=>1),
- col(name=>"author", type=>$VARCHAR, length=>255),
+ col(name=>"author", type=>$VARCHAR, length=>200),
col(name=>"title", type=>$VARCHAR, length=>255),
col(name=>"description", type=>$TEXT, length=>255),
col(name=>"state", type=>$INT16),
@@ -371,7 +371,7 @@
col(name=>"projectid", type=>$INT32),
col(name=>"reviewers", type=>$TEXT),
col(name=>"cc", type=>$TEXT, mandatory=>0),
- col(name=>"modified_by_user", type=>$VARCHAR, length=>255,
mandatory=>0)
+ col(name=>"modified_by_user", type=>$VARCHAR, length=>200,
mandatory=>0)
],
indexes => [dbindex(name=>"th_idx", column_names=>["topicid"])]);
@@ -379,7 +379,7 @@
my $topicviewhistory_table =
table(name => "topicviewhistory",
columns => [col(name=>"topicid", type=>$INT32),
- col(name=>"email", type=>$VARCHAR, length=>255,
mandatory=>0),
+ col(name=>"email", type=>$VARCHAR, length=>200,
mandatory=>0),
col(name=>"creation_ts", type=>$DATETIME)
],
indexes => [dbindex(name=>"tvh_idx", column_names=>["topicid"])]);
@@ -389,7 +389,7 @@
my $topicusermetric_table =
table(name => "topicusermetric",
columns => [col(name=>"topicid", type=>$INT32, pk=>1),
- col(name=>"email", type=>$VARCHAR, length=>255, pk=>1),
+ col(name=>"email", type=>$VARCHAR, length=>200, pk=>1),
col(name=>"metric_name", type=>$VARCHAR, length=>80, pk=>1),
col(name=>"value", type=>$FLOAT)
],
@@ -422,7 +422,7 @@
table(name => "commentdata",
columns => [col(name=>"commentstateid", type=>$INT32),
col(name=>"commentfield", type=>$TEXT),
- col(name=>"author", type=>$VARCHAR, length=>255),
+ col(name=>"author", type=>$VARCHAR, length=>200),
col(name=>"creation_ts", type=>$DATETIME)
],
indexes => [dbindex(name=>"comment_idx",
@@ -465,14 +465,14 @@
col(name=>"metric_value", type=>$VARCHAR, length=>80),
col(name=>"version", type=>$INT32, pk=>1),
col(name=>"modified_ts", type=>$DATETIME),
- col(name=>"modified_by_user", type=>$VARCHAR, length=>255)
+ col(name=>"modified_by_user", type=>$VARCHAR, length=>200)
]);
# Indicate what participants there are in a topic.
my $participant_table =
table(name => "participant",
columns => [col(name=>"topicid", type=>$INT32, pk=>1),
- col(name=>"email", type=>$VARCHAR, length=>255, pk=>1),
+ col(name=>"email", type=>$VARCHAR, length=>200, pk=>1),
col(name=>"type", type=>$INT16, pk=>1),
col(name=>"state", type=>$INT16),
col(name=>"modified_ts", type=>$DATETIME),
Index: Codestriker.pm
===================================================================
RCS file: /cvsroot/codestriker/codestriker/lib/Codestriker.pm,v
retrieving revision 1.95
retrieving revision 1.96
diff -u -r1.95 -r1.96
--- Codestriker.pm 18 Jul 2006 06:14:10 -0000 1.95
+++ Codestriker.pm 21 Jul 2006 06:25:28 -0000 1.96
@@ -31,7 +31,7 @@
);
# Version of Codestriker.
-$Codestriker::VERSION = "1.9.2-rc2";
+$Codestriker::VERSION = "1.9.2-rc3";
# Default title to display on each Codestriker screen.
$Codestriker::title = "Codestriker $Codestriker::VERSION";
Index: Input.pm
===================================================================
RCS file: /cvsroot/codestriker/codestriker/lib/Codestriker/Http/Input.pm,v
retrieving revision 1.43
retrieving revision 1.44
diff -u -r1.43 -r1.44
--- Input.pm 26 May 2006 05:42:49 -0000 1.43
+++ Input.pm 21 Jul 2006 06:25:28 -0000 1.44
@@ -351,14 +351,14 @@
sub _untaint_email($$) {
my ($self, $name) = @_;
- $self->_untaint($name, '[\s]*[-_\w\.]{1,255}([EMAIL
PROTECTED],255})?[\s]*');
+ $self->_untaint($name, '[\s]*[-_\w\.]{1,200}([EMAIL
PROTECTED],200})?[\s]*');
}
# Untaint a list of email addresses.
sub _untaint_emails($$) {
my ($self, $name) = @_;
- $self->_untaint($name, '[\s]*([-_\w\.]{1,255}([EMAIL
PROTECTED],255})?[\s,;]*){1,100}[\s]*');
+ $self->_untaint($name, '[\s]*([-_\w\.]{1,200}([EMAIL
PROTECTED],200})?[\s,;]*){1,100}[\s]*');
}
# Untaint a list of bug ids.
-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys -- and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Codestriker-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/codestriker-commits
