home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / ocl150a.zip / OCL / Source / OProfile.cpp < prev    next >
C/C++ Source or Header  |  1996-10-21  |  5KB  |  207 lines
  1. // OCL - OS/2 Class Library
  2. // (c) Cubus 1995
  3. // All Rights Reserved
  4. // OProfile.cpp
  5.  
  6. // Profile Actions (INI-Handling)
  7.  
  8.  
  9. /*
  10.  * Redistribution and use in source and binary forms, with or without
  11.  * modification, are permitted provided that the following conditions
  12.  * are met:
  13.  * 1. Redistributions of source code must retain the above copyright
  14.  *    notice, this list of conditions and the following disclaimer.
  15.  * 2. Neither the name Cubus nor the name Team OCL may be used to
  16.  *    endorse or promote products derived from this software
  17.  *    without specific prior written permission.
  18.  * 3. See OCL.INF for a detailed copyright notice.
  19.  *
  20.  *              THIS SOFTWARE IS PROVIDED ``AS IS'' AND
  21.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  22.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  23.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  24.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  25.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  26.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  27.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  28.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  29.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  30.  * SUCH DAMAGE.
  31.  */
  32.  
  33. // $Header: W:/Projects/OCL/Source/rcs/OProfile.cpp 1.50 1996/08/11 23:49:29 B.STEIN Release $
  34.  
  35. #define __OCL_SOURCE__
  36.  
  37. #define OINCL_OSTRING
  38. #define OINCL_BASE
  39.  
  40. #include <ocl.hpp>
  41. #include <OApp.hpp>
  42. #include <OProfile.hpp>
  43.  
  44.  
  45. // members of OProfile
  46.  
  47.  
  48. OProfile::OProfile() 
  49.   : hini(NULLHANDLE)
  50.   {}
  51.  
  52.  
  53. OProfile::OProfile(const HINI iniHandle)
  54.   : hini(iniHandle)
  55.   {}
  56.  
  57.  
  58. OProfile::OProfile(PSZ iniName)
  59. {
  60.  hini = PrfOpenProfile(OApp::current().anchor(), iniName);
  61. }
  62.  
  63.  
  64. BOOL OProfile::open(PSZ iniName)
  65. {
  66.  hini = PrfOpenProfile(OApp::current().anchor(), (PSZ) iniName);
  67.  return(hini != NULLHANDLE);
  68. }
  69.  
  70.  
  71. OProfile::~OProfile()
  72. {
  73.  list.reset();
  74.  PrfCloseProfile(hini);
  75. }
  76.  
  77.  
  78. PSZ OProfile::isOfType() const
  79. { 
  80.  return("OProfile"); 
  81. }
  82.  
  83.  
  84. void OProfile::close()
  85. {
  86.  PrfCloseProfile(hini);
  87. }
  88.  
  89.  
  90. BOOL OProfile::write(PSZ App, PSZ Key, PVOID Value, ULONG len)
  91. {
  92.  return(PrfWriteProfileData(hini, (PSZ) App, (PSZ) Key, Value, len));
  93. }
  94.  
  95.  
  96. BOOL OProfile::deleteApp(PSZ App)
  97. {
  98.  return(PrfWriteProfileData(hini, App, NULL, NULL, 0));
  99. }
  100.  
  101.  
  102. BOOL OProfile::deleteKey(PSZ App, PSZ Key)
  103. {
  104.  return(PrfWriteProfileData(hini, App, Key, NULL, 0));
  105. }
  106.  
  107. BOOL OProfile::getApps()
  108. {
  109.  return(getKeys(NULL));
  110. }
  111.  
  112.  
  113. BOOL OProfile::getKeys(PSZ App)
  114. {
  115.  UCHAR  *DatTemp;
  116.  ULONG  Size = 0x0000ffffL;
  117.  
  118.  if (DosAllocMem((PPVOID) &DatTemp,  0x0000ffffL, PAG_READ | PAG_WRITE | PAG_COMMIT))
  119.    return(FALSE);
  120.  
  121.  if (getData(App, NULL, DatTemp, &Size))
  122.   return(setupList(DatTemp));
  123.  else
  124.   return(FALSE);
  125. }
  126.  
  127.  
  128. BOOL OProfile::getStr(PSZ App, PSZ Key)
  129. {
  130.  UCHAR  *DatTemp;
  131.  ULONG  Size = 0x0000ffffL;
  132.  
  133.  if (DosAllocMem((PPVOID) &DatTemp,  0x0000ffffL, PAG_READ | PAG_WRITE | PAG_COMMIT))
  134.    return(FALSE);
  135.  
  136.  if (!getData(App, Key, DatTemp, &Size))
  137.    return(FALSE);
  138.  else
  139.    val << (PSZ) DatTemp;
  140.  
  141.  DosFreeMem(DatTemp);
  142.  return(TRUE);
  143. }
  144.  
  145.  
  146. BOOL OProfile::getData(PSZ App, PSZ Key, PVOID Buffer, PULONG Size)
  147. {
  148.  return(PrfQueryProfileData(hini, App, Key, Buffer, Size));
  149. }
  150.  
  151.  
  152. BOOL OProfile::setupList(UCHAR *DatTemp)
  153. {
  154.  ULONG x, len;
  155.  UCHAR *Buffer;
  156.  
  157.  if (DosAllocMem((PPVOID) &Buffer,  0x0000ffffL, PAG_READ | PAG_WRITE | PAG_COMMIT))
  158.    return(FALSE);
  159.  
  160.  list.reset();
  161.  
  162.  x = 0;
  163.  do
  164.    {
  165.     len = 0;
  166.     while (DatTemp[x+len] != '\0')
  167.       {
  168.        Buffer[len] = DatTemp[x+len];
  169.        ++len;
  170.       }
  171.     Buffer[len] = '\0';
  172.     if (len != 0)
  173.       {
  174.        list << (PSZ) Buffer;
  175.        x += (len+1);
  176.       }
  177.    }
  178.    while (DatTemp[x] != '\0');
  179.  
  180.  DosFreeMem(Buffer);
  181.  DosFreeMem(DatTemp);
  182.  return(TRUE);
  183. }
  184.  
  185.  
  186. BOOL OProfile::insert(const HWND hwnd, const ULONG id)
  187. {
  188.  OListItem<OString> *tmp = list.first();
  189.  
  190.  while((tmp) && (tmp->item) && (tmp->item->getText()))
  191.   {
  192.    if (LIT_MEMERROR == (LONG)WinSendDlgItemMsg(hwnd, id, LM_INSERTITEM,
  193.                             MPFROM2SHORT(LIT_SORTASCENDING, 0),
  194.                             MPFROMP(tmp->item->getText())))
  195.      return(FALSE);
  196.    tmp = tmp->next;
  197.   }
  198.  
  199.  tmp = list.first();
  200.  if ((tmp) && (tmp->item) && (tmp->item->getText()))
  201.     WinSetDlgItemText(hwnd, id, tmp->item->getText());
  202.  return(TRUE);
  203. }
  204.  
  205.  
  206. // end of source
  207.