home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / ocl150a.zip / OCL / Source / OString.cpp < prev    next >
C/C++ Source or Header  |  1997-04-05  |  8KB  |  471 lines
  1. // OCL - OS/2 Class Library
  2. // (c) Cubus 1995
  3. // All Rights Reserved
  4. // OString.cpp
  5.  
  6.  
  7. // class member functions
  8.  
  9.  
  10. /*
  11.  * Redistribution and use in source and binary forms, with or without
  12.  * modification, are permitted provided that the following conditions
  13.  * are met:
  14.  * 1. Redistributions of source code must retain the above copyright
  15.  *    notice, this list of conditions and the following disclaimer.
  16.  * 2. Neither the name Cubus nor the name Team OCL may be used to
  17.  *    endorse or promote products derived from this software
  18.  *    without specific prior written permission.
  19.  * 3. See OCL.INF for a detailed copyright notice.
  20.  *
  21.  *              THIS SOFTWARE IS PROVIDED ``AS IS'' AND
  22.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31.  * SUCH DAMAGE.
  32.  */
  33.  
  34. // $Header: W:/Projects/OCL/Source/rcs/OString.cpp 1.50 1996/08/11 23:49:31 B.STEIN Release $
  35.  
  36. #define __OCL_SOURCE__
  37.  
  38. #define OINCL_OSTRING
  39. #define OINCL_BASE
  40.  
  41. #include <ocl.hpp>
  42.  
  43.  
  44. OString::OString()
  45. { 
  46.  text = NULL; 
  47. }
  48.  
  49.  
  50. OString::OString(PCSZ iText)
  51. {
  52.  if (iText) {
  53.    text = new CHAR[strlen(iText)+1];
  54.    strcpy(text, iText); }
  55.  else
  56.    text = NULL;
  57. }
  58.  
  59.  
  60. OString::OString(const OString& String)
  61. {
  62.  if ((String.getText())) {
  63.    text = new CHAR[strlen(String)+1];
  64.    strcpy(text, String); }
  65.  else
  66.    text = NULL; 
  67. }
  68.  
  69. OString::OString(const pOString String)
  70. {
  71.  if ((String) && (String->getText())) {
  72.    text = new CHAR[strlen(String->getText())+1];
  73.    strcpy(text, String->getText()); }
  74.  else
  75.    text = NULL; 
  76. }
  77.  
  78.  
  79.  
  80. OString::OString(int iLength)
  81. {
  82.  text = new char[iLength+1]; 
  83.  text[0] = '\0';
  84. }
  85.  
  86.  
  87. struct STRRES
  88. {
  89.  BYTE len;
  90.  PSZ  str;
  91. };
  92.  
  93. #pragma pack()
  94.  
  95.  
  96. OString::OString(ULONG res, HMODULE mod)
  97. {
  98.  PVOID  resPtr  = NULL;
  99.  STRRES *str    = NULL;
  100.  
  101.  if (DosGetResource(mod, RT_STRING, res / 16 + 1, &resPtr))
  102.    *this << "ERROR";
  103.  else
  104.    {
  105.     str = (STRRES*) resPtr + sizeof(USHORT);
  106.  
  107.     for(ULONG i = 0; i < 15; i++)
  108.       {
  109.        str +=  atoi((PCSZ)&str->len);
  110.       }
  111.  
  112.     DosFreeResource(resPtr);
  113.    }    
  114. }
  115.  
  116.  
  117. OString::~OString() 
  118. {
  119.  delete[] text;
  120.  text = NULL; 
  121. }
  122.  
  123.  
  124. PSZ OString::isOfType() const
  125. { 
  126.  return("OString"); 
  127. }
  128.  
  129.  
  130. PSZ OString::getText() const
  131. {
  132.  return  text; 
  133. }
  134.  
  135.  
  136. ULONG OString::length() const
  137. {
  138.  if (text)
  139.    return(strlen(text));
  140.  return(0);
  141. }
  142.  
  143.  
  144.  
  145. int OString::compare(const OString&  s1, const OString& s2) const
  146. {
  147.  return strcmp(s1, s2);
  148. }
  149.  
  150.  
  151.  
  152. OString& OString::leftCut(int Letter)
  153. {
  154.  PSZ tmp;
  155.  PSZ newText;
  156.  
  157.  if ((!text) || ((tmp = strchr(text, Letter)) == NULL))
  158.    return(*this);
  159.  
  160.  tmp++;
  161.  if (!tmp) {
  162.    delete text;
  163.    text = NULL;
  164.    return(*this); }
  165.  
  166.  newText = new CHAR[strlen(tmp)+1];
  167.  strcpy(newText, tmp);
  168.  delete text;
  169.  text = newText; 
  170.  return(*this);
  171. }
  172.  
  173.  
  174. OString& OString::rightCut(int Letter)
  175. {
  176.  PSZ newText;
  177.  
  178.  if ((!text) || (!strrchr(text, Letter)))
  179.    return(*this);
  180.  
  181.  strcpy(strrchr(text, Letter), "");
  182.  
  183.  newText = new CHAR[strlen(text)+1];
  184.  strcpy(newText, text);
  185.  delete text;
  186.  text = newText; 
  187.  return(*this);
  188. }
  189.  
  190.  
  191. OString& OString::stripLeading(int Letter)
  192. {
  193.  PSZ   tmp = NULL;
  194.  PSZ   newText = NULL;
  195.  ULONG len;
  196.  ULONG index = 0;
  197.  
  198.  if ((!text) || (Letter == '\0') || (!strchr(text, Letter)))
  199.     return(*this);
  200.  
  201.  len = strlen(text);
  202.  
  203.  while(index <= len)
  204.   {
  205.    tmp = &text[index];
  206.    if (!tmp) {
  207.      delete text;
  208.      text = NULL;
  209.      return(*this); } 
  210.    if (*tmp != Letter)
  211.      break;
  212.    index++;
  213.   }
  214.       
  215.  newText = new CHAR[strlen(tmp)+1];
  216.  strcpy(newText, tmp);
  217.  delete text;
  218.  text = newText; 
  219.  return(*this);
  220. }
  221.  
  222.  
  223.  
  224. OString& OString::stripTrailing(int Letter)
  225. {
  226.  PSZ   tmp;
  227.  PSZ   newText;
  228.  LONG  index;
  229.  
  230.  if ((!text) || (Letter == '\0') || (!strchr(text, Letter)))
  231.     return(*this);
  232.  
  233.  index = strlen(text) - 1;
  234.  
  235.  while(index >= 0)
  236.   {
  237.    tmp = &text[index];
  238.    if (!tmp) {
  239.      delete text;
  240.      text = NULL;
  241.      return(*this); } 
  242.    if (*tmp != Letter)
  243.      break;
  244.    else
  245.      *tmp = '\0';
  246.    index--;
  247.   }
  248.       
  249.  newText = new CHAR[strlen(text)+1];
  250.  strcpy(newText, text);
  251.  delete text;
  252.  text = newText; 
  253.  return(*this);
  254. }
  255.  
  256.  
  257. OString& OString::replace(PCSZ string, PCSZ anOther)
  258. {
  259.  PSZ    tmp,
  260.         tmpPtr, 
  261.         cursor;
  262.  
  263.  if ((!text) || (!string) || (!anOther) || (!strstr(text, string)))  
  264.    return(*this);
  265.  
  266.  cursor  = text;
  267.  tmpPtr  = new CHAR[strlen(text)+1];
  268.  tmp     = tmpPtr;
  269.  
  270.  strcpy(tmp, text);
  271.  
  272.  while(TRUE)
  273.   {
  274.    *strstr(strstr(text, tmp), string) = '\0';
  275.    cursor = &strstr(tmp, string)[strlen(string)];
  276.    *this + anOther + cursor;
  277.    tmp = cursor;
  278.    if (!strstr(tmp, string))
  279.      break;
  280.   }  
  281.  
  282.  delete tmpPtr;
  283.  return(*this);
  284. }
  285.  
  286.  
  287.  
  288. OString& OString::operator << (PCSZ string) 
  289. {    // set or replace the string
  290.  PSZ tmp = NULL;
  291.  
  292.  if (string) {
  293.    tmp = new CHAR[strlen(string)+1];
  294.    strcpy(tmp, string); }
  295.  if (text)
  296.    delete[] text;
  297.  
  298.  text = tmp;
  299.  return(*this);
  300. }
  301.  
  302.  
  303. OString& OString::operator << (const pOString string) 
  304. {
  305.  if (string)
  306.    return(*this << string->getText());
  307.  return(*this);
  308. }
  309.  
  310.  
  311. OString& OString::operator <<   (INT     i)
  312. {
  313.  return(*this << (LONG) i);
  314. }
  315.  
  316. OString& OString::operator <<   (UINT   ui)
  317. {
  318.  return(*this << (ULONG) ui);
  319. }
  320.  
  321. OString& OString::operator <<   (LONG    l)
  322. {
  323.  OString buffer(32);
  324.  
  325.  sprintf(buffer.getText(), "%ld", l);
  326.  return(*this << buffer.getText());
  327. }
  328.  
  329. OString& OString::operator <<   (ULONG  ul)
  330. {
  331.  OString buffer(32);
  332.  
  333.  sprintf(buffer.getText(), "%lu", ul);
  334.  return(*this << buffer.getText());
  335. }
  336.  
  337. OString& OString::operator <<   (double db)
  338. {
  339.  OString buffer(32);
  340.  
  341.  sprintf(buffer, "%.*g", DBL_DIG, db);
  342.  return(*this << buffer.getText());
  343. }
  344.  
  345. OString& OString::operator +    (INT     i)
  346. {
  347.  return(*this + (LONG) i);
  348. }
  349.  
  350. OString& OString::operator +    (UINT   ui)
  351. {
  352.  return(*this + (ULONG) ui);
  353. }
  354.  
  355. OString& OString::operator +    (LONG    l)
  356. {
  357.  OString buffer(32);
  358.  
  359.  sprintf(buffer.getText(), "%ld", l);
  360.  return(*this + buffer.getText());
  361. }
  362.  
  363. OString& OString::operator +    (ULONG  ul)
  364. {
  365.  OString buffer(32);
  366.  
  367.  sprintf(buffer.getText(), "%lu", ul);
  368.  return(*this + buffer.getText());
  369. }
  370.  
  371. OString& OString::operator +    (double db)
  372. {
  373.  OString buffer(32);
  374.  
  375.  sprintf(buffer, "%.*g", DBL_DIG, db);
  376.  return(*this + buffer.getText());
  377. }
  378.  
  379. OString& OString::operator + (PCSZ string) 
  380. {     // add String to the end of text
  381.  if ((text) && (string)) {
  382.    PSZ tmp = new CHAR[strlen(text)+strlen(string)+1];
  383.  
  384.    strcpy(tmp, text);
  385.    strcat(tmp, string);
  386.    *this << tmp;
  387.    delete[] tmp; }
  388.  return(*this);
  389. }
  390.  
  391.  
  392. OString& OString::operator + (const pOString string)
  393. {
  394.  if (string)
  395.    return(*this + string->getText());
  396.  return(*this);
  397. } 
  398.  
  399.  
  400. OString& OString::operator = (PCSZ string)
  401. {
  402.  *this << string;
  403.  return(*this);
  404. }
  405.  
  406.  
  407.  
  408. BOOL OString::operator == (PCSZ anOther)const 
  409. {
  410.  return (strcmp(text, anOther) == 0); 
  411. }
  412.  
  413.  
  414. BOOL OString::operator != (PCSZ anOther)const 
  415. {
  416.  return !(*this == anOther); 
  417. }
  418.  
  419.  
  420. BOOL OString::operator < (PCSZ anOther)const 
  421. {
  422.  return (strcmp(text, anOther) < 0); 
  423. }
  424.  
  425.  
  426. BOOL OString::operator > (PCSZ anOther)const 
  427. {
  428.  return (strcmp(text, anOther) > 0); 
  429. }
  430.  
  431.  
  432. BOOL OString::operator <= (PCSZ anOther)const 
  433. {
  434.  return !(*this > anOther); 
  435. }
  436.  
  437.  
  438. BOOL OString::operator >= (PCSZ anOther)const 
  439. {
  440.  return !(*this < anOther); 
  441. }
  442.  
  443.  
  444.  
  445. istream& operator >> (istream& in, OString& s)
  446. {
  447.  PSZ Buf = new CHAR[CCHMAXPATH];
  448.  
  449.  in >> Buf;
  450.  s << Buf;
  451.  delete[] Buf;
  452.  return(in);
  453. }
  454.  
  455.  
  456. istream& operator >> (istream& in, pOString s)
  457. {
  458.  return((s != NULL) ? (in >> *s) : in);
  459. }
  460.  
  461.  
  462. ostream& operator <<   (ostream& out, pOString s)
  463. {
  464.  if (s)
  465.    out << s->getText();
  466.  return(out);
  467. }
  468.  
  469.  
  470. // end of source
  471.