Update .po files.
[official-gcc.git] / gcc / java / resource.c
blob3d500f6d487d68410a1137914bc74424b0f82d40
1 /* Functions related to building resource files.
2 Copyright (C) 1996-2016 Free Software Foundation, Inc.
4 This file is part of GCC.
6 GCC is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3, or (at your option)
9 any later version.
11 GCC 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
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with GCC; see the file COPYING3. If not see
18 <http://www.gnu.org/licenses/>.
20 Java and all Java-based marks are trademarks or registered trademarks
21 of Sun Microsystems, Inc. in the United States and other countries.
22 The Free Software Foundation is independent of Sun Microsystems, Inc. */
24 #include "config.h"
25 #include "system.h"
26 #include "coretypes.h"
27 #include "tm.h"
28 #include "tree.h"
29 #include "stringpool.h"
30 #include "cgraph.h"
31 #include "fold-const.h"
32 #include "stor-layout.h"
33 #include "java-tree.h"
34 #include "toplev.h"
35 #include "tree-iterator.h"
37 /* A list of all the resources files. */
38 static GTY(()) vec<tree, va_gc> *resources;
40 void
41 compile_resource_data (const char *name, const char *buffer, int length)
43 tree rtype, field = NULL_TREE, data_type, rinit, data, decl;
44 vec<constructor_elt, va_gc> *v = NULL;
46 data_type = build_prim_array_type (unsigned_byte_type_node,
47 strlen (name) + length);
48 rtype = make_node (RECORD_TYPE);
49 PUSH_FIELD (input_location,
50 rtype, field, "name_length", unsigned_int_type_node);
51 PUSH_FIELD (input_location,
52 rtype, field, "resource_length", unsigned_int_type_node);
53 PUSH_FIELD (input_location, rtype, field, "data", data_type);
54 FINISH_RECORD (rtype);
55 START_RECORD_CONSTRUCTOR (v, rtype);
56 PUSH_FIELD_VALUE (v, "name_length",
57 build_int_cst (NULL_TREE, strlen (name)));
58 PUSH_FIELD_VALUE (v, "resource_length",
59 build_int_cst (NULL_TREE, length));
60 data = build_string (strlen(name) + length, buffer);
61 TREE_TYPE (data) = data_type;
62 PUSH_FIELD_VALUE (v, "data", data);
63 FINISH_RECORD_CONSTRUCTOR (rinit, v, rtype);
64 TREE_CONSTANT (rinit) = 1;
66 decl = build_decl (input_location,
67 VAR_DECL, java_mangle_resource_name (name), rtype);
68 TREE_STATIC (decl) = 1;
69 TREE_PUBLIC (decl) = 1;
70 java_hide_decl (decl);
71 DECL_ARTIFICIAL (decl) = 1;
72 DECL_IGNORED_P (decl) = 1;
73 TREE_READONLY (decl) = 1;
74 TREE_THIS_VOLATILE (decl) = 0;
75 DECL_INITIAL (decl) = rinit;
76 layout_decl (decl, 0);
77 pushdecl (decl);
78 rest_of_decl_compilation (decl, global_bindings_p (), 0);
79 varpool_node::finalize_decl (decl);
81 vec_safe_push (resources, decl);
84 void
85 write_resource_constructor (tree *list_p)
87 tree decl, t, register_resource_fn;
88 unsigned ix;
90 if (resources == NULL)
91 return;
93 t = build_function_type_list (void_type_node, ptr_type_node, NULL);
94 t = build_decl (input_location,
95 FUNCTION_DECL, get_identifier ("_Jv_RegisterResource"), t);
96 TREE_PUBLIC (t) = 1;
97 DECL_EXTERNAL (t) = 1;
98 register_resource_fn = t;
100 /* Write out entries in the same order in which they were defined. */
101 FOR_EACH_VEC_ELT (*resources, ix, decl)
103 t = build_fold_addr_expr (decl);
104 t = build_call_expr (register_resource_fn, 1, t);
105 append_to_statement_list (t, list_p);
109 /* Generate a byte array representing the contents of FILENAME. The
110 array is assigned a unique local symbol. The array represents a
111 compiled Java resource, which is accessed by the runtime using
112 NAME. */
113 void
114 compile_resource_file (const char *name, const char *filename)
116 struct stat stat_buf;
117 int fd;
118 char *buffer;
120 fd = open (filename, O_RDONLY | O_BINARY);
121 if (fd < 0)
123 perror ("Failed to read resource file");
124 return;
126 if (fstat (fd, &stat_buf) != 0
127 || ! S_ISREG (stat_buf.st_mode))
129 perror ("Could not figure length of resource file");
130 return;
132 buffer = XNEWVEC (char, strlen (name) + stat_buf.st_size);
133 strcpy (buffer, name);
134 read (fd, buffer + strlen (name), stat_buf.st_size);
135 close (fd);
137 compile_resource_data (name, buffer, stat_buf.st_size);
140 #include "gt-java-resource.h"