CMake/Source/cmSetCommand.cxx

184 lines
5.1 KiB
C++

/*=========================================================================
Program: CMake - Cross-Platform Makefile Generator
Module: $RCSfile$
Language: C++
Date: $Date$
Version: $Revision$
Copyright (c) 2002 Kitware, Inc., Insight Consortium. All rights reserved.
See Copyright.txt or http://www.cmake.org/HTML/Copyright.html for details.
This software is distributed WITHOUT ANY WARRANTY; without even
the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
PURPOSE. See the above copyright notices for more information.
=========================================================================*/
#include "cmSetCommand.h"
// cmSetCommand
bool cmSetCommand
::InitialPass(std::vector<std::string> const& args, cmExecutionStatus &)
{
if(args.size() < 1 )
{
this->SetError("called with incorrect number of arguments");
return false;
}
// watch for ENV signatures
const char* variable = args[0].c_str(); // VAR is always first
if (!strncmp(variable,"ENV{",4) && strlen(variable) > 5)
{
// what is the variable name
char *varName = new char [strlen(variable)];
strncpy(varName,variable+4,strlen(variable)-5);
varName[strlen(variable)-5] = '\0';
std::string putEnvArg = varName;
putEnvArg += "=";
// what is the current value if any
const char *currValue = getenv(varName);
delete [] varName;
// will it be set to something, then set it
if (args.size() > 1 && args[1].size())
{
// but only if it is different from current value
if (!currValue || strcmp(currValue,args[1].c_str()))
{
putEnvArg += args[1];
cmSystemTools::PutEnv(putEnvArg.c_str());
}
return true;
}
// if it will be cleared, then clear it if it isn;t already clear
if (currValue)
{
cmSystemTools::PutEnv(putEnvArg.c_str());
}
return true;
}
// SET (VAR) // Removes the definition of VAR.
if (args.size() == 1)
{
this->Makefile->RemoveDefinition(args[0].c_str());
return true;
}
// here are the remaining options
// SET (VAR value )
// SET (VAR CACHE TYPE "doc String" [FORCE])
// SET (VAR value CACHE TYPE "doc string" [FORCE])
std::string value; // optional
bool cache = false; // optional
bool force = false; // optional
bool parentScope = false;
cmCacheManager::CacheEntryType type
= cmCacheManager::STRING; // required if cache
const char* docstring = 0; // required if cache
std::string::size_type cacheStart = 0;
unsigned int ignoreLastArgs = 0;
// look for PARENT_SCOPE argument
if (args.size() > 1 && args[args.size()-1] == "PARENT_SCOPE")
{
parentScope = true;
ignoreLastArgs++;
}
else
{
// look for FORCE argument
if (args.size() > 4 && args[args.size()-1] == "FORCE")
{
force = true;
ignoreLastArgs++;
}
// check for cache signature
if (args.size() > 3 && args[args.size() - 3 - (force ? 1 : 0)] == "CACHE")
{
cache = true;
ignoreLastArgs+=3;
}
}
// collect any values into a single semi-colon seperated value list
if(static_cast<unsigned short>(args.size()) >
static_cast<unsigned short>(1 + ignoreLastArgs))
{
value = args[1];
size_t endPos = args.size() - ignoreLastArgs;
for(size_t i = 2; i < endPos; ++i)
{
value += ";";
value += args[i];
}
}
if (parentScope)
{
if (value.empty())
{
this->Makefile->RaiseScope(variable, 0);
}
else
{
this->Makefile->RaiseScope(variable, value.c_str());
}
return true;
}
// we should be nice and try to catch some simple screwups if the last or
// next to last args are CACHE then they screwed up. If they used FORCE
// without CACHE they screwed up
if (args[args.size() - 1] == "CACHE" ||
args.size() > 1 && args[args.size() - 2] == "CACHE" ||
force && !cache)
{
this->SetError("given invalid arguments for CACHE mode.");
return false;
}
if(cache)
{
cacheStart = args.size() - 3 - (force ? 1 : 0);
type = cmCacheManager::StringToType(args[cacheStart+1].c_str());
docstring = args[cacheStart+2].c_str();
}
// see if this is already in the cache
cmCacheManager::CacheIterator it =
this->Makefile->GetCacheManager()->GetCacheIterator(variable);
if(!it.IsAtEnd() && (it.GetType() != cmCacheManager::UNINITIALIZED))
{
// if the set is trying to CACHE the value but the value
// is already in the cache and the type is not internal
// then leave now without setting any definitions in the cache
// or the makefile
if(cache && type != cmCacheManager::INTERNAL && !force)
{
return true;
}
}
// if it is meant to be in the cache then define it in the cache
if(cache)
{
this->Makefile->AddCacheDefinition(variable,
value.c_str(),
docstring,
type, force);
}
else
{
// add the definition
this->Makefile->AddDefinition(variable, value.c_str());
}
return true;
}