| /********************************************************************** |
| // @@@ START COPYRIGHT @@@ |
| // |
| // Licensed to the Apache Software Foundation (ASF) under one |
| // or more contributor license agreements. See the NOTICE file |
| // distributed with this work for additional information |
| // regarding copyright ownership. The ASF licenses this file |
| // to you under the Apache License, Version 2.0 (the |
| // "License"); you may not use this file except in compliance |
| // with the License. You may obtain a copy of the License at |
| // |
| // http://www.apache.org/licenses/LICENSE-2.0 |
| // |
| // Unless required by applicable law or agreed to in writing, |
| // software distributed under the License is distributed on an |
| // "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY |
| // KIND, either express or implied. See the License for the |
| // specific language governing permissions and limitations |
| // under the License. |
| // |
| // @@@ END COPYRIGHT @@@ |
| // |
| **********************************************************************/ |
| /* -*-C++-*- |
| ***************************************************************************** |
| * |
| * File: Define.cpp |
| * Description: Contains code for ENVVAR and DEFINE commands. |
| * |
| * Created: 3/10/2000 |
| * Language: C++ |
| * Status: $State: Exp $ |
| * |
| * |
| * |
| * |
| ***************************************************************************** |
| */ |
| |
| |
| #include "Platform.h" |
| |
| #include <ctype.h> |
| #include <stdlib.h> |
| #include <string.h> |
| #include <unistd.h> |
| |
| #include "Define.h" |
| #include "GetErrorMessage.h" |
| #include "SqlciCmd.h" |
| #include "sqlcmd.h" |
| #include "SqlciEnv.h" |
| #include "str.h" |
| #include "SqlciError.h" |
| |
| extern char **environ; |
| #define ENVIRON environ |
| #define PUTENV putenv |
| |
| |
| static void invalidateEnvVarDependentCaches(const char *str) |
| { |
| NAString env(str); |
| #ifdef NA_CASE_INSENSITIVE_FILENAMES |
| env.toUpper(); |
| #endif |
| |
| if (strncmp(env, "SQL_", 4) == 0 || strncmp(env, "SQLMX_", 6) == 0) |
| { |
| GetErrorMessageRebindMessageFile(); |
| } |
| } |
| |
| |
| ///////////////////////////////////////// |
| // class Envvar |
| ///////////////////////////////////////// |
| Envvar::Envvar(const char * name_, const char * value_) |
| { |
| if (name_) |
| { |
| name = new char[strlen(name_) + 1]; |
| strcpy(name, name_); |
| } |
| else |
| name = 0; |
| |
| if (value_) |
| { |
| value = new char[strlen(value_) + 1]; |
| strcpy(value, value_); |
| } |
| else |
| value = 0; |
| |
| env_str = 0; |
| } |
| |
| Envvar::~Envvar() |
| { |
| if (name) |
| delete [] name; |
| |
| if (value) |
| delete [] value; |
| |
| if (env_str) |
| delete [] env_str; |
| |
| name = 0; |
| value = 0; |
| env_str = 0; |
| } |
| |
| void Envvar::setName(const char * name_) |
| { |
| if (name) |
| delete [] name; |
| |
| name = new char[strlen(name_) + 1]; |
| strcpy(name, name_); |
| } |
| |
| void Envvar::setValue(const char * value_) |
| { |
| if (value) |
| delete [] value; |
| |
| value = new char[strlen(value_) + 1]; |
| strcpy(value, value_); |
| } |
| |
| short Envvar::contains(const char * value) const |
| { |
| if (strcmp(name, value) == 0) |
| return -1; |
| else |
| return 0; |
| } |
| |
| Int32 Envvar::set() |
| { |
| // Envvars are added by creating a string "envvar_name=envvar_value" |
| // and then adding it ("putting" it) to environment. |
| |
| delete [] env_str; |
| |
| env_str = new char[strlen(name) + 1/*for = */ + strlen(value) |
| +1/*for null*/]; |
| |
| strcpy(env_str, name); |
| strcat(env_str, "="); |
| strcat(env_str, value); |
| |
| Int32 i = PUTENV(env_str); |
| |
| if (i) cerr << "*** ERROR " << i << " from putenv." << endl; |
| |
| invalidateEnvVarDependentCaches(name); |
| return i; |
| } |
| |
| Int32 Envvar::reset() |
| { |
| if ((!getenv(name)) || (!env_str)) // this should be true, |
| return -1; // otherwise its an internal error. |
| |
| // VO, Plan versioning support: The code below '#else' will not |
| // reset the env var properly on NT, a subsequent 'sh env;' command |
| // will still display it with its original value. |
| char * ptr = strchr (env_str, '='); |
| ptr[1] = 0; |
| Int32 i = PUTENV(env_str); |
| |
| if (i) cerr << "*** ERROR " << i << " from putenv." << endl; |
| |
| invalidateEnvVarDependentCaches(name); |
| return 0; |
| } |
| |
| |