RELS.THEME = "http://schemas.openxmlformats.org/officeDocument/2006/relationships/theme"; /* Various RGB/HSL utility functions - might want to put these elsewhere. */ /* From http://www.javascripter.net/faq/hextorgb.htm, usage: var X = hexToX('FFFFFF') */ function cutHex(h) {return (h.charAt(0)=="#") ? h.substring(1,7):h} function hexToR(h) {return parseInt((cutHex(h)).substring(0,2),16)} function hexToG(h) {return parseInt((cutHex(h)).substring(2,4),16)} function hexToB(h) {return parseInt((cutHex(h)).substring(4,6),16)} /* From http://www.javascripter.net/faq/rgbtohex.htm, usage: var RGB = rgbToHex(R, G, B) */ function toHex(n) { n = parseInt(n,10); if (isNaN(n)) return "00"; n = Math.max(0,Math.min(n,255)); return "0123456789ABCDEF".charAt((n-n%16)/16) + "0123456789ABCDEF".charAt(n%16); } function rgbToHex(R,G,B) {return toHex(R)+toHex(G)+toHex(B)} /* From the specification. */ var HLSMAX = 255; /* From https://gist.github.com/mjackson/5311256 via http://stackoverflow.com/a/9493060 */ /** * Converts an RGB color value to HSL. Conversion formula * adapted from http://en.wikipedia.org/wiki/HSL_color_space. * Assumes r, g, and b are contained in the set [0, 255] and * returns h, s, and l in the set [0, 1]. * * @param Number r The red color value * @param Number g The green color value * @param Number b The blue color value * @return Array The HSL representation */ function rgbToHsl(r, g, b){ r /= 255, g /= 255, b /= 255; var max = Math.max(r, g, b), min = Math.min(r, g, b); var h, s, l = (max + min) / 2; if(max == min){ h = s = 0; // achromatic }else{ var d = max - min; s = l > 0.5 ? d / (2 - max - min) : d / (max + min); switch(max){ case r: h = (g - b) / d + (g < b ? 6 : 0); break; case g: h = (b - r) / d + 2; break; case b: h = (r - g) / d + 4; break; } h /= 6; } return [h, s, l]; } /** * Converts an HSL color value to RGB. Conversion formula * adapted from http://en.wikipedia.org/wiki/HSL_color_space. * Assumes h, s, and l are contained in the set [0, 1] and * returns r, g, and b in the set [0, 255]. * * @param Number h The hue * @param Number s The saturation * @param Number l The lightness * @return Array The RGB representation */ function hslToRgb(h, s, l){ var r, g, b; if(s == 0){ r = g = b = l; // achromatic }else{ function hue2rgb(p, q, t){ if(t < 0) t += 1; if(t > 1) t -= 1; if(t < 1/6) return p + (q - p) * 6 * t; if(t < 1/2) return q; if(t < 2/3) return p + (q - p) * (2/3 - t) * 6; return p; } var q = l < 0.5 ? l * (1 + s) : l + s - l * s; var p = 2 * l - q; r = hue2rgb(p, q, h + 1/3); g = hue2rgb(p, q, h); b = hue2rgb(p, q, h - 1/3); } return [Math.round(r * 255), Math.round(g * 255), Math.round(b * 255)]; } /* Utility function to apply tint to an RGB color. */ function rgb_tint(rgb, tint) { var r = hexToR(rgb), g = hexToG(rgb), b = hexToB(rgb), hsl = rgbToHsl(r, g, b); /* Apply tint as described in pages 1757-1758 of the ECMA Office Open XML specification. */ /* NOTE: This is totally messed up... see http://social.msdn.microsoft.com/Forums/en-US/e9d8c136-6d62-4098-9b1b-dac786149f43/excel-color-tint-algorithm-incorrect */ if (tint < 0) { hsl[2] = hsl[2] * (1.0 + tint); } else if (tint > 0) { hsl[2] = hsl[2] * (1.0 + tint); // XXX This doesn't work... //hsl[2] = hsl[2] * (1.0 - tint) + (HLSMAX - HLSMAX * (1.0 - tint)); } rgb = hslToRgb(hsl[0], hsl[1], hsl[2]); return rgbToHex(rgb[0], rgb[1], rgb[2]); } function parse_clrScheme(t, opts) { themes.themeElements.clrScheme = []; var color = {}; t[0].match(/<[^>]*>/g).forEach(function(x) { var y = parsexmltag(x); switch(y[0]) { case '': break; /* 20.1.2.3.32 srgbClr CT_SRgbColor */ case '': case '': /* 20.1.4.1.10 dk2 (Dark 2) */ case '': case '': /* 20.1.4.1.22 lt1 (Light 1) */ case '': case '': /* 20.1.4.1.23 lt2 (Light 2) */ case '': case '': /* 20.1.4.1.1 accent1 (Accent 1) */ case '': case '': /* 20.1.4.1.2 accent2 (Accent 2) */ case '': case '': /* 20.1.4.1.3 accent3 (Accent 3) */ case '': case '': /* 20.1.4.1.4 accent4 (Accent 4) */ case '': case '': /* 20.1.4.1.5 accent5 (Accent 5) */ case '': case '': /* 20.1.4.1.6 accent6 (Accent 6) */ case '': case '': /* 20.1.4.1.19 hlink (Hyperlink) */ case '': case '': /* 20.1.4.1.15 folHlink (Followed Hyperlink) */ case '': case '': if (y[0][1] === '/') { themes.themeElements.clrScheme.push(color); color = {}; } else { color.name = y[0].substring(3, y[0].length - 1); } break; default: if(opts.WTF) throw 'unrecognized ' + y[0] + ' in clrScheme'; } }); } /* 14.2.7 Theme Part */ function parse_theme_xml(data, opts) { themes.themeElements = {}; var t; /* clrScheme */ if((t=data.match(/]*)>.*<\/a:clrScheme>/))) parse_clrScheme(t, opts); return themes; } function write_theme() { return '\n'; }