original files of m241

components/ip_net2-6.9/ipcom/src/ipcom_strlib.c

@@ -0,0 +1,225 @@
+/*
+ ******************************************************************************
+ *                     SOURCE FILE
+ *
+ *     Document no: @(#) $Name: VXWORKS_ITER40_2019102207 $ $RCSfile: ipcom_strlib.c,v $ $Revision: 1.20.60.2 $
+ *     $Source: /home/interpeak/CVSRoot/ipcom/src/ipcom_strlib.c,v $
+ *     $Author: fguo $ $Date: 2012-07-13 10:40:50 $
+ *     $State: Exp $ $Locker:  $
+ *
+ *     INTERPEAK_COPYRIGHT_STRING
+ *     Design and implementation by Roger Boden <roger@interpeak.se>
+ ******************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 1                    DESCRIPTION
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 2                    CONFIGURATION
+ ****************************************************************************
+ */
+
+#include "ipcom_config.h"
+
+
+/*
+ ****************************************************************************
+ * 3                    INCLUDE FILES
+ ****************************************************************************
+ */
+
+#define IPCOM_USE_CLIB_PROTO
+#include "ipcom_strlib.h"
+#include "ipcom_clib.h"
+#include "ipcom_err.h"
+#include "ipcom_syslog.h"
+
+
+/*
+ ****************************************************************************
+ * 4                    EXTERN PROTOTYPES
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 5                    DEFINES
+ ****************************************************************************
+ */
+
+#define IPCOM_SYSLOG_PRIORITY    IPCOM_SYSLOG_IPCOM_PRIORITY
+#define IPCOM_SYSLOG_FACILITY    IPCOM_LOG_IPCOM
+
+
+/*
+ ****************************************************************************
+ * 6                    TYPES
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 7                    LOCAL PROTOTYPES
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 8                    DATA
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 9                    LOCAL FUNCTIONS
+ ****************************************************************************
+ */
+
+/*
+ ****************************************************************************
+ * 10                   PUBLIC FUNCTIONS
+ ****************************************************************************
+ */
+
+
+/*
+ *===========================================================================
+ *                    ipcom_parse_argstr
+ *===========================================================================
+ * Description: Parses a command string to the traditional argc and argv
+ *              arguments.
+ * Parameters:
+ * Returns:
+ */
+/*lint -efunc(429,ipcom_parse_argstr)  Custodial pointer 'arg_str' (line X) has not been freed or returned*/
+IP_PUBLIC Ip_err
+ipcom_parse_argstr(char *arg_str, int *argc, char ***argv)
+{
+    char **tmp_argv;
+    Ip_size_t argv_size = 32;
+    int pos = 0, arg_str_len;
+    Ip_err err_code;
+    char endmark;
+    enum { skipping_space, searching_end_of_arg } state;
+
+    state = skipping_space;
+    *argc = 0;
+    arg_str_len = (int)ipcom_strlen(arg_str);
+    endmark = ' ';
+
+    tmp_argv = ipcom_malloc(sizeof(char *) * argv_size);
+    if(tmp_argv == IP_NULL)
+    {
+        err_code = IPCOM_ERR_FAILED;
+        IPCOM_LOG0(ERR, "ipcom_parse_argstr :: out of memory 1");
+        goto err;
+    }
+    ipcom_memset(tmp_argv, 0, sizeof(char *) * argv_size);
+
+    while(pos < arg_str_len)
+    {
+        switch(state)
+        {
+        case skipping_space:
+            if(arg_str[pos] == ' ' || arg_str[pos] == '\t')
+                break;
+            if(arg_str[pos] == '\'')
+            {
+                endmark = '\'';
+                pos++;
+            }
+            else if(arg_str[pos] == '"')
+            {
+                endmark = '"';
+                pos++;
+            }
+            else
+                endmark = ' ';
+
+            tmp_argv[*argc] = &(arg_str[pos]);
+            (*argc)++;
+            if(*argc == (int)argv_size)
+            {
+                /* Make space to fit in a terminating NULL pointer
+                 * (and possible additional args) */
+                tmp_argv = ipcom_realloc(tmp_argv, sizeof(char*)*argv_size*2);
+                if( !tmp_argv )
+                {
+                    IPCOM_LOG0(ERR, "ipcom_parse_argstr :: out of memory 2");
+                    err_code = IPCOM_ERR_FAILED;
+                    goto err;
+                }
+                argv_size *=2;
+            }
+            state = searching_end_of_arg;
+            break;
+
+        case searching_end_of_arg:
+            if(arg_str[pos] == endmark)
+            {
+                state = skipping_space;
+                arg_str[pos] = 0;
+            }
+            break;
+        }
+        pos++;
+    }
+
+    if(state == searching_end_of_arg && (endmark == '\'' || endmark == '"'))
+    {
+        IPCOM_LOG1(ERR, "ipcom_parse_argstr() :: badly matched escape characters (%c)", endmark);
+        err_code = IPCOM_ERR_INVALID_ARG;
+        goto err;
+    }
+    tmp_argv[*argc] = IP_NULL;
+
+    *argv = tmp_argv;
+    return IPCOM_SUCCESS;
+
+ err:
+    if(tmp_argv != IP_NULL)
+    {
+        ipcom_free(tmp_argv);
+    }
+    *argc = 0;
+    *argv = IP_NULL;
+    return err_code;
+}
+
+/*
+ *===========================================================================
+ *                    ipcom_str_in_list
+ *===========================================================================
+ * Description: Search 'list' for 'str', where 'list' is a string of whitespace
+ *              separated sub-strings.
+ * Parameters:
+ * Returns:     True (non-zero) if 'str' is part of 'list'
+ */
+
+IP_PUBLIC char *
+ipcom_str_in_list(char *str, char *list)
+{
+    Ip_size_t n;
+    char *s;
+
+    for (s = ipcom_strstr(list, str); s; s = s + n, s = ipcom_strstr(s, str))
+    {
+        n = ipcom_strcspn(s, " \t");
+        if (ipcom_strncmp(s, str, n) == 0)
+        {
+            return s;
+        }
+    }
+    return IP_NULL;
+}
+
+/*
+ ****************************************************************************
+ *                      END OF FILE
+ ****************************************************************************
+ */