kmadej_fast_excel_fork 0.2.2

data/libxlsxwriter/src/theme.c

@@ -0,0 +1,348 @@
+/*****************************************************************************
+ * theme - A library for creating Excel XLSX theme files.
+ *
+ * Used in conjunction with the libxlsxwriter library.
+ *
+ * Copyright 2014-2017, John McNamara, jmcnamara@cpan.org. See LICENSE.txt.
+ *
+ */
+
+#include <string.h>
+
+#include "xlsxwriter/xmlwriter.h"
+#include "xlsxwriter/theme.h"
+#include "xlsxwriter/utility.h"
+
+const char *theme_strs[] = {
+    "<?xml version=\"1.0\" encoding=\"UTF-8\" standalone=\"yes\"?>\n",
+    "<a:theme xmlns:a=\"http://schemas.openxmlformats.org/",
+    "drawingml/2006/main\" name=\"Office Theme\">",
+    "<a:themeElements>",
+    "<a:clrScheme name=\"Office\"><a:dk1>",
+    "<a:sysClr val=\"windowText\" lastClr=\"000000\"/>",
+    "</a:dk1><a:lt1>",
+    "<a:sysClr val=\"window\" lastClr=\"FFFFFF\"/></a:lt1><a:dk2>",
+    "<a:srgbClr val=\"1F497D\"/></a:dk2><a:lt2>",
+    "<a:srgbClr val=\"EEECE1\"/></a:lt2><a:accent1>",
+    "<a:srgbClr val=\"4F81BD\"/></a:accent1><a:accent2>",
+    "<a:srgbClr val=\"C0504D\"/></a:accent2><a:accent3>",
+    "<a:srgbClr val=\"9BBB59\"/></a:accent3><a:accent4>",
+    "<a:srgbClr val=\"8064A2\"/></a:accent4><a:accent5>",
+    "<a:srgbClr val=\"4BACC6\"/></a:accent5><a:accent6>",
+    "<a:srgbClr val=\"F79646\"/></a:accent6><a:hlink>",
+    "<a:srgbClr val=\"0000FF\"/></a:hlink><a:folHlink>",
+    "<a:srgbClr val=\"800080\"/></a:folHlink></a:clrScheme>",
+    "<a:fontScheme name=\"Office\"><a:majorFont>",
+    "<a:latin typeface=\"Cambria\"/><a:ea typeface=\"\"/>",
+    "<a:cs typeface=\"\"/>",
+    "<a:font script=\"Jpan\" typeface=\"ＭＳ Ｐゴシック\"/>",
+    "<a:font script=\"Hang\" typeface=\"맑은 고딕\"/>",
+    "<a:font script=\"Hans\" typeface=\"宋体\"/>",
+    "<a:font script=\"Hant\" typeface=\"新細明體\"/>",
+    "<a:font script=\"Arab\" typeface=\"Times New Roman\"/>",
+    "<a:font script=\"Hebr\" typeface=\"Times New Roman\"/>",
+    "<a:font script=\"Thai\" typeface=\"Tahoma\"/>",
+    "<a:font script=\"Ethi\" typeface=\"Nyala\"/>",
+    "<a:font script=\"Beng\" typeface=\"Vrinda\"/>",
+    "<a:font script=\"Gujr\" typeface=\"Shruti\"/>",
+    "<a:font script=\"Khmr\" typeface=\"MoolBoran\"/>",
+    "<a:font script=\"Knda\" typeface=\"Tunga\"/>",
+    "<a:font script=\"Guru\" typeface=\"Raavi\"/>",
+    "<a:font script=\"Cans\" typeface=\"Euphemia\"/>",
+    "<a:font script=\"Cher\" typeface=\"Plantagenet Cherokee\"/>",
+    "<a:font script=\"Yiii\" typeface=\"Microsoft Yi Baiti\"/>",
+    "<a:font script=\"Tibt\" typeface=\"Microsoft Himalaya\"/>",
+    "<a:font script=\"Thaa\" typeface=\"MV Boli\"/>",
+    "<a:font script=\"Deva\" typeface=\"Mangal\"/>",
+    "<a:font script=\"Telu\" typeface=\"Gautami\"/>",
+    "<a:font script=\"Taml\" typeface=\"Latha\"/>",
+    "<a:font script=\"Syrc\" typeface=\"Estrangelo Edessa\"/>",
+    "<a:font script=\"Orya\" typeface=\"Kalinga\"/>",
+    "<a:font script=\"Mlym\" typeface=\"Kartika\"/>",
+    "<a:font script=\"Laoo\" typeface=\"DokChampa\"/>",
+    "<a:font script=\"Sinh\" typeface=\"Iskoola Pota\"/>",
+    "<a:font script=\"Mong\" typeface=\"Mongolian Baiti\"/>",
+    "<a:font script=\"Viet\" typeface=\"Times New Roman\"/>",
+    "<a:font script=\"Uigh\" typeface=\"Microsoft Uighur\"/>",
+    "</a:majorFont>",
+    "<a:minorFont>",
+    "<a:latin typeface=\"Calibri\"/>",
+    "<a:ea typeface=\"\"/>",
+    "<a:cs typeface=\"\"/>",
+    "<a:font script=\"Jpan\" typeface=\"ＭＳ Ｐゴシック\"/>",
+    "<a:font script=\"Hang\" typeface=\"맑은 고딕\"/>",
+    "<a:font script=\"Hans\" typeface=\"宋体\"/>",
+    "<a:font script=\"Hant\" typeface=\"新細明體\"/>",
+    "<a:font script=\"Arab\" typeface=\"Arial\"/>",
+    "<a:font script=\"Hebr\" typeface=\"Arial\"/>",
+    "<a:font script=\"Thai\" typeface=\"Tahoma\"/>",
+    "<a:font script=\"Ethi\" typeface=\"Nyala\"/>",
+    "<a:font script=\"Beng\" typeface=\"Vrinda\"/>",
+    "<a:font script=\"Gujr\" typeface=\"Shruti\"/>",
+    "<a:font script=\"Khmr\" typeface=\"DaunPenh\"/>",
+    "<a:font script=\"Knda\" typeface=\"Tunga\"/>",
+    "<a:font script=\"Guru\" typeface=\"Raavi\"/>",
+    "<a:font script=\"Cans\" typeface=\"Euphemia\"/>",
+    "<a:font script=\"Cher\" typeface=\"Plantagenet Cherokee\"/>",
+    "<a:font script=\"Yiii\" typeface=\"Microsoft Yi Baiti\"/>",
+    "<a:font script=\"Tibt\" typeface=\"Microsoft Himalaya\"/>",
+    "<a:font script=\"Thaa\" typeface=\"MV Boli\"/>",
+    "<a:font script=\"Deva\" typeface=\"Mangal\"/>",
+    "<a:font script=\"Telu\" typeface=\"Gautami\"/>",
+    "<a:font script=\"Taml\" typeface=\"Latha\"/>",
+    "<a:font script=\"Syrc\" typeface=\"Estrangelo Edessa\"/>",
+    "<a:font script=\"Orya\" typeface=\"Kalinga\"/>",
+    "<a:font script=\"Mlym\" typeface=\"Kartika\"/>",
+    "<a:font script=\"Laoo\" typeface=\"DokChampa\"/>",
+    "<a:font script=\"Sinh\" typeface=\"Iskoola Pota\"/>",
+    "<a:font script=\"Mong\" typeface=\"Mongolian Baiti\"/>",
+    "<a:font script=\"Viet\" typeface=\"Arial\"/>",
+    "<a:font script=\"Uigh\" typeface=\"Microsoft Uighur\"/>",
+    "</a:minorFont>",
+    "</a:fontScheme><a:fmtScheme name=\"Office\">",
+    "<a:fillStyleLst>",
+    "<a:solidFill>",
+    "<a:schemeClr val=\"phClr\"/>",
+    "</a:solidFill>",
+    "<a:gradFill rotWithShape=\"1\">",
+    "<a:gsLst>",
+    "<a:gs pos=\"0\">",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:tint val=\"50000\"/>",
+    "<a:satMod val=\"300000\"/>",
+    "</a:schemeClr>",
+    "</a:gs>",
+    "<a:gs pos=\"35000\">",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:tint val=\"37000\"/>",
+    "<a:satMod val=\"300000\"/>",
+    "</a:schemeClr>",
+    "</a:gs>",
+    "<a:gs pos=\"100000\">",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:tint val=\"15000\"/>",
+    "<a:satMod val=\"350000\"/>",
+    "</a:schemeClr>",
+    "</a:gs>",
+    "</a:gsLst>",
+    "<a:lin ang=\"16200000\" scaled=\"1\"/>",
+    "</a:gradFill>",
+    "<a:gradFill rotWithShape=\"1\">",
+    "<a:gsLst>",
+    "<a:gs pos=\"0\">",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:shade val=\"51000\"/>",
+    "<a:satMod val=\"130000\"/>",
+    "</a:schemeClr>",
+    "</a:gs>",
+    "<a:gs pos=\"80000\">",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:shade val=\"93000\"/>",
+    "<a:satMod val=\"130000\"/>",
+    "</a:schemeClr>",
+    "</a:gs>",
+    "<a:gs pos=\"100000\">",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:shade val=\"94000\"/>",
+    "<a:satMod val=\"135000\"/>",
+    "</a:schemeClr>",
+    "</a:gs>",
+    "</a:gsLst>",
+    "<a:lin ang=\"16200000\" scaled=\"0\"/>",
+    "</a:gradFill>",
+    "</a:fillStyleLst>",
+    "<a:lnStyleLst>",
+    "<a:ln w=\"9525\" cap=\"flat\" cmpd=\"sng\" algn=\"ctr\">",
+    "<a:solidFill>",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:shade val=\"95000\"/>",
+    "<a:satMod val=\"105000\"/>",
+    "</a:schemeClr>",
+    "</a:solidFill>",
+    "<a:prstDash val=\"solid\"/>",
+    "</a:ln>",
+    "<a:ln w=\"25400\" cap=\"flat\" cmpd=\"sng\" algn=\"ctr\">",
+    "<a:solidFill>",
+    "<a:schemeClr val=\"phClr\"/>",
+    "</a:solidFill>",
+    "<a:prstDash val=\"solid\"/>",
+    "</a:ln>",
+    "<a:ln w=\"38100\" cap=\"flat\" cmpd=\"sng\" algn=\"ctr\">",
+    "<a:solidFill>",
+    "<a:schemeClr val=\"phClr\"/>",
+    "</a:solidFill>",
+    "<a:prstDash val=\"solid\"/>",
+    "</a:ln>",
+    "</a:lnStyleLst>",
+    "<a:effectStyleLst>",
+    "<a:effectStyle>",
+    "<a:effectLst>",
+    "<a:outerShdw blurRad=\"40000\" dist=\"20000\" ",
+    "dir=\"5400000\" rotWithShape=\"0\">",
+    "<a:srgbClr val=\"000000\">",
+    "<a:alpha val=\"38000\"/>",
+    "</a:srgbClr>",
+    "</a:outerShdw>",
+    "</a:effectLst>",
+    "</a:effectStyle>",
+    "<a:effectStyle>",
+    "<a:effectLst>",
+    "<a:outerShdw blurRad=\"40000\" dist=\"23000\" ",
+    "dir=\"5400000\" rotWithShape=\"0\">",
+    "<a:srgbClr val=\"000000\">",
+    "<a:alpha val=\"35000\"/>",
+    "</a:srgbClr>",
+    "</a:outerShdw>",
+    "</a:effectLst>",
+    "</a:effectStyle>",
+    "<a:effectStyle>",
+    "<a:effectLst>",
+    "<a:outerShdw blurRad=\"40000\" dist=\"23000\" ",
+    "dir=\"5400000\" rotWithShape=\"0\">",
+    "<a:srgbClr val=\"000000\">",
+    "<a:alpha val=\"35000\"/>",
+    "</a:srgbClr>",
+    "</a:outerShdw>",
+    "</a:effectLst>",
+    "<a:scene3d>",
+    "<a:camera prst=\"orthographicFront\">",
+    "<a:rot lat=\"0\" lon=\"0\" rev=\"0\"/>",
+    "</a:camera>",
+    "<a:lightRig rig=\"threePt\" dir=\"t\">",
+    "<a:rot lat=\"0\" lon=\"0\" rev=\"1200000\"/>",
+    "</a:lightRig>",
+    "</a:scene3d>",
+    "<a:sp3d>",
+    "<a:bevelT w=\"63500\" h=\"25400\"/>",
+    "</a:sp3d>",
+    "</a:effectStyle>",
+    "</a:effectStyleLst>",
+    "<a:bgFillStyleLst>",
+    "<a:solidFill>",
+    "<a:schemeClr val=\"phClr\"/>",
+    "</a:solidFill>",
+    "<a:gradFill rotWithShape=\"1\">",
+    "<a:gsLst>",
+    "<a:gs pos=\"0\">",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:tint val=\"40000\"/>",
+    "<a:satMod val=\"350000\"/>",
+    "</a:schemeClr>",
+    "</a:gs>",
+    "<a:gs pos=\"40000\">",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:tint val=\"45000\"/>",
+    "<a:shade val=\"99000\"/>",
+    "<a:satMod val=\"350000\"/>",
+    "</a:schemeClr>",
+    "</a:gs>",
+    "<a:gs pos=\"100000\">",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:shade val=\"20000\"/>",
+    "<a:satMod val=\"255000\"/>",
+    "</a:schemeClr>",
+    "</a:gs>",
+    "</a:gsLst>",
+    "<a:path path=\"circle\">",
+    "<a:fillToRect l=\"50000\" t=\"-80000\" r=\"50000\" b=\"180000\"/>",
+    "</a:path>",
+    "</a:gradFill>",
+    "<a:gradFill rotWithShape=\"1\">",
+    "<a:gsLst>",
+    "<a:gs pos=\"0\">",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:tint val=\"80000\"/>",
+    "<a:satMod val=\"300000\"/>",
+    "</a:schemeClr>",
+    "</a:gs>",
+    "<a:gs pos=\"100000\">",
+    "<a:schemeClr val=\"phClr\">",
+    "<a:shade val=\"30000\"/>",
+    "<a:satMod val=\"200000\"/>",
+    "</a:schemeClr>",
+    "</a:gs>",
+    "</a:gsLst>",
+    "<a:path path=\"circle\">",
+    "<a:fillToRect l=\"50000\" t=\"50000\" r=\"50000\" b=\"50000\"/>",
+    "</a:path>",
+    "</a:gradFill>",
+    "</a:bgFillStyleLst>",
+    "</a:fmtScheme>",
+    "</a:themeElements>",
+    "<a:objectDefaults/>",
+    "<a:extraClrSchemeLst/>",
+    "</a:theme>\n",
+    ""
+};
+
+/*
+ * Forward declarations.
+ */
+
+/*****************************************************************************
+ *
+ * Private functions.
+ *
+ ****************************************************************************/
+
+/*
+ * Create a new theme object.
+ */
+lxw_theme *
+lxw_theme_new()
+{
+    lxw_theme *theme = calloc(1, sizeof(lxw_theme));
+    GOTO_LABEL_ON_MEM_ERROR(theme, mem_error);
+
+    return theme;
+
+mem_error:
+    lxw_theme_free(theme);
+    return NULL;
+}
+
+/*
+ * Free a theme object.
+ */
+void
+lxw_theme_free(lxw_theme *theme)
+{
+    if (!theme)
+        return;
+
+    free(theme);
+}
+
+/*****************************************************************************
+ *
+ * XML functions.
+ *
+ ****************************************************************************/
+
+/* This library isn't a xmlwriter. */
+
+/*****************************************************************************
+ *
+ * XML file assembly functions.
+ *
+ ****************************************************************************/
+
+/*
+ * Assemble and write the XML file.
+ */
+void
+lxw_theme_assemble_xml_file(lxw_theme *self)
+{
+    int i = 0;
+
+    while (strlen(theme_strs[i])) {
+        fprintf(self->file, "%s", theme_strs[i]);
+        i++;
+    }
+}
+
+/*****************************************************************************
+ *
+ * Public functions.
+ *
+ ****************************************************************************/

