1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/ossrv/glib/tests/env-test.c Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,132 @@
1.4 +/* GLIB - Library of useful routines for C programming
1.5 + * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
1.6 + * Portion Copyright © 2008-09 Nokia Corporation and/or its subsidiary(-ies). All rights reserved.
1.7 + * This library is free software; you can redistribute it and/or
1.8 + * modify it under the terms of the GNU Lesser General Public
1.9 + * License as published by the Free Software Foundation; either
1.10 + * version 2 of the License, or (at your option) any later version.
1.11 + *
1.12 + * This library is distributed in the hope that it will be useful,
1.13 + * but WITHOUT ANY WARRANTY; without even the implied warranty of
1.14 + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
1.15 + * Lesser General Public License for more details.
1.16 + *
1.17 + * You should have received a copy of the GNU Lesser General Public
1.18 + * License along with this library; if not, write to the
1.19 + * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
1.20 + * Boston, MA 02111-1307, USA.
1.21 + */
1.22 +
1.23 +/*
1.24 + * Modified by the GLib Team and others 1997-2000. See the AUTHORS
1.25 + * file for a list of people on the GLib Team. See the ChangeLog
1.26 + * files for a list of changes. These files are distributed with
1.27 + * GLib at ftp://ftp.gtk.org/pub/gtk/.
1.28 + */
1.29 +
1.30 +#include "config.h"
1.31 +
1.32 +#undef G_DISABLE_ASSERT
1.33 +#undef G_LOG_DOMAIN
1.34 +
1.35 +#ifdef GLIB_COMPILATION
1.36 +#undef GLIB_COMPILATION
1.37 +#endif
1.38 +
1.39 +#include <stdio.h>
1.40 +#include <stdlib.h>
1.41 +#include <string.h>
1.42 +
1.43 +#include <glib.h>
1.44 +
1.45 +#ifdef HAVE_UNISTD_H
1.46 +#include <unistd.h>
1.47 +#endif
1.48 +
1.49 +#ifdef __SYMBIAN32__
1.50 +#include "mrt2_glib2_test.h"
1.51 +#endif /*__SYMBIAN32__*/
1.52 +
1.53 +
1.54 +int
1.55 +main (int argc, char *argv[])
1.56 +{
1.57 + gboolean result;
1.58 + const gchar *data;
1.59 + gchar *variable = "TEST_G_SETENV";
1.60 + gchar *value1 = "works";
1.61 + gchar *value2 = "again";
1.62 +
1.63 + #ifdef __SYMBIAN32__
1.64 + 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);
1.65 + g_set_print_handler(mrtPrintHandler);
1.66 + #endif /*__SYMBIAN32__*/
1.67 +
1.68 + data = g_getenv (variable);
1.69 + g_assert (data == NULL && "TEST_G_SETENV already set");
1.70 +
1.71 + result = g_setenv (variable, value1, TRUE);
1.72 + g_assert (result && "g_setenv() failed");
1.73 +
1.74 + data = g_getenv (variable);
1.75 + g_assert (data != NULL && "g_getenv() returns NULL");
1.76 + g_assert (strcmp (data, value1) == 0 && "g_getenv() returns wrong value");
1.77 +
1.78 + result = g_setenv (variable, value2, FALSE);
1.79 + g_assert (result && "g_setenv() failed");
1.80 +
1.81 + data = g_getenv (variable);
1.82 + g_assert (data != NULL && "g_getenv() returns NULL");
1.83 + g_assert (strcmp (data, value2) != 0 && "g_setenv() always overwrites");
1.84 + g_assert (strcmp (data, value1) == 0 && "g_getenv() returns wrong value");
1.85 +
1.86 + result = g_setenv (variable, value2, TRUE);
1.87 + g_assert (result && "g_setenv() failed");
1.88 +
1.89 + data = g_getenv (variable);
1.90 + g_assert (data != NULL && "g_getenv() returns NULL");
1.91 + g_assert (strcmp (data, value1) != 0 && "g_setenv() doesn't overwrite");
1.92 + g_assert (strcmp (data, value2) == 0 && "g_getenv() returns wrong value");
1.93 +
1.94 + g_unsetenv (variable);
1.95 + data = g_getenv (variable);
1.96 + g_assert (data == NULL && "g_unsetenv() doesn't work");
1.97 +
1.98 +#if 0
1.99 + /* We can't test this, because it's an illegal argument that
1.100 + * we g_return_if_fail for.
1.101 + */
1.102 + result = g_setenv ("foo=bar", "baz", TRUE);
1.103 + g_assert (!result && "g_setenv() accepts '=' in names");
1.104 +#endif
1.105 +
1.106 + result = g_setenv ("foo", "bar=baz", TRUE);
1.107 + g_assert (result && "g_setenv() doesn't accept '=' in values");
1.108 +#if 0
1.109 + /* While glibc supports '=' in names in getenv(), SUS doesn't say anything about it,
1.110 + * and Solaris doesn't support it.
1.111 + */
1.112 + data = g_getenv ("foo=bar");
1.113 + g_assert (strcmp (data, "baz") == 0 && "g_getenv() doesn't support '=' in names");
1.114 +#endif
1.115 + data = g_getenv ("foo");
1.116 + g_assert (strcmp (data, "bar=baz") == 0 && "g_getenv() doesn't support '=' in values");
1.117 +
1.118 +#if 0
1.119 + /* We can't test this, because it's an illegal argument that
1.120 + * we g_return_if_fail for. Plus how would we check for failure,
1.121 + * since we can't set the value...
1.122 + */
1.123 + g_unsetenv ("foo=bar");
1.124 +#endif
1.125 + g_unsetenv ("foo");
1.126 + data = g_getenv ("foo");
1.127 + g_assert (data == NULL && "g_unsetenv() doesn't support '=' in values");
1.128 +
1.129 + #if __SYMBIAN32__
1.130 + testResultXml("env-test");
1.131 + #endif /* EMULATOR */
1.132 +
1.133 +
1.134 + return 0;
1.135 +}