move/delete some unused files.

1 files changed, 0 insertions, 733 deletions

diff --git a/src/minIni.c b/src/minIni.c
deleted file mode 100644
index 6f94518..0000000
--- a/src/minIni.c
+++ /dev/null
@@ -1,733 +0,0 @@
-/*  minIni - Multi-Platform INI file parser, suitable for embedded systems

- *

- *  These routines are in part based on the article "Multiplatform .INI Files"

- *  by Joseph J. Graf in the March 1994 issue of Dr. Dobb's Journal.

- *

- *  Copyright (c) CompuPhase, 2008-2011

- *

- *  Licensed 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.

- *

- *  Version: $Id: minIni.c 31 2011-01-28 10:46:16Z thiadmer.riemersma $

- */

-

-#if (defined _UNICODE || defined __UNICODE__ || defined UNICODE) && !defined MININI_ANSI

-# if !defined UNICODE   /* for Windows */

-#   define UNICODE

-# endif

-# if !defined _UNICODE  /* for C library */

-#   define _UNICODE

-# endif

-#endif

-

-#define MININI_IMPLEMENTATION

-#include "minIni.h"

-#if defined NDEBUG

-  #define assert(e)

-#else

-  #include <assert.h>

-#endif

-

-#if !defined __T

-  #include <ctype.h>

-  #include <string.h>

-  #include <stdlib.h>

-  /* definition of TCHAR already in minIni.h */

-  #define __T(s)    s

-  #define _tcscat   strcat

-  #define _tcschr   strchr

-  #define _tcscmp   strcmp

-  #define _tcscpy   strcpy

-  #define _tcsicmp  stricmp

-  #define _tcslen   strlen

-  #define _tcsncpy  strncpy

-  #define _tcsnicmp strnicmp

-  #define _tcsrchr  strrchr

-  #define _tcstol   strtol

-  #define _tcstod   strtod

-  #define _totupper toupper

-  #define _stprintf sprintf

-  #define _tfgets   fgets

-  #define _tfputs   fputs

-  #define _tfopen   fopen

-  #define _tremove  remove

-  #define _trename  rename

-#endif

-

-#if defined __linux || defined __linux__

-  #define __LINUX__

-#endif

-#if defined FREEBSD && !defined __FreeBSD__

-  #define __FreeBSD__

-#endif

-#if !defined strnicmp

-  #if defined __LINUX__ || defined __FreeBSD__ || defined __OpenBSD__ || defined __APPLE__

-    #define strnicmp  strncasecmp

-  #endif

-#endif

-

-#if !defined INI_LINETERM

-  #define INI_LINETERM    __T("\n")

-#endif

-#if !defined INI_FILETYPE

-  #define INI_FILETYPE    FILE*

-#endif

-

-#if !defined sizearray

-  #define sizearray(a)    (sizeof(a) / sizeof((a)[0]))

-#endif

-

-enum quote_option {

-  QUOTE_NONE,

-  QUOTE_ENQUOTE,

-  QUOTE_DEQUOTE,

-};

-

-static TCHAR *skipleading(const TCHAR *str)

-{

-  assert(str != NULL);

-  while (*str != '\0' && *str <= ' ')

-    str++;

-  return (TCHAR *)str;

-}

-

-static TCHAR *skiptrailing(const TCHAR *str, const TCHAR *base)

-{

-  assert(str != NULL);

-  assert(base != NULL);

-  while (str > base && *(str-1) <= ' ')

-    str--;

-  return (TCHAR *)str;

-}

-

-static TCHAR *striptrailing(TCHAR *str)

-{

-  TCHAR *ptr = skiptrailing(_tcschr(str, '\0'), str);

-  assert(ptr != NULL);

-  *ptr='\0';

-  return str;

-}

-

-static TCHAR *save_strncpy(TCHAR *dest, const TCHAR *source, size_t maxlen, enum quote_option option)

