Improve performance of standings/update_status. Break standings API

[gruntmaster-data.git] / lib / Gruntmaster / Data / Result / Job.pm

diff --git a/lib/Gruntmaster/Data/Result/Job.pm b/lib/Gruntmaster/Data/Result/Job.pm
index b52ddfccf96afb29ef29d41b5eecc1e9cf9ca1f1..0fcf8c0221035e632447d331065eb0c16e13296a 100644 (file)
--- a/lib/Gruntmaster/Data/Result/Job.pm
+++ b/lib/Gruntmaster/Data/Result/Job.pm
@@ -85,7 +85,7 @@ __PACKAGE__->table("jobs");
 
 =head2 results
 
-  data_type: 'json'
+  data_type: 'text'
   is_nullable: 1
 
 =head2 source
@@ -130,7 +130,7 @@ __PACKAGE__->add_columns(
   "result_text",
   { data_type => "text", is_nullable => 1 },
   "results",
-  { data_type => "json", is_nullable => 1 },
+  { data_type => "text", is_nullable => 1 },
   "source",
   { data_type => "text", is_nullable => 0 },
   "owner",
@@ -166,7 +166,7 @@ __PACKAGE__->belongs_to(
   {
     is_deferrable => 0,
     join_type     => "LEFT",
-    on_delete     => "NO ACTION",
+    on_delete     => "CASCADE",
     on_update     => "NO ACTION",
   },
 );
@@ -183,7 +183,7 @@ __PACKAGE__->belongs_to(
   "owner",
   "Gruntmaster::Data::Result::User",
   { id => "owner" },
-  { is_deferrable => 0, on_delete => "NO ACTION", on_update => "NO ACTION" },
+  { is_deferrable => 0, on_delete => "CASCADE", on_update => "NO ACTION" },
 );
 
 =head2 problem
@@ -198,13 +198,57 @@ __PACKAGE__->belongs_to(
   "problem",
   "Gruntmaster::Data::Result::Problem",
   { id => "problem" },
-  { is_deferrable => 0, on_delete => "NO ACTION", on_update => "NO ACTION" },
+  { is_deferrable => 0, on_delete => "CASCADE", on_update => "NO ACTION" },
 );
 
+=head2 problem_statuses
+
+Type: has_many
 
-# Created by DBIx::Class::Schema::Loader v0.07039 @ 2014-03-24 09:25:07
-# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:mDHQWFk/K7q/nHu+Z3a0+A
+Related object: L<Gruntmaster::Data::Result::ProblemStatus>
 
+=cut
+
+__PACKAGE__->has_many(
+  "problem_statuses",
+  "Gruntmaster::Data::Result::ProblemStatus",
+  { "foreign.job" => "self.id" },
+  { cascade_copy => 0, cascade_delete => 0 },
+);
+
+
+# Created by DBIx::Class::Schema::Loader v0.07042 @ 2014-12-11 23:51:27
+# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:D49ekK0vGg/7b8xXZoYTWQ
+
+sub rawcontest { shift->get_column('contest') }
+sub rawowner { shift->get_column('owner') }
+sub rawproblem { shift->get_column('problem') }
+
+sub rerun {
+       shift->update({daemon => undef, result => -2, result_text => undef});
+}
 
-# You can replace this text with custom code or comments, and it will be preserved on regeneration
 1;
+
+__END__
+
+=head1 METHODS
+
+=head2 rerun
+
+Reruns this job.
+
+=head1 AUTHOR
+
+Marius Gavrilescu E<lt>marius@ieval.roE<gt>
+
+=head1 COPYRIGHT AND LICENSE
+
+Copyright (C) 2014 by Marius Gavrilescu
+
+This library is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself, either Perl version 5.18.1 or,
+at your option, any later version of Perl 5 you may have available.
+
+
+=cut