Changeset 565 for CMT/HEAD/source/cmt_system.cxx

Timestamp:

Apr 13, 2011, 1:28:08 PM (13 years ago)

Author:

rybkin

Message:

See C.L. 448

File:

• CMT/HEAD/source/cmt_system.cxx (modified) (2 diffs)

CMT/HEAD/source/cmt_system.cxx

@@ -2188 +2188 @@
   if (text.size () == 0) return result;
 
-  int allocated = 3 * text.size (); // if EACH character of text quoted with " or '
+  size_t allocated = 3 * text.size (); // if EACH character of text quoted with " or '
   char* const buffer = (char*) malloc (allocated + 1);
+  if (0 == buffer)
+    {
+      char num[32]; sprintf (num, "%u", allocated + 1);
+      cmt_string msg ("Cannot allocate ");
+      msg += num;
+      msg += " bytes";
+      cmt_string e = errno ? ": " + cmt_string (strerror (errno)) : "";
+      CmtMessage::error (msg + e);
+      exit (EXIT_FAILURE);
+    }
   char* b (buffer);
 
@@ -2244 +2254 @@
   result = buffer;
   free (buffer);
+  return result;
+}
+
+//----------------------------------------------------------
+//  Mangle text so that it consists solely of
+//  letters, digits, and underscores
+//  the first character being not digit
+//  (any other characters are replaced with character '_').
+//  The out can be used as shell variable name.
+//  Return the number of characters replaced with character '_'.
+//----------------------------------------------------------
+int CmtSystem::mangle (const cmt_string& text, cmt_string& out)
+{
+  int result (0);
+  size_t allocated = text.size ();
+  //allocated = 3000000000;
+  char* const buffer = (char*) malloc (allocated + 1);
+  if (0 == buffer)
+    {
+      char num[32]; sprintf (num, "%u", allocated + 1);
+      cmt_string msg ("Cannot allocate ");
+      msg += num;
+      msg += " bytes";
+      cmt_string e = errno ? ": " + cmt_string (strerror (errno)) : "";
+      CmtMessage::error (msg + e);
+      exit (EXIT_FAILURE);
+    }
+  char* b (buffer);
+  const char* t = text.c_str ();
+  while (*t)
+    {
+      if (isalnum (*t) || *t == '_')
+        *b++ = *t++;
+      else
+        {
+          *b++ = '_'; t++;
+          result++;
+        }
+    }
+  *b = '\0';
+  if (0 != allocated && isdigit (*buffer))
+    {
+      *buffer = '_';
+      result++;
+    }
+  out = buffer;
+  free (buffer);
+  return result;
+}
+
+cmt_string CmtSystem::mangle (const cmt_string& text)
+{
+  cmt_string result;
+  mangle (text, result);
   return result;
 }