-{

-  size_t d, s;

-

-  assert(maxlen>0);

-  if (option == QUOTE_ENQUOTE && maxlen < 3)

-    option = QUOTE_NONE;  /* cannot store two quotes and a terminating zero in less than 3 characters */

-

-  switch (option) {

-  case QUOTE_NONE:

-    _tcsncpy(dest,source,maxlen);

-    dest[maxlen-1]='\0';

-    break;

-  case QUOTE_ENQUOTE:

-    d = 0;

-    dest[d++] = '"';

-    for (s = 0; source[s] != '\0' && d < maxlen - 2; s++, d++) {

-      if (source[s] == '"') {

-        if (d >= maxlen - 3)

-          break;  /* no space to store the escape character plus the one that follows it */

-        dest[d++] = '\\';

-      } /* if */

-      dest[d] = source[s];

-    } /* for */

-    dest[d++] = '"';

-    dest[d] = '\0';

-    break;

-  case QUOTE_DEQUOTE:

-    for (d = s = 0; source[s] != '\0' && d < maxlen - 1; s++, d++) {

-      if ((source[s] == '"' || source[s] == '\\') && source[s + 1] == '"')

-        s++;

-      dest[d] = source[s];

-    } /* for */

-    dest[d] = '\0';

-    break;

-  default:

-    assert(0);

-  } /* switch */

-

-  return dest;

-}

-

-static int getkeystring(INI_FILETYPE *fp, const TCHAR *Section, const TCHAR *Key,

-                        int idxSection, int idxKey, TCHAR *Buffer, int BufferSize)

-{

-  TCHAR *sp, *ep;

-  int len, idx, isstring;

-  enum quote_option quotes;

-  TCHAR LocalBuffer[INI_BUFFERSIZE];

-

-  assert(fp != NULL);

-  /* Move through file 1 line at a time until a section is matched or EOF. If

-   * parameter Section is NULL, only look at keys above the first section. If

-   * idxSection is postive, copy the relevant section name.

-   */

-  len = (Section != NULL) ? _tcslen(Section) : 0;

-  if (len > 0 || idxSection >= 0) {

-    idx = -1;

-    do {

-      if (!ini_read(LocalBuffer, INI_BUFFERSIZE, fp))

-        return 0;

-      sp = skipleading(LocalBuffer);

-      ep = _tcschr(sp, ']');

-    } while (*sp != '[' || ep == NULL || (((int)(ep-sp-1) != len || _tcsnicmp(sp+1,Section,len) != 0) && ++idx != idxSection));

-    if (idxSection >= 0) {

-      if (idx == idxSection) {

-        assert(ep != NULL);

-        assert(*ep == ']');

-        *ep = '\0';

-        save_strncpy(Buffer, sp + 1, BufferSize, QUOTE_NONE);

-        return 1;

-      } /* if */

-      return 0; /* no more section found */

-    } /* if */

-  } /* if */

-

-  /* Now that the section has been found, find the entry.

-   * Stop searching upon leaving the section's area.

-   */

-  assert(Key != NULL || idxKey >= 0);

-  len = (Key != NULL) ? (int)_tcslen(Key) : 0;

-  idx = -1;

-  do {

-    if (!ini_read(LocalBuffer,INI_BUFFERSIZE,fp) || *(sp = skipleading(LocalBuffer)) == '[')

-      return 0;

-    sp = skipleading(LocalBuffer);

-    ep = _tcschr(sp, '='); /* Parse out the equal sign */

-    if (ep == NULL)

-      ep = _tcschr(sp, ':');

-  } while (*sp == ';' || *sp == '#' || ep == NULL || (((int)(skiptrailing(ep,sp)-sp) != len || _tcsnicmp(sp,Key,len) != 0) && ++idx != idxKey));

-  if (idxKey >= 0) {

-    if (idx == idxKey) {

-      assert(ep != NULL);

-      assert(*ep == '=' || *ep == ':');

-      *ep = '\0';

-      striptrailing(sp);

-      save_strncpy(Buffer, sp, BufferSize, QUOTE_NONE);

-      return 1;

-    } /* if */

-    return 0;   /* no more key found (in this section) */

-  } /* if */

-

-  /* Copy up to BufferSize chars to buffer */

-  assert(ep != NULL);

-  assert(*ep == '=' || *ep == ':');

-  sp = skipleading(ep + 1);

-  /* Remove a trailing comment */

-  isstring = 0;

-  for (ep = sp; *ep != '\0' && ((*ep != ';' && *ep != '#') || isstring); ep++) {

-    if (*ep == '"') {

-      if (*(ep + 1) == '"')

-        ep++;                 /* skip "" (both quotes) */

-      else

-        isstring = !isstring; /* single quote, toggle isstring */

-    } else if (*ep == '\\' && *(ep + 1) == '"') {

-      ep++;                   /* skip \" (both quotes */

-    } /* if */

-  } /* for */

-  assert(ep != NULL && (*ep == '\0' || *ep == ';' || *ep == '#'));

-  *ep = '\0';                 /* terminate at a comment */

-  striptrailing(sp);

-  /* Remove double quotes surrounding a value */

-  quotes = QUOTE_NONE;

-  if (*sp == '"' && (ep = _tcschr(sp, '\0')) != NULL && *(ep - 1) == '"') {

-    sp++;

-    *--ep = '\0';

-    quotes = QUOTE_DEQUOTE;   /* this is a string, so remove escaped characters */

-  } /* if */

-  save_strncpy(Buffer, sp, BufferSize, quotes);

-  return 1;

-}

