scriptitems.pm (8bd5297c) scriptitems.pm (010ec03a)
1#**************************************************************
2#
3# Licensed to the Apache Software Foundation (ASF) under one
4# or more contributor license agreements. See the NOTICE file
5# distributed with this work for additional information
6# regarding copyright ownership. The ASF licenses this file
7# to you under the Apache License, Version 2.0 (the
8# "License"); you may not use this file except in compliance

--- 476 unchanged lines hidden (view full) ---

485 next;
486 }
487 push(@filesarray, $onefile);
488 }
489
490 return \@filesarray;
491}
492
1#**************************************************************
2#
3# Licensed to the Apache Software Foundation (ASF) under one
4# or more contributor license agreements. See the NOTICE file
5# distributed with this work for additional information
6# regarding copyright ownership. The ASF licenses this file
7# to you under the Apache License, Version 2.0 (the
8# "License"); you may not use this file except in compliance

--- 476 unchanged lines hidden (view full) ---

485 next;
486 }
487 push(@filesarray, $onefile);
488 }
489
490 return \@filesarray;
491}
492
493sub add_bundled_extension_blobs
494{
495 my @filelist = @{$_[0]};
496
497 my $bundleenv = $ENV{'BUNDLED_EXTENSION_BLOBS'};
498 my $bundlesrc = $ENV{'TARFILE_LOCATION'};
499 my @bundle_files = split(/\s+/, $bundleenv, -1);
500 foreach my $filename ( @bundle_files) {
501 my $basename = File::Basename::basename( $filename);
502 my $onefile = {
503 'Dir' => 'gid_Brand_Dir_Share_Extensions_Install',
504 'Name' => $basename,
505 'Styles' => '(PACKED)',
506 'UnixRights' => '444',
507 'sourcepath' => $bundlesrc . $installer::globals::separator . $filename
508 };
509 push( @filelist, $onefile);
510 push( @installer::globals::logfileinfo, "\tbundling \"$filename\" extension\n");
511 }
512
513 return \@filelist;
514}
515
516sub add_bundled_prereg_extensions
517{
518 my @filelist = @{$_[0]};
519
520 my $bundleenv = $ENV{'BUNDLED_PREREG_EXTENSIONS'};
521 my $bundlesrc = $ENV{'TARFILE_LOCATION'};
522 my @bundle_files = split(/\s+/, $bundleenv, -1);
523 foreach my $filename ( @bundle_files) {
524 my $basename = File::Basename::basename( $filename);
525 my $onefile = {
526 'Dir' => 'gid_Profileitem_Uno_Uno_Bundled_Extensions_Prereg',
527 'Name' => $basename,
528 'Styles' => '(PACKED,ARCHIVE)',
529 'UnixRights' => '444',
530 'sourcepath' => $bundlesrc . $installer::globals::separator . $filename
531 };
532 push( @filelist, $onefile);
533 push( @installer::globals::logfileinfo, "\tbundling \"$filename\" extension\n");
534 }
535
536 return \@filelist;
537}
538
493################################################################################
494# Looking for directories without correct HostName
495################################################################################
496
497sub checking_directories_with_corrupt_hostname
498{
499 my ($dirsref, $languagesarrayref) = @_;
500

--- 475 unchanged lines hidden (view full) ---

976 {
977 installer::exiter::exit_program("ERROR (in scp): Directory $searchgid is language dependent, but not $oneitemgid inside this directory", "get_Directoryname_From_Directorygid");
978 }
979
980 return \$directoryname;
981}
982
983##################################################################
539################################################################################
540# Looking for directories without correct HostName
541################################################################################
542
543sub checking_directories_with_corrupt_hostname
544{
545 my ($dirsref, $languagesarrayref) = @_;
546

--- 475 unchanged lines hidden (view full) ---

1022 {
1023 installer::exiter::exit_program("ERROR (in scp): Directory $searchgid is language dependent, but not $oneitemgid inside this directory", "get_Directoryname_From_Directorygid");
1024 }
1025
1026 return \$directoryname;
1027}
1028
1029##################################################################
984# Getting destination direcotory for links, files and profiles
1030# Getting destination directory for links, files and profiles
985##################################################################
986
987sub get_Destination_Directory_For_Item_From_Directorylist # this is used for Files, Profiles and Links
988{
989 my ($itemarrayref, $dirsarrayref) = @_;
990
991 if ( $installer::globals::debug ) { installer::logger::debuginfo("installer::scriptitems::get_Destination_Directory_For_Item_From_Directorylist : $#{$itemarrayref} : $#{$dirsarrayref}"); }
992

--- 375 unchanged lines hidden (view full) ---

1368
1369 if ($sourcepath eq "")
1370 {
1371 my $styles = $onefile->{'Styles'};
1372 my $filename = $onefile->{'Name'};
1373
1374 if ( ! $installer::globals::languagepack )
1375 {
1031##################################################################
1032
1033sub get_Destination_Directory_For_Item_From_Directorylist # this is used for Files, Profiles and Links
1034{
1035 my ($itemarrayref, $dirsarrayref) = @_;
1036
1037 if ( $installer::globals::debug ) { installer::logger::debuginfo("installer::scriptitems::get_Destination_Directory_For_Item_From_Directorylist : $#{$itemarrayref} : $#{$dirsarrayref}"); }
1038

--- 375 unchanged lines hidden (view full) ---

1414
1415 if ($sourcepath eq "")
1416 {
1417 my $styles = $onefile->{'Styles'};
1418 my $filename = $onefile->{'Name'};
1419
1420 if ( ! $installer::globals::languagepack )
1421 {
1376 $infoline = "ERROR: Removing file $filename from file list.\n";
1422 $infoline = "ERROR: No sourcepath -> Removing file $filename from file list.\n";
1377 push( @installer::globals::logfileinfo, $infoline);
1378
1379 push(@missingfiles, "ERROR: File not found: $filename\n");
1380 $error_occured = 1;
1381
1382 next; # removing this file from list, if sourcepath is empty
1383 }
1384 else # special case for language packs

--- 1577 unchanged lines hidden --- 		1423 push( @installer::globals::logfileinfo, $infoline);
1424
1425 push(@missingfiles, "ERROR: File not found: $filename\n");
1426 $error_occured = 1;
1427
1428 next; # removing this file from list, if sourcepath is empty
1429 }
1430 else # special case for language packs

--- 1577 unchanged lines hidden ---