+static void backend(const char *inputname, const char *outname)
+{
+ FILE *out = fopen(outname, "w");
+ if(out == NULL) {
+ fprintf(stderr, "couldn't open '%s' for writing: %s\n", outname,
+ strerror(errno));
+ exit(1);
+ }
+
+ be_main(out, inputname);
+
+ fclose(out);
+}
+
+static void emit(const char *input_name, const char *out_name)
+{
+ backend(input_name, out_name);
+}
+
+static FILE* preprocess(const char *in)
+{
+ char buf[4096];
+
+ snprintf(buf, sizeof(buf), PREPROCESSOR " %s -o -",in);
+ if(verbose) {
+ puts(buf);
+ }
+ FILE* f = popen(buf, "r");
+ if (f == NULL) {
+ fprintf(stderr, "invoking preprocessor failed\n");
+ exit(1);
+ }
+ return f;
+}
+
+static void link(const char *in, const char *out)
+{
+ char buf[4096];
+
+ snprintf(buf, sizeof(buf), "%s %s -o %s", LINKER, in, out);
+ if(verbose) {
+ puts(buf);
+ }
+ int err = system(buf);
+ if(err != 0) {
+ fprintf(stderr, "linker reported an error\n");
+ exit(1);
+ }
+}
+
+static void assemble(const char *in, const char *out)
+{
+ char buf[4096];
+
+ snprintf(buf, sizeof(buf), "%s %s -c -o %s", LINKER, in, out);
+ if(verbose) {
+ puts(buf);
+ }
+ int err = system(buf);
+ if(err != 0) {
+ fprintf(stderr, "assembler reported an error\n");
+ exit(1);
+ }
+}
+
+static void create_firm_prog(translation_unit_t *unit)
+{
+ translation_unit_to_firm(unit);
+
+ //dump_globals_as_text(dump_verbosity_max, "-globals");
+
+ int n_irgs = get_irp_n_irgs();
+ for(int i = 0; i < n_irgs; ++i) {
+ ir_graph *const irg = get_irp_irg(i);
+ dump(irg, "-start");
+ }
+
+ lower_highlevel();
+ for(int i = 0; i < n_irgs; ++i) {
+ ir_graph *const irg = get_irp_irg(i);
+ dump(irg, "-lower");
+ }
+}
+
+static void optimize(void)
+{
+ int arr_len;
+ ir_entity **keep_methods;
+
+ cgana(&arr_len, &keep_methods);
+ gc_irgs(arr_len, keep_methods);
+ free(keep_methods);
+
+ optimize_funccalls(0);
+
+ for(int i = 0; i < get_irp_n_irgs(); ++i) {
+ ir_graph *irg = get_irp_irg(i);
+
+ optimize_graph_df(irg);
+ dump(irg, "-localopt");
+ place_code(irg);
+ dump(irg, "-place");
+ optimize_cf(irg);
+ dump(irg, "-cf");
+ }
+}
+
+void write_fluffy_decls(translation_unit_t *unit);
+
+typedef enum compile_mode_t {
+ Compile,
+ CompileAssemble,
+ CompileAssembleLink,
+ LexTest,
+ PrintAst,
+ PrintFluffy
+} compile_mode_t;
+
+static void usage(const char *argv0)
+{
+ fprintf(stderr, "Usage %s input [-o output] [-c]\n", argv0);
+}
+