File Coverage

blib/lib/Perl5/CoreSmokeDB/Schema/Result/Config.pm

Criterion	Covered	Total	%
statement	12	28	42.8
branch	0	4	0.0
condition			n/a
subroutine	4	9	44.4
pod	1	5	20.0
total	17	46	36.9

use utf8;

# Created by DBIx::Class::Schema::Loader
# DO NOT MODIFY THE FIRST PART OF THIS FILE

=head1 NAME

Perl5::CoreSmokeDB::Schema::Result::Config

=cut

use strict;
use warnings;

use base 'DBIx::Class::Core';

=head1 COMPONENTS LOADED

=over 4

=item * L<DBIx::Class::InflateColumn::DateTime>

=back

=cut

__PACKAGE__->load_components("InflateColumn::DateTime");

=head1 TABLE: C<config>

=cut

__PACKAGE__->table("config");

=head1 ACCESSORS

=head2 id

  data_type: 'integer'
  is_auto_increment: 1
  is_nullable: 0
  sequence: 'config_id_seq'

=head2 report_id

  data_type: 'integer'
  is_foreign_key: 1
  is_nullable: 0

=head2 arguments

  data_type: 'text'
  is_nullable: 0
  original: {data_type => "varchar"}

=head2 debugging

  data_type: 'text'
  is_nullable: 0
  original: {data_type => "varchar"}

=head2 started

  data_type: 'timestamp with time zone'
  is_nullable: 1

=head2 duration

  data_type: 'integer'
  is_nullable: 1

=head2 cc

  data_type: 'text'
  is_nullable: 1
  original: {data_type => "varchar"}

=head2 ccversion

  data_type: 'text'
  is_nullable: 1
  original: {data_type => "varchar"}

=cut

__PACKAGE__->add_columns(
  "id",
  {
    data_type         => "integer",
    is_auto_increment => 1,
    is_nullable       => 0,
    sequence          => "config_id_seq",
  },
  "report_id",
  { data_type => "integer", is_foreign_key => 1, is_nullable => 0 },
  "arguments",
  {
    data_type   => "text",
    is_nullable => 0,
    original    => { data_type => "varchar" },
  },
  "debugging",
  {
    data_type   => "text",
    is_nullable => 0,
    original    => { data_type => "varchar" },
  },
  "started",
  { data_type => "timestamp with time zone", is_nullable => 1 },
  "duration",
  { data_type => "integer", is_nullable => 1 },
  "cc",
  {
    data_type   => "text",
    is_nullable => 1,
    original    => { data_type => "varchar" },
  },
  "ccversion",
  {
    data_type   => "text",
    is_nullable => 1,
    original    => { data_type => "varchar" },
  },
);

=head1 PRIMARY KEY

=over 4

=item * L</id>

=back

=cut

__PACKAGE__->set_primary_key("id");

=head1 RELATIONS

=head2 report

Type: belongs_to

Related object: L<Perl5::CoreSmokeDB::Schema::Result::Report>

=cut

__PACKAGE__->belongs_to(
  "report",
  "Perl5::CoreSmokeDB::Schema::Result::Report",
  { id => "report_id" },
  { is_deferrable => 0, on_delete => "NO ACTION", on_update => "NO ACTION" },
);

=head2 results

Type: has_many

Related object: L<Perl5::CoreSmokeDB::Schema::Result::Result>

=cut

__PACKAGE__->has_many(
  "results",
  "Perl5::CoreSmokeDB::Schema::Result::Result",
  { "foreign.config_id" => "self.id" },
  { cascade_copy => 0, cascade_delete => 0 },
);


# Created by DBIx::Class::Schema::Loader v0.07049 @ 2022-09-06 09:15:22
# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:l/lxpTgyv35unrcVapM8JQ

    my $self = shift;
    return join("##", $self->cc, $self->ccversion);
}

    my $self = shift;
    return join(" - ", $self->cc, $self->ccversion);
}

    my $self = shift;
    return {value => $self->c_compiler_key, label => $self->c_compiler_label};
}

    my $self = shift;
    return $self->debugging eq 'D'
        ? join(" ", $self->arguments, 'DEBUGGING')
        : $self->arguments;
}

=head2 $record->as_hashref([$is_full])

Returns a HashRef with the inflated columns.

=head3 Parameters

Positional:

=over

=item 1. C<'full'>

If the word C<full> is passed as the first argument the related
C<results> are also included in the resulting HashRef.

=back

=cut

    my $self = shift;
    my ($is_full) = @_;

    my $record = { $self->get_inflated_columns };
    $record->{started} = $self->started->rfc3339;

    if ($is_full eq 'full') {
        $record->{results} = [ map { $_->as_hashref($is_full) } $self->results ];
    }

    return $record;
}

1;