mirror of
https://gitlab.gnome.org/GNOME/glib.git
synced 2025-01-12 07:26:15 +01:00
tools/quote-file.sh tools/compiler.c tools/generate.c
2008-02-22 Mark Doffman <mark.doffman@codethink.co.uk>
* tools/quote-file.sh
* tools/compiler.c
* tools/generate.c
Move to using the 'C' struct compiler code.
WARNING: This commit does not compile. It is a partial change.
svn path=/trunk/; revision=135
This commit is contained in:
Mark Doffman
Evan Welsh
parent
125fa5e786
commit
048debb50b
@ -30,8 +30,8 @@
|
|||||||
#include "gidlnode.h"
|
#include "gidlnode.h"
|
||||||
#include "gidlparser.h"
|
#include "gidlparser.h"
|
||||||
#include "gmetadata.h"
|
#include "gmetadata.h"
|
||||||
|
#include "gidlcompilercontext.h"
|
||||||
|
|
||||||
gboolean raw = FALSE;
|
|
||||||
gboolean no_init = FALSE;
|
gboolean no_init = FALSE;
|
||||||
gchar **input = NULL;
|
gchar **input = NULL;
|
||||||
gchar *output = NULL;
|
gchar *output = NULL;
|
||||||
@ -40,62 +40,131 @@ gchar *shlib = NULL;
|
|||||||
gboolean debug = FALSE;
|
gboolean debug = FALSE;
|
||||||
gboolean verbose = FALSE;
|
gboolean verbose = FALSE;
|
||||||
|
|
||||||
static gchar *
|
GLogLevelFlags logged_levels;
|
||||||
format_output (GMetadata *metadata)
|
|
||||||
|
static void log_handler (const gchar *log_domain,
|
||||||
|
GLogLevelFlags log_level,
|
||||||
|
const gchar *message,
|
||||||
|
gpointer user_data)
|
||||||
{
|
{
|
||||||
GString *result;
|
|
||||||
|
if (log_level & logged_levels)
|
||||||
|
g_log_default_handler (log_domain, log_level, message, user_data);
|
||||||
|
}
|
||||||
|
|
||||||
|
static GOptionEntry options[] =
|
||||||
|
{
|
||||||
|
{ "no-init", 0, 0, G_OPTION_ARG_NONE, &no_init, "do not create _init() function", 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, &shlib, "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 },
|
||||||
|
{ G_OPTION_REMAINING, 0, 0, G_OPTION_ARG_FILENAME_ARRAY, &input, NULL, NULL },
|
||||||
|
{ NULL, }
|
||||||
|
};
|
||||||
|
|
||||||
|
int
|
||||||
|
main (int argc, char ** argv)
|
||||||
|
{
|
||||||
|
GOptionContext *context;
|
||||||
|
GError *error = NULL;
|
||||||
|
GList *m, *modules;
|
||||||
gint i;
|
gint i;
|
||||||
|
GList *c;
|
||||||
|
gint entry_id;
|
||||||
|
|
||||||
result = g_string_sized_new (6 * metadata->len);
|
|
||||||
|
|
||||||
g_string_append_printf (result, "#include <stdlib.h>\n");
|
|
||||||
g_string_append_printf (result, "#include <girepository.h>\n\n");
|
|
||||||
|
|
||||||
g_string_append_printf (result, "const unsigned char _G_METADATA[] = \n{");
|
|
||||||
|
|
||||||
for (i = 0; i < metadata->len; i++)
|
|
||||||
{
|
|
||||||
if (i > 0)
|
|
||||||
g_string_append (result, ", ");
|
|
||||||
|
|
||||||
if (i % 10 == 0)
|
|
||||||
g_string_append (result, "\n\t");
|
|
||||||
|
|
||||||
g_string_append_printf (result, "0x%.2x", metadata->data[i]);
|
|
||||||
}
|
|
||||||
|
|
||||||
g_string_append_printf (result, "\n};\n\n");
|
|
||||||
g_string_append_printf (result, "const gsize _G_METADATA_SIZE = %u;\n\n",
|
|
||||||
(guint)metadata->len);
|
|
||||||
|
|
||||||
if (!no_init)
|
|
||||||
{
|
|
||||||
g_string_append_printf (result,
|
|
||||||
"__attribute__((constructor)) void\n"
|
|
||||||
"register_metadata (void)\n"
|
|
||||||
"{\n"
|
|
||||||
"\tGMetadata *metadata;\n"
|
|
||||||
"\tmetadata = g_metadata_new_from_const_memory (_G_METADATA, _G_METADATA_SIZE);\n"
|
|
||||||
"\tg_irepository_register (NULL, metadata);\n"
|
|
||||||
"}\n\n");
|
|
||||||
|
|
||||||
g_string_append_printf (result,
|
|
||||||
"__attribute__((destructor)) void\n"
|
|
||||||
"unregister_metadata (void)\n"
|
|
||||||
"{\n"
|
|
||||||
"\tg_irepository_unregister (NULL, \"%s\");\n"
|
|
||||||
"}\n",
|
|
||||||
g_metadata_get_namespace (metadata));
|
|
||||||
}
|
|
||||||
|
|
||||||
return g_string_free (result, FALSE);
|
|
||||||
}
|
|
||||||
|
|
||||||
static void
|
|
||||||
write_out_metadata (gchar *prefix,
|
|
||||||
GMetadata *metadata)
|
|
||||||
{
|
|
||||||
FILE *file;
|
FILE *file;
|
||||||
|
GIdlCompilerContext *ctx;
|
||||||
|
|
||||||
|
context = g_option_context_new ("");
|
||||||
|
g_option_context_add_main_entries (context, options, NULL);
|
||||||
|
g_option_context_parse (context, &argc, &argv, &error);
|
||||||
|
g_option_context_free (context);
|
||||||
|
|
||||||
|
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)
|
||||||
|
logged_levels = logged_levels | G_LOG_LEVEL_MESSAGE;
|
||||||
|
|
||||||
|
g_log_set_default_handler (log_handler, NULL);
|
||||||
|
|
||||||
|
if (!input)
|
||||||
|
{
|
||||||
|
g_fprintf (stderr, "no input files\n");
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
modules = NULL;
|
||||||
|
for (i = 0; input[i]; i++)
|
||||||
|
{
|
||||||
|
GList *mods;
|
||||||
|
mods = g_idl_parse_file (input[i], &error);
|
||||||
|
|
||||||
|
if (mods == NULL)
|
||||||
|
{
|
||||||
|
g_fprintf (stderr, "error parsing file %s: %s\n",
|
||||||
|
input[i], error->message);
|
||||||
|
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
modules = g_list_concat (modules, mods);
|
||||||
|
}
|
||||||
|
|
||||||
|
for (m = modules; m; m = m->next)
|
||||||
|
{
|
||||||
|
GIdlModule *module = m->data;
|
||||||
|
gchar *prefix;
|
||||||
|
GError *err = NULL;
|
||||||
|
|
||||||
|
|
||||||
|
if (mname && strcmp (mname, module->name) != 0)
|
||||||
|
continue;
|
||||||
|
if (shlib)
|
||||||
|
{
|
||||||
|
if (module->shared_library)
|
||||||
|
g_free (module->shared_library);
|
||||||
|
module->shared_library = g_strdup (shlib);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!mname && (m->next || m->prev) && output)
|
||||||
|
prefix = module->name;
|
||||||
|
else
|
||||||
|
prefix = NULL;
|
||||||
|
|
||||||
|
ctx = g_idl_compiler_context_new (module->name, &err);
|
||||||
|
if (err != NULL)
|
||||||
|
{
|
||||||
|
g_fprintf (stderr, "Error creating new compiler context: %s",
|
||||||
|
err->message);
|
||||||
|
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* This is making sure all the types
|
||||||
|
* that have local directory entries are already
|
||||||
|
* in the entries database.
|
||||||
|
*
|
||||||
|
* A method of finding out if an external reference is
|
||||||
|
* needed
|
||||||
|
*/
|
||||||
|
for (c=module->entries; c; c = c->next)
|
||||||
|
{
|
||||||
|
GIdlNode *node = (GIdlNode*) c->data;
|
||||||
|
|
||||||
|
g_idl_compiler_add_entry(ctx, node);
|
||||||
|
}
|
||||||
|
|
||||||
|
for (c=module->entries; c; c = c->next)
|
||||||
|
{
|
||||||
|
GIdlNode *node = (GIdlNode*) c->data;
|
||||||
|
|
||||||
|
entry_id = g_idl_compiler_get_entry_id(ctx, node->name);
|
||||||
|
|
||||||
|
g_idl_compiler_write_node(node, entry_id, ctx);
|
||||||
|
}
|
||||||
|
|
||||||
if (output == NULL)
|
if (output == NULL)
|
||||||
file = stdout;
|
file = stdout;
|
||||||
@ -121,128 +190,9 @@ write_out_metadata (gchar *prefix,
|
|||||||
g_free (filename);
|
g_free (filename);
|
||||||
}
|
}
|
||||||
|
|
||||||
if (raw)
|
g_idl_compiler_context_finalize(ctx, file, module->shared_library, &err);
|
||||||
fwrite (metadata->data, 1, metadata->len, file);
|
|
||||||
else
|
|
||||||
{
|
|
||||||
gchar *code;
|
|
||||||
|
|
||||||
code = format_output (metadata);
|
g_idl_compiler_context_destroy(ctx);
|
||||||
fputs (code, file);
|
|
||||||
g_free (code);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (output != NULL)
|
|
||||||
fclose (file);
|
|
||||||
}
|
|
||||||
|
|
||||||
GLogLevelFlags logged_levels;
|
|
||||||
|
|
||||||
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[] =
|
|
||||||
{
|
|
||||||
{ "raw", 0, 0, G_OPTION_ARG_NONE, &raw, "emit raw metadata", NULL },
|
|
||||||
{ "code", 0, G_OPTION_FLAG_REVERSE, G_OPTION_ARG_NONE, &raw, "emit C code", NULL },
|
|
||||||
{ "no-init", 0, 0, G_OPTION_ARG_NONE, &no_init, "do not create _init() function", 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, &shlib, "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 },
|
|
||||||
{ G_OPTION_REMAINING, 0, 0, G_OPTION_ARG_FILENAME_ARRAY, &input, NULL, NULL },
|
|
||||||
{ NULL, }
|
|
||||||
};
|
|
||||||
|
|
||||||
int
|
|
||||||
main (int argc, char ** argv)
|
|
||||||
{
|
|
||||||
GOptionContext *context;
|
|
||||||
GError *error = NULL;
|
|
||||||
GList *m, *modules;
|
|
||||||
gint i;
|
|
||||||
|
|
||||||
g_metadata_check_sanity ();
|
|
||||||
|
|
||||||
context = g_option_context_new ("");
|
|
||||||
g_option_context_add_main_entries (context, options, NULL);
|
|
||||||
g_option_context_parse (context, &argc, &argv, &error);
|
|
||||||
g_option_context_free (context);
|
|
||||||
|
|
||||||
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)
|
|
||||||
logged_levels = logged_levels | G_LOG_LEVEL_MESSAGE;
|
|
||||||
|
|
||||||
g_log_set_default_handler (log_handler, NULL);
|
|
||||||
|
|
||||||
if (!input)
|
|
||||||
{
|
|
||||||
g_fprintf (stderr, "no input files\n");
|
|
||||||
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
modules = NULL;
|
|
||||||
for (i = 0; input[i]; i++)
|
|
||||||
{
|
|
||||||
GList *mods;
|
|
||||||
mods = g_idl_parse_file (input[i], &error);
|
|
||||||
|
|
||||||
if (mods == NULL)
|
|
||||||
{
|
|
||||||
g_fprintf (stderr, "error parsing file %s: %s\n",
|
|
||||||
input[i], error->message);
|
|
||||||
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
modules = g_list_concat (modules, mods);
|
|
||||||
}
|
|
||||||
|
|
||||||
for (m = modules; m; m = m->next)
|
|
||||||
{
|
|
||||||
GIdlModule *module = m->data;
|
|
||||||
gchar *prefix;
|
|
||||||
GMetadata *metadata;
|
|
||||||
|
|
||||||
if (mname && strcmp (mname, module->name) != 0)
|
|
||||||
continue;
|
|
||||||
if (shlib)
|
|
||||||
{
|
|
||||||
if (module->shared_library)
|
|
||||||
g_free (module->shared_library);
|
|
||||||
module->shared_library = g_strdup (shlib);
|
|
||||||
}
|
|
||||||
metadata = g_idl_module_build_metadata (module, modules);
|
|
||||||
if (metadata == NULL)
|
|
||||||
{
|
|
||||||
g_error ("Failed to build metadata for module '%s'\n", module->name);
|
|
||||||
|
|
||||||
continue;
|
|
||||||
}
|
|
||||||
if (!g_metadata_validate (metadata, &error))
|
|
||||||
g_error ("Invalid metadata for module '%s': %s",
|
|
||||||
module->name, error->message);
|
|
||||||
|
|
||||||
|
|
||||||
if (!mname && (m->next || m->prev) && output)
|
|
||||||
prefix = module->name;
|
|
||||||
else
|
|
||||||
prefix = NULL;
|
|
||||||
|
|
||||||
write_out_metadata (prefix, metadata);
|
|
||||||
g_metadata_free (metadata);
|
|
||||||
metadata = NULL;
|
|
||||||
|
|
||||||
/* when writing to stdout, stop after the first module */
|
/* when writing to stdout, stop after the first module */
|
||||||
if (m->next && !output && !mname)
|
if (m->next && !output && !mname)
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user