path: root/agen5/proto.h

/* -*- buffer-read-only: t -*- vi: set ro:
 *
 * Prototypes for agen5
 * Generated Sat Aug 11 09:41:33 PDT 2012
 */
#ifndef AGEN5_PROTO_H_GUARD
#define AGEN5_PROTO_H_GUARD 1

#ifndef LOCAL
#  define LOCAL extern
#  define REDEF_LOCAL 1
#else
#  undef  REDEF_LOCAL
#endif
/*
 *  Extracted from agCgi.c
 */
LOCAL void
loadCgi(void);

/*
 *  Extracted from agDep.c
 */
LOCAL void
add_source_file(char const * pz);

LOCAL void
rm_source_file(char const * pz);

LOCAL void
add_target_file(char const * pz);

LOCAL void
rm_target_file(char const * pz);

LOCAL void
start_dep_file(void);

LOCAL void
wrap_up_depends(void);

/*
 *  Extracted from agInit.c
 */
LOCAL void
initialize(int arg_ct, char** arg_vec);

LOCAL void
config_dep(tOptions * opts, tOptDesc * od);

/*
 *  Extracted from agShell.c
 */
LOCAL void
close_server_shell(void);

LOCAL char *
shell_cmd(char const * cmd);

/*
 *  Extracted from agUtils.c
 */
LOCAL char *
aprf(char const * pzFmt, ...);

LOCAL void
open_trace_file(char ** av, tOptDesc * odsc);

LOCAL void
check_make_dep_env(void);

LOCAL void
process_ag_opts(int arg_ct, char ** arg_vec);

LOCAL char const *
get_define_str(char const * de_name, bool check_env);

LOCAL char *
span_quote(char * in_q);

LOCAL char const *
skip_scheme(char const * scan,  char const * end);

LOCAL int
count_nl(char const * pz);

LOCAL char const *
skip_expr(char const * pzSrc, size_t len);

/*
 *  Extracted from autogen.c
 */
LOCAL void
ag_abend_at(char const * pzMsg
#ifdef DEBUG_ENABLED
            , char const * pzFile, int line
#endif
    );

LOCAL void *
ao_malloc (size_t sz);

LOCAL void *
ao_realloc (void *p, size_t sz);

LOCAL char *
ao_strdup (char const * str);

/*
 *  Extracted from defDirect.c
 */
LOCAL char*
processDirective(char* pzScan);

/*
 *  Extracted from defFind.c
 */
LOCAL int
canonical_name(char * pzD, char const * pzS, int srcLen);

LOCAL def_ent_t *
find_def_ent(char * name, bool * indexed);

LOCAL void
print_used_defines(void);

LOCAL def_ent_t **
find_def_ent_list(char * name);

/*
 *  Extracted from defLex.c
 */
LOCAL te_dp_event
yylex(void);

LOCAL void
yyerror(char* s);

/*
 *  Extracted from defLoad.c
 */
LOCAL def_ent_t *
new_def_ent(void);

LOCAL void
print_ent(def_ent_t * pDef);

LOCAL def_ent_t *
number_and_insert_ent(char * name, char const * idx_str);

LOCAL void
read_defs(void);

LOCAL void
unload_defs(void);

/*
 *  Extracted from expGuile.c
 */
LOCAL teGuileType
ag_scm_type_e(SCM typ);

LOCAL SCM
ag_scm_c_eval_string_from_file_line(
    char const * pzExpr, char const * pzFile, int line);

/*
 *  Extracted from expOutput.c
 */
LOCAL void
make_readonly(void);

LOCAL void
open_output_file(char const * fname, size_t nmsz, char const * mode, int flags);

/*
 *  Extracted from expPrint.c
 */
LOCAL SCM
run_printf(char const * pzFmt, int len, SCM alist);

/*
 *  Extracted from expString.c
 */
LOCAL void
do_multi_subs(char ** ppzStr, ssize_t * pStrLen, SCM match, SCM repl);

/*
 *  Extracted from funcDef.c
 */
LOCAL void
parse_mac_args(templ_t * pT, macro_t * mac);

/*
 *  Extracted from funcEval.c
 */
LOCAL char const *
scm2display(SCM s);

LOCAL char const *
eval_mac_expr(bool * allocated);

LOCAL SCM
eval(char const * expr);

/*
 *  Extracted from funcFor.c
 */
LOCAL for_state_t *
new_for_context(void);

LOCAL void
free_for_context(bool everything);

/*
 *  Extracted from functions.c
 */
LOCAL loop_jmp_type_t
call_gen_block(jmp_buf jbuf, templ_t * tpl, macro_t * mac, macro_t * end_mac);

LOCAL void
gen_new_block(templ_t * tpl);

LOCAL macro_t *
mLoad_Leave(templ_t * tpl, macro_t * mac, char const ** p_scan);

/*
 *  Extracted from loadPseudo.c
 */
LOCAL char const *
do_suffix(char const * const pzData, char const * pzFileName, int lineNo);

LOCAL char const *
loadPseudoMacro(char const * pzData, char const * pzFileName);

/*
 *  Extracted from scmStrings.c
 */
LOCAL void
ag_scribble_init(void);

LOCAL void
ag_scribble_deinit(void);

LOCAL void
ag_scribble_free(void);

LOCAL char *
ag_scribble(ssize_t size);

LOCAL char *
ag_scm2zchars(SCM s, const char * type);

/*
 *  Extracted from tpLoad.c
 */
LOCAL templ_t *
find_tpl(char const * pzTemplName);

LOCAL tSuccess
find_file(char const * in_name,
          char *       res_name,
          char const * const * sfx_list,
          char const * referring_tpl);

LOCAL templ_t *
tpl_load(char const * fname, char const * referrer);

LOCAL void
tpl_unload(templ_t * tpl);

LOCAL void
cleanup(templ_t * tpl);

/*
 *  Extracted from tpParse.c
 */
LOCAL macro_t *
parse_tpl(macro_t * mac, char const ** p_scan);

/*
 *  Extracted from tpProcess.c
 */
LOCAL void
gen_block(templ_t * tpl, macro_t * mac, macro_t * emac);

LOCAL out_spec_t *
next_out_spec(out_spec_t * os);

LOCAL void
process_tpl(templ_t * tpl);

LOCAL void
out_close(bool purge);

#ifdef REDEF_LOCAL
#  undef LOCAL
#  define LOCAL
#endif
#endif /* AGEN5_PROTO_H_GUARD */