static int load_radioart_image(struct radioart *ra, const char* preset_name, struct dim *dim) { char path[MAX_PATH]; #ifndef HAVE_NOISY_IDLE_MODE cpu_idle_mode(false); #endif snprintf(path, sizeof(path), FMPRESET_PATH "/%s.bmp",preset_name); if (!file_exists(path)) snprintf(path, sizeof(path), FMPRESET_PATH "/%s.jpg",preset_name); if (!file_exists(path)) { #ifndef HAVE_NOISY_IDLE_MODE cpu_idle_mode(true); #endif return -1; } strlcpy(ra->name, preset_name, MAX_FMPRESET_LEN+1); ra->dim.height = dim->height; ra->dim.width = dim->width; ra->last_tick = current_tick; ra->handle = bufopen(path, 0, TYPE_BITMAP, &ra->dim); if (ra->handle == ERR_BUFFER_FULL) { int i = find_oldest_image(); bufclose(i); ra->handle = bufopen(path, 0, TYPE_BITMAP, &ra->dim); } #ifndef HAVE_NOISY_IDLE_MODE cpu_idle_mode(true); #endif return ra->handle; }
void series_view_refresh (GtkWidget *w, windata_t *vwin) { series_view *sview = (series_view *) vwin->data; if (sview != NULL && sview->varnum > 0 && sview->varnum < dataset->v) { int list[2] = {1, sview->varnum}; PRN *prn = NULL; int err; if (bufopen(&prn)) { return; } err = printdata(list, NULL, dataset, OPT_O, prn); if (err) { gui_errmsg(err); gretl_print_destroy(prn); } else { /* replace text buffer in sview using prn */ const char *buf = gretl_print_get_trimmed_buffer(prn); textview_set_text(vwin->text, buf); gretl_print_destroy(prn); } } }
static void multi_series_view_print (windata_t *vwin) { series_view *sview = (series_view *) vwin->data; PRN *prn; int err = 0; if (bufopen(&prn)) { return; } if (sview->view == VIEW_STANDARD) { err = printdata(sview->list, NULL, dataset, OPT_O, prn); } else { err = print_series_with_format(sview->list, dataset, sview->format, sview->digits, prn); } if (err) { gui_errmsg(err); } else { textview_set_text(vwin->text, gretl_print_get_trimmed_buffer(prn)); } gretl_print_destroy(prn); }
static void multi_series_view_print_sorted (windata_t *vwin) { series_view *sview = (series_view *) vwin->data; int *obsvec = make_obsvec(sview); PRN *prn; int err = 0; if (obsvec == NULL) { return; } if (bufopen(&prn)) { free(obsvec); return; } err = print_data_in_columns(sview->list, obsvec, dataset, OPT_NONE, prn); if (err) { gui_errmsg(err); } else { const char *buf = gretl_print_get_trimmed_buffer(prn); textview_set_text(vwin->text, buf); } free(obsvec); gretl_print_destroy(prn); }
static void single_series_view_print (windata_t *vwin) { series_view *sview = (series_view *) vwin->data; char num_format[32]; double x; PRN *prn; int i, t, obslen; int err = 0; if (bufopen(&prn)) { return; } if (sview->view == VIEW_STANDARD) { int list[2] = { 1, sview->varnum }; /* regular printout: unsort if need be */ if (sview->sorted) { series_view_unsort(sview); } err = printdata(list, NULL, dataset, OPT_O, prn); if (err) { gui_errmsg(err); } goto finalize; } obslen = max_obs_marker_length(dataset); if (sview->format == 'g') { sprintf(num_format, "%%#13.%dg\n", sview->digits); } else { sprintf(num_format, "%%13.%df\n", sview->digits); } pprintf(prn, "\n%*s ", obslen, " "); pprintf(prn, "%13s\n\n", dataset->varname[sview->varnum]); for (i=0; i<sview->npoints; i++) { t = sview->points[i].obsnum; x = sview->points[i].val; print_obs_marker(t, dataset, obslen, prn); if (na(x)) { pputc(prn, '\n'); } else { pprintf(prn, num_format, x); } } finalize: if (!err) { textview_set_text(vwin->text, gretl_print_get_buffer(prn)); } gretl_print_destroy(prn); }
static int load_radioart_image(struct radioart *ra, const char* preset_name, struct dim *dim) { char path[MAX_PATH]; struct bufopen_bitmap_data user_data; #ifndef HAVE_NOISY_IDLE_MODE cpu_idle_mode(false); #endif snprintf(path, sizeof(path), FMPRESET_PATH "/%s.bmp",preset_name); if (!file_exists(path)) snprintf(path, sizeof(path), FMPRESET_PATH "/%s.jpg",preset_name); if (!file_exists(path)) { #ifndef HAVE_NOISY_IDLE_MODE cpu_idle_mode(true); #endif return -1; } strlcpy(ra->name, preset_name, MAX_FMPRESET_LEN+1); ra->dim.height = dim->height; ra->dim.width = dim->width; ra->last_tick = current_tick; user_data.embedded_albumart = NULL; user_data.dim = &ra->dim; ra->handle = bufopen(path, 0, TYPE_BITMAP, &user_data); if (ra->handle == ERR_BUFFER_FULL) { int i = find_oldest_image_index(); if (i != -1) { bufclose(radioart[i].handle); ra->handle = bufopen(path, 0, TYPE_BITMAP, &user_data); } } #ifndef HAVE_NOISY_IDLE_MODE cpu_idle_mode(true); #endif return ra->handle; }
static void dlg_text_set_from_sys (equation_system *sys, dialog_t *d) { const char *buf; PRN *prn; if (bufopen(&prn)) { return; } print_equation_system_info(sys, dataset, OPT_NONE, prn); buf = gretl_print_get_buffer(prn); textview_set_text(d->edit, buf); gretl_print_destroy(prn); }
PRN *vwin_print_sorted_with_format (windata_t *vwin, PrnFormat fmt) { series_view *sview = (series_view *) vwin->data; int *obsvec; PRN *prn; int err = 0; obsvec = make_obsvec(sview); if (obsvec == NULL) { return NULL; } if (bufopen(&prn)) { free(obsvec); return NULL; } gretl_print_set_format(prn, fmt); if (sview->varnum > 0) { /* single series, no list */ int list[2] = {1, sview->varnum}; err = print_data_in_columns(list, obsvec, dataset, OPT_NONE, prn); } else { err = print_data_in_columns(sview->list, obsvec, dataset, OPT_NONE, prn); } if (err) { gui_errmsg(err); gretl_print_destroy(prn); prn = NULL; } free(obsvec); return prn; }
static void summary_print_formatted (windata_t *vwin, series_view *sview) { Summary *summ = vwin->data; int digits = 0, places = 0; PRN *prn; if (bufopen(&prn)) { return; } if (sview->view != VIEW_STANDARD && sview->digits > 0) { if (sview->format == 'g') { digits = sview->digits; } else { places = sview->digits; } } print_summary_single(summ, digits, places, dataset, prn); textview_set_text(vwin->text, gretl_print_get_trimmed_buffer(prn)); gretl_print_destroy(prn); }
static ExecState *gretl_console_init (char *cbuf) { ExecState *s; PRN *prn; s = mymalloc(sizeof *s); if (s == NULL) { return NULL; } if (bufopen(&prn)) { free(s); return NULL; } set_gretl_echo(1); gretl_exec_state_init(s, CONSOLE_EXEC, cbuf, get_lib_cmd(), model, prn); command_history_init(); return s; }