Next save, with linking started.
[cacao.git] / tables.h
index 80f789328662b205b4a2b169feb54672d6586ac2..ffe19b9782b7e1381d329901bec50bd83b91432a 100644 (file)
--- a/tables.h
+++ b/tables.h
-/****************************** tables.h ***************************************
+/* tables.h - 
 
-       Copyright (c) 1997 A. Krall, R. Grafl, M. Gschwind, M. Probst
+   Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
+   R. Grafl, A. Krall, C. Kruegel, C. Oates, R. Obermaisser,
+   M. Probst, S. Ring, E. Steiner, C. Thalinger, D. Thuernbeck,
+   P. Tomsich, J. Wenninger
 
-       See file COPYRIGHT for information on usage and disclaimer of warranties
+   This file is part of CACAO.
 
-       Author:  Reinhard Grafl      EMAIL: cacao@complang.tuwien.ac.at
+   This program is free software; you can redistribute it and/or
+   modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation; either version 2, or (at
+   your option) any later version.
 
-       Last Change: 1996/11/20
+   This program 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
+   General Public License for more details.
 
-*******************************************************************************/
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+   02111-1307, USA.
 
-extern bool collectverbose;
+   Contact: cacao@complang.tuwien.ac.at
 
+   Authors: Reinhard Grafl
+
+   $Id: tables.h 1186 2004-06-19 12:24:42Z twisti $
+
+*/
+
+
+#ifndef _TABLES_H
+#define _TABLES_H
+
+#include <stdio.h>
+#include "global.h" /* for unicode. -- phil */
 
 #define CLASS(name)     (unicode_getclasslink(unicode_new_char(name)))
 
-typedef void (*stringdeleter) ( java_objectheader *string );
-
-
-void suck_init (char *classpath);
-bool suck_start (unicode *name);
-void suck_stop ();
-void suck_nbytes (u1 *buffer, u4 len);
-void skip_nbytes (u4 len);
-u1 suck_u1 ();
-s1 suck_s1 ();
-u2 suck_u2 ();
-s2 suck_s2 ();
-u4 suck_u4 ();
-s4 suck_s4 ();
-u8 suck_u8 ();
-s8 suck_s8 ();
-float suck_float ();
-double suck_double ();
-
-
-void unicode_init ();
-void unicode_close (stringdeleter del);
-void unicode_display (unicode *u);
-void unicode_sprint (char *buffer, unicode *u);
-void unicode_fprint (FILE *file, unicode *u);
-unicode *unicode_new_u2 (u2 *text, u2 length);
-unicode *unicode_new_char (char *text);
-void unicode_setclasslink (unicode *u, classinfo *class);
-classinfo *unicode_getclasslink (unicode *u);
-void unicode_unlinkclass (unicode *u);
-void unicode_setstringlink (unicode *u, java_objectheader *str);
-void unicode_unlinkstring (unicode *u);
-void unicode_show ();
-
-u2 desc_to_type (unicode *descriptor);
-u2 desc_typesize (unicode *descriptor);
-
-
-void heap_init (u4 size, u4 startsize, void **stackbottom);
-void heap_close ();
-void *heap_allocate (u4 bytelength, bool references, methodinfo *finalizer);
-void heap_addreference (void **reflocation);
-
-void gc_init (void);
-void gc_thread (void);
-void gc_call (void);
+/* to determine the end of utf strings */
+#define utf_end(utf) ((char *) utf->text+utf->blength)
+
+extern hashtable utf_hash;     /* hashtable for utf8-symbols */
+extern hashtable string_hash;  /* hashtable for javastrings  */
+extern hashtable class_hash;   /* hashtable for classes      */
+
+extern list unlinkedclasses;   /* this is only used for eager class loading   */
+
+
+/* creates hashtables for symboltables */
+void tables_init();
+
+/* free memory for hashtables */ 
+void tables_close();
+
+/* check if a UTF-8 string is valid */
+bool is_valid_utf(char *utf_ptr, char *end_pos);
+
+/* check if a UTF-8 string may be used as a class/field/method name */
+bool is_valid_name(char *utf_ptr, char *end_pos);
+bool is_valid_name_utf(utf *u);
+
+/* write utf symbol to file/buffer */
+void utf_sprint(char *buffer, utf *u);
+void utf_sprint_classname(char *buffer, utf *u);
+void utf_fprint(FILE *file, utf *u);
+void utf_fprint_classname(FILE *file, utf *u);
+void utf_display(utf *u);
+void utf_display_classname(utf *u);
+
+/* write utf symbol to logfile/stdout */
+void log_utf(utf *u);
+void log_plain_utf(utf *u);
+
+/* create new utf-symbol */
+utf *utf_new(char *text, u2 length);
+
+/* without locking (caller already holding lock*/
+utf *utf_new_intern(char *text, u2 length);
+
+utf *utf_new_char(char *text);
+utf *utf_new_char_classname(char *text);
+
+/* show utf-table */
+void utf_show();
+
+/* get next unicode character of a utf-string */
+u2 utf_nextu2(char **utf);
+
+/* get number of unicode characters of a utf string */
+u4 utf_strlen(utf *u);
+
+/* search for class and create it if not found */
+classinfo *class_new(utf *u);
+
+/* without locking (caller already holding lock*/
+classinfo *class_new_intern(utf *u);
+
+/* return an array class with the given component class */
+classinfo *class_array_of(classinfo *component);
+
+/* return an array class with the given dimension and element class */
+classinfo *class_multiarray_of(int dim, classinfo *element);
+
+/* get javatype according to a typedescriptor */
+u2 desc_to_type(utf *descriptor);
+
+/* get length of a datatype */
+u2 desc_typesize(utf *descriptor);
+
+/* determine hashkey of a unicode-symbol */
+u4 unicode_hashkey(u2 *text, u2 length);
+
+/* create hashtable */
+void init_hashtable(hashtable *hash, u4 size);
+
+/* search for class in classtable */
+classinfo *class_get(utf *u);
+
+/* remove class from classtable */
+bool class_remove(classinfo *c);
+
+#if defined(USE_THREADS) && defined(NATIVE_THREADS)
+void tables_lock();
+void tables_unlock();
+#endif
+
+#endif /* _TABLES_H */
+
+
+/*
+ * These are local overrides for various environment variables in Emacs.
+ * Please do not remove this and leave it at the end of the file, where
+ * Emacs will automagically detect them.
+ * ---------------------------------------------------------------------
+ * Local variables:
+ * mode: c
+ * indent-tabs-mode: t
+ * c-basic-offset: 4
+ * tab-width: 4
+ * End:
+ */