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 9# with the License. You may obtain a copy of the License at 10# 11# http://www.apache.org/licenses/LICENSE-2.0 12# 13# Unless required by applicable law or agreed to in writing, 14# software distributed under the License is distributed on an 15# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16# KIND, either express or implied. See the License for the 17# specific language governing permissions and limitations 18# under the License. 19# 20#************************************************************** 21 22 23 24use lib ("$ENV{SOLARENV}/bin/modules"); 25 26use Cwd; 27use packager::check; 28use packager::files; 29use packager::globals; 30use packager::work; 31 32#################################### 33# Main program 34#################################### 35 36packager::check::check_environment(); 37packager::check::check_packlist(); 38packager::check::check_parameter(); 39 40packager::work::set_global_variable(); 41 42my $packagelist = packager::files::read_file($packager::globals::packlistname); 43 44my $targets = packager::work::create_package_todos($packagelist); 45 46if ( $ENV{'BSCLIENT'} ) { packager::work::start_build_server($targets); } 47else { packager::work::execute_system_calls($targets); } 48 49if ( $packager::globals::logging ) 50{ 51 packager::files::save_file($packager::globals::logfilename, \@packager::globals::logfileinfo); 52 print "Log file written: $packager::globals::logfilename\n"; 53} 54 55#################################### 56# End main program 57#################################### 58