| line |
true |
false |
branch |
|
116
|
0 |
297 |
if (@_)
|
|
118
|
0 |
0 |
$_[0] ? :
|
|
122
|
0 |
297 |
if defined $self->{'undef_overrides_default'}
|
|
124
|
297 |
0 |
$self->parent ? :
|
|
126
|
0 |
297 |
defined $parent_default ? :
|
|
133
|
0 |
0 |
if ($self->not_null and $self->{'undef_overrides_default'})
|
|
149
|
0 |
157 |
if UNIVERSAL::isa($_[0], 'Rose::DB')
|
|
158
|
157 |
0 |
$parent ? :
|
|
|
0 |
157 |
$db ? :
|
|
162
|
0 |
157 |
if $error
|
|
164
|
157 |
0 |
unless @_
|
|
168
|
0 |
0 |
if ($parent and $self->is_primary_key_member)
|
|
187
|
0 |
0 |
$self->method_name('set') ? :
|
|
189
|
0 |
0 |
if ($self->method_uses_formatted_key($type))
|
|
203
|
23 |
49 |
unless @types
|
|
232
|
194 |
0 |
if ($type eq 'get_set') { }
|
|
|
0 |
0 |
elsif ($type eq 'set') { }
|
|
|
0 |
0 |
elsif ($type eq 'get') { }
|
|
252
|
193 |
104 |
if ($type eq 'get_set') { }
|
|
|
0 |
104 |
elsif ($type eq 'get') { }
|
|
|
0 |
104 |
elsif ($type eq 'set') { }
|
|
274
|
53 |
245 |
wantarray ? :
|
|
285
|
297 |
0 |
wantarray ? :
|
|
298
|
251 |
14845 |
if (@_)
|
|
308
|
886 |
5 |
unless $_[0]->alias
|
|
314
|
0 |
251 |
if (my $db = shift()) { }
|
|
329
|
0 |
246 |
if ($db) { }
|
|
331
|
0 |
0 |
if (defined $table) { }
|
|
359
|
82 |
0 |
if @_
|
|
361
|
0 |
82 |
unless ($self->is_primary_key_member)
|
|
381
|
0 |
0 |
if (defined $col_info->{'COLUMN_DEF'})
|
|
386
|
0 |
0 |
if ($col_info->{'NULLABLE'} == 0) { }
|
|
|
0 |
0 |
elsif ($col_info->{'NULLABLE'} == 1) { }
|
|
396
|
0 |
0 |
if (my $db_type = $col_info->{'RDBO_DB_TYPE'})
|
|
401
|
0 |
0 |
if ($col_info->{'REMARKS'})
|
|
421
|
0 |
0 |
if ($attr =~ /^(?: name(?:_sql)? | is_primary_key_member |
primary_key_position | method_name | method_code |
made_method_types | ordinal_position | select_sql |
undef_overrides_default | (?:builtin_)?triggers |
(?:builtin_)?trigger_index )$/x)
|
|
430
|
0 |
0 |
$self->can($attr) ? :
|
|
433
|
0 |
0 |
if ($attr eq 'check_in' || $attr eq 'values' and ref $val and ref $val eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($attr eq 'smart_modification' and $self->smart_modification == ref($self)->new->smart_modification || $self->parent && $self->smart_modification == $self->parent->default_smart_modification) { }
|
|
|
0 |
0 |
elsif ($attr eq 'undef_overrides_default' and $self->undef_overrides_default == ref($self)->new->undef_overrides_default || $self->parent && $self->undef_overrides_default == $self->parent->column_undef_overrides_default) { }
|
|
|
0 |
0 |
elsif (not defined $val or ref $val or $attr eq 'not_null' and not $self->not_null) { }
|
|
436
|
0 |
0 |
if ($self->type eq 'set') { }
|
|
464
|
0 |
0 |
if ($attr eq 'alias' and !defined($val) || $val eq $self->name)
|
|
469
|
0 |
0 |
if ($attr eq 'overflow' and $val eq $self->init_overflow)
|
|
475
|
0 |
0 |
if ($attr eq 'default_value_sequence_name')
|
|
479
|
0 |
0 |
if ($self->type =~ /^(?:big)?serial$/) { }
|
|
490
|
0 |
0 |
if ($seq =~ /^[^.]+\./)
|
|
493
|
0 |
0 |
if $schema
|
|
497
|
0 |
0 |
if (lc $seq ne lc $auto_seq)
|
|
510
|
0 |
0 |
if ($attr =~ /_method_name$/)
|
|
518
|
0 |
0 |
if $method ne $self->build_method_name_for_type($type)
|
|
521
|
0 |
0 |
if $skip
|
|
538
|
0 |
0 |
$meta ? :
|
|
|
0 |
0 |
defined $args{'indent'} ? :
|
|
541
|
0 |
0 |
defined $args{'inline'} ? :
|
|
550
|
0 |
0 |
if (defined $name_padding and $name_padding > 0) { }
|
|
570
|
0 |
0 |
if ($_[0] eq 'type') { }
|
|
|
0 |
0 |
elsif ($_[1] eq 'type') { }
|
|
586
|
262 |
2 |
unless @_
|
|
588
|
2 |
0 |
if ($_[0]) { }
|
|
590
|
0 |
2 |
if ($self->is_primary_key_member)
|
|
622
|
2 |
0 |
if (my $meta = $self->parent)
|
|
646
|
0 |
0 |
if not $self->{'__xrdbopriv_in_db'} or $self->{'__xrdbopriv_lazy_loaded'}{$name}
|
|
694
|
0 |
3877 |
unless $self->trigger_event_exists($event)
|
|
697
|
0 |
3877 |
if (@_)
|
|
699
|
0 |
0 |
@_ > 1 ? :
|
|
701
|
0 |
0 |
unless (ref $codes eq 'ARRAY')
|
|
709
|
0 |
0 |
unless ((ref $code || '') eq 'CODE')
|
|
715
|
0 |
0 |
@$codes ? :
|
|
735
|
1 |
2 |
$event ? :
|
|
739
|
0 |
15 |
unless $self->trigger_event_exists($event)
|
|
756
|
4 |
10 |
if (@_ == 3 and $self->trigger_event_exists($_[1]))
|
|
775
|
27 |
22 |
if (@_ == 3 and $self->trigger_event_exists($_[1])) { }
|
|
790
|
14 |
35 |
$builtin ? :
|
|
792
|
0 |
49 |
unless $self->trigger_event_exists($event)
|
|
795
|
0 |
49 |
unless ((ref $code || '') eq 'CODE')
|
|
800
|
47 |
2 |
if ($position =~ /^(?:end|last|push)$/) { }
|
|
|
2 |
0 |
elsif ($position =~ /^(?:start|first|unshift)$/) { }
|
|
804
|
13 |
34 |
if ($builtin) { }
|
|
818
|
1 |
1 |
$builtin ? :
|
|
827
|
1 |
1 |
if ($builtin) { }
|
|
846
|
0 |
4 |
unless $_[0]{'trigger_index'}{$_[1]}
|
|
847
|
6 |
4 |
unless $_[0]{'builtin_trigger_index'}{$_[1]}
|
|
853
|
35 |
8 |
if (@_)
|
|
865
|
14 |
8 |
if (@_)
|
|
879
|
0 |
4 |
unless my $name = $args{'name'}
|
|
883
|
2 |
2 |
$builtin ? :
|
|
884
|
2 |
2 |
$builtin ? :
|
|
886
|
0 |
4 |
unless $self->trigger_event_exists($event)
|
|
889
|
2 |
2 |
$builtin ? :
|
|
892
|
0 |
4 |
unless (defined $index)
|
|
902
|
2 |
2 |
$builtin ? :
|
|
911
|
4 |
2 |
if $indexes->{$name} > $index
|
|
923
|
53 |
245 |
if (defined $event) { }
|
|
925
|
0 |
53 |
unless $method_types = $self->event_method_type($event)
|
|
955
|
0 |
297 |
unless my $method_name = $self->method_name($type)
|
|
961
|
297 |
0 |
unless ($method_code)
|
|
978
|
0 |
297 |
if $builtins = $self->builtin_triggers('inflate')
|
|
981
|
0 |
297 |
if $builtins = $self->builtin_triggers('deflate')
|
|
984
|
0 |
297 |
if $builtins = $self->builtin_triggers('on_load')
|
|
987
|
0 |
297 |
if $builtins = $self->builtin_triggers('on_save')
|
|
990
|
0 |
297 |
if $builtins = $self->builtin_triggers('on_set')
|
|
993
|
0 |
297 |
if $builtins = $self->builtin_triggers('on_get')
|
|
1004
|
193 |
104 |
if ($type eq 'get_set') { }
|
|
|
0 |
104 |
elsif ($type eq 'get') { }
|
|
|
0 |
104 |
elsif ($type eq 'set') { }
|
|
1006
|
0 |
193 |
if ($inflate_code or $deflate_code or $on_load_code or $on_save_code or $on_set_code or $on_get_code or $lazy_load_code) { }
|
|
1015
|
0 |
0 |
if ($column->method_should_set('get_set', \@_)) { }
|
|
1019
|
0 |
0 |
if ($self->{'__xrdbopriv_loading'}) { }
|
|
1021
|
0 |
0 |
unless $uses_formatted_key
|
|
1025
|
0 |
0 |
if (wantarray) { }
|
|
1034
|
0 |
0 |
unless ($column->{'triggers_disabled'} or $self->{'triggers_disabled'})
|
|
1038
|
0 |
0 |
if ($on_load_code)
|
|
1047
|
0 |
0 |
wantarray ? :
|
|
1051
|
0 |
0 |
unless $uses_formatted_key
|
|
1055
|
0 |
0 |
if (wantarray) { }
|
|
1064
|
0 |
0 |
unless ($column->{'triggers_disabled'} or $self->{'triggers_disabled'})
|
|
1068
|
0 |
0 |
if ($on_set_code)
|
|
1077
|
0 |
0 |
wantarray ? :
|
|
1084
|
0 |
0 |
if ($self->{'__xrdbopriv_saving'}) { }
|
|
1086
|
0 |
0 |
unless ($column->{'triggers_disabled'} or $self->{'triggers_disabled'})
|
|
1090
|
0 |
0 |
if ($deflate_code)
|
|
1092
|
0 |
0 |
if ($uses_formatted_key) { }
|
|
1094
|
0 |
0 |
unless my $db = $self->db
|
|
1097
|
0 |
0 |
unless (defined $$self{join $;, $formatted_key, $driver})
|
|
1102
|
0 |
0 |
unless defined $value
|
|
1117
|
0 |
0 |
unless defined $value
|
|
1129
|
0 |
0 |
if ($on_save_code and not $self->{'__xrdbopriv_saving_for_load'})
|
|
1142
|
0 |
0 |
unless ($column->{'triggers_disabled'} or $self->{'triggers_disabled'})
|
|
1146
|
0 |
0 |
if ($lazy_load_code)
|
|
1154
|
0 |
0 |
if ($inflate_code)
|
|
1159
|
0 |
0 |
if (defined $self->{$key}) { }
|
|
1172
|
0 |
0 |
unless ($self->{$is_inflated_key} and $key_was_defined)
|
|
1174
|
0 |
0 |
if ($uses_formatted_key) { }
|
|
1181
|
0 |
0 |
unless my $db = $self->db
|
|
1205
|
0 |
0 |
if ($on_get_code)
|
|
1232
|
0 |
0 |
if ($inflate_code or $deflate_code or $on_save_code or $on_get_code or $lazy_load_code) { }
|
|
1238
|
0 |
0 |
if ($self->{'__xrdbopriv_saving'}) { }
|
|
1240
|
0 |
0 |
unless ($column->{'triggers_disabled'} or $self->{'triggers_disabled'})
|
|
1244
|
0 |
0 |
if ($deflate_code)
|
|
1246
|
0 |
0 |
if ($uses_formatted_key) { }
|
|
1248
|
0 |
0 |
unless my $db = $self->db
|
|
1251
|
0 |
0 |
unless (defined $$self{join $;, $formatted_key, $driver})
|
|
1256
|
0 |
0 |
unless defined $value
|
|
1271
|
0 |
0 |
unless defined $value
|
|
1283
|
0 |
0 |
if ($on_save_code and not $self->{'__xrdbopriv_saving_for_load'})
|
|
1296
|
0 |
0 |
unless ($column->{'triggers_disabled'} or $self->{'triggers_disabled'})
|
|
1300
|
0 |
0 |
if ($lazy_load_code)
|
|
1308
|
0 |
0 |
if ($inflate_code)
|
|
1313
|
0 |
0 |
if (defined $self->{$key}) { }
|
|
1326
|
0 |
0 |
unless ($self->{$is_inflated_key} and $key_was_defined)
|
|
1328
|
0 |
0 |
if ($uses_formatted_key) { }
|
|
1335
|
0 |
0 |
unless my $db = $self->db
|
|
1359
|
0 |
0 |
if ($on_get_code)
|
|
1385
|
0 |
0 |
if ($on_load_code or $on_set_code) { }
|
|
1391
|
0 |
0 |
if ($self->{'__xrdbopriv_loading'}) { }
|
|
1393
|
0 |
0 |
unless $uses_formatted_key
|
|
1397
|
0 |
0 |
if (wantarray) { }
|
|
1406
|
0 |
0 |
unless ($column->{'triggers_disabled'} or $self->{'triggers_disabled'})
|
|
1410
|
0 |
0 |
if ($on_load_code)
|
|
1419
|
0 |
0 |
wantarray ? :
|
|
1423
|
0 |
0 |
unless $uses_formatted_key
|
|
1427
|
0 |
0 |
if (wantarray) { }
|
|
1436
|
0 |
0 |
unless ($column->{'triggers_disabled'} or $self->{'triggers_disabled'})
|
|
1440
|
0 |
0 |
if ($on_set_code)
|
|
1449
|
0 |
0 |
wantarray ? :
|
|
1470
|
0 |
891 |
unless defined $type
|
|
1472
|
594 |
297 |
if (@_)
|
|
1491
|
55 |
190 |
if ($self->accessor_method_name eq $self->mutator_method_name and $self->mutator_method_name eq $self->rw_method_name and $self->rw_method_name ne $self->name)
|