1*9780544fSAndrew Rist#************************************************************** 2*9780544fSAndrew Rist# 3*9780544fSAndrew Rist# Licensed to the Apache Software Foundation (ASF) under one 4*9780544fSAndrew Rist# or more contributor license agreements. See the NOTICE file 5*9780544fSAndrew Rist# distributed with this work for additional information 6*9780544fSAndrew Rist# regarding copyright ownership. The ASF licenses this file 7*9780544fSAndrew Rist# to you under the Apache License, Version 2.0 (the 8*9780544fSAndrew Rist# "License"); you may not use this file except in compliance 9*9780544fSAndrew Rist# with the License. You may obtain a copy of the License at 10*9780544fSAndrew Rist# 11*9780544fSAndrew Rist# http://www.apache.org/licenses/LICENSE-2.0 12*9780544fSAndrew Rist# 13*9780544fSAndrew Rist# Unless required by applicable law or agreed to in writing, 14*9780544fSAndrew Rist# software distributed under the License is distributed on an 15*9780544fSAndrew Rist# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16*9780544fSAndrew Rist# KIND, either express or implied. See the License for the 17*9780544fSAndrew Rist# specific language governing permissions and limitations 18*9780544fSAndrew Rist# under the License. 19*9780544fSAndrew Rist# 20*9780544fSAndrew Rist#************************************************************** 21*9780544fSAndrew Rist 22*9780544fSAndrew Rist 23cdf0e10cSrcweir 24cdf0e10cSrcweir 25cdf0e10cSrcweirpackage par2script::globals; 26cdf0e10cSrcweir 27cdf0e10cSrcweir############################################ 28cdf0e10cSrcweir# Global settings 29cdf0e10cSrcweir############################################ 30cdf0e10cSrcweir 31cdf0e10cSrcweirBEGIN 32cdf0e10cSrcweir{ 33cdf0e10cSrcweir $prog="par2script"; 34cdf0e10cSrcweir 35cdf0e10cSrcweir $includepathlist = ""; 36cdf0e10cSrcweir $scriptname = ""; 37cdf0e10cSrcweir $parfilelistorig = ""; 38cdf0e10cSrcweir $parfilelist = ""; 39cdf0e10cSrcweir 40cdf0e10cSrcweir @allitems = ("Installation", "ScpAction", "Directory", "File", 41cdf0e10cSrcweir "Shortcut", "Unixlink", "Module", "Profile", "ProfileItem", 42cdf0e10cSrcweir "Folder", "FolderItem", "RegistryItem", "WindowsCustomAction", 43cdf0e10cSrcweir "MergeModule"); 44cdf0e10cSrcweir 45cdf0e10cSrcweir @items_assigned_at_modules = ("File", "Directory", "Unixlink"); 46cdf0e10cSrcweir @items_with_directories = ("File", "Profile", "Shortcut", "Unixlink"); 47cdf0e10cSrcweir @items_with_moduleid = ("Profile", "ProfileItem", "FolderItem", "RegistryItem"); 48cdf0e10cSrcweir @items_without_moduleid = ("File", "Directory", "Shortcut", "Unixlink"); 49cdf0e10cSrcweir 50cdf0e10cSrcweir %searchkeys = ("File" => "Files", "Directory" => "Dirs", "Unixlink" => "Unixlinks"); 51cdf0e10cSrcweir 52cdf0e10cSrcweir $logging = 0; 53cdf0e10cSrcweir $logfilename = "logfile.log"; # the default logfile name for global errors 54cdf0e10cSrcweir @logfileinfo = (); 55cdf0e10cSrcweir 56cdf0e10cSrcweir $multidefinitionerror = 0; 57cdf0e10cSrcweir $multiassignmenterror = 0; 58cdf0e10cSrcweir 59cdf0e10cSrcweir %definitions; 60cdf0e10cSrcweir %assignedgids; 61cdf0e10cSrcweir 62cdf0e10cSrcweir $plat = $^O; 63cdf0e10cSrcweir 64cdf0e10cSrcweir $separator = "/"; 65cdf0e10cSrcweir $pathseparator = "\:"; 66cdf0e10cSrcweir $isunix = 1; 67cdf0e10cSrcweir $iswin = 0; 68cdf0e10cSrcweir 69cdf0e10cSrcweir $islinux = 0; 70cdf0e10cSrcweir $issolaris = 0; 71cdf0e10cSrcweir 72cdf0e10cSrcweir if ( $plat =~ /linux/i ) { $islinux = 1; } 73cdf0e10cSrcweir if ( $plat =~ /solaris/i ) { $issolaris = 1; } 74cdf0e10cSrcweir 75cdf0e10cSrcweir} 76cdf0e10cSrcweir 77cdf0e10cSrcweir1; 78