1#************************************************************************* 2# 3# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4# 5# Copyright 2000, 2010 Oracle and/or its affiliates. 6# 7# OpenOffice.org - a multi-platform office productivity suite 8# 9# This file is part of OpenOffice.org. 10# 11# OpenOffice.org is free software: you can redistribute it and/or modify 12# it under the terms of the GNU Lesser General Public License version 3 13# only, as published by the Free Software Foundation. 14# 15# OpenOffice.org is distributed in the hope that it will be useful, 16# but WITHOUT ANY WARRANTY; without even the implied warranty of 17# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18# GNU Lesser General Public License version 3 for more details 19# (a copy is included in the LICENSE file that accompanied this code). 20# 21# You should have received a copy of the GNU Lesser General Public License 22# version 3 along with OpenOffice.org. If not, see 23# <http://www.openoffice.org/license.html> 24# for a copy of the LGPLv3 License. 25# 26#************************************************************************* 27 28 29package par2script::globals; 30 31############################################ 32# Global settings 33############################################ 34 35BEGIN 36{ 37 $prog="par2script"; 38 39 $includepathlist = ""; 40 $scriptname = ""; 41 $parfilelistorig = ""; 42 $parfilelist = ""; 43 44 @allitems = ("Installation", "ScpAction", "Directory", "File", 45 "Shortcut", "Unixlink", "Module", "Profile", "ProfileItem", 46 "Folder", "FolderItem", "RegistryItem", "WindowsCustomAction", 47 "MergeModule"); 48 49 @items_assigned_at_modules = ("File", "Directory", "Unixlink"); 50 @items_with_directories = ("File", "Profile", "Shortcut", "Unixlink"); 51 @items_with_moduleid = ("Profile", "ProfileItem", "FolderItem", "RegistryItem"); 52 @items_without_moduleid = ("File", "Directory", "Shortcut", "Unixlink"); 53 54 %searchkeys = ("File" => "Files", "Directory" => "Dirs", "Unixlink" => "Unixlinks"); 55 56 $logging = 0; 57 $logfilename = "logfile.log"; # the default logfile name for global errors 58 @logfileinfo = (); 59 60 $multidefinitionerror = 0; 61 $multiassignmenterror = 0; 62 63 %definitions; 64 %assignedgids; 65 66 $plat = $^O; 67 68 $separator = "/"; 69 $pathseparator = "\:"; 70 $isunix = 1; 71 $iswin = 0; 72 73 $islinux = 0; 74 $issolaris = 0; 75 76 if ( $plat =~ /linux/i ) { $islinux = 1; } 77 if ( $plat =~ /solaris/i ) { $issolaris = 1; } 78 79} 80 811; 82