write_xlsx 0.0.2

data/lib/write_xlsx/package/theme.rb

@@ -0,0 +1,45 @@
+# -*- coding: utf-8 -*-
+
+require 'write_xlsx/package/xml_writer_simple'
+require 'write_xlsx/utility'
+
+module Writexlsx
+  module Package
+    class Theme
+
+      include Writexlsx::Utility
+
+      def initialize
+        @writer = nil
+      end
+
+      def assemble_xml_file
+        return unless @writer
+        write_theme_file
+        @writer.write("\n")
+        @writer.close
+      end
+
+      #
+      # Set the filehandle only. This class doesn't use a real XML writer class.
+      #
+      def set_xml_writer(filename)
+        fh = open(filename, 'wb')
+
+        @writer = fh
+      end
+
+      private
+
+      #
+      # Write a default theme.xml file.
+      #
+      def write_theme_file
+        theme  =
+%Q{<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
+<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>}
+        @writer.write(theme)
+      end
+    end
+  end
+end

data/lib/write_xlsx/package/vml.rb

@@ -0,0 +1,386 @@
+# -*- coding: utf-8 -*-
+require 'write_xlsx/package/xml_writer_simple'
+require 'write_xlsx/utility'
+
+module Writexlsx
+  module Package
+    class VML
+
+      include Writexlsx::Utility
+
+      def initialize
+        @writer = Package::XMLWriterSimple.new
+      end
+
+      def set_xml_writer(filename)
+        @writer.set_xml_writer(filename)
+      end
+
+      def assemble_xml_file(data_id, vml_shape_id, comments_data)
+        return unless @writer
+
+        write_xml_namespace
+
+        # Write the o:shapelayout element.
+        write_shapelayout(data_id)
+
+        # Write the v:shapetype element.
+        write_shapetype
+
+        z_index = 1
+        comments_data.each do |comment|
+          # Write the v:shape element.
+          vml_shape_id += 1
+          write_shape(vml_shape_id, z_index, comment)
+          z_index += 1
+        end
+
+        @writer.end_tag('xml')
+        @writer.crlf
+        @writer.close
+      end
+
+      private
+
+      #
+      # Convert comment vertices from pixels to points.
+      #
+      def pixels_to_points(vertices)
+        col_start, row_start, x1,    y1,
+        col_end,   row_end,   x2,    y2,
+        left,      top,       width, height  = vertices.flatten
+
+        left   *= 0.75
+        top    *= 0.75
+        width  *= 0.75
+        height *= 0.75
+
+        [left, top, width, height]
+      end
+
+      #
+      # Write the <xml> element. This is the root element of VML.
+      #
+      def write_xml_namespace
+        schema  = 'urn:schemas-microsoft-com:'
+        xmlns   = schema + 'vml'
+        xmlns_o = schema + 'office:office'
+        xmlns_x = schema + 'office:excel'
+
+        attributes = [
+          'xmlns:v', xmlns,
+          'xmlns:o', xmlns_o,
+          'xmlns:x', xmlns_x
+        ]
+
+        @writer.start_tag('xml', attributes)
+      end
+
+      #
+      # Write the <o:shapelayout> element.
+      #
+      def write_shapelayout(data_id)
+        ext     = 'edit'
+
+        attributes = ['v:ext', ext]
+
+        @writer.start_tag('o:shapelayout', attributes)
+
+        # Write the o:idmap element.
+        write_idmap(data_id)
+
+        @writer.end_tag('o:shapelayout')
+      end
+
+      #
+      # Write the <o:idmap> element.
+      #
+      def write_idmap(data_id)
+        ext     = 'edit'
+
+        attributes = [
+          'v:ext', ext,
+          'data',  data_id
+        ]
+
+        @writer.empty_tag('o:idmap', attributes)
+      end
+
+      #
+      # Write the <v:shapetype> element.
+      #
+      def write_shapetype
+        id        = '_x0000_t202'
+        coordsize = '21600,21600'
+        spt       = 202
+        path      = 'm,l,21600r21600,l21600,xe'
+
+        attributes = [
+            'id',        id,
+            'coordsize', coordsize,
+            'o:spt',     spt,
+            'path',      path
+        ]
+
+        @writer.start_tag('v:shapetype', attributes)
+
+        # Write the v:stroke element.
+        write_stroke
+
+        # Write the v:path element.
+        write_path('t', 'rect')
+
+        @writer.end_tag('v:shapetype')
+      end
+
+      #
+      # Write the <v:stroke> element.
+      #
+      def write_stroke
+        joinstyle = 'miter'
+
+        attributes = ['joinstyle', joinstyle]
+
+        @writer.empty_tag('v:stroke', attributes)
+      end
+
+      #
+      # Write the <v:path> element.
+      #
+      def write_path(gradientshapeok, connecttype)
+        attributes      = []
+
+        attributes << 'gradientshapeok' << 't' if gradientshapeok
+        attributes << 'o:connecttype' << connecttype
+
+        @writer.empty_tag('v:path', attributes)
+      end
+
+      #
+      # Write the <v:shape> element.
+      #
+      def write_shape(id, z_index, comment)
+        type       = '#_x0000_t202'
+        insetmode  = 'auto'
+        visibility = 'hidden'
+
+        # Set the shape index.
+        id = '_x0000_s' + id.to_s
+
+        # Get the comment parameters
+        row       = comment[0]
+        col       = comment[1]
+        string    = comment[2]
+        author    = comment[3]
+        visible   = comment[4]
+        fillcolor = comment[5]
+        vertices  = comment[6]
+
+        left, top, width, height = pixels_to_points(vertices)
+
+        # Set the visibility.
+        visibility = 'visible' if visible != 0 && !visible.nil?
+
+        left_str    = float_to_str(left)
+        top_str     = float_to_str(top)
+        width_str   = float_to_str(width)
+        height_str  = float_to_str(height)
+        z_index_str = float_to_str(z_index)
+
+        style =
+            'position:absolute;' +
+            'margin-left:'       +
+            left_str + 'pt;'     +
+            'margin-top:'        +
+            top_str + 'pt;'      +
+            'width:'             +
+            width_str + 'pt;'    +
+            'height:'            +
+            height_str + 'pt;'   +
+            'z-index:'           +
+            z_index_str + ';'    +
+            'visibility:'        +
+            visibility
+
+
+        attributes = [
+            'id',          id,
+            'type',        type,
+            'style',       style,
+            'fillcolor',   fillcolor,
+            'o:insetmode', insetmode
+        ]
+
+        @writer.start_tag('v:shape', attributes)
+
+        # Write the v:fill element.
+        write_fill
+
+        # Write the v:shadow element.
+        write_shadow
+
+        # Write the v:path element.
+        write_path(nil, 'none')
+
+        # Write the v:textbox element.
+        write_textbox
+
+        # Write the x:ClientData element.
+        write_client_data(row, col, visible, vertices)
+
+        @writer.end_tag('v:shape')
+      end
+
+      def float_to_str(float)
+        return '' unless float
+        if float == float.to_i
+          float.to_i.to_s
+        else
+          float.to_s
+        end
+      end
+
+      #
+      # Write the <v:fill> element.
+      #
+      def write_fill
+        color_2 = '#ffffe1'
+        attributes = ['color2', color_2]
+
+        @writer.empty_tag('v:fill', attributes)
+      end
+
+      #
+      # Write the <v:shadow> element.
+      #
+      def write_shadow
+        on       = 't'
+        color    = 'black'
+        obscured = 't'
+
+        attributes = [
+            'on',       on,
+            'color',    color,
+            'obscured', obscured
+        ]
+
+        @writer.empty_tag('v:shadow', attributes)
+      end
+
+      #
+      # Write the <v:textbox> element.
+      #
+      def write_textbox
+        style = 'mso-direction-alt:auto'
+
+        attributes = ['style', style]
+
+        @writer.start_tag('v:textbox', attributes)
+
+        # Write the div element.
+        write_div
+
+        @writer.end_tag('v:textbox')
+      end
+
+      #
+      # Write the <div> element.
+      #
+      def write_div
+        style = 'text-align:left'
+        attributes = ['style', style]
+
+        @writer.start_tag('div', attributes)
+        @writer.end_tag('div')
+      end
+
+      #
+      # Write the <x:ClientData> element.
+      #
+      def write_client_data(row, col, visible, vertices)
+        object_type = 'Note'
+
+        attributes = ['ObjectType', object_type]
+
+        @writer.start_tag('x:ClientData', attributes)
+
+        # Write the x:MoveWithCells element.
+        write_move_with_cells
+
+        # Write the x:SizeWithCells element.
+        write_size_with_cells
+
+        # Write the x:Anchor element.
+        write_anchor(vertices)
+
+        # Write the x:AutoFill element.
+        write_auto_fill
+
+        # Write the x:Row element.
+        write_row(row)
+
+        # Write the x:Column element.
+        write_column(col)
+
+        # Write the x:Visible element.
+        write_visible if visible != 0 && !visible.nil?
+
+        @writer.end_tag('x:ClientData')
+      end
+
+      #
+      # Write the <x:MoveWithCells> element.
+      #
+      def write_move_with_cells
+        @writer.empty_tag('x:MoveWithCells')
+      end
+
+      #
+      # Write the <x:SizeWithCells> element.
+      #
+      def write_size_with_cells
+        @writer.empty_tag('x:SizeWithCells')
+      end
+
+      #
+      # Write the <x:Visible> element.
+      #
+      def write_visible
+        @writer.empty_tag('x:Visible')
+      end
+
+      #
+      # Write the <x:Anchor> element.
+      #
+      def write_anchor(vertices)
+        col_start, row_start, x1, y1, col_end, row_end, x2, y2 = vertices
+        data = [col_start, x1, row_start, y1, col_end, x2, row_end, y2].join(', ')
+
+        @writer.data_element('x:Anchor', data)
+      end
+
+      #
+      # Write the <x:AutoFill> element.
+      #
+      def write_auto_fill
+        data = 'False'
+
+        @writer.data_element('x:AutoFill', data)
+      end
+
+      #
+      # Write the <x:Row> element.
+      #
+      def write_row(data)
+        @writer.data_element('x:Row', data)
+      end
+
+      #
+      # Write the <x:Column> element.
+      #
+      def write_column(data)
+        @writer.data_element('x:Column', data)
+      end
+    end
+  end
+end

