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 (ScannerFixture *fix,
  63                     gconstpointer   test_data)
  64 {
  65   if (g_test_subprocess ())
  66     {
  67       int pe = fix->scanner->parse_errors;
  68       g_scanner_error (fix->scanner, "scanner-error-message-test");
  69       g_assert_cmpint (fix->scanner->parse_errors, ==, pe + 1);
  70       exit (0);
  71     }
  72
  73   g_test_trap_subprocess (NULL, 0, 0);
  74   g_test_trap_assert_passed ();
  75   g_test_trap_assert_stderr ("*scanner-error-message-test*");
  76 }
  77
  78 static void
  79 check_keys (gpointer key,
  80             gpointer value,
  81             gpointer user_data)
  82 {
  83   g_assert_cmpint (GPOINTER_TO_INT (value), ==, g_ascii_strtoull (key, NULL, 0));
  84 }
  85
  86 static void
  87 test_scanner_symbols (ScannerFixture *fix,
  88                       gconstpointer   test_data)
  89 {
  90   gint i;
  91   gchar buf[2];
  92
  93   g_scanner_set_scope (fix->scanner, 1);
  94
  95   for (i = 0; i < 10; i++)
  96     g_scanner_scope_add_symbol (fix->scanner,
  97                                 1,
  98                                 g_ascii_dtostr (buf, 2, (gdouble)i),
  99                                 GINT_TO_POINTER (i));
 100   g_scanner_scope_foreach_symbol (fix->scanner, 1, check_keys, NULL);
 101   g_assert_cmpint (GPOINTER_TO_INT (g_scanner_lookup_symbol (fix->scanner, "5")), ==, 5);
 102   g_scanner_scope_remove_symbol (fix->scanner, 1, "5");
 103   g_assert (g_scanner_lookup_symbol (fix->scanner, "5") == NULL);
 104
 105   g_assert_cmpint (GPOINTER_TO_INT (g_scanner_scope_lookup_symbol (fix->scanner, 1, "4")), ==, 4);
 106   g_assert_cmpint (GPOINTER_TO_INT (g_scanner_scope_lookup_symbol (fix->scanner, 1, "5")), ==, 0);
 107 }
 108
 109 static void
 110 test_scanner_tokens (ScannerFixture *fix,
 111                      gconstpointer   test_data)
 112 {
 113   gchar buf[] = "(\t\n\r\\){}";
 114   const gint buflen = strlen (buf);
 115   gchar tokbuf[] = "(\\){}";
 116   const gint tokbuflen = strlen (tokbuf);
 117   guint i;
 118
 119   g_scanner_input_text (fix->scanner, buf, buflen);
 120
 121   g_assert_cmpint (g_scanner_cur_token (fix->scanner), ==, G_TOKEN_NONE);
 122   g_scanner_get_next_token (fix->scanner);
 123   g_assert_cmpint (g_scanner_cur_token (fix->scanner), ==, tokbuf[0]);
 124   g_assert_cmpint (g_scanner_cur_line (fix->scanner), ==, 1);
 125
 126   for (i = 1; i < tokbuflen; i++)
 127     g_assert_cmpint (g_scanner_get_next_token (fix->scanner), ==, tokbuf[i]);
 128   g_assert_cmpint (g_scanner_get_next_token (fix->scanner), ==, G_TOKEN_EOF);
 129   return;
 130 }
 131
 132 int
 133 main (int   argc,
 134       char *argv[])
 135 {
 136   g_test_init (&argc, &argv, NULL);
 137
 138   g_test_add ("/scanner/warn", ScannerFixture, 0, scanner_fixture_setup, test_scanner_warn, scanner_fixture_teardown);
 139   g_test_add ("/scanner/error", ScannerFixture, 0, scanner_fixture_setup, test_scanner_error, scanner_fixture_teardown);
 140   g_test_add ("/scanner/symbols", ScannerFixture, 0, scanner_fixture_setup, test_scanner_symbols, scanner_fixture_teardown);
 141   g_test_add ("/scanner/tokens", ScannerFixture, 0, scanner_fixture_setup, test_scanner_tokens, scanner_fixture_teardown);
 142
 143   return g_test_run();
 144 }