+#include <gl/xalloc.h>
+#include <gl/c-xvasprintf.h>
+#include <stdlib.h>
+
+struct spreadsheet *
+spreadsheet_ref (struct spreadsheet *s)
+{
+ s->ref_cnt++;
+ return s;
+}
+
+void
+spreadsheet_unref (struct spreadsheet *s)
+{
+ if (--s->ref_cnt == 0)
+ s->destroy (s);
+}
+
+
+struct casereader *
+spreadsheet_make_reader (struct spreadsheet *s,
+ const struct spreadsheet_read_options *opts)
+{
+ return s->make_reader (s, opts);
+}
+
+const char *
+spreadsheet_get_sheet_name (struct spreadsheet *s, int n)
+{
+ return s->get_sheet_name (s, n);
+}
+
+
+char *
+spreadsheet_get_sheet_range (struct spreadsheet *s, int n)
+{
+ return s->get_sheet_range (s, n);
+}
+
+int
+spreadsheet_get_sheet_n_sheets (struct spreadsheet *s)
+{
+ return s->get_sheet_n_sheets (s);
+}
+
+unsigned int
+spreadsheet_get_sheet_n_rows (struct spreadsheet *s, int n)
+{
+ return s->get_sheet_n_rows (s, n);
+}
+
+unsigned int
+spreadsheet_get_sheet_n_columns (struct spreadsheet *s, int n)
+{
+ return s->get_sheet_n_columns (s, n);
+}
+
+char *
+spreadsheet_get_cell (struct spreadsheet *s, int n, int row, int column)
+{
+ return s->get_sheet_cell (s, n, row, column);
+}
+
+
+#define RADIX 26
+
+static void
+reverse (char *s, int len)
+{
+ int i;
+ for (i = 0; i < len / 2; ++i)
+ {
+ char tmp = s[len - i - 1];
+ s[len - i -1] = s[i];
+ s[i] = tmp;
+ }
+}
+