gambas-source-code/main/gbx/gbx_archive.h
gambas 4e50dec11d Work continues on new JIT system. Translation is now done at runtime.
[INTERPRETER]
* OPT: String routines are now compiled with -O3.
* NEW: Don't display JIT debugging message unless GB_JIT_DEBUG is set to something different from zero.
* NEW: String whose length is greater than 256 now have a growth step of 256 bytes instead of 16.

[GB.JIT]
* NEW: Do many global optimizations as now the class metadata is fully available.
* NEW: Support for optional argument. Still buggy at the moment.
2018-06-09 22:42:35 +02:00

103 lines
2.8 KiB
C

/***************************************************************************
gbx_archive.h
(c) 2000-2017 Benoît Minisini <g4mba5@gmail.com>
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.
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., 51 Franklin Street, Fifth Floor, Boston,
MA 02110-1301, USA.
***************************************************************************/
#ifndef __GBX_ARCHIVE_H
#define __GBX_ARCHIVE_H
#define PROJECT_EXEC
#include "gb_table.h"
#include "gb_file.h"
#include "gb_arch.h"
#include "gb_list.h"
// ARCHIVE_load_exported_class() pass argument
#define AR_FIND_ONLY 1
#define AR_LOAD_ONLY 2
#define AR_FIND_AND_LOAD 3
typedef
struct {
LIST list;
ARCH *arch;
const char *name;
char *version;
char *domain;
TABLE *classes;
const char *path;
void *current_component;
struct _CLASS **exported;
void *jit_library;
unsigned translation_loaded : 1;
unsigned exported_classes_loaded : 1;
unsigned version_loaded : 1;
unsigned jit_compiling : 1;
}
ARCHIVE;
typedef
struct {
ARCHIVE *arch;
ARCH_SYMBOL *sym;
int index;
int pos;
int len;
}
ARCHIVE_FIND;
#ifndef __ARCHIVE_C
EXTERN ARCHIVE *ARCHIVE_main;
EXTERN char *ARCHIVE_path;
#endif
void ARCHIVE_init(void);
void ARCHIVE_exit(void);
void ARCHIVE_create_main(const char *path);
void ARCHIVE_load_main(void);
ARCHIVE *ARCHIVE_create(const char *name, const char *path);
void ARCHIVE_delete(ARCHIVE *arch);
void ARCHIVE_load(ARCHIVE *arch, bool load_exp);
void ARCHIVE_load_exported_class(ARCHIVE *arch, int pass);
char *ARCHIVE_get_version(ARCHIVE *arch);
bool ARCHIVE_get(ARCHIVE *arch, const char **ppath, ARCHIVE_FIND *find);
void ARCHIVE_read(ARCHIVE *arch, int pos, void *buffer, int len);
bool ARCHIVE_exist(ARCHIVE *arch, const char *path);
void ARCHIVE_stat(ARCHIVE *arch, const char *path, FILE_STAT *info);
bool ARCHIVE_is_dir(ARCHIVE *arch, const char *path);
void ARCHIVE_dir_first(ARCHIVE *arch, const char *path, const char *pattern, int attr);
bool ARCHIVE_dir_next(char **name, int *len, int attr);
bool ARCHIVE_find_from_path(ARCHIVE **parch, const char **ppath);
bool ARCHIVE_get_current(ARCHIVE **parch);
bool ARCHIVE_check_addr(char *addr);
void ARCHIVE_browse(ARCHIVE *arch, void (*found)(const char *path, int64_t size));
#endif