scintilla/PropSet.cxx

   1 // SciTE - Scintilla based Text Editor
   2 /** @file PropSet.cxx
   3  ** A Java style properties file module.
   4  **/
   5 // Copyright 1998-2003 by Neil Hodgson <neilh@scintilla.org>
   6 // The License.txt file describes the conditions under which this software may be distributed.
   7
   8 // Maintain a dictionary of properties
   9
  10 #include <stdlib.h>
  11 #include <string.h>
  12 #include <stdio.h>
  13
  14 #ifdef _MSC_VER
  15 // Visual C++ doesn't like unreachable code or long decorated names in its own headers.
  16 #pragma warning(disable: 4018 4100 4245 4511 4512 4663 4702 4786)
  17 #endif
  18
  19 #include <string>
  20 #include <map>
  21
  22 #include "Platform.h"
  23
  24 #include "PropSet.h"
  25 #include "PropSetSimple.h"
  26
  27 #ifdef SCI_NAMESPACE
  28 using namespace Scintilla;
  29 #endif
  30
  31 typedef std::map<std::string, std::string> mapss;
  32
  33 PropSetSimple::PropSetSimple() {
  34         mapss *props = new mapss;
  35         impl = static_cast<void *>(props);
  36 }
  37
  38 PropSetSimple::~PropSetSimple() {
  39         mapss *props = static_cast<mapss *>(impl);
  40         delete props;
  41         impl = 0;
  42 }
  43
  44 void PropSetSimple::Set(const char *key, const char *val, int lenKey, int lenVal) {
  45         mapss *props = static_cast<mapss *>(impl);
  46         if (!*key)      // Empty keys are not supported
  47                 return;
  48         if (lenKey == -1)
  49                 lenKey = static_cast<int>(strlen(key));
  50         if (lenVal == -1)
  51                 lenVal = static_cast<int>(strlen(val));
  52         (*props)[std::string(key, lenKey)] = std::string(val, lenVal);
  53 }
  54
  55 static bool IsASpaceCharacter(unsigned int ch) {
  56     return (ch == ' ') || ((ch >= 0x09) && (ch <= 0x0d));
  57 }
  58
  59 void PropSetSimple::Set(const char *keyVal) {
  60         while (IsASpaceCharacter(*keyVal))
  61                 keyVal++;
  62         const char *endVal = keyVal;
  63         while (*endVal && (*endVal != '\n'))
  64                 endVal++;
  65         const char *eqAt = strchr(keyVal, '=');
  66         if (eqAt) {
  67                 Set(keyVal, eqAt + 1, eqAt-keyVal, endVal - eqAt - 1);
  68         } else if (*keyVal) {   // No '=' so assume '=1'
  69                 Set(keyVal, "1", endVal-keyVal, 1);
  70         }
  71 }
  72
  73 void PropSetSimple::SetMultiple(const char *s) {
  74         const char *eol = strchr(s, '\n');
  75         while (eol) {
  76                 Set(s);
  77                 s = eol + 1;
  78                 eol = strchr(s, '\n');
  79         }
  80         Set(s);
  81 }
  82
  83 const char *PropSetSimple::Get(const char *key) const {
  84         mapss *props = static_cast<mapss *>(impl);
  85         mapss::const_iterator keyPos = props->find(std::string(key));
  86         if (keyPos != props->end()) {
  87                 return keyPos->second.c_str();
  88         } else {
  89                 return "";
  90         }
  91 }
  92
  93 // There is some inconsistency between GetExpanded("foo") and Expand("$(foo)").
  94 // A solution is to keep a stack of variables that have been expanded, so that
  95 // recursive expansions can be skipped.  For now I'll just use the C++ stack
  96 // for that, through a recursive function and a simple chain of pointers.
  97
  98 struct VarChain {
  99         VarChain(const char *var_=NULL, const VarChain *link_=NULL): var(var_), link(link_) {}
 100
 101         bool contains(const char *testVar) const {
 102                 return (var && (0 == strcmp(var, testVar)))
 103                         || (link && link->contains(testVar));
 104         }
 105
 106         const char *var;
 107         const VarChain *link;
 108 };
 109
 110 static int ExpandAllInPlace(const PropSetSimple &props, std::string &withVars, int maxExpands, const VarChain &blankVars) {
 111         size_t varStart = withVars.find("$(");
 112         while ((varStart != std::string::npos) && (maxExpands > 0)) {
 113                 size_t varEnd = withVars.find(")", varStart+2);
 114                 if (varEnd == std::string::npos) {
 115                         break;
 116                 }
 117
 118                 // For consistency, when we see '$(ab$(cde))', expand the inner variable first,
 119                 // regardless whether there is actually a degenerate variable named 'ab$(cde'.
 120                 size_t innerVarStart = withVars.find("$(", varStart+2);
 121                 while ((innerVarStart != std::string::npos) && (innerVarStart > varStart) && (innerVarStart < varEnd)) {
 122                         varStart = innerVarStart;
 123                         innerVarStart = withVars.find("$(", varStart+2);
 124                 }
 125
 126                 std::string var(withVars.c_str(), varStart + 2, varEnd - varStart - 2);
 127                 std::string val = props.Get(var.c_str());
 128
 129                 if (blankVars.contains(var.c_str())) {
 130                         val = ""; // treat blankVar as an empty string (e.g. to block self-reference)
 131                 }
 132
 133                 if (--maxExpands >= 0) {
 134                         maxExpands = ExpandAllInPlace(props, val, maxExpands, VarChain(var.c_str(), &blankVars));
 135                 }
 136
 137                 withVars.erase(varStart, varEnd-varStart+1);
 138                 withVars.insert(varStart, val.c_str(), val.length());
 139
 140                 varStart = withVars.find("$(");
 141         }
 142
 143         return maxExpands;
 144 }
 145
 146 char *PropSetSimple::Expanded(const char *key) const {
 147         std::string val = Get(key);
 148         ExpandAllInPlace(*this, val, 100, VarChain(key));
 149         char *ret = new char [val.size() + 1];
 150         strcpy(ret, val.c_str());
 151         return ret;
 152 }
 153
 154 char *PropSetSimple::ToString() const {
 155         mapss *props = static_cast<mapss *>(impl);
 156         std::string sval;
 157         for (mapss::const_iterator it=props->begin(); it != props->end(); it++) {
 158                 sval += it->first;
 159                 sval += "=";
 160                 sval += it->second;
 161                 sval += "\n";
 162         }
 163         char *ret = new char [sval.size() + 1];
 164         strcpy(ret, sval.c_str());
 165         return ret;
 166 }
 167
 168 int PropSetSimple::GetInt(const char *key, int defaultValue) const {
 169         char *val = Expanded(key);
 170         if (val) {
 171                 int retVal = val[0] ? atoi(val) : defaultValue;
 172                 delete []val;
 173                 return retVal;
 174         }
 175         return defaultValue;
 176 }