xdas_util.c

Go to the documentation of this file.

/*----------------------------------------------------------------------------
 * Copyright (c) 2006, Novell, Inc.
 * All rights reserved.
 * 
 * Redistribution and use in source and binary forms, with or without 
 * modification, are permitted provided that the following conditions are 
 * met:
 * 
 *     * Redistributions of source code must retain the above copyright 
 *       notice, this list of conditions and the following disclaimer.
 *     * Redistributions in binary form must reproduce the above copyright 
 *       notice, this list of conditions and the following disclaimer in the 
 *       documentation and/or other materials provided with the distribution.
 *     * Neither the name of the Novell nor the names of its contributors 
 *       may be used to endorse or promote products derived from this 
 *       software without specific prior written permission.
 * 
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 
 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR 
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 
 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 
 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 
 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 
 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *--------------------------------------------------------------------------*/

#include "xdas_util.h"

#include <malloc.h>
#include <string.h>

#ifdef _WIN32
# define strdup _strdup
#endif

static char * xdas_strdup(const char * sp, const char * limit)
{
   size_t splen = limit? (limit - sp): strlen(sp);
   char * spdup = (char *)malloc(splen + 1);
   if (spdup != 0)
   {
      strncpy(spdup, sp, splen);
      spdup[splen] = 0;
   }
   return spdup;
}

static char * xdas_tokenize(char * str, const char * delims, 
      char esc, char ** nextok)
{
   char * thistok;
   if (str) 
      *nextok = str;
   thistok = *nextok;
   if (thistok)
   {
      while ((*nextok = strpbrk(*nextok, delims)) != 0 
            && *nextok != str && (*nextok)[-1] == esc) 
         (*nextok)++;
      if (*nextok != 0)
         *(*nextok)++ = 0;
   }
   return thistok;
}

int xdas_parse_info(const char * info, const char * limit, char ** fields, unsigned maxflds)
{
   unsigned i;
   char * info_copy, * saveptr;

#define FLD_DELIMS   ":"
#define ESC_CHAR     '%'

   /* make a working copy */
   if ((info_copy = xdas_strdup(info, limit)) == 0)
      return -1;

   /* convert control characters to spaces */
   for (saveptr = info_copy; *saveptr; saveptr++)
      if ((unsigned char)*saveptr < 32) *saveptr = ' ';

   /* tokenize the working copy */
   fields[0] = xdas_tokenize(info_copy, FLD_DELIMS, ESC_CHAR, &saveptr);
   for (i = 1; i < maxflds && fields[i-1]; i++)
      fields[i] = xdas_tokenize(0, FLD_DELIMS, ESC_CHAR, &saveptr);

   return saveptr? -2: 0;
}