wcstod no more convert d and D characters
[scilab.git] / scilab / modules / string / src / c / stringsCompare.c
1
2 /*
3  * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
4  * Copyright (C) INRIA - Allan CORNET
5  *
6  * Copyright (C) 2012 - 2016 - Scilab Enterprises
7  *
8  * This file is hereby licensed under the terms of the GNU GPL v2.0,
9  * pursuant to article 5.3.4 of the CeCILL v.2.1.
10  * This file was originally licensed under the terms of the CeCILL v2.1,
11  * and continues to be available under such terms.
12  * For more information, see the COPYING file which you should have received
13  * along with this program.
14  *
15  */
16
17 /*--------------------------------------------------------------------------*/
18 #include <string.h>
19 #include "stringsCompare.h"
20 #include "sci_malloc.h"
21 #include "os_string.h"
22 /*--------------------------------------------------------------------------*/
23 static int sign(int x)
24 {
25     if (x < 0)
26     {
27         return -1;
28     }
29     if (x > 0)
30     {
31         return 1;
32     }
33     return 0;
34 }
35
36 int * stringsCompare(wchar_t **Input_String_One, int dim_One, wchar_t **Input_String_Two, int dim_Two, BOOL dostricmp)
37 {
38     int *returnedValues = NULL;
39     int j = 0;
40
41     returnedValues = (int*)MALLOC(sizeof(int) * dim_One);
42     if (returnedValues)
43     {
44         int i = 0;
45         for (i = 0; i < dim_One; i++)
46         {
47             if (dim_Two == 1)
48             {
49                 j = 0;
50             }
51             else
52             {
53                 j = i;
54             }
55
56             if (dostricmp)
57             {
58                 returnedValues[i] = sign(wcsicmp(Input_String_One[i], Input_String_Two[j]));
59             }
60             else
61             {
62                 returnedValues[i] = sign(wcscmp(Input_String_One[i], Input_String_Two[j]));
63             }
64         }
65     }
66     return returnedValues;
67 }
68 /*--------------------------------------------------------------------------*/