259 lines
8.0 KiB
C
259 lines
8.0 KiB
C
/*
|
|
* CDE - Common Desktop Environment
|
|
*
|
|
* Copyright (c) 1993-2012, The Open Group. All rights reserved.
|
|
*
|
|
* These libraries and programs are free software; you can
|
|
* redistribute them and/or modify them under the terms of the GNU
|
|
* Lesser General Public License as published by the Free Software
|
|
* Foundation; either version 2 of the License, or (at your option)
|
|
* any later version.
|
|
*
|
|
* These libraries and programs are distributed in the hope that
|
|
* they will be useful, but WITHOUT ANY WARRANTY; without even the
|
|
* implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
|
|
* PURPOSE. See the GNU Lesser General Public License for more
|
|
* details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with these libraries and programs; if not, write
|
|
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
|
|
* Floor, Boston, MA 02110-1301 USA
|
|
*/
|
|
/* $TOG: InfoLibSearchPath.C /main/5 1998/08/17 10:33:55 mgreess $ */
|
|
/*
|
|
* (c) Copyright 1996 Digital Equipment Corporation.
|
|
* (c) Copyright 1996 Hewlett-Packard Company.
|
|
* (c) Copyright 1996 International Business Machines Corp.
|
|
* (c) Copyright 1996 Sun Microsystems, Inc.
|
|
* (c) Copyright 1996 Novell, Inc.
|
|
* (c) Copyright 1996 FUJITSU LIMITED.
|
|
* (c) Copyright 1996 Hitachi.
|
|
*/
|
|
#include <stdlib.h>
|
|
#include "SearchPath.h"
|
|
#include "Environ.h"
|
|
#include "TTFile.h"
|
|
#include "Options.h"
|
|
|
|
extern Options * options;
|
|
|
|
/**********************************************************************
|
|
*
|
|
* InfoLibSearchPath
|
|
*
|
|
* this constructor creates DTINFOLIBSEARCHPATH in a three-step
|
|
* process.
|
|
*
|
|
* 1. gathers environment variables and defaults to create a
|
|
* colon-separated list of paths
|
|
* 2. normalizes the list into host:/path format
|
|
* 3. builds the final version of the path
|
|
*
|
|
* Hierarchy of search paths:
|
|
* DTSPUSERINFOLIB
|
|
* DTSPUSERAPPHOSTS
|
|
* System Administrator's configuration directory
|
|
* DTSPSYSINFOLIB
|
|
* DTSPSYSAPPHOSTS
|
|
* Factory location
|
|
*
|
|
**********************************************************************/
|
|
InfoLibSearchPath::InfoLibSearchPath
|
|
(
|
|
CDEEnvironment * user,
|
|
const char * envvar,
|
|
const char * sep
|
|
) : SearchPath(user, envvar, sep)
|
|
{
|
|
CString oldSysAdmConfig = user->sysAdmConfig;
|
|
CString oldFactoryInstall = user->factoryInstall;
|
|
|
|
// Need to re-initialize the defaults.
|
|
user->sysAdmConfig = "/etc/dt";
|
|
user->factoryInstall = "/usr/dt";
|
|
|
|
if (user->DTINFOLIBSP()) {
|
|
if (user->DTUSERINFOLIBSP()) {
|
|
search_path = *user->DTUSERINFOLIBSP() + ",";
|
|
if (user->DTUSERAPPSP())
|
|
search_path += *user->DTUSERAPPSP() + ",";
|
|
if (!user->DTINFOLIBSP()->contains(user->OS()->LocalHost(),",",":") &&
|
|
(!user->DTAPPSP() ||
|
|
!user->DTAPPSP()->contains(user->OS()->LocalHost(),",",":")))
|
|
search_path += user->SysAdmConfig() + ",";
|
|
search_path += *user->DTINFOLIBSP() + ",";
|
|
if (user->DTINFOLIBSP()->contains(user->OS()->LocalHost(),",",":") &&
|
|
user->DTAPPSP() &&
|
|
user->DTAPPSP()->contains(user->SysAdmConfig(),",",","))
|
|
search_path.replace(user->OS()->LocalHost() + ":,","");
|
|
if (user->DTAPPSP())
|
|
search_path += *user->DTAPPSP() + ",";
|
|
search_path += user->FactoryInstall();
|
|
}
|
|
else {
|
|
if (user->DTUSERAPPSP())
|
|
search_path = *user->DTUSERAPPSP() + ",";
|
|
if (!user->DTINFOLIBSP()->contains(user->OS()->LocalHost(),",",":") &&
|
|
(!user->DTAPPSP() ||
|
|
!user->DTAPPSP()->contains(user->OS()->LocalHost(),",",":")))
|
|
search_path += user->SysAdmConfig() + ",";
|
|
search_path += *user->DTINFOLIBSP() + ",";
|
|
if (user->DTINFOLIBSP()->contains(user->OS()->LocalHost(),",",":") &&
|
|
user->DTAPPSP() &&
|
|
user->DTAPPSP()->contains(user->SysAdmConfig(),",",","))
|
|
search_path.replace(user->OS()->LocalHost() + ":,","");
|
|
if (user->DTAPPSP())
|
|
search_path += *user->DTAPPSP() + ",";
|
|
search_path += user->FactoryInstall();
|
|
}
|
|
}
|
|
else if (user->DTUSERINFOLIBSP()) {
|
|
search_path = *user->DTUSERINFOLIBSP() + ",";
|
|
|
|
if (user->DTUSERAPPSP())
|
|
search_path += *user->DTUSERAPPSP() + ",";
|
|
|
|
search_path += user->SysAdmConfig() + ",";
|
|
if (user->DTAPPSP())
|
|
search_path += *user->DTAPPSP() + ",";
|
|
search_path += user->FactoryInstall();
|
|
}
|
|
else {
|
|
if (user->DTUSERAPPSP())
|
|
search_path = *user->DTUSERAPPSP() + ",";
|
|
|
|
search_path += user->SysAdmConfig() + ",";
|
|
if (user->DTAPPSP())
|
|
search_path += *user->DTAPPSP() + ",";
|
|
search_path += user->FactoryInstall();
|
|
}
|
|
|
|
if (options->CheckingUser())
|
|
{
|
|
if (user->DTAPPSP())
|
|
search_path = *user->DTAPPSP();
|
|
}
|
|
|
|
NormalizePath();
|
|
TraversePath();
|
|
|
|
user->sysAdmConfig = oldSysAdmConfig;
|
|
user->factoryInstall = oldFactoryInstall;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* MakePath()
|
|
*
|
|
* Given a search path element (host name:path name pair), construct
|
|
* the appropriate path for this particular desktop subsystem:
|
|
*
|
|
* DTINFOLIBSEARCHPATH
|
|
*
|
|
* A path is constructed so that each host:/path pair is appended.
|
|
***********************************************************************/
|
|
void InfoLibSearchPath::MakePath
|
|
(
|
|
const CString & pair
|
|
)
|
|
{
|
|
CTokenizedString element(pair,":");
|
|
CString host_element = element.next();
|
|
CString path_element = element.next();
|
|
|
|
if (path_element.contains(user->HOME())) {
|
|
if (host_element == user->OS()->LocalHost()) {
|
|
CString infolibPath(path_element);
|
|
if (user->OS()->isDirectory(infolibPath + "/infolib")
|
|
|| options->dontOptimize()) {
|
|
AddToPath (infolibPath + "/infolib/" + user->UserHostDir() +
|
|
"%I.dti");
|
|
AddToPath (infolibPath + "/infolib/%L/%I.dti");
|
|
}
|
|
}
|
|
else {
|
|
CString dir(ConstructPath(path_element + "/infolib", &host_element));
|
|
if (user->OS()->isDirectory(dir) || options->dontOptimize()) {
|
|
AddToPath (dir + "/" + user->UserHostDir() + "/%I.dti");
|
|
AddToPath (dir + "/%I.dti");
|
|
}
|
|
}
|
|
}
|
|
else {
|
|
if (host_element == user->OS()->LocalHost()) {
|
|
CString infolibPath(path_element);
|
|
if (validSearchPath(infolibPath)) {
|
|
infolibPath += "/infolib";
|
|
if (user->OS()->isDirectory(infolibPath)
|
|
|| options->dontOptimize()) {
|
|
AddToPath (infolibPath + "/%L/%I.dti");
|
|
}
|
|
infolibPath += "/C";
|
|
}
|
|
if (user->OS()->isDirectory(infolibPath) ||
|
|
options->dontOptimize()) {
|
|
AddToPath (infolibPath + "/%I.dti");
|
|
}
|
|
}
|
|
else {
|
|
CString dir(ConstructPath(path_element, &host_element));
|
|
if (validSearchPath(dir)) {
|
|
dir += "/infolib";
|
|
if (user->OS()->isDirectory(dir) || options->dontOptimize()) {
|
|
AddToPath (dir + "/%L/%I.dti");
|
|
}
|
|
dir += "/C";
|
|
}
|
|
if (user->OS()->isDirectory(dir) || options->dontOptimize()) {
|
|
AddToPath (dir + "/%I.dti");
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/*********************************************************************
|
|
* validSearchPath()
|
|
*
|
|
* This member function verifies that the path in question is a
|
|
* standard CDE location, i.e. /etc/dt/appconfig or /usr/dt/appconfig
|
|
* so that the appropriate massaging can take place.
|
|
*
|
|
*********************************************************************/
|
|
int InfoLibSearchPath::validSearchPath
|
|
(
|
|
const CString & st
|
|
) const
|
|
{
|
|
if (st == user->SysAdmConfig()) // ...,/etc/dt/appconfig,...
|
|
return 1;
|
|
|
|
if (st == user->FactoryInstall()) // ...,/usr/dt/appconfig,...
|
|
return 1;
|
|
|
|
// ...,/nfs/machine/etc/dt/appconfig,...
|
|
|
|
if (st.contains(user->SysAdmConfig(), "", Separator().data()))
|
|
return 1;
|
|
|
|
// ...,/nfs/machine/usr/dt/appconfig,...
|
|
|
|
if (st.contains(user->FactoryInstall(),"",Separator().data()))
|
|
return 1;
|
|
|
|
// If this is an APP-specified path, it also needs to be massaged.
|
|
// The elements in the APP paths were originally specified using
|
|
// host:/path, but were converted to /path for InfoLib searchpaths
|
|
// so use the comma as the leader and the trailer.
|
|
|
|
if (user->DTAPPSP() &&
|
|
user->DTAPPSP()->contains (st, ",", ","))
|
|
return 1;
|
|
|
|
if (user->DTUSERAPPSP() &&
|
|
user->DTUSERAPPSP()->contains (st, ",", ","))
|
|
return 1;
|
|
|
|
return 0;
|
|
}
|