-

-/** ini_gets()

- * \param Section     the name of the section to search for

- * \param Key         the name of the entry to find the value of

- * \param DefValue    default string in the event of a failed read

- * \param Buffer      a pointer to the buffer to copy into

- * \param BufferSize  the maximum number of characters to copy

- * \param Filename    the name and full path of the .ini file to read from

- *

- * \return            the number of characters copied into the supplied buffer

- */

-int ini_gets(const TCHAR *Section, const TCHAR *Key, const TCHAR *DefValue,

-             TCHAR *Buffer, int BufferSize, const TCHAR *Filename)

-{

-  INI_FILETYPE fp;

-  int ok = 0;

-

-  if (Buffer == NULL || BufferSize <= 0 || Key == NULL)

-    return 0;

-  if (ini_openread(Filename, &fp)) {

-    ok = getkeystring(&fp, Section, Key, -1, -1, Buffer, BufferSize);

-    ini_close(&fp);

-  } /* if */

-  if (!ok)

-    save_strncpy(Buffer, DefValue, BufferSize, QUOTE_NONE);

-  return _tcslen(Buffer);

-}

-

-/** ini_getl()

- * \param Section     the name of the section to search for

- * \param Key         the name of the entry to find the value of

- * \param DefValue    the default value in the event of a failed read

- * \param Filename    the name of the .ini file to read from

- *

- * \return            the value located at Key

- */

-long ini_getl(const TCHAR *Section, const TCHAR *Key, long DefValue, const TCHAR *Filename)

-{

-  TCHAR buff[64];

-  int len = ini_gets(Section, Key, __T(""), buff, sizearray(buff), Filename);

-  return (len == 0) ? DefValue : _tcstol(buff,NULL,10);

-}

-

-#if !defined INI_NOFLOAT

-/** ini_getf()

- * \param Section     the name of the section to search for

- * \param Key         the name of the entry to find the value of

- * \param DefValue    the default value in the event of a failed read

- * \param Filename    the name of the .ini file to read from

- *

- * \return            the value located at Key

- */

-float ini_getf(const TCHAR *Section, const TCHAR *Key, float DefValue, const TCHAR *Filename)

-{

-  TCHAR buff[64];

-  int len = ini_gets(Section, Key, __T(""), buff, sizearray(buff), Filename);

-  return (len == 0) ? DefValue : (float)_tcstod(buff,NULL);

-}

-#endif

-

-/** ini_getbool()

- * \param Section     the name of the section to search for

- * \param Key         the name of the entry to find the value of

- * \param DefValue    default value in the event of a failed read; it should

- *                    zero (0) or one (1).

- * \param Buffer      a pointer to the buffer to copy into

- * \param BufferSize  the maximum number of characters to copy

- * \param Filename    the name and full path of the .ini file to read from

- *

- A true boolean is found if one of the following is matched:

-

-  - A string starting with 'y'

-  - A string starting with 'Y'

-  - A string starting with 't'

-  - A string starting with 'T'

-  - A string starting with '1'

-

-  A false boolean is found if one of the following is matched:

-

-  - A string starting with 'n'

-  - A string starting with 'N'

-  - A string starting with 'f'

-  - A string starting with 'F'

-  - A string starting with '0'

- *

- * \return            the true/false flag as interpreted at Key

- */

