diff --git a/lib/NGCP/Schema/Result/acl_role_mappings.pm b/lib/NGCP/Schema/Result/acl_role_mappings.pm new file mode 100644 index 00000000..aa25b882 --- /dev/null +++ b/lib/NGCP/Schema/Result/acl_role_mappings.pm @@ -0,0 +1,118 @@ +package NGCP::Schema::Result::acl_role_mappings; + +use strict; +use warnings; + +use Scalar::Util qw(blessed); +use parent 'DBIx::Class::Core'; + +our $VERSION = '2.007'; + +__PACKAGE__->load_components("InflateColumn::DateTime", "Helper::Row::ToJSON"); + +__PACKAGE__->table("billing.acl_role_mappings"); + +__PACKAGE__->add_columns( + "accessor_id", + { + data_type => "integer", + extra => { unsigned => 1 }, + is_nullable => 0, + is_foreign_key => 1, + }, + "has_access_to_id", + { + data_type => "integer", + extra => { unsigned => 1 }, + is_nullable => 0, + is_foreign_key => 1, + }, +); + +__PACKAGE__->set_primary_key(qw/accessor_id has_access_to_id/); + +sub TO_JSON { + my ($self) = @_; + return { + map { blessed($_) && $_->isa('DateTime') ? $_->datetime : $_ } %{ $self->next::method } + }; +} + +1; +__END__ + +=encoding UTF-8 + +=head1 NAME + +NGCP::Schema::Result::acl_role_mappings + +=head1 DESCRIPTION + +This module is a schema class for the NGCP database table "billing.acl_role_mappings". + +=head1 COMPONENTS LOADED + +=over 4 + +=item * L + +=item * L + +=back + +=head1 TABLE: C + +=head1 ACCESSORS + +=head2 accessor_id + + data_type => "integer", + extra => { unsigned => 1 }, + is_nullable => 0 + +=head2 has_access_to_id + + data_type => "integer", + extra => { unsigned => 1 }, + is_nullable => 0 + + +=head1 PRIMARY KEY + +=over 4 + +=item * L + +=item * L + +=back + +=head1 RELATIONS + +=head2 acl_roles + +Type: belongs_to + +Related object: L + +=head1 AUTHOR + +Sipwise Development Team C<< >> + +=head1 LICENSE + +This software is Copyright © 2017 by Sipwise GmbH, Austria. + +This program is free software; you can redistribute it and/or modify +it under the terms of the GNU General Public License as published by +the Free Software Foundation; either version 3 of the License, or +(at your option) any later version. + +This program is distributed in the hope that it will be useful, +but WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +GNU General Public License for more details. + +You should have received a copy of the GNU General Public License +along with this package. If not, see . diff --git a/lib/NGCP/Schema/Result/acl_roles.pm b/lib/NGCP/Schema/Result/acl_roles.pm new file mode 100644 index 00000000..4ccaf3d5 --- /dev/null +++ b/lib/NGCP/Schema/Result/acl_roles.pm @@ -0,0 +1,155 @@ +package NGCP::Schema::Result::acl_roles; + +use strict; +use warnings; + +use Scalar::Util qw(blessed); +use parent 'DBIx::Class::Core'; + +our $VERSION = '2.007'; + +__PACKAGE__->load_components("InflateColumn::DateTime", "Helper::Row::ToJSON"); + +__PACKAGE__->table("billing.acl_roles"); + +__PACKAGE__->add_columns( + "id", + { + data_type => "integer", + extra => { unsigned => 1 }, + is_auto_increment => 1, + is_nullable => 0, + }, + "role", + { data_type => "varchar", is_nullable => 0, size => 64 }, + "is_acl", + { + data_type => "tinyint", + is_nullable => 0, + default_value => 0 + }, +); + +__PACKAGE__->set_primary_key("id"); + +__PACKAGE__->add_unique_constraint("role_idx", ["role"]); + +__PACKAGE__->has_many( + "admins", + "NGCP::Schema::Result::admins", + { "foreign.role_id" => "self.id" }, + { cascade_copy => 0, cascade_delete => 0 }, +); + +__PACKAGE__->has_many( + "acl_role_mappings", + "NGCP::Schema::Result::billing_acl_role_mappings", + { "foreign.accessor_id" => "self.id" }, + { cascade_copy => 0, cascade_delete => 0 }, +); + +sub TO_JSON { + my ($self) = @_; + return { + map { blessed($_) && $_->isa('DateTime') ? $_->datetime : $_ } %{ $self->next::method } + }; +} + +1; +__END__ + +=encoding UTF-8 + +=head1 NAME + +NGCP::Schema::Result::acl_roles + +=head1 DESCRIPTION + +This module is a schema class for the NGCP database table "billing.acl_roles". + +=head1 COMPONENTS LOADED + +=over 4 + +=item * L + +=item * L + +=back + +=head1 TABLE: C + +=head1 ACCESSORS + +=head2 id + + data_type: 'integer' + extra: {unsigned => 1} + is_auto_increment: 1 + is_nullable: 0 + +=head2 role + + data_type => "varchar", + is_nullable => 0, + size => 64 + +=head2 is_acl + + data_type => "tinyint", + is_nullable => 0, + default_value => 0 + +=head1 PRIMARY KEY + +=over 4 + +=item * L + +=back + +=head1 UNIQUE CONSTRAINTS + +=head2 C + +=over 4 + +=item * L + +=back + +=head1 RELATIONS + +=head2 acl_role_mappings + +Type: has_many + +Related object: L + +=head2 admins + +Type: has_many + +Related object: L + +=head1 AUTHOR + +Sipwise Development Team C<< >> + +=head1 LICENSE + +This software is Copyright © 2017 by Sipwise GmbH, Austria. + +This program is free software; you can redistribute it and/or modify +it under the terms of the GNU General Public License as published by +the Free Software Foundation; either version 3 of the License, or +(at your option) any later version. + +This program is distributed in the hope that it will be useful, +but WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +GNU General Public License for more details. + +You should have received a copy of the GNU General Public License +along with this package. If not, see . diff --git a/lib/NGCP/Schema/Result/admins.pm b/lib/NGCP/Schema/Result/admins.pm index 4cddf67a..ec93c755 100644 --- a/lib/NGCP/Schema/Result/admins.pm +++ b/lib/NGCP/Schema/Result/admins.pm @@ -27,6 +27,13 @@ __PACKAGE__->add_columns( is_foreign_key => 1, is_nullable => 1, }, + "role_id", + { + data_type => "integer", + extra => { unsigned => 1 }, + is_foreign_key => 1, + is_nullable => 0, + }, "login", { data_type => "varchar", is_nullable => 0, size => 31 }, "md5pass", @@ -91,6 +98,13 @@ __PACKAGE__->belongs_to( }, ); +__PACKAGE__->belongs_to( + "acl_role", + "NGCP::Schema::Result::acl_roles", + {id => "role_id"}, + { is_deferrable => 1, on_delete => "CASCADE", on_update => "CASCADE" }, +); + sub TO_JSON { my ($self) = @_; return { @@ -139,6 +153,13 @@ This module is a schema class for the NGCP database table "billing.admins". is_foreign_key: 1 is_nullable: 1 +=head2 role_id + + data_type: 'integer' + extra: {unsigned => 1} + is_foreign_key: 1 + is_nullable: 1 + =head2 login data_type: 'varchar'