glib/tests/scannerapi.c

   1 /* Gtk+ object tests
   2  * Copyright (C) 2007 Patrick Hulin
   3  * Copyright (C) 2007 Imendio AB
   4  * Authors: Tim Janik
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the
  18  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  19  * Boston, MA 02111-1307, USA.
  20  */
  21 #include <glib.h>
  22 #include <string.h>
  23 #include <stdlib.h>
  24
  25
  26 /* GScanner fixture */
  27 typedef struct {
  28   GScanner *scanner;
  29 } ScannerFixture;
  30 static void
  31 scanner_fixture_setup (ScannerFixture *fix,
  32                        gconstpointer   test_data)
  33 {
  34   fix->scanner = g_scanner_new (NULL);
  35   g_assert (fix->scanner != NULL);
  36 }
  37 static void
  38 scanner_fixture_teardown (ScannerFixture *fix,
  39                           gconstpointer   test_data)
  40 {
  41   g_assert (fix->scanner != NULL);
  42   g_scanner_destroy (fix->scanner);
  43 }
  44
  45 static void
  46 scanner_msg_func (GScanner *scanner,
  47                   gchar    *message,
  48                   gboolean  error)
  49 {
  50   g_assert_cmpstr (message, ==, "test");
  51 }
  52
  53 static void
  54 test_scanner_warn (ScannerFixture *fix,
  55                    gconstpointer   test_data)
  56 {
  57   fix->scanner->msg_handler = scanner_msg_func;
  58   g_scanner_warn (fix->scanner, "test");
  59 }
  60
  61 static void
  62 test_scanner_error_child (ScannerFixture *fix,
  63                           gconstpointer   test_data)
  64 {
  65   int pe = fix->scanner->parse_errors;
  66   g_scanner_error (fix->scanner, "scanner-error-message-test");
  67   g_assert_cmpint (fix->scanner->parse_errors, ==, pe + 1);
  68   exit (0);
  69 }
  70
  71 static void
  72 test_scanner_error (ScannerFixture *fix,
  73                     gconstpointer   test_data)
  74 {
  75   g_test_trap_subprocess ("/scanner/error:child", 0, G_TEST_TRAP_SILENCE_STDOUT | G_TEST_TRAP_SILENCE_STDERR);
  76   g_test_trap_assert_passed ();
  77   g_test_trap_assert_stderr ("*scanner-error-message-test*");
  78 }
  79
  80 static void
  81 check_keys (gpointer key,
  82             gpointer value,
  83             gpointer user_data)
  84 {
  85   g_assert_cmpint (GPOINTER_TO_INT (value), ==, g_ascii_strtoull (key, NULL, 0));
  86 }
  87
  88 static void
  89 test_scanner_symbols (ScannerFixture *fix,
  90                       gconstpointer   test_data)
  91 {
  92   gint i;
  93   gchar buf[2];
  94
  95   g_scanner_set_scope (fix->scanner, 1);
  96
  97   for (i = 0; i < 10; i++)
  98     g_scanner_scope_add_symbol (fix->scanner,
  99                                 1,
 100                                 g_ascii_dtostr (buf, 2, (gdouble)i),
 101                                 GINT_TO_POINTER (i));
 102   g_scanner_scope_foreach_symbol (fix->scanner, 1, check_keys, NULL);
 103   g_assert_cmpint (GPOINTER_TO_INT (g_scanner_lookup_symbol (fix->scanner, "5")), ==, 5);
 104   g_scanner_scope_remove_symbol (fix->scanner, 1, "5");
 105   g_assert (g_scanner_lookup_symbol (fix->scanner, "5") == NULL);
 106
 107   g_assert_cmpint (GPOINTER_TO_INT (g_scanner_scope_lookup_symbol (fix->scanner, 1, "4")), ==, 4);
 108   g_assert_cmpint (GPOINTER_TO_INT (g_scanner_scope_lookup_symbol (fix->scanner, 1, "5")), ==, 0);
 109 }
 110
 111 static void
 112 test_scanner_tokens (ScannerFixture *fix,
 113                      gconstpointer   test_data)
 114 {
 115   gchar buf[] = "(\t\n\r\\){}";
 116   const gint buflen = strlen (buf);
 117   gchar tokbuf[] = "(\\){}";
 118   const gint tokbuflen = strlen (tokbuf);
 119   guint i;
 120
 121   g_scanner_input_text (fix->scanner, buf, buflen);
 122
 123   g_assert_cmpint (g_scanner_cur_token (fix->scanner), ==, G_TOKEN_NONE);
 124   g_scanner_get_next_token (fix->scanner);
 125   g_assert_cmpint (g_scanner_cur_token (fix->scanner), ==, tokbuf[0]);
 126   g_assert_cmpint (g_scanner_cur_line (fix->scanner), ==, 1);
 127
 128   for (i = 1; i < tokbuflen; i++)
 129     g_assert_cmpint (g_scanner_get_next_token (fix->scanner), ==, tokbuf[i]);
 130   g_assert_cmpint (g_scanner_get_next_token (fix->scanner), ==, G_TOKEN_EOF);
 131   return;
 132 }
 133
 134 int
 135 main (int   argc,
 136       char *argv[])
 137 {
 138   g_test_init (&argc, &argv, NULL);
 139
 140   g_test_add ("/scanner/warn", ScannerFixture, 0, scanner_fixture_setup, test_scanner_warn, scanner_fixture_teardown);
 141   g_test_add ("/scanner/error", ScannerFixture, 0, scanner_fixture_setup, test_scanner_error, scanner_fixture_teardown);
 142   g_test_add ("/scanner/error:child", ScannerFixture, 0, scanner_fixture_setup, test_scanner_error_child, scanner_fixture_teardown);
 143   g_test_add ("/scanner/symbols", ScannerFixture, 0, scanner_fixture_setup, test_scanner_symbols, scanner_fixture_teardown);
 144   g_test_add ("/scanner/tokens", ScannerFixture, 0, scanner_fixture_setup, test_scanner_tokens, scanner_fixture_teardown);
 145
 146   return g_test_run();
 147 }