-int ini_getbool(const TCHAR *Section, const TCHAR *Key, int DefValue, const TCHAR *Filename)

-{

-  TCHAR buff[2];

-  int ret;

-

-  ini_gets(Section, Key, __T(""), buff, sizearray(buff), Filename);

-  buff[0] = toupper(buff[0]);

-  if (buff[0]=='Y' || buff[0]=='1' || buff[0]=='T')

-    ret = 1;

-  else if (buff[0]=='N' || buff[0]=='0' || buff[0]=='F')

-    ret = 0;

-  else

-    ret = DefValue;

-

-  return(ret);

-}

-

-/** ini_getsection()

- * \param idx         the zero-based sequence number of the section to return

- * \param Buffer      a pointer to the buffer to copy into

- * \param BufferSize  the maximum number of characters to copy

- * \param Filename    the name and full path of the .ini file to read from

- *

- * \return            the number of characters copied into the supplied buffer

- */

-int  ini_getsection(int idx, TCHAR *Buffer, int BufferSize, const TCHAR *Filename)

-{

-  INI_FILETYPE fp;

-  int ok = 0;

-

-  if (Buffer == NULL || BufferSize <= 0 || idx < 0)

-    return 0;

-  if (ini_openread(Filename, &fp)) {

-    ok = getkeystring(&fp, NULL, NULL, idx, -1, Buffer, BufferSize);

-    ini_close(&fp);

-  } /* if */

-  if (!ok)

-    *Buffer = '\0';

-  return _tcslen(Buffer);

-}

-

-/** ini_getkey()

- * \param Section     the name of the section to browse through, or NULL to

- *                    browse through the keys outside any section

- * \param idx         the zero-based sequence number of the key to return

- * \param Buffer      a pointer to the buffer to copy into

- * \param BufferSize  the maximum number of characters to copy

- * \param Filename    the name and full path of the .ini file to read from

- *

- * \return            the number of characters copied into the supplied buffer

- */

-int  ini_getkey(const TCHAR *Section, int idx, TCHAR *Buffer, int BufferSize, const TCHAR *Filename)

-{

-  INI_FILETYPE fp;

-  int ok = 0;

-

-  if (Buffer == NULL || BufferSize <= 0 || idx < 0)

-    return 0;

-  if (ini_openread(Filename, &fp)) {

-    ok = getkeystring(&fp, Section, NULL, -1, idx, Buffer, BufferSize);

-    ini_close(&fp);

-  } /* if */

-  if (!ok)

-    *Buffer = '\0';

-  return _tcslen(Buffer);

-}

-

-

-#if ! defined INI_READONLY

-static void ini_tempname(TCHAR *dest, const TCHAR *source, int maxlength)

-{

-  TCHAR *p;

-

-  save_strncpy(dest, source, maxlength, QUOTE_NONE);

-  p = _tcsrchr(dest, '\0');

-  assert(p != NULL);

-  *(p - 1) = '~';

-}

-

-static enum quote_option check_enquote(const TCHAR *Value)

-{

-  const TCHAR *p;

-

-  /* run through the value, if it has trailing spaces, or '"', ';' or '#'

-   * characters, enquote it

-   */

-  assert(Value != NULL);

-  for (p = Value; *p != '\0' && *p != '"' && *p != ';' && *p != '#'; p++)

-    /* nothing */;

-  return (*p != '\0' || (p > Value && *(p - 1) == ' ')) ? QUOTE_ENQUOTE : QUOTE_NONE;

-}

-

-static void writesection(TCHAR *LocalBuffer, const TCHAR *Section, INI_FILETYPE *fp)

