check.pm (9780544f) check.pm (72bd2d34)
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

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

27use packager::globals;
28
29##############################################
30# Check 1: The package list has to exist
31##############################################
32
33sub check_packlist
34{
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

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

27use packager::globals;
28
29##############################################
30# Check 1: The package list has to exist
31##############################################
32
33sub check_packlist
34{
35 my $projectdir = $ENV{'PRJ'};
36 $projectdir =~ s/$packager::globals::separator\s*$//;
37 $packager::globals::packlistname = $projectdir . $packager::globals::separator . "util" . $packager::globals::separator . $packager::globals::packlistname;
35 my $custompacklist = $ENV{'CUSTOM_PACK_LIST'};
36 if ( defined $custompacklist && length $custompacklist > 0 )
37 {
38 $packager::globals::packlistname = $custompacklist;
39 }
40 else
41 {
42 my $projectdir = $ENV{'PRJ'};
43 $projectdir =~ s/$packager::globals::separator\s*$//;
44 $packager::globals::packlistname = $projectdir . $packager::globals::separator . "util" . $packager::globals::separator . $packager::globals::packlistname;
45 }
38
46
47 print "Using pack list " . $packager::globals::packlistname . "\n";
48
39 if ( ! -f $packager::globals::packlistname )
40 {
41 packager::exiter::exit_program("ERROR: Package list not found: $packager::globals::packlistname", "check_packlist");
42 }
43}
44
45#############################################################
46# Check 2: The environment variable OUTPATH has to be set

--- 38 unchanged lines hidden --- 		49 if ( ! -f $packager::globals::packlistname )
50 {
51 packager::exiter::exit_program("ERROR: Package list not found: $packager::globals::packlistname", "check_packlist");
52 }
53}
54
55#############################################################
56# Check 2: The environment variable OUTPATH has to be set

--- 38 unchanged lines hidden ---