use utf8;
package Hydra::Schema::Result::Projects;
use strict;
use warnings;
use base 'DBIx::Class::Core';
__PACKAGE__->load_components("+Hydra::Component::ToJSON");
__PACKAGE__->table("projects");
__PACKAGE__->add_columns(
"name",
{ data_type => "text", is_nullable => 0 },
"displayname",
{ data_type => "text", is_nullable => 0 },
"description",
{ data_type => "text", is_nullable => 1 },
"enabled",
{ data_type => "integer", default_value => 1, is_nullable => 0 },
"hidden",
{ data_type => "integer", default_value => 0, is_nullable => 0 },
"owner",
{ data_type => "text", is_foreign_key => 1, is_nullable => 0 },
"homepage",
{ data_type => "text", is_nullable => 1 },
"declfile",
{ data_type => "text", is_nullable => 1 },
"decltype",
{ data_type => "text", is_nullable => 1 },
"declvalue",
{ data_type => "text", is_nullable => 1 },
);
__PACKAGE__->set_primary_key("name");
__PACKAGE__->has_many(
"buildmetrics",
"Hydra::Schema::Result::BuildMetrics",
{ "foreign.project" => "self.name" },
undef,
);
__PACKAGE__->has_many(
"jobsetrenames",
"Hydra::Schema::Result::JobsetRenames",
{ "foreign.project" => "self.name" },
undef,
);
__PACKAGE__->has_many(
"jobsets",
"Hydra::Schema::Result::Jobsets",
{ "foreign.project" => "self.name" },
undef,
);
__PACKAGE__->belongs_to(
"owner",
"Hydra::Schema::Result::Users",
{ username => "owner" },
{ is_deferrable => 0, on_delete => "NO ACTION", on_update => "CASCADE" },
);
__PACKAGE__->has_many(
"projectmembers",
"Hydra::Schema::Result::ProjectMembers",
{ "foreign.project" => "self.name" },
undef,
);
__PACKAGE__->has_many(
"starredjobs",
"Hydra::Schema::Result::StarredJobs",
{ "foreign.project" => "self.name" },
undef,
);
__PACKAGE__->many_to_many("usernames", "projectmembers", "username");
use JSON::MaybeXS;
sub as_json {
my $self = shift;
my %json = (
"name" => $self->get_column("name") // "",
"displayname" => $self->get_column("displayname") // "",
"description" => $self->get_column("description") // "",
"homepage" => $self->get_column("homepage") // "",
"owner" => $self->get_column("owner") // "",
"enabled" => $self->get_column("enabled") ? JSON::MaybeXS::true : JSON::MaybeXS::false,
"hidden" => $self->get_column("hidden") ? JSON::MaybeXS::true : JSON::MaybeXS::false,
"jobsets" => [ map { $_->name } $self->jobsets ]
);
my %decl = (
"declarative" => {
"file" => $self->get_column("declfile") // "",
"type" => $self->get_column("decltype") // "",
"value" => $self->get_column("declvalue") // ""
}
);
%json = (%json, %decl) if !($decl{"declarative"}->{"file"} eq "");
return \%json;
}
1;