-{

-  TCHAR *p;

-

-  if (Section != NULL && _tcslen(Section) > 0) {

-    LocalBuffer[0] = '[';

-    save_strncpy(LocalBuffer + 1, Section, INI_BUFFERSIZE - 4, QUOTE_NONE);  /* -1 for '[', -1 for ']', -2 for '\r\n' */

-    p = _tcsrchr(LocalBuffer, '\0');

-    assert(p != NULL);

-    *p++ = ']';

-    _tcscpy(p, INI_LINETERM); /* copy line terminator (typically "\n") */

-    ini_write(LocalBuffer, fp);

-  } /* if */

-}

-

-static void writekey(TCHAR *LocalBuffer, const TCHAR *Key, const TCHAR *Value, INI_FILETYPE *fp)

-{

-  TCHAR *p;

-  enum quote_option option = check_enquote(Value);

-  save_strncpy(LocalBuffer, Key, INI_BUFFERSIZE - 3, QUOTE_NONE);  /* -1 for '=', -2 for '\r\n' */

-  p = _tcsrchr(LocalBuffer, '\0');

-  assert(p != NULL);

-  *p++ = '=';

-  save_strncpy(p, Value, INI_BUFFERSIZE - (p - LocalBuffer) - 2, option); /* -2 for '\r\n' */

-  p = _tcsrchr(LocalBuffer, '\0');

-  assert(p != NULL);

-  _tcscpy(p, INI_LINETERM); /* copy line terminator (typically "\n") */

-  ini_write(LocalBuffer, fp);

-}

-

-static void write_quoted(const TCHAR *Value, INI_FILETYPE *fp)

-{

-  TCHAR s[3];

-  int idx;

-  if (check_enquote(Value) == QUOTE_NONE) {

-    ini_write(Value, fp);

-  } else {

-    ini_write("\"", fp);

-    for (idx = 0; Value[idx] != '\0'; idx++) {

-      if (Value[idx] == '"') {

-        s[0] = '\\';

-        s[1] = Value[idx];

-        s[2] = '\0';

-      } else {

-        s[0] = Value[idx];

-        s[1] = '\0';

-      } /* if */

-      ini_write(s, fp);

-    } /* for */

-    ini_write("\"", fp);

-  } /* if */

-}

-

-/** ini_puts()

- * \param Section     the name of the section to write the string in

- * \param Key         the name of the entry to write, or NULL to erase all keys in the section

- * \param Value       a pointer to the buffer the string, or NULL to erase the key

- * \param Filename    the name and full path of the .ini file to write to

- *

- * \return            1 if successful, otherwise 0

- */

-int ini_puts(const TCHAR *Section, const TCHAR *Key, const TCHAR *Value, const TCHAR *Filename)

