Add scaling report skeleton

1 files changed, 69 insertions, 0 deletions

diff --git a/src/scaling-report.c b/src/scaling-report.c
new file mode 100644
index 00000000..de0e396e
--- /dev/null
+++ b/src/scaling-report.c
@@ -0,0 +1,69 @@
+/*
+ * scaling-report.c
+ *
+ * Write a nice PDF of scaling parameters
+ *
+ * (c) 2011 Thomas White <taw@physics.org>
+ *
+ * Part of CrystFEL - crystallography with a FEL
+ *
+ */
+
+#ifdef HAVE_CONFIG_H
+#include <config.h>
+#endif
+
+#include <cairo.h>
+#include <cairo-pdf.h>
+#include <pango/pangocairo.h>
+
+#include "image.h"
+
+
+static void write_title(cairo_t *cr, const char *filename, double w, double h)
+{
+	char text[1024];
+	PangoLayout *layout;
+	PangoFontDescription *fontdesc;
+	int width, height;
+
+	snprintf(text, 1023, "Scaling report: %s", filename);
+
+	layout = pango_cairo_create_layout(cr);
+	pango_layout_set_text(layout, text, -1);
+	fontdesc = pango_font_description_from_string("Sans 14 Bold");
+	pango_layout_set_font_description(layout, fontdesc);
+
+	pango_cairo_update_layout(cr, layout);
+	pango_layout_get_size(layout, &width, &height);
+
+	cairo_move_to(cr, 0.5-width/PANGO_SCALE, 10.0);
+
+	cairo_set_source_rgb(cr, 0.0, 0.0, 0.0);
+	pango_cairo_show_layout(cr, layout);
+}
+
+
+void scaling_report(const char *filename, const struct image *images, int n,
+                    const char *stream_filename)
+{
+	cairo_surface_t *surface;
+	cairo_t *cr;
+	const double w = 842.0;
+	const double h = 595.0;
+
+	surface = cairo_pdf_surface_create(filename, w, h);
+
+	if ( cairo_surface_status(surface) != CAIRO_STATUS_SUCCESS ) {
+		fprintf(stderr, "Couldn't create Cairo surface\n");
+		cairo_surface_destroy(surface);
+		return;
+	}
+
+	cr = cairo_create(surface);
+
+	write_title(cr, stream_filename, w, h);
+
+	cairo_surface_finish(surface);
+	cairo_destroy(cr);
+}