gcc/java/resource.c

   1 /* Functions related to building resource files.
   2    Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004
   3    Free Software Foundation, Inc.
   4
   5 This file is part of GCC.
   6
   7 GCC is free software; you can redistribute it and/or modify
   8 it under the terms of the GNU General Public License as published by
   9 the Free Software Foundation; either version 2, or (at your option)
  10 any later version.
  11
  12 GCC is distributed in the hope that it will be useful,
  13 but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with GCC; see the file COPYING.  If not, write to
  19 the Free Software Foundation, 59 Temple Place - Suite 330,
  20 Boston, MA 02111-1307, USA.
  21
  22 Java and all Java-based marks are trademarks or registered trademarks
  23 of Sun Microsystems, Inc. in the United States and other countries.
  24 The Free Software Foundation is independent of Sun Microsystems, Inc.  */
  25
  26 #include "config.h"
  27 #include "system.h"
  28 #include "coretypes.h"
  29 #include "tm.h"
  30 #include "tree.h"
  31 #include "rtl.h"
  32 #include "flags.h"
  33 #include "java-tree.h"
  34 #include "jcf.h"
  35 #include "obstack.h"
  36 #include "toplev.h"
  37 #include "output.h"
  38 #include "parse.h"
  39 #include "function.h"
  40 #include "ggc.h"
  41 #include "stdio.h"
  42 #include "target.h"
  43 #include "expr.h"
  44 #include "tree-iterator.h"
  45
  46 /* DOS brain-damage */
  47 #ifndef O_BINARY
  48 #define O_BINARY 0 /* MS-DOS brain-damage */
  49 #endif
  50
  51 /* A list of all the resources files.  */
  52 static GTY(()) tree resources = NULL;
  53
  54 /* Count of all the resources compiled in this invocation.  */
  55 static int Jr_count = 0;
  56
  57 void
  58 compile_resource_data (const char *name, const char *buffer, int length)
  59 {
  60   tree rtype, field = NULL_TREE, data_type, rinit, data, decl;
  61   char buf[60];
  62
  63   data_type = build_prim_array_type (unsigned_byte_type_node,
  64                                      strlen (name) + length);
  65   rtype = make_node (RECORD_TYPE);
  66   PUSH_FIELD (rtype, field, "name_length", unsigned_int_type_node);
  67   PUSH_FIELD (rtype, field, "resource_length", unsigned_int_type_node);
  68   PUSH_FIELD (rtype, field, "data", data_type);
  69   FINISH_RECORD (rtype);
  70   START_RECORD_CONSTRUCTOR (rinit, rtype);
  71   PUSH_FIELD_VALUE (rinit, "name_length",
  72                     build_int_cst (NULL_TREE, strlen (name)));
  73   PUSH_FIELD_VALUE (rinit, "resource_length",
  74                     build_int_cst (NULL_TREE, length));
  75   data = build_string (strlen(name) + length, buffer);
  76   TREE_TYPE (data) = data_type;
  77   PUSH_FIELD_VALUE (rinit, "data", data);
  78   FINISH_RECORD_CONSTRUCTOR (rinit);
  79   TREE_CONSTANT (rinit) = 1;
  80   TREE_INVARIANT (rinit) = 1;
  81
  82   /* Generate a unique-enough identifier.  */
  83   sprintf (buf, "_Jr%d", ++Jr_count);
  84
  85   decl = build_decl (VAR_DECL, get_identifier (buf), rtype);
  86   TREE_STATIC (decl) = 1;
  87   DECL_ARTIFICIAL (decl) = 1;
  88   DECL_IGNORED_P (decl) = 1;
  89   TREE_READONLY (decl) = 1;
  90   TREE_THIS_VOLATILE (decl) = 0;
  91   DECL_INITIAL (decl) = rinit;
  92   layout_decl (decl, 0);
  93   pushdecl (decl);
  94   rest_of_decl_compilation (decl, global_bindings_p (), 0);
  95   make_decl_rtl (decl);
  96   assemble_variable (decl, 1, 0, 0);
  97
  98   resources = tree_cons (NULL_TREE, decl, resources);
  99 }
 100
 101 void
 102 write_resource_constructor (tree *list_p)
 103 {
 104   tree iter, t, register_resource_fn;
 105
 106   if (resources == NULL)
 107     return;
 108
 109   t = build_function_type_list (void_type_node, ptr_type_node, NULL);
 110   t = build_decl (FUNCTION_DECL, get_identifier ("_Jv_RegisterResource"), t);
 111   TREE_PUBLIC (t) = 1;
 112   DECL_EXTERNAL (t) = 1;
 113   register_resource_fn = t;
 114
 115   /* Write out entries in the same order in which they were defined.  */
 116   for (iter = nreverse (resources); iter ; iter = TREE_CHAIN (iter))
 117     {
 118       t = build_fold_addr_expr (TREE_VALUE (iter));
 119       t = tree_cons (NULL, t, NULL);
 120       t = build_function_call_expr (register_resource_fn, t);
 121       append_to_statement_list (t, list_p);
 122     }
 123 }
 124
 125 /* Generate a byte array representing the contents of FILENAME.  The
 126    array is assigned a unique local symbol.  The array represents a
 127    compiled Java resource, which is accessed by the runtime using
 128    NAME.  */
 129 void
 130 compile_resource_file (const char *name, const char *filename)
 131 {
 132   struct stat stat_buf;
 133   int fd;
 134   char *buffer;
 135
 136   fd = open (filename, O_RDONLY | O_BINARY);
 137   if (fd < 0)
 138     {
 139       perror ("Failed to read resource file");
 140       return;
 141     }
 142   if (fstat (fd, &stat_buf) != 0
 143       || ! S_ISREG (stat_buf.st_mode))
 144     {
 145       perror ("Could not figure length of resource file");
 146       return;
 147     }
 148   buffer = xmalloc (strlen (name) + stat_buf.st_size);
 149   strcpy (buffer, name);
 150   read (fd, buffer + strlen (name), stat_buf.st_size);
 151   close (fd);
 152
 153   compile_resource_data (name, buffer, stat_buf.st_size);
 154 }
 155
 156 #include "gt-java-resource.h"