-{

-  INI_FILETYPE rfp;

-  INI_FILETYPE wfp;

-  TCHAR *sp, *ep;

-  TCHAR LocalBuffer[INI_BUFFERSIZE];

-  int len, match, count;

-

-  assert(Filename!=NULL);

-  if (!ini_openread(Filename, &rfp)) {

-    /* If the .ini file doesn't exist, make a new file */

-    if (Key!=NULL && Value!=NULL) {

-      if (!ini_openwrite(Filename, &wfp))

-        return 0;

-      writesection(LocalBuffer, Section, &wfp);

-      writekey(LocalBuffer, Key, Value, &wfp);

-      ini_close(&wfp);

-    } /* if */

-    return 1;

-  } /* if */

-

-  /* If parameters Key and Value are valid (so this is not an "erase" request)

-   * and the setting already exists and it already has the correct value, do

-   * nothing. This early bail-out avoids rewriting the INI file for no reason.

-   */

-  if (Key!=NULL && Value!=NULL) {

-    match = getkeystring(&rfp, Section, Key, -1, -1, LocalBuffer, sizearray(LocalBuffer));

-    if (match && _tcscmp(LocalBuffer,Value)==0) {

-      ini_close(&rfp);

-      return 1;

-    } /* if */

-    /* key not found, or different value -> proceed (but rewind the input file first) */

-    ini_rewind(&rfp);

-  } /* if */

-

-  /* Get a temporary file name to copy to. Use the existing name, but with

-   * the last character set to a '~'.

-   */

-  ini_tempname(LocalBuffer, Filename, INI_BUFFERSIZE);

-  if (!ini_openwrite(LocalBuffer, &wfp)) {

-    ini_close(&rfp);

-    return 0;

-  } /* if */

-

-  /* Move through the file one line at a time until a section is

-   * matched or until EOF. Copy to temp file as it is read.

-   */

-  count = 0;

-  len = (Section != NULL) ? _tcslen(Section) : 0;

-  if (len > 0) {

-    do {

-      if (!ini_read(LocalBuffer, INI_BUFFERSIZE, &rfp)) {

-        /* Failed to find section, so add one to the end */

-        if (Key!=NULL && Value!=NULL) {

-            ini_write(INI_LINETERM, &wfp);  /* force a new line (there may not have been one) behind the last line of the INI file */

-            writesection(LocalBuffer, Section, &wfp);

-            writekey(LocalBuffer, Key, Value, &wfp);

-        } /* if */

-        /* Clean up and rename */

-        ini_close(&rfp);

-        ini_close(&wfp);

-        ini_remove(Filename);

-        ini_tempname(LocalBuffer, Filename, INI_BUFFERSIZE);

-        ini_rename(LocalBuffer, Filename);

-        return 1;

-      } /* if */

-      /* Copy the line from source to dest, but not if this is the section that

-       * we are looking for and this section must be removed

-       */

-      sp = skipleading(LocalBuffer);

-      ep = _tcschr(sp, ']');

-      match = (*sp == '[' && ep != NULL && (int)(ep-sp-1) == len && _tcsnicmp(sp + 1,Section,len) == 0);

-      if (!match || Key!=NULL) {

-        /* Remove blank lines, but insert a blank line (possibly one that was

-         * removed on the previous iteration) before a new section. This creates

-         * "neat" INI files.

-         */

-        if (_tcslen(sp) > 0) {

-          if (*sp == '[' && count > 0)

-            ini_write(INI_LINETERM, &wfp);

-          ini_write(sp, &wfp);

-          count++;

-        } /* if */

-      } /* if */

-    } while (!match);

-  } /* if */

-

-  /* Now that the section has been found, find the entry. Stop searching

-   * upon leaving the section's area. Copy the file as it is read

-   * and create an entry if one is not found.

-   */

-  len = (Key!=NULL) ? _tcslen(Key) : 0;

-  for( ;; ) {

-    if (!ini_read(LocalBuffer, INI_BUFFERSIZE, &rfp)) {

-      /* EOF without an entry so make one */

-      if (Key!=NULL && Value!=NULL) {

-          ini_write(INI_LINETERM, &wfp);  /* force a new line (there may not have been one) behind the last line of the INI file */

-          writekey(LocalBuffer, Key, Value, &wfp);

-      } /* if */

-      /* Clean up and rename */

-      ini_close(&rfp);

-      ini_close(&wfp);

-      ini_remove(Filename);

-      ini_tempname(LocalBuffer, Filename, INI_BUFFERSIZE);

-      ini_rename(LocalBuffer, Filename);

-      return 1;

-    } /* if */

-    sp = skipleading(LocalBuffer);

-    ep = _tcschr(sp, '='); /* Parse out the equal sign */

-    if (ep == NULL)

-      ep = _tcschr(sp, ':');

-    match = (ep != NULL && (int)(skiptrailing(ep,sp)-sp) == len && _tcsnicmp(sp,Key,len) == 0);

-    if ((Key!=NULL && match) || *sp == '[')

-      break;  /* found the key, or found a new section */

-    /* in the section that we re-write, do not copy empty lines */

-    if (Key!=NULL && _tcslen(sp) > 0)

-      ini_write(sp, &wfp);

-  } /* for */

-  if (*sp == '[') {

-    /* found start of new section, the key was not in the specified

-     * section, so we add it just before the new section

-     */

-    if (Key!=NULL && Value!=NULL) {

-      /* We cannot use "writekey()" here, because we need to preserve the

-       * contents of LocalBuffer.

-       */

-      ini_write(Key, &wfp);

-      ini_write("=", &wfp);

-      write_quoted(Value, &wfp);

-      ini_write(INI_LINETERM INI_LINETERM, &wfp); /* put a blank line between the current and the next section */

-    } /* if */

-    /* write the new section header that we read previously */

-    ini_write(sp, &wfp);

-  } else {

-    /* We found the key; ignore the line just read (with the key and

-     * the current value) and write the key with the new value.

-     */

-    if (Key!=NULL && Value!=NULL)

-      writekey(LocalBuffer, Key, Value, &wfp);

-  } /* if */

-  /* Copy the rest of the INI file (removing empty lines, except before a section) */

-  while (ini_read(LocalBuffer, INI_BUFFERSIZE, &rfp)) {

-    sp = skipleading(LocalBuffer);

-    if (_tcslen(sp) > 0) {

-      if (*sp == '[')

-        ini_write(INI_LINETERM, &wfp);

-      ini_write(sp, &wfp);

-    } /* if */

-  } /* while */

-  /* Clean up and rename */

-  ini_close(&rfp);

-  ini_close(&wfp);

-  ini_remove(Filename);

-  ini_tempname(LocalBuffer, Filename, INI_BUFFERSIZE);

-  ini_rename(LocalBuffer, Filename);

-  return 1;

-}

