Lines Matching refs:self
57 my $self = {};
60 $self->{CHILD} = undef; # name of child workspace
61 $self->{MASTER} = undef; # name of master workspace
62 $self->{EIS_ID} = undef; # id of child workspace in EIS
63 $self->{FILES} = undef; # list of files registered with child
65 $self->{PATCH_FILES} = undef # list of product patch files registered with
67 $self->{MILESTONE} = undef; # master milestone to which child is related
68 $self->{MODULES} = undef; # list of modules belonging to child
69 $self->{INCOMPATIBLE_MODULES} = undef; # list of modules belonging to child
70 $self->{NEW_MODULES} = undef; # list of public new modules belonging to child
71 $self->{NEW_MODULES_PRIV} = undef; # list of private new modules belonging to child
72 $self->{TASKIDS} = undef; # list of tasks registered with child
73 $self->{_CACHED_TAGS} = undef; # list of cached tags (tags are looked up frequently)
74 bless($self, $class);
75 return $self;
89 my $self = shift;
90 if ( !defined($self->{EIS_ID} ) ) {
91 $self->{EIS_ID} = $self->get_eis_id();
93 return $self->{EIS_ID};
103 my $self = shift;
110 if ( !$self->{uc($datum)} # keep order of evaluation
111 || !$self->eis_id()
112 || $self->set_item_in_eis($datum, $item) )
114 $self->{uc($datum)} = $item;
119 if ( !defined($self->{$ucdatum} ) ) {
121 $self->{$ucdatum} = $self->fetch_item_from_eis($datum);
124 return $self->{uc($datum)};
135 my $self = shift;
137 if ( !defined($self->{$ucdatum}) ) {
139 $self->{$ucdatum} = $self->fetch_items_from_eis($datum);
140 return undef if !defined($self->{$ucdatum});
142 return wantarray ? @{$self->{$ucdatum}} : $self->{$ucdatum}
149 my $self = shift;
150 $self->{uc($datum)} = shift if @_;
151 return $self->{uc($datum)};
163 my $self = shift;
168 if ( !$self->master()
169 || !$self->milestone()
170 || !$self->eis_id() )
172 $self->master($master);
173 $self->milestone($milestone);
175 if ( $self->set_master_and_milestone_in_eis($master, $milestone) ) {
176 $self->{'MASTER'} = $self->fetch_item_from_eis('master');
177 $self->{'MILESTONE'} = $self->fetch_item_from_eis('milestone');
180 my @retarray = ($self->{'MASTER'}, $self->{'MILESTONE'});
188 my $self = shift;
190 my $is_available = $self->is_cws_name_available_in_eis();
197 my $self = shift;
201 my $child_id = $self->register_child_with_eis($vcsid, $location);
208 my $self = shift;
212 my $rc = $self->promote_child_in_eis($vcsid, $location);
220 my $self = shift;
224 my $items_ref = $self->add_items('modules', $public, $module);
237 my $self = shift;
239 my $items_ref = $self->add_items('modules', undef, @_);
247 my $self = shift;
250 my $items_ref = $self->add_items('taskids', $vcsid, @_);
258 my $self = shift;
266 my $files_ref = $self->files();
268 if ( $self->add_file_to_eis($module, $file, $revision,
280 my $self = shift;
283 my $patch_files_ref = $self->patch_files();
289 if ( $self->add_patch_file_to_eis($file) )
314 my ($self, $master, $milestone) = @_;
315 $master = $self->master() if (!defined $master);
316 $milestone = $self->milestone() if (!defined $milestone);
321 my ($self, $master) = @_;
322 $master = $self->master() if (!defined $master);
334 my $self = shift;
337 my $child = Eis::to_string($self->child());
348 my $self = shift;
351 if ( defined($self->{_CACHED_TAGS}) ) {
352 return @{$self->{_CACHED_TAGS}};
356 my $id = $self->eis_id();
362 my $childws = $self->child();
370 my $current_master = $self->master();
371 my $creation_master = $self->get_creation_master();
376 my $milestone = $self->milestone();
384 …$self->{_CACHED_TAGS} = [$master_branch_tag, $cws_branch_tag, $cws_root_tag, $master_milestone_tag…
385 return @{$self->{_CACHED_TAGS}};
391 my $self = shift;
393 return $self->get_owner_from_eis();
399 my $self = shift;
401 return $self->get_qarep_from_eis();
407 my $self = shift;
412 return $self->save_attachment_in_eis($name, $mediatype, $data);
421 my $self = shift;
423 return $self->get_status_from_eis();
431 my $self = shift;
433 return $self->set_status_in_eis();
440 my $self = shift;
444 return $self->set_integration_milestone_in_eis($milestone, $buildid);
450 my $self = shift;
452 return $self->get_creation_master_from_eis();
458 my $self = shift;
460 return $self->get_public_flag_from_eis();
467 my $self = shift;
469 return $self->get_publicmaster_flag_from_eis();
475 my $self = shift;
477 return $self->get_subversion_flag_from_eis();
482 my $self = shift;
485 return $self->set_subversion_flag_in_eis($value);
489 my $self = shift;
491 return $self->get_scm_from_eis();
495 my $self = shift;
498 return $self->set_scm_in_eis($scm_name);
505 my $self = shift;
509 return $self->is_milestone_registered_with_eis($master, $milestone);
515 my $self = shift;
517 return $self->is_uirelevant_from_eis();
523 my $self = shift;
525 return $self->is_helprelevant_from_eis();
531 my $self = shift;
534 return $self->set_l10n_status_in_eis( $status );
540 my $self = shift;
542 return $self->get_l10n_status_from_eis();
546 my $self = shift;
550 return $self->set_word_count_in_eis( $language , $wordcount );
557 my $self = shift;
559 return $self->get_release_from_eis();
565 my $self = shift;
567 return $self->get_due_date_from_eis();
573 my $self = shift;
575 return $self->get_due_date_qa_from_eis();
582 my $self = shift;
586 return $self->get_is_milestone_used_from_eis($master, $milestone);
592 my $self = shift;
596 return $self->set_current_milestone_in_eis($master, $milestone);
602 my $self = shift;
605 return $self->get_current_milestone_from_eis($master);
610 my $self = shift;
612 return $self->get_milestone_integrated_from_eis();
619 my $self = shift;
621 return $self->get_masters_from_eis();
627 my $self = shift;
630 return $self->get_milestones_from_eis($master);
636 my $self = shift;
637 my $master = $self->master();
638 my $milestone = $self->milestone();
642 my $bid=$self->get_buildid($master,$milestone);
646 return $self->expand_buildid($bid);
654 my $self = shift;
656 return $self->expand_buildid_in_eis($bid);
663 my $self = shift;
668 return $self->set_milestone_buildid_in_eis($master, $milestone, $buildid);
676 my $self = shift;
680 return $self->set_milestone_removed_in_eis($master, $milestone);
688 my $self = shift;
692 my $childworkspaces_arrref = $self->get_childworkspaces_for_milestone($master, $milestone);
703 my $self = shift;
707 return $self->get_buildid_for_milestone($master, $milestone);
715 my $self = shift;
719 return wantarray ? @{$self->get_cws_with_state_from_eis($mws, $status)}
720 : $self->get_cws_with_state_from_eis($mws, $status);
725 my $self = shift;
727 return @{$self->get_task_prios_of_tasks($ref_taskids)};
733 my $self = shift;
736 return $self->get_is_cws_cloneable_from_eis($master);
742 my $self = shift;
745 return $self->clone_cws_in_eis($master);
750 my $self = shift;
756 return $self->set_log_entry_in_eis($commandline, $vcsid, $start, $stop, $comment);
761 my $self = shift;
771 …return $self->set_log_entry_extended_in_eis($commandname, $parameter, $vcsid, $start, $stop, $comm…
809 my $self = shift;
815 $items_ref = $self->modules();
818 $items_ref = $self->taskids();
838 if ( $self->add_items_to_eis($type, $optional_data, \@new_items) ) {
852 my $self = shift;
856 if ( !$self->master() || !$self->child() ) {
860 my $master = Eis::to_string($self->master());
861 my $child = Eis::to_string($self->child());
873 my $self = shift;
877 my $id = $self->eis_id();
891 return $self->{MASTER}
906 my $self = shift;
911 my $id = $self->eis_id();
925 $self->{_CACHED_TAGS} = undef;
930 $self->{_CACHED_TAGS} = undef;
949 my $self = shift;
954 my $id = $self->eis_id();
968 $self->{_CACHED_TAGS} = undef;
981 my $self = shift;
985 my $id = $self->eis_id();
1027 my $self = shift;
1033 my $id = $self->eis_id();
1077 my $self = shift;
1087 my $id = $self->eis_id();
1129 my $self = shift;
1133 my $id = $self->eis_id();
1151 my $self = shift;
1153 if ( !$self->master() ) {
1158 if ( !$self->child() ) {
1164 my $master = Eis::to_string($self->master());
1165 my $child = Eis::to_string($self->child());
1177 my $self = shift;
1181 if ( !$self->master() ) {
1186 if ( !$self->milestone() ) {
1191 if ( !$self->child() ) {
1200 my $master = Eis::to_string($self->master());
1201 my $milestone = Eis::to_string($self->milestone());
1202 my $child = Eis::to_string($self->child());
1219 $self->{EIS_ID} = $result;
1225 my $self = shift;
1230 my $id = $self->eis_id();
1237 if ( !$self->milestone() ) {
1242 my $milestone = Eis::to_string($self->milestone());
1267 my $self = shift;
1270 my $id = $self->eis_id();
1289 my $self = shift;
1292 my $id = $self->eis_id();
1311 my $self = shift;
1317 my $eisid = $self->eis_id();
1342 my $self = shift;
1345 my $id = $self->eis_id();
1364 my $self = shift;
1370 my $id = $self->eis_id();
1392 my $self = shift;
1397 my $id = $self->eis_id();
1427 my $self = shift;
1447 my $self = shift;
1465 my $self = shift;
1481 my $self = shift;
1502 my $self = shift;
1526 my $self = shift;
1530 my $id = $self->eis_id();
1536 my $name = $self->child();
1549 my $self = shift;
1566 my $self = shift;
1584 my $self = shift;
1602 my $self = shift;
1620 my $self = shift;
1637 my $self = shift;
1652 my $self = shift;
1671 my $self = shift;
1674 my $id = $self->eis_id();
1692 my $self = shift;
1695 my $id = $self->eis_id();
1714 my $self = shift;
1717 my $id = $self->eis_id();
1735 my $self = shift;
1738 my $master = $self->master();
1756 my $self = shift;
1759 my $id = $self->eis_id();
1777 my $self=shift;
1783 my $id = $self->eis_id();
1800 my $self = shift;
1803 my $id = $self->eis_id();
1820 my $self = shift;
1825 my $id = $self->eis_id();
1842 my $self = shift;
1845 my $id = $self->eis_id();
1863 my $self = shift;
1866 my $id = $self->eis_id();
1883 my $self = shift;
1888 my $id = $self->eis_id();
1907 my $self = shift;
1910 my $id = $self->eis_id();
1928 my $self = shift;
1932 my $id = $self->eis_id();
1951 my $self = shift;
1955 my $id = $self->eis_id();
1974 my $self = shift;
1978 my $id = $self->eis_id();
1998 my $self = shift;
2002 my $id = $self->eis_id();
2021 my $self = shift;
2025 my $id = $self->eis_id();
2044 my $self = shift;
2048 my $id = $self->eis_id();
2069 my $self = shift;
2100 my $self = shift;