/* GLIB - Library of useful routines for C programming

  * Copyright (C) 1995-1997  Peter Mattis, Spencer Kimball and Josh MacDonald

  * Portion Copyright © 2008-09 Nokia Corporation and/or its subsidiary(-ies). All rights reserved.

  * This library is free software; you can redistribute it and/or

  * modify it under the terms of the GNU Lesser General Public

  * License as published by the Free Software Foundation; either

  * version 2 of the License, or (at your option) any later version.

  *

  * This library is distributed in the hope that it will be useful,

  * but WITHOUT ANY WARRANTY; without even the implied warranty of

  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

  * Lesser General Public License for more details.

  *

  * You should have received a copy of the GNU Lesser General Public

  * License along with this library; if not, write to the

  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,

  * Boston, MA 02111-1307, USA.

  */

 /*

  * Modified by the GLib Team and others 1997-2000.  See the AUTHORS

  * file for a list of people on the GLib Team.  See the ChangeLog

  * files for a list of changes.  These files are distributed with

  * GLib at ftp://ftp.gtk.org/pub/gtk/. 

  */

 #undef G_DISABLE_ASSERT

 #undef G_LOG_DOMAIN

 #include <glib.h>

 #include <stdio.h>

 #include <string.h>

 #include <stdlib.h>

 #ifdef __SYMBIAN32__

 #include "mrt2_glib2_test.h"

 #endif /*__SYMBIAN32__*/

 typedef struct _TestResult TestResult;

 struct _TestResult

 {

   gint argc;

   const gchar **argv;

 };

 static const gchar *

 test_command_lines[] =

 {

   /*  0 */ "foo bar",

   /*  1 */ "foo 'bar'",

   /*  2 */ "foo \"bar\"",

   /*  3 */ "foo '' 'bar'",

   /*  4 */ "foo \"bar\"'baz'blah'foo'\\''blah'\"boo\"",

   /*  5 */ "foo \t \tblah\tfoo\t\tbar  baz",

   /*  6 */ "foo '    spaces more spaces lots of     spaces in this   '  \t",

   /*  7 */ "foo \\\nbar",

   /*  8 */ "foo '' ''",

   /*  9 */ "foo \\\" la la la",

   /* 10 */ "foo \\ foo woo woo\\ ",

   /* 11 */ "foo \"yada yada \\$\\\"\"",

   /* 12 */ "foo \"c:\\\\\"",

   NULL

 };

 static const gchar *result0[] = { "foo", "bar", NULL };

 static const gchar *result1[] = { "foo", "bar", NULL };

 static const gchar *result2[] = { "foo", "bar", NULL };

 static const gchar *result3[] = { "foo", "", "bar", NULL };

 static const gchar *result4[] = { "foo", "barbazblahfoo'blahboo", NULL };

 static const gchar *result5[] = { "foo", "blah", "foo", "bar", "baz", NULL };

 static const gchar *result6[] = { "foo", "    spaces more spaces lots of     spaces in this   ", NULL };

 static const gchar *result7[] = { "foo", "bar", NULL };

 static const gchar *result8[] = { "foo", "", "", NULL };

 static const gchar *result9[] = { "foo", "\"", "la", "la", "la", NULL };

 static const gchar *result10[] = { "foo", " foo", "woo", "woo ", NULL };

 static const gchar *result11[] = { "foo", "yada yada $\"", NULL };

 static const gchar *result12[] = { "foo", "c:\\", NULL };

 static const TestResult

 correct_results[] =

 {

   { G_N_ELEMENTS (result0) - 1, result0 },

   { G_N_ELEMENTS (result1) - 1, result1 },

   { G_N_ELEMENTS (result2) - 1, result2 },

   { G_N_ELEMENTS (result3) - 1, result3 },

   { G_N_ELEMENTS (result4) - 1, result4 },

   { G_N_ELEMENTS (result5) - 1, result5 },

   { G_N_ELEMENTS (result6) - 1, result6 },

   { G_N_ELEMENTS (result7) - 1, result7 },

   { G_N_ELEMENTS (result8) - 1, result8 },

   { G_N_ELEMENTS (result9) - 1, result9 },

   { G_N_ELEMENTS (result10) - 1, result10 },

   { G_N_ELEMENTS (result11) - 1, result11 },

   { G_N_ELEMENTS (result12) - 1, result12 }

 };

 static void

 print_test (const gchar *cmdline, gint argc, gchar **argv,

             const TestResult *result)

 {

   gint i;

   fprintf (stderr, "Command line was: '%s'\n", cmdline);

   fprintf (stderr, "Expected result (%d args):\n", result->argc);

   i = 0;

   while (result->argv[i])

     {

       fprintf (stderr, " %3d '%s'\n", i, result->argv[i]);

       ++i;

     }  

   fprintf (stderr, "Actual result (%d args):\n", argc);

   i = 0;

   while (argv[i])

     {

       fprintf (stderr, " %3d '%s'\n", i, argv[i]);

       ++i;

     }

 }

 static void

 do_argv_test (const gchar *cmdline, const TestResult *result)

 {

   gint argc;

   gchar **argv;

   GError *err;

   gint i;

   err = NULL;

   if (!g_shell_parse_argv (cmdline, &argc, &argv, &err))

     {

       fprintf (stderr, "Error parsing command line that should work fine: %s\n",

                err->message);

       exit (1);

     }

   if (argc != result->argc)

     {

       fprintf (stderr, "Expected and actual argc don't match\n");

       print_test (cmdline, argc, argv, result);

       exit (1);

     }

   i = 0;

   while (argv[i])

     {

       if (strcmp (argv[i], result->argv[i]) != 0)

         {

           fprintf (stderr, "Expected and actual arg %d do not match\n", i);

           print_test (cmdline, argc, argv, result);

           exit (1);

         }

       ++i;

     }

   if (argv[i] != NULL)

     {

       fprintf (stderr, "argv didn't get NULL-terminated\n");

       exit (1);

     }

   g_strfreev (argv);

 }

 static void

 run_tests (void)

 {

   gint i;

   i = 0;

   while (test_command_lines[i])

     {

       do_argv_test (test_command_lines[i], &correct_results[i]);

       ++i;

     }

 }

 static gboolean any_test_failed = FALSE;

 #define CHECK_STRING_RESULT(expression, expected_value) \

  check_string_result (#expression, __FILE__, __LINE__, expression, expected_value)

 static void

 check_string_result (const char *expression,

 		     const char *file_name,

 		     int line_number,

 		     char *result,

 		     const char *expected)

 {

   gboolean match;

   if (expected == NULL)

     match = result == NULL;

   else

     match = result != NULL && strcmp (result, expected) == 0;

   if (!match)

     {

       if (!any_test_failed)

 	fprintf (stderr, "\n");

       fprintf (stderr, "FAIL: check failed in %s, line %d\n", file_name, line_number);

       fprintf (stderr, "      evaluated: %s\n", expression);

       fprintf (stderr, "       expected: %s\n", expected == NULL ? "NULL" : expected);

       fprintf (stderr, "            got: %s\n", result == NULL ? "NULL" : result);

       any_test_failed = TRUE;

     }

   g_free (result);

 }

 static char *

 test_shell_unquote (const char *str)

 {

   char *result;

   GError *error;

   error = NULL;

   result = g_shell_unquote (str, &error);

   if (error == NULL)

     return result;

   /* Leaks the error, which is no big deal and easy to fix if we

    * decide it matters.

    */

   if (error->domain != G_SHELL_ERROR)

     return g_strdup ("error in domain other than G_SHELL_ERROR");

   /* It would be nice to check the error message too, but that's

    * localized, so it's too much of a pain.

    */

   switch (error->code)

     {

     case G_SHELL_ERROR_BAD_QUOTING:

       return g_strdup ("G_SHELL_ERROR_BAD_QUOTING");

     case G_SHELL_ERROR_EMPTY_STRING:

       return g_strdup ("G_SHELL_ERROR_EMPTY_STRING");

     case G_SHELL_ERROR_FAILED:

       return g_strdup ("G_SHELL_ERROR_FAILED");

     default:

       return g_strdup ("bad error code in G_SHELL_ERROR domain");

     }

 }

 int

 main (int   argc,

       char *argv[])

 {

   #ifdef __SYMBIAN32__

   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 /*__SYMBIAN32__*/

   run_tests ();

   CHECK_STRING_RESULT (g_shell_quote (""), "''");

   CHECK_STRING_RESULT (g_shell_quote ("a"), "'a'");

   CHECK_STRING_RESULT (g_shell_quote ("("), "'('");

   CHECK_STRING_RESULT (g_shell_quote ("'"), "''\\'''");

   CHECK_STRING_RESULT (g_shell_quote ("'a"), "''\\''a'");

   CHECK_STRING_RESULT (g_shell_quote ("a'"), "'a'\\'''");

   CHECK_STRING_RESULT (g_shell_quote ("a'a"), "'a'\\''a'");

   CHECK_STRING_RESULT (test_shell_unquote (""), "");

   CHECK_STRING_RESULT (test_shell_unquote ("a"), "a");

   CHECK_STRING_RESULT (test_shell_unquote ("'a'"), "a");

   CHECK_STRING_RESULT (test_shell_unquote ("'('"), "(");

   CHECK_STRING_RESULT (test_shell_unquote ("''\\'''"), "'");

   CHECK_STRING_RESULT (test_shell_unquote ("''\\''a'"), "'a");

   CHECK_STRING_RESULT (test_shell_unquote ("'a'\\'''"), "a'");

   CHECK_STRING_RESULT (test_shell_unquote ("'a'\\''a'"), "a'a");

   CHECK_STRING_RESULT (test_shell_unquote ("\\\\"), "\\");

   CHECK_STRING_RESULT (test_shell_unquote ("\\\n"), "");

   CHECK_STRING_RESULT (test_shell_unquote ("'\\''"), "G_SHELL_ERROR_BAD_QUOTING");

 #if defined (_MSC_VER) && (_MSC_VER <= 1200)

   /* using \x22 instead of \" to work around a msvc 5.0, 6.0 compiler bug */

   CHECK_STRING_RESULT (test_shell_unquote ("\x22\\\x22\""), "\"");

 #else

   CHECK_STRING_RESULT (test_shell_unquote ("\"\\\"\""), "\"");

 #endif

   CHECK_STRING_RESULT (test_shell_unquote ("\""), "G_SHELL_ERROR_BAD_QUOTING");

   CHECK_STRING_RESULT (test_shell_unquote ("'"), "G_SHELL_ERROR_BAD_QUOTING");

   CHECK_STRING_RESULT (test_shell_unquote ("\x22\\\\\""), "\\");

   CHECK_STRING_RESULT (test_shell_unquote ("\x22\\`\""), "`");

   CHECK_STRING_RESULT (test_shell_unquote ("\x22\\$\""), "$");

   CHECK_STRING_RESULT (test_shell_unquote ("\x22\\\n\""), "\n");

   CHECK_STRING_RESULT (test_shell_unquote ("\"\\'\""), "\\'");

   CHECK_STRING_RESULT (test_shell_unquote ("\x22\\\r\""), "\\\r");

   CHECK_STRING_RESULT (test_shell_unquote ("\x22\\n\""), "\\n");

 #ifdef __SYMBIAN32__

   testResultXml("shell-test");

 #endif /* EMULATOR */	

   return any_test_failed ? 1 : 0;

 }