-

-/* Ansi C "itoa" based on Kernighan & Ritchie's "Ansi C" book. */

-#define ABS(v)  ((v) < 0 ? -(v) : (v))

-

-static void strreverse(TCHAR *str)

-{

-  TCHAR t;

-  int i, j;

-

-  for (i = 0, j = _tcslen(str) - 1; i < j; i++, j--) {

-    t = str[i];

-    str[i] = str[j];

-    str[j] = t;

-  } /* for */

-}

-

-static void long2str(long value, TCHAR *str)

-{

-  int i = 0;

-  long sign = value;

-  int n;

-

-  /* generate digits in reverse order */

-  do {

-    n = (int)(value % 10);              /* get next lowest digit */

-    str[i++] = (TCHAR)(ABS(n) + '0');   /* handle case of negative digit */

-  } while (value /= 10);                /* delete the lowest digit */

-  if (sign < 0)

-    str[i++] = '-';

-  str[i] = '\0';

-

-  strreverse(str);

-}

-

-/** ini_putl()

- * \param Section     the name of the section to write the value in

- * \param Key         the name of the entry to write

- * \param Value       the value to write

- * \param Filename    the name and full path of the .ini file to write to

- *

- * \return            1 if successful, otherwise 0

- */

-int ini_putl(const TCHAR *Section, const TCHAR *Key, long Value, const TCHAR *Filename)

-{

-  TCHAR buff[32];

-  long2str(Value, buff);

-  return ini_puts(Section, Key, buff, Filename);

-}

-

-#if !defined INI_NOFLOAT

-/** ini_putf()

- * \param Section     the name of the section to write the value in

- * \param Key         the name of the entry to write

- * \param Value       the value to write

- * \param Filename    the name and full path of the .ini file to write to

- *

- * \return            1 if successful, otherwise 0

- */

-int ini_putf(const TCHAR *Section, const TCHAR *Key, float Value, const TCHAR *Filename)

-{

-  TCHAR buff[64];

-  _stprintf(buff, __T("%f"), Value);

-  return ini_puts(Section, Key, buff, Filename);

-}

-#endif /* INI_FLOAT */

-#endif /* !INI_READONLY */

-

-

-#if defined PORTABLE_STRNICMP

-int strnicmp(const TCHAR *s1, const TCHAR *s2, size_t n)

-{

-  register unsigned TCHAR c1, c2;

-

-  while (n-- != 0 && (*s1 || *s2)) {

-    c1 = *(const unsigned TCHAR *)s1++;

-    if ('a' <= c1 && c1 <= 'z')

-      c1 += ('A' - 'a');

-    c2 = *(const unsigned TCHAR *)s2++;

-    if ('a' <= c2 && c2 <= 'z')

-      c2 += ('A' - 'a');

-    if (c1 != c2)

-      return c1 - c2;

-  } /* while */

-  return 0;

-}

-#endif /* PORTABLE_STRNICMP */