Merge branch 'ewlsh/gir-compiler' into 'main'

girepository: Update gir-compiler and use it to compile GIRs

See merge request GNOME/glib!3853
This commit is contained in:
Philip Withnall 2024-01-31 11:37:35 +00:00
commit 180e4867c8
5 changed files with 122 additions and 87 deletions

View File

@ -1,41 +1,44 @@
/* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*-
* GObject introspection: Typelib compiler
/* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*- */
/* GObject introspection: Typelib compiler
*
*
* SPDX-License-Identifier: LGPL-2.1-or-later
* Copyright (C) 2005 Matthias Clasen
* Copyright (C) 2024 GNOME Foundation
*
* 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.
* version 2.1 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.
* You should have received a copy of the GNU Lesser General
* Public License along with this library; if not, see <http://www.gnu.org/licenses/>.
*/
#include <errno.h>
#include <locale.h>
#include <string.h>
#include <gio/gio.h>
#include <girepository.h>
#include <glib.h>
#include <glib/gstdio.h>
#include <gio/gio.h>
#ifdef G_OS_WIN32
#include <io.h>
#include <fcntl.h>
#include <io.h>
#endif
#include "girmodule.h"
#include "girnode.h"
#include "girparser.h"
#include "gitypelib-internal.h"
#include "girmodule-private.h"
#include "girnode-private.h"
#include "girparser-private.h"
gchar **includedirs = NULL;
gchar **input = NULL;
@ -48,8 +51,8 @@ gboolean verbose = FALSE;
gboolean show_version = FALSE;
static gboolean
write_out_typelib (gchar *prefix,
GITypelib *typelib)
write_out_typelib (gchar *prefix,
GITypelib *typelib)
{
FILE *file;
gsize written;
@ -74,28 +77,33 @@ write_out_typelib (gchar *prefix,
else
{
if (prefix)
filename = g_strdup_printf ("%s-%s", prefix, output);
{
filename = g_strdup_printf ("%s-%s", prefix, output);
}
else
filename = g_strdup (output);
{
filename = g_strdup (output);
}
file_obj = g_file_new_for_path (filename);
tmp_filename = g_strdup_printf ("%s.tmp", filename);
tmp_file_obj = g_file_new_for_path (tmp_filename);
file = g_fopen (tmp_filename, "wb");
if (file == NULL)
{
{
g_fprintf (stderr, "failed to open '%s': %s\n",
tmp_filename, g_strerror (errno));
goto out;
}
}
}
written = fwrite (typelib->data, 1, typelib->len, file);
if (written < typelib->len) {
g_fprintf (stderr, "ERROR: Could not write the whole output: %s",
strerror(errno));
goto out;
}
if (written < typelib->len)
{
g_fprintf (stderr, "ERROR: Could not write the whole output: %s",
strerror (errno));
goto out;
}
if (output != NULL)
fclose (file);
@ -103,9 +111,9 @@ write_out_typelib (gchar *prefix,
{
if (!g_file_move (tmp_file_obj, file_obj, G_FILE_COPY_OVERWRITE, NULL, NULL, NULL, &error))
{
g_fprintf (stderr, "ERROR: failed to rename %s to %s: %s", tmp_filename, filename, error->message);
g_fprintf (stderr, "ERROR: failed to rename %s to %s: %s", tmp_filename, filename, error->message);
g_clear_error (&error);
goto out;
goto out;
}
}
success = TRUE;
@ -120,38 +128,35 @@ out:
GLogLevelFlags logged_levels;
static void log_handler (const gchar *log_domain,
GLogLevelFlags log_level,
const gchar *message,
gpointer user_data)
static void
log_handler (const gchar *log_domain,
GLogLevelFlags log_level,
const gchar *message,
gpointer user_data)
{
if (log_level & logged_levels)
g_log_default_handler (log_domain, log_level, message, user_data);
}
static GOptionEntry options[] =
{
{ "includedir", 0, 0, G_OPTION_ARG_FILENAME_ARRAY, &includedirs, "include directories in GIR search path", NULL },
{ "output", 'o', 0, G_OPTION_ARG_FILENAME, &output, "output file", "FILE" },
{ "module", 'm', 0, G_OPTION_ARG_STRING, &mname, "module to compile", "NAME" },
{ "shared-library", 'l', 0, G_OPTION_ARG_FILENAME_ARRAY, &shlibs, "shared library", "FILE" },
{ "debug", 0, 0, G_OPTION_ARG_NONE, &debug, "show debug messages", NULL },
{ "verbose", 0, 0, G_OPTION_ARG_NONE, &verbose, "show verbose messages", NULL },
static GOptionEntry options[] = {
{ "includedir", 0, 0, G_OPTION_ARG_FILENAME_ARRAY, &includedirs, "include directories in GIR search path", NULL },
{ "output", 'o', 0, G_OPTION_ARG_FILENAME, &output, "output file", "FILE" },
{ "module", 'm', 0, G_OPTION_ARG_STRING, &mname, "module to compile", "NAME" },
{ "shared-library", 'l', 0, G_OPTION_ARG_FILENAME_ARRAY, &shlibs, "shared library", "FILE" },
{ "debug", 0, 0, G_OPTION_ARG_NONE, &debug, "show debug messages", NULL },
{ "verbose", 0, 0, G_OPTION_ARG_NONE, &verbose, "show verbose messages", NULL },
{ "version", 0, 0, G_OPTION_ARG_NONE, &show_version, "show program's version number and exit", NULL },
{ G_OPTION_REMAINING, 0, 0, G_OPTION_ARG_FILENAME_ARRAY, &input, NULL, NULL },
{ NULL, }
G_OPTION_ENTRY_NULL
};
int
main (int argc, char ** argv)
main (int argc, char **argv)
{
GOptionContext *context;
GError *error = NULL;
GIrParser *parser;
GIrModule *module;
gint i;
g_typelib_check_sanity ();
GIIrParser *parser;
GIIrModule *module;
setlocale (LC_ALL, "");
@ -169,7 +174,7 @@ main (int argc, char ** argv)
return 1;
}
logged_levels = G_LOG_LEVEL_MASK & ~(G_LOG_LEVEL_MESSAGE|G_LOG_LEVEL_DEBUG);
logged_levels = G_LOG_LEVEL_MASK & ~(G_LOG_LEVEL_MESSAGE | G_LOG_LEVEL_DEBUG);
if (debug)
logged_levels = logged_levels | G_LOG_LEVEL_DEBUG;
if (verbose)
@ -180,35 +185,31 @@ main (int argc, char ** argv)
if (show_version)
{
g_printf ("g-ir-compiler %u.%u.%u\n",
GI_MAJOR_VERSION, GI_MINOR_VERSION, GI_MICRO_VERSION);
g_printf ("gi-compile-repository %u.%u.%u\n",
GLIB_MAJOR_VERSION, GLIB_MINOR_VERSION, GLIB_MICRO_VERSION);
return 0;
}
if (!input)
{
g_fprintf (stderr, "no input files\n");
if (!input)
{
g_fprintf (stderr, "no input files\n");
return 1;
}
g_debug ("[parsing] start, %d includes",
includedirs ? g_strv_length (includedirs) : 0);
g_debug ("[parsing] start, %d includes",
includedirs ? g_strv_length (includedirs) : 0);
if (includedirs != NULL)
for (i = 0; includedirs[i]; i++)
g_irepository_prepend_search_path (includedirs[i]);
parser = gi_ir_parser_new ();
parser = _g_ir_parser_new ();
gi_ir_parser_set_includes (parser, (const char *const *) includedirs);
_g_ir_parser_set_includes (parser, (const char*const*) includedirs);
module = _g_ir_parser_parse_file (parser, input[0], &error);
if (module == NULL)
module = gi_ir_parser_parse_file (parser, input[0], &error);
if (module == NULL)
{
g_fprintf (stderr, "error parsing file %s: %s\n",
input[0], error->message);
g_fprintf (stderr, "error parsing file %s: %s\n",
input[0], error->message);
return 1;
}
@ -217,36 +218,36 @@ main (int argc, char ** argv)
g_debug ("[building] start");
{
GITypelib *typelib;
GITypelib *typelib;
if (shlibs)
{
if (module->shared_library)
g_free (module->shared_library);
module->shared_library = g_strjoinv (",", shlibs);
}
if (shlibs)
{
if (module->shared_library)
g_free (module->shared_library);
module->shared_library = g_strjoinv (",", shlibs);
}
g_debug ("[building] module %s", module->name);
g_debug ("[building] module %s", module->name);
typelib = _g_ir_module_build_typelib (module);
if (typelib == NULL)
g_error ("Failed to build typelib for module '%s'\n", module->name);
if (!g_typelib_validate (typelib, &error))
g_error ("Invalid typelib for module '%s': %s",
module->name, error->message);
typelib = gi_ir_module_build_typelib (module);
if (typelib == NULL)
g_error ("Failed to build typelib for module '%s'\n", module->name);
if (!gi_typelib_validate (typelib, &error))
g_error ("Invalid typelib for module '%s': %s",
module->name, error->message);
if (!write_out_typelib (NULL, typelib))
return 1;
g_typelib_free (typelib);
typelib = NULL;
}
if (!write_out_typelib (NULL, typelib))
return 1;
gi_typelib_free (typelib);
typelib = NULL;
}
g_debug ("[building] done");
#if 0
/* No point */
_g_ir_parser_free (parser);
#endif
gi_ir_parser_free (parser);
#endif
return 0;
return 0;
}

View File

@ -0,0 +1,29 @@
# SPDX-License-Identifier: LGPL-2.1-or-later
# SPDX-FileCopyrightText: 2024 GNOME Foundation
custom_c_args = [
'-DG_LOG_DOMAIN="GLib-GirCompiler"',
]
if cc.get_id() != 'msvc'
custom_c_args = cc.get_supported_arguments([
'-Wno-old-style-definition',
'-Wno-cast-align',
'-Wno-unused-parameter',
'-Wno-duplicated-branches',
])
endif
gicompilerepository = executable('gi-compile-repository', 'compiler.c',
dependencies: [
libgirepository_dep,
libgirepository_internals_dep,
libgio_dep,
],
install: true,
c_args: custom_c_args,
)
# Replace the default g-ir-compiler target with the version we
# just built.
meson.override_find_program('g-ir-compiler', gicompilerepository)

View File

@ -255,7 +255,7 @@ gi_field_info_get_field (GIFieldInfo *field_info,
break;
case GI_TYPE_TAG_ARRAY:
/* We don't check the array type and that it is fixed-size,
we trust g-ir-compiler to do the right thing */
we trust gi-compile-repository to do the right thing */
value->v_pointer = G_STRUCT_MEMBER_P (mem, offset);
result = TRUE;
break;

View File

@ -241,3 +241,5 @@ endif
if build_tests
subdir('tests')
endif
subdir('compiler')

View File

@ -1,3 +1,6 @@
# SPDX-License-Identifier: LGPL-2.1-or-later
# SPDX-FileCopyrightText: 2024 GNOME Foundation
girepository_tests = {
'cmph-bdz': {
'dependencies': [cmph_dep],