--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/apicompatanamdw/bcdrivers/os/ossrv/glib/tests/strtod-test.c Thu Apr 22 17:15:08 2010 +0530
@@ -0,0 +1,177 @@
+/*
+* Copyright (c) 2010 Nokia Corporation and/or its subsidiary(-ies).
+* All rights reserved.
+* This component and the accompanying materials are made available
+* under the terms of "Eclipse Public License v1.0"
+* which accompanies this distribution, and is available
+* at the URL "http://www.eclipse.org/legal/epl-v10.html".
+*
+* Initial Contributors:
+* Nokia Corporation - initial contribution.
+*
+* Contributors:
+*
+* Description:
+*
+*/
+#undef G_DISABLE_ASSERT
+#undef G_LOG_DOMAIN
+
+/* for NAN and INFINITY */
+#define _ISOC99_SOURCE
+
+#include <glib.h>
+#include <locale.h>
+#include <string.h>
+#include <stdlib.h>
+#include <math.h>
+#include <stdio.h>
+
+#ifdef SYMBIAN
+#include "mrt2_glib2_test.h"
+#endif /*SYMBIAN*/
+
+
+void
+test_string (char *number, double res, gboolean check_end, int correct_len)
+{
+ double d;
+ char *locales[] = {"sv_SE", "en_US", "fa_IR", "C", "ru_RU"};
+ int l;
+ char *dummy;
+
+ /* we try a copy of number, with some free space for malloc before that.
+ * This is supposed to smash the some wrong pointer calculations. */
+
+ dummy = g_malloc (100000);
+ number = g_strdup (number);
+ g_free (dummy);
+
+ for (l = 0; l < G_N_ELEMENTS (locales); l++)
+ {
+ gboolean ok;
+ char *end = "(unset)";
+
+ setlocale (LC_NUMERIC, locales[l]);
+ d = g_ascii_strtod (number, &end);
+ ok = isnan (res) ? isnan (d) : (d == res);
+ if (!ok)
+ {
+ g_print ("g_ascii_strtod on \"%s\" for locale %s failed\n", number, locales[l]);
+ g_print ("expected %f (nan %d) actual %f (nan %d)\n",
+ res, isnan (res),
+ d, isnan (d));
+ assert_failed = TRUE;
+ }
+
+ ok = (end - number) == (check_end ? correct_len : strlen (number));
+ if (!ok) {
+ assert_failed = TRUE;
+ if (end == NULL)
+ g_print ("g_ascii_strtod on \"%s\" for locale %s endptr was NULL\n",
+ number, locales[l]);
+ else if (end >= number && end <= number + strlen (number))
+ g_print ("g_ascii_strtod on \"%s\" for locale %s endptr was wrong, leftover: \"%s\"\n",
+ number, locales[l], end);
+ else
+ g_print ("g_ascii_strtod on \"%s\" for locale %s endptr was REALLY wrong (number=%p, end=%p)\n",
+ number, locales[l], number, end);
+ }
+ }
+
+ g_free (number);
+}
+
+
+int
+main ()
+{
+ gdouble d, our_nan, our_inf;
+ char buffer[G_ASCII_DTOSTR_BUF_SIZE];
+
+#ifdef SYMBIAN
+ gdouble gd;
+ gchar* gstr1;
+ gchar* gstr2;
+ g_log_set_handler (NULL, G_LOG_FLAG_FATAL| G_LOG_FLAG_RECURSION | G_LOG_LEVEL_CRITICAL | G_LOG_LEVEL_WARNING | G_LOG_LEVEL_MESSAGE | G_LOG_LEVEL_INFO | G_LOG_LEVEL_DEBUG, &mrtLogHandler, NULL);
+ g_set_print_handler(mrtPrintHandler);
+#endif /*SYMBIAN*/
+
+
+#ifdef NAN
+ our_nan = NAN;
+#else
+ /* Do this before any call to setlocale. */
+ our_nan = atof ("NaN");
+#endif
+ g_assert (isnan (our_nan));
+
+#ifdef INFINITY
+ our_inf = INFINITY;
+#else
+ our_inf = atof ("Infinity");
+#endif
+ g_assert (our_inf > 1 && our_inf == our_inf / 2);
+
+ test_string ("123.123", 123.123, FALSE, 0);
+ test_string ("123.123e2", 123.123e2, FALSE, 0);
+ test_string ("123.123e-2", 123.123e-2, FALSE, 0);
+ test_string ("-123.123", -123.123, FALSE, 0);
+ test_string ("-123.123e2", -123.123e2, FALSE, 0);
+ test_string ("-123.123e-2", -123.123e-2, FALSE, 0);
+ test_string ("5.4", 5.4, TRUE, 3);
+ test_string ("5.4,5.5", 5.4, TRUE, 3);
+ test_string ("5,4", 5.0, TRUE, 1);
+ /* the following are for #156421 */
+ test_string ("1e1", 1e1, FALSE, 0);
+ test_string ("NAN", our_nan, FALSE, 0);
+ test_string ("-nan", -our_nan, FALSE, 0);
+ test_string ("INF", our_inf, FALSE, 0);
+ test_string ("-infinity", -our_inf, FALSE, 0);
+ test_string ("-.75,0", -0.75, TRUE, 4);
+
+
+#ifndef SYMBIAN
+ d = 179769313486231570814527423731704356798070567525844996598917476803157260780028538760589558632766878171540458953514382464234321326889464182768467546703537516986049910576551282076245490090389328944075868508455133942304583236903222948165808559332123348274797826204144723168738177180919299881250404026184124858368.0;
+#else
+ d=1.79769313486232e+307;
+#endif
+ g_assert (d == g_ascii_strtod (g_ascii_dtostr (buffer, sizeof (buffer), d), NULL));
+
+#ifndef SYMBIAN
+ d = -179769313486231570814527423731704356798070567525844996598917476803157260780028538760589558632766878171540458953514382464234321326889464182768467546703537516986049910576551282076245490090389328944075868508455133942304583236903222948165808559332123348274797826204144723168738177180919299881250404026184124858368.0;
+#else
+ d = -1.79769313486232e+307;
+#endif
+ g_assert (d == g_ascii_strtod (g_ascii_dtostr (buffer, sizeof (buffer), d), NULL));
+
+
+
+ d = pow (2.0, -1024.1);
+#ifndef SYMBIAN
+ g_assert (d == g_ascii_strtod (g_ascii_dtostr (buffer, sizeof (buffer), d), NULL));
+#else
+ gstr1 = g_ascii_dtostr (buffer, sizeof (buffer),d);
+ gstr2 = "5.19016829648363e-309";
+ g_assert (gstr1 != gstr2 && strcmp(gstr1, gstr2) == 0);
+ gd = g_ascii_strtod (gstr1, NULL);
+ g_assert (gd == 5.190168296483632e-309);
+#endif
+
+
+ d = -pow (2.0, -1024.1);
+#ifndef SYMBIAN
+ g_assert (d == g_ascii_strtod (g_ascii_dtostr (buffer, sizeof (buffer), d), NULL));
+#else
+ gstr1 = g_ascii_dtostr (buffer, sizeof (buffer),d);
+ gstr2 = "-5.19016829648363e-309";
+ g_assert (gstr1 != gstr2 && strcmp(gstr1, gstr2) == 0);
+ gd = g_ascii_strtod (gstr1, NULL);
+ g_assert (gd == -5.190168296483632e-309);
+#endif
+#ifdef SYMBIAN
+ testResultXml("strtod-test");
+#endif /* EMULATOR */
+
+ return 0;
+}