data/libxlsxwriter/src/utility.c

@@ -0,0 +1,515 @@
+/*****************************************************************************
+ * utility - Utility functions for libxlsxwriter.
+ *
+ * Used in conjunction with the libxlsxwriter library.
+ *
+ * Copyright 2014-2017, John McNamara, jmcnamara@cpan.org. See LICENSE.txt.
+ *
+ */
+
+#include <ctype.h>
+#include <stdio.h>
+#include <string.h>
+#include <stdint.h>
+#include <stdlib.h>
+#include "xlsxwriter/utility.h"
+#include "xlsxwriter/third_party/tmpfileplus.h"
+
+char *error_strings[LXW_MAX_ERRNO + 1] = {
+    "No error.",
+    "Memory error, failed to malloc() required memory.",
+    "Error creating output xlsx file. Usually a permissions error.",
+    "Error encountered when creating a tmpfile during file assembly.",
+    "Zlib error with a file operation while creating xlsx file.",
+    "Zlib error when adding sub file to xlsx file.",
+    "Zlib error when closing xlsx file.",
+    "NULL function parameter ignored.",
+    "Function parameter validation error.",
+    "Worksheet name exceeds Excel's limit of 31 characters.",
+    "Worksheet name contains invalid Excel character: '[]:*?/\\'",
+    "Worksheet name is already in use.",
+    "Parameter exceeds Excel's limit of 128 characters.",
+    "Parameter exceeds Excel's limit of 255 characters.",
+    "String exceeds Excel's limit of 32,767 characters.",
+    "Error finding internal string index.",
+    "Worksheet row or column index out of range.",
+    "Maximum number of worksheet URLs (65530) exceeded.",
+    "Couldn't read image dimensions or DPI.",
+    "Unknown error number."
+};
+
+char *
+lxw_strerror(lxw_error error_num)
+{
+    if (error_num > LXW_MAX_ERRNO)
+        error_num = LXW_MAX_ERRNO;
+
+    return error_strings[error_num];
+}
+
+/*
+ * Convert Excel A-XFD style column name to zero based number.
+ */
+void
+lxw_col_to_name(char *col_name, lxw_col_t col_num, uint8_t absolute)
+{
+    uint8_t pos = 0;
+    size_t len;
+    uint8_t i;
+
+    /* Change from 0 index to 1 index. */
+    col_num++;
+
+    /* Convert the column number to a string in reverse order. */
+    while (col_num) {
+
+        /* Get the remainder in base 26. */
+        int remainder = col_num % 26;
+
+        if (remainder == 0)
+            remainder = 26;
+
+        /* Convert the remainder value to a character. */
+        col_name[pos++] = 'A' + remainder - 1;
+        col_name[pos] = '\0';
+
+        /* Get the next order of magnitude. */
+        col_num = (col_num - 1) / 26;
+    }
+
+    if (absolute) {
+        col_name[pos] = '$';
+        col_name[pos + 1] = '\0';
+    }
+
+    /* Reverse the column name string. */
+    len = strlen(col_name);
+    for (i = 0; i < (len / 2); i++) {
+        char tmp = col_name[i];
+        col_name[i] = col_name[len - i - 1];
+        col_name[len - i - 1] = tmp;
+    }
+}
+
+/*
+ * Convert zero indexed row and column to an Excel style A1 cell reference.
+ */
+void
+lxw_rowcol_to_cell(char *cell_name, lxw_row_t row, lxw_col_t col)
+{
+    size_t pos;
+
+    /* Add the column to the cell. */
+    lxw_col_to_name(cell_name, col, 0);
+
+    /* Get the end of the cell. */
+    pos = strlen(cell_name);
+
+    /* Add the row to the cell. */
+    lxw_snprintf(&cell_name[pos], LXW_MAX_ROW_NAME_LENGTH, "%d", ++row);
+}
+
+/*
+ * Convert zero indexed row and column to an Excel style $A$1 cell with
+ * an absolute reference.
+ */
+void
+lxw_rowcol_to_cell_abs(char *cell_name, lxw_row_t row, lxw_col_t col,
+                       uint8_t abs_row, uint8_t abs_col)
+{
+    size_t pos;
+
+    /* Add the column to the cell. */
+    lxw_col_to_name(cell_name, col, abs_col);
+
+    /* Get the end of the cell. */
+    pos = strlen(cell_name);
+
+    if (abs_row)
+        cell_name[pos++] = '$';
+
+    /* Add the row to the cell. */
+    lxw_snprintf(&cell_name[pos], LXW_MAX_ROW_NAME_LENGTH, "%d", ++row);
+}
+
+/*
+ * Convert zero indexed row and column pair to an Excel style A1:C5
+ * range reference.
+ */
+void
+lxw_rowcol_to_range(char *range,
+                    lxw_row_t first_row, lxw_col_t first_col,
+                    lxw_row_t last_row, lxw_col_t last_col)
+{
+    size_t pos;
+
+    /* Add the first cell to the range. */
+    lxw_rowcol_to_cell(range, first_row, first_col);
+
+    /* If the start and end cells are the same just return a single cell. */
+    if (first_row == last_row && first_col == last_col)
+        return;
+
+    /* Get the end of the cell. */
+    pos = strlen(range);
+
+    /* Add the range separator. */
+    range[pos++] = ':';
+
+    /* Add the first cell to the range. */
+    lxw_rowcol_to_cell(&range[pos], last_row, last_col);
+}
+
+/*
+ * Convert zero indexed row and column pairs to an Excel style $A$1:$C$5
+ * range reference with absolute values.
+ */
+void
+lxw_rowcol_to_range_abs(char *range,
+                        lxw_row_t first_row, lxw_col_t first_col,
+                        lxw_row_t last_row, lxw_col_t last_col)
+{
+    size_t pos;
+
+    /* Add the first cell to the range. */
+    lxw_rowcol_to_cell_abs(range, first_row, first_col, 1, 1);
+
+    /* If the start and end cells are the same just return a single cell. */
+    if (first_row == last_row && first_col == last_col)
+        return;
+
+    /* Get the end of the cell. */
+    pos = strlen(range);
+
+    /* Add the range separator. */
+    range[pos++] = ':';
+
+    /* Add the first cell to the range. */
+    lxw_rowcol_to_cell_abs(&range[pos], last_row, last_col, 1, 1);
+}
+
+/*
+ * Convert sheetname and zero indexed row and column pairs to an Excel style
+ * Sheet1!$A$1:$C$5 formula reference with absolute values.
+ */
+void
+lxw_rowcol_to_formula_abs(char *formula, const char *sheetname,
+                          lxw_row_t first_row, lxw_col_t first_col,
+                          lxw_row_t last_row, lxw_col_t last_col)
+{
+    size_t pos;
+    char *quoted_name = lxw_quote_sheetname(sheetname);
+
+    strncpy(formula, quoted_name, LXW_MAX_FORMULA_RANGE_LENGTH - 1);
+    free(quoted_name);
+
+    /* Get the end of the sheetname. */
+    pos = strlen(formula);
+
+    /* Add the range separator. */
+    formula[pos++] = '!';
+
+    /* Add the first cell to the range. */
+    lxw_rowcol_to_cell_abs(&formula[pos], first_row, first_col, 1, 1);
+
+    /* If the start and end cells are the same just return a single cell. */
+    if (first_row == last_row && first_col == last_col)
+        return;
+
+    /* Get the end of the cell. */
+    pos = strlen(formula);
+
+    /* Add the range separator. */
+    formula[pos++] = ':';
+
+    /* Add the first cell to the range. */
+    lxw_rowcol_to_cell_abs(&formula[pos], last_row, last_col, 1, 1);
+}
+
+/*
+ * Convert an Excel style A1 cell reference to a zero indexed row number.
+ */
+lxw_row_t
+lxw_name_to_row(const char *row_str)
+{
+    lxw_row_t row_num = 0;
+    const char *p = row_str;
+
+    /* Skip the column letters and absolute symbol of the A1 cell. */
+    while (p && !isdigit((unsigned char) *p))
+        p++;
+
+    /* Convert the row part of the A1 cell to a number. */
+    if (p)
+        row_num = atoi(p);
+
+    if (row_num)
+        return row_num - 1;
+    else
+        return 0;
+}
+
+/*
+ * Convert an Excel style A1 cell reference to a zero indexed column number.
+ */
+lxw_col_t
+lxw_name_to_col(const char *col_str)
+{
+    lxw_col_t col_num = 0;
+    const char *p = col_str;
+
+    /* Convert leading column letters of A1 cell. Ignore absolute $ marker. */
+    while (p && (isupper((unsigned char) *p) || *p == '$')) {
+        if (*p != '$')
+            col_num = (col_num * 26) + (*p - 'A' + 1);
+        p++;
+    }
+
+    return col_num - 1;
+}
+
+/*
+ * Convert the second row of an Excel range ref to a zero indexed number.
+ */
+uint32_t
+lxw_name_to_row_2(const char *row_str)
+{
+    const char *p = row_str;
+
+    /* Find the : separator in the range. */
+    while (p && *p != ':')
+        p++;
+
+    if (p)
+        return lxw_name_to_row(++p);
+    else
+        return -1;
+}
+
+/*
+ * Convert the second column of an Excel range ref to a zero indexed number.
+ */
+uint16_t
+lxw_name_to_col_2(const char *col_str)
+{
+    const char *p = col_str;
+
+    /* Find the : separator in the range. */
+    while (p && *p != ':')
+        p++;
+
+    if (p)
+        return lxw_name_to_col(++p);
+    else
+        return -1;
+}
+
+/*
+ * Convert a lxw_datetime struct to an Excel serial date.
+ */
+double
+lxw_datetime_to_excel_date(lxw_datetime *datetime, uint8_t date_1904)
+{
+    int year = datetime->year;
+    int month = datetime->month;
+    int day = datetime->day;
+    int hour = datetime->hour;
+    int min = datetime->min;
+    double sec = datetime->sec;
+    double seconds;
+    int epoch = date_1904 ? 1904 : 1900;
+    int offset = date_1904 ? 4 : 0;
+    int norm = 300;
+    int range;
+    /* Set month days and check for leap year. */
+    int mdays[] = { 0, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
+    int leap = 0;
+    int days = 0;
+    int i;
+
+    /* For times without dates set the default date for the epoch. */
+    if (!year) {
+        if (!date_1904) {
+            year = 1899;
+            month = 12;
+            day = 31;
+        }
+        else {
+            year = 1904;
+            month = 1;
+            day = 1;
+        }
+    }
+
+    /* Convert the Excel seconds to a fraction of the seconds in 24 hours. */
+    seconds = (hour * 60 * 60 + min * 60 + sec) / (24 * 60 * 60.0);
+
+    /* Special cases for Excel dates in the 1900 epoch. */
+    if (!date_1904) {
+        /* Excel 1900 epoch. */
+        if (year == 1899 && month == 12 && day == 31)
+            return seconds;
+
+        /* Excel 1900 epoch. */
+        if (year == 1900 && month == 1 && day == 0)
+            return seconds;
+
+        /* Excel false leapday */
+        if (year == 1900 && month == 2 && day == 29)
+            return 60 + seconds;
+    }
+
+    /* We calculate the date by calculating the number of days since the */
+    /* epoch and adjust for the number of leap days. We calculate the */
+    /* number of leap days by normalizing the year in relation to the */
+    /* epoch. Thus the year 2000 becomes 100 for 4-year and 100-year */
+    /* leapdays and 400 for 400-year leapdays. */
+    range = year - epoch;
+
+    if (year % 4 == 0 && (year % 100 > 0 || year % 400 == 0)) {
+        leap = 1;
+        mdays[2] = 29;
+    }
+
+    /*
+     * Calculate the serial date by accumulating the number of days
+     * since the epoch.
+     */
+
+    /* Add days for previous months. */
+    for (i = 0; i < month; i++) {
+        days += mdays[i];
+    }
+    /* Add days for current month. */
+    days += day;
+    /* Add days for all previous years.  */
+    days += range * 365;
+    /* Add 4 year leapdays. */
+    days += (range) / 4;
+    /* Remove 100 year leapdays. */
+    days -= (range + offset) / 100;
+    /* Add 400 year leapdays. */
+    days += (range + offset + norm) / 400;
+    /* Remove leap days already counted. */
+    days -= leap;
+
+    /* Adjust for Excel erroneously treating 1900 as a leap year. */
+    if (!date_1904 && days > 59)
+        days++;
+
+    return days + seconds;
+}
+
+/* Simple strdup() implementation since it isn't ANSI C. */
+char *
+lxw_strdup(const char *str)
+{
+    size_t len;
+    char *copy;
+
+    if (!str)
+        return NULL;
+
+    len = strlen(str) + 1;
+    copy = malloc(len);
+
+    if (copy)
+        memcpy(copy, str, len);
+
+    return copy;
+}
+
+/* Simple strlen that counts UTF-8 characters. Assumes well formed UTF-8. */
+size_t
+lxw_utf8_strlen(const char *str)
+{
+    size_t byte_count = 0;
+    size_t char_count = 0;
+
+    while (str[byte_count]) {
+        if ((str[byte_count] & 0xc0) != 0x80)
+            char_count++;
+
+        byte_count++;
+    }
+
+    return char_count;
+}
+
+/* Simple tolower() for strings. */
+void
+lxw_str_tolower(char *str)
+{
+    int i;
+
+    for (i = 0; str[i]; i++)
+        str[i] = tolower(str[i]);
+}
+
+/* Create a quoted version of the worksheet name, or return an unmodified
+ * copy if it doesn't required quoting. */
+char *
+lxw_quote_sheetname(const char *str)
+{
+
+    uint8_t needs_quoting = 0;
+    size_t number_of_quotes = 2;
+    size_t i, j;
+    size_t len = strlen(str);
+
+    /* Don't quote the sheetname if it is already quoted. */
+    if (str[0] == '\'')
+        return lxw_strdup(str);
+
+    /* Check if the sheetname contains any characters that require it
+     * to be quoted. Also check for single quotes within the string. */
+    for (i = 0; i < len; i++) {
+        if (!isalnum((unsigned char) str[i]) && str[i] != '_'
+            && str[i] != '.')
+            needs_quoting = 1;
+
+        if (str[i] == '\'') {
+            needs_quoting = 1;
+            number_of_quotes++;
+        }
+    }
+
+    if (!needs_quoting) {
+        return lxw_strdup(str);
+    }
+    else {
+        /* Add single quotes to the start and end of the string. */
+        char *quoted_name = calloc(1, len + number_of_quotes + 1);
+        RETURN_ON_MEM_ERROR(quoted_name, NULL);
+
+        quoted_name[0] = '\'';
+
+        for (i = 0, j = 1; i < len; i++, j++) {
+            quoted_name[j] = str[i];
+
+            /* Double quote inline single quotes. */
+            if (str[i] == '\'') {
+                quoted_name[++j] = '\'';
+            }
+        }
+        quoted_name[j++] = '\'';
+        quoted_name[j++] = '\0';
+
+        return quoted_name;
+    }
+}
+
+/*
+ * Thin wrapper for tmpfile() so it can be over-ridden with a user defined
+ * version if required for safety or portability.
+ */
+FILE *
+lxw_tmpfile(char *tmpdir)
+{
+#ifndef USE_STANDARD_TMPFILE
+    return tmpfileplus(tmpdir, NULL, NULL, 0);
+#else
+    (void) tmpdir;
+    return tmpfile();
+#endif
+}