data/lib/write_xlsx/package/xml_writer_simple.rb

@@ -0,0 +1,90 @@
+# coding: utf-8
+#
+# XMLWriterSimple
+#
+require 'stringio'
+
+module Writexlsx
+  module Package
+    class XMLWriterSimple
+      def initialize
+        @io = StringIO.new
+      end
+
+      def set_xml_writer(filename = nil)
+        fh = File.open(filename, "wb")
+
+        @io = fh
+      end
+
+      def xml_decl(encoding = 'UTF-8', standalone = true)
+        str = %Q!<?xml version="1.0" encoding="#{encoding}" standalone="#{standalone ? 'yes' : 'no'}"?>\n!
+        io_write(str)
+      end
+
+      def start_tag(tag, attr = [])
+        str = "<#{tag}#{key_vals(attr)}>"
+        io_write(str)
+      end
+
+      def end_tag(tag)
+        str = "</#{tag}>"
+        io_write(str)
+      end
+
+      def empty_tag(tag, attr = [])
+        str = "<#{tag}#{key_vals(attr)} />"
+        io_write(str)
+      end
+
+      def data_element(tag, data, attr = [])
+        str = start_tag(tag, attr)
+        str << io_write("#{characters(data)}")
+        str << end_tag(tag)
+      end
+
+      def characters(data)
+        escape_xml_chars(data)
+      end
+
+      def crlf
+        io_write("\n")
+      end
+
+      def close
+        @io.close
+      end
+
+      def string
+        @io.string
+      end
+
+      def io_write(str)
+        @io << str
+        str
+      end
+
+      private
+
+      def key_val(key, val)
+        %Q{ #{key}="#{val}"}
+      end
+
+      def key_vals(attr)
+        array = []
+        (0 .. attr.size-1).step(2) do |i|
+          array << key_val(attr[i], escape_xml_chars(attr[i+1]))
+        end
+        array.join('')
+      end
+
+      def escape_xml_chars(str = '')
+        if str =~ /[&<>"]/
+          str.gsub(/&/, '&amp;').gsub(/</, '&lt;').gsub(/>/, '&gt;').gsub(/"/, '&quot;')
+        else
+          str
+        end
+      end
+    end
+  end
+end