コード例 #1
0
ファイル: gretl_bundle.c プロジェクト: aylusltd/gretl
int gretl_bundle_write_to_file (gretl_bundle *b, 
				const char *fname,
				int to_dotdir)
{
    char fullname[FILENAME_MAX];
    FILE *fp;
    int err = 0;

    if (to_dotdir) {
	build_path(fullname, gretl_dotdir(), fname, NULL);
    } else {
	strcpy(fullname, fname);
	gretl_maybe_switch_dir(fullname);
    }

    fp = gretl_fopen(fullname, "wb");

    if (fp == NULL) {
	err = E_FOPEN;
    } else {
	gretl_xml_header(fp);
	gretl_bundle_serialize(b, "temp", fp);
    }

    return err;
}
コード例 #2
0
ファイル: graph_page.c プロジェクト: HelioGuilherme66/gretl
static int print_graph_page_direct (const char *fname, 
				    gretlopt opt)
{
    char thisdir[MAXLEN];
    char *latex_orig = NULL;
    int err = 0;

    if (gpage.ngraphs == 0) {
	gpage_errmsg(_("The graph page is empty"), 1);
	return 1;
    }

    if (getcwd(thisdir, MAXLEN - 1) == NULL) {
	*thisdir = '\0';
    }

    gpage.mono = (opt & OPT_M) ? 1 : 0;

    gretl_chdir(get_session_dirname());

    gpage_filenames_init(NULL);

    if (has_suffix(fname, ".pdf")) {
	gpage.term = GP_TERM_PDF;
	if (!get_tex_use_pdf()) {
	    latex_orig = gpage_switch_compiler(gpage.term);
	}	
    } else {
	gpage.term = GP_TERM_EPS;
	if (get_tex_use_pdf()) {
	    latex_orig = gpage_switch_compiler(gpage.term);
	}
    }	    

    /* write the LaTeX driver file */
    err = make_graphpage_tex();

    if (!err) {
	/* transform individual plot files and compile 
	   using gnuplot */
	err = make_gp_output();
    }

    if (!err) {
	err = latex_compile_graph_page();
    }

    if (!err) {
	char *output;

	if (gpage.term == GP_TERM_PDF) {
	    output = gpage_fname(".pdf", 0);
	} else {
	    output = gpage_fname(".ps", 0);
	}
	if (*thisdir != '\0') {
	    /* come back out of dotdir */
	    chdir(thisdir);
	}
	fname = gretl_maybe_switch_dir(fname);
	err = gretl_copy_file(output, fname);
	if (!err) {
	    fprintf(stderr, "graphpg: wrote %s\n", fname);
	}
	remove(output);
    }

    gpage_revert_compiler(latex_orig);
    gpage_cleanup();

    return err;
}