spree_advanced_reporting 2.1.0

data/.gitignore

@@ -0,0 +1 @@
+.DS_Store

data/Gemfile

@@ -0,0 +1,5 @@
+source 'http://rubygems.org'
+
+gem 'ruport', :git => 'git://github.com/iloveitaly/ruport.git', :branch => 'wicked-pdf'
+
+gemspec

data/README.md

@@ -0,0 +1,23 @@
+# NOTES:
+
+This branch is for use with Spree 1.1.0 and later.
+
+For Spree 1.0.x, use the spree-1-0 branch.
+
+Forked from what appeared to the be the most up to date for, and made the following general changes:
+
+1. Removed the route that overrides the main admin overview page
+2. Fixed a warning about ```ADVANCED_REPORTS``` being redefined
+3. Improved PDF generation ([custom ruport](http://github.com/iloveitaly/ruport/tree/wicked-pdf) uses wicked_pdf instead of the ancient PDF::Writer)
+
+## Includes:
+* Base reports of Revenue, Units, Profit into Daily, Weekly, Monthly, and Yearly increments
+* Geo reports of Revenue, Units divided into states and countries
+* Two "top" reports for top products and top customers
+* The ability to limit reports by order date, "store" (multi-store extension), product, and taxon.
+* The ability to export data in PDF or CSV format.
+* Transaction reports
+
+## Dependencies:
+* Ruport and Ruport-util
+* Google Visualization

data/Rakefile

@@ -0,0 +1,20 @@
+require 'rake'
+require 'rake/testtask'
+require 'rake/packagetask'
+require 'rubygems/package_task'
+require 'rspec/core/rake_task'
+require 'cucumber/rake/task'
+require 'spree_core/testing_support/common_rake'
+
+RSpec::Core::RakeTask.new
+Cucumber::Rake::Task.new
+
+task :default => [:spec, :cucumber ]
+
+spec = eval(File.read('advanced_reporting.gemspec'))
+
+desc "Generates a dummy app for testing"
+task :test_app do
+  ENV['LIB_NAME'] = 'advanced_reporting'
+  Rake::Task['common:test_app'].invoke
+end

data/TODO.txt

@@ -0,0 +1,3 @@
+# Add UI for limiting products / store on frontend
+# Add localization
+# Add SVG formatting? or another plotting tool?

data/app/assets/javascripts/admin/advanced_reporting/advanced_reporting.js

@@ -0,0 +1,46 @@
+// TODO this would look alot cleaner in coffeescript
+
+$(function() {
+	$('ul#show_data li').click(function() {
+		$('ul#show_data li').not(this).removeClass('selected');
+		$(this).addClass('selected');
+		var id = 'div#' + $(this).attr('id') + '_data';
+		$('div.advanced_reporting_data').not($(id)).hide();
+		$(id).show(); 
+	});
+
+	if($('table.tablesorter tbody').length) {
+		$('table.tablesorter').tablesorter();
+		$('table.tablesorter').bind("sortEnd", function() {
+			var section = $(this).parent().attr('id');
+			var even = true;
+			$.each($('div#' + section + ' table tr'), function(i, j) {
+				$(j).removeClass('even').removeClass('odd');
+				$(j).addClass(even ? 'even' : 'odd');
+				even = !even;
+			});
+		});
+	}
+
+	if($('input#product_id').length > 0) {
+		$('select#advanced_reporting_product_id').val($('input#product_id').val());
+	}
+	if($('input#taxon_id').length > 0) {
+		$('select#advanced_reporting_taxon_id').val($('input#taxon_id').val());
+	}
+	$('div#advanced_report_search form').submit(function() {
+		$('div#advanced_report_search form').attr('action', $('select#report').val());
+	});
+
+	$('select#report').change(function() {
+		var value = $(this).val()
+		$('div#advanced_report > form').action = value
+
+		if(value.match(/\/count$/) || value.match(/\/top_products$/)) {
+			$('select#advanced_reporting_product_id,select#advanced_reporting_taxon_id').val('');
+			$('div#taxon_products').hide();
+		} else {
+			$('div#taxon_products').show();
+		}
+	}).trigger('change')
+})

data/app/assets/javascripts/admin/advanced_reporting/jquery.tablesorter.min.js

@@ -0,0 +1,4 @@
+
+(function($){$.extend({tablesorter:new
+function(){var parsers=[],widgets=[];this.defaults={cssHeader:"header",cssAsc:"headerSortUp",cssDesc:"headerSortDown",cssChildRow:"expand-child",sortInitialOrder:"asc",sortMultiSortKey:"shiftKey",sortForce:null,sortAppend:null,sortLocaleCompare:true,textExtraction:"simple",parsers:{},widgets:[],widgetZebra:{css:["even","odd"]},headers:{},widthFixed:false,cancelSelection:true,sortList:[],headerList:[],dateFormat:"us",decimal:'/\.|\,/g',onRenderHeader:null,selectorHeaders:'thead th',debug:false};function benchmark(s,d){log(s+","+(new Date().getTime()-d.getTime())+"ms");}this.benchmark=benchmark;function log(s){if(typeof console!="undefined"&&typeof console.debug!="undefined"){console.log(s);}else{alert(s);}}function buildParserCache(table,$headers){if(table.config.debug){var parsersDebug="";}if(table.tBodies.length==0)return;var rows=table.tBodies[0].rows;if(rows[0]){var list=[],cells=rows[0].cells,l=cells.length;for(var i=0;i<l;i++){var p=false;if($.metadata&&($($headers[i]).metadata()&&$($headers[i]).metadata().sorter)){p=getParserById($($headers[i]).metadata().sorter);}else if((table.config.headers[i]&&table.config.headers[i].sorter)){p=getParserById(table.config.headers[i].sorter);}if(!p){p=detectParserForColumn(table,rows,-1,i);}if(table.config.debug){parsersDebug+="column:"+i+" parser:"+p.id+"\n";}list.push(p);}}if(table.config.debug){log(parsersDebug);}return list;};function detectParserForColumn(table,rows,rowIndex,cellIndex){var l=parsers.length,node=false,nodeValue=false,keepLooking=true;while(nodeValue==''&&keepLooking){rowIndex++;if(rows[rowIndex]){node=getNodeFromRowAndCellIndex(rows,rowIndex,cellIndex);nodeValue=trimAndGetNodeText(table.config,node);if(table.config.debug){log('Checking if value was empty on row:'+rowIndex);}}else{keepLooking=false;}}for(var i=1;i<l;i++){if(parsers[i].is(nodeValue,table,node)){return parsers[i];}}return parsers[0];}function getNodeFromRowAndCellIndex(rows,rowIndex,cellIndex){return rows[rowIndex].cells[cellIndex];}function trimAndGetNodeText(config,node){return $.trim(getElementText(config,node));}function getParserById(name){var l=parsers.length;for(var i=0;i<l;i++){if(parsers[i].id.toLowerCase()==name.toLowerCase()){return parsers[i];}}return false;}function buildCache(table){if(table.config.debug){var cacheTime=new Date();}var totalRows=(table.tBodies[0]&&table.tBodies[0].rows.length)||0,totalCells=(table.tBodies[0].rows[0]&&table.tBodies[0].rows[0].cells.length)||0,parsers=table.config.parsers,cache={row:[],normalized:[]};for(var i=0;i<totalRows;++i){var c=$(table.tBodies[0].rows[i]),cols=[];if(c.hasClass(table.config.cssChildRow)){cache.row[cache.row.length-1]=cache.row[cache.row.length-1].add(c);continue;}cache.row.push(c);for(var j=0;j<totalCells;++j){cols.push(parsers[j].format(getElementText(table.config,c[0].cells[j]),table,c[0].cells[j]));}cols.push(cache.normalized.length);cache.normalized.push(cols);cols=null;};if(table.config.debug){benchmark("Building cache for "+totalRows+" rows:",cacheTime);}return cache;};function getElementText(config,node){var text="";if(!node)return"";if(!config.supportsTextContent)config.supportsTextContent=node.textContent||false;if(config.textExtraction=="simple"){if(config.supportsTextContent){text=node.textContent;}else{if(node.childNodes[0]&&node.childNodes[0].hasChildNodes()){text=node.childNodes[0].innerHTML;}else{text=node.innerHTML;}}}else{if(typeof(config.textExtraction)=="function"){text=config.textExtraction(node);}else{text=$(node).text();}}return text;}function appendToTable(table,cache){if(table.config.debug){var appendTime=new Date()}var c=cache,r=c.row,n=c.normalized,totalRows=n.length,checkCell=(n[0].length-1),tableBody=$(table.tBodies[0]),rows=[];for(var i=0;i<totalRows;i++){var pos=n[i][checkCell];rows.push(r[pos]);if(!table.config.appender){var l=r[pos].length;for(var j=0;j<l;j++){tableBody[0].appendChild(r[pos][j]);}}}if(table.config.appender){table.config.appender(table,rows);}rows=null;if(table.config.debug){benchmark("Rebuilt table:",appendTime);}applyWidget(table);setTimeout(function(){$(table).trigger("sortEnd");},0);};function buildHeaders(table){if(table.config.debug){var time=new Date();}var meta=($.metadata)?true:false;var header_index=computeTableHeaderCellIndexes(table);$tableHeaders=$(table.config.selectorHeaders,table).each(function(index){this.column=header_index[this.parentNode.rowIndex+"-"+this.cellIndex];this.order=formatSortingOrder(table.config.sortInitialOrder);this.count=this.order;if(checkHeaderMetadata(this)||checkHeaderOptions(table,index))this.sortDisabled=true;if(checkHeaderOptionsSortingLocked(table,index))this.order=this.lockedOrder=checkHeaderOptionsSortingLocked(table,index);if(!this.sortDisabled){var $th=$(this).addClass(table.config.cssHeader);if(table.config.onRenderHeader)table.config.onRenderHeader.apply($th);}table.config.headerList[index]=this;});if(table.config.debug){benchmark("Built headers:",time);log($tableHeaders);}return $tableHeaders;};function computeTableHeaderCellIndexes(t){var matrix=[];var lookup={};var thead=t.getElementsByTagName('THEAD')[0];var trs=thead.getElementsByTagName('TR');for(var i=0;i<trs.length;i++){var cells=trs[i].cells;for(var j=0;j<cells.length;j++){var c=cells[j];var rowIndex=c.parentNode.rowIndex;var cellId=rowIndex+"-"+c.cellIndex;var rowSpan=c.rowSpan||1;var colSpan=c.colSpan||1
+var firstAvailCol;if(typeof(matrix[rowIndex])=="undefined"){matrix[rowIndex]=[];}for(var k=0;k<matrix[rowIndex].length+1;k++){if(typeof(matrix[rowIndex][k])=="undefined"){firstAvailCol=k;break;}}lookup[cellId]=firstAvailCol;for(var k=rowIndex;k<rowIndex+rowSpan;k++){if(typeof(matrix[k])=="undefined"){matrix[k]=[];}var matrixrow=matrix[k];for(var l=firstAvailCol;l<firstAvailCol+colSpan;l++){matrixrow[l]="x";}}}}return lookup;}function checkCellColSpan(table,rows,row){var arr=[],r=table.tHead.rows,c=r[row].cells;for(var i=0;i<c.length;i++){var cell=c[i];if(cell.colSpan>1){arr=arr.concat(checkCellColSpan(table,headerArr,row++));}else{if(table.tHead.length==1||(cell.rowSpan>1||!r[row+1])){arr.push(cell);}}}return arr;};function checkHeaderMetadata(cell){if(($.metadata)&&($(cell).metadata().sorter===false)){return true;};return false;}function checkHeaderOptions(table,i){if((table.config.headers[i])&&(table.config.headers[i].sorter===false)){return true;};return false;}function checkHeaderOptionsSortingLocked(table,i){if((table.config.headers[i])&&(table.config.headers[i].lockedOrder))return table.config.headers[i].lockedOrder;return false;}function applyWidget(table){var c=table.config.widgets;var l=c.length;for(var i=0;i<l;i++){getWidgetById(c[i]).format(table);}}function getWidgetById(name){var l=widgets.length;for(var i=0;i<l;i++){if(widgets[i].id.toLowerCase()==name.toLowerCase()){return widgets[i];}}};function formatSortingOrder(v){if(typeof(v)!="Number"){return(v.toLowerCase()=="desc")?1:0;}else{return(v==1)?1:0;}}function isValueInArray(v,a){var l=a.length;for(var i=0;i<l;i++){if(a[i][0]==v){return true;}}return false;}function setHeadersCss(table,$headers,list,css){$headers.removeClass(css[0]).removeClass(css[1]);var h=[];$headers.each(function(offset){if(!this.sortDisabled){h[this.column]=$(this);}});var l=list.length;for(var i=0;i<l;i++){h[list[i][0]].addClass(css[list[i][1]]);}}function fixColumnWidth(table,$headers){var c=table.config;if(c.widthFixed){var colgroup=$('<colgroup>');$("tr:first td",table.tBodies[0]).each(function(){colgroup.append($('<col>').css('width',$(this).width()));});$(table).prepend(colgroup);};}function updateHeaderSortCount(table,sortList){var c=table.config,l=sortList.length;for(var i=0;i<l;i++){var s=sortList[i],o=c.headerList[s[0]];o.count=s[1];o.count++;}}function multisort(table,sortList,cache){if(table.config.debug){var sortTime=new Date();}var dynamicExp="var sortWrapper = function(a,b) {",l=sortList.length;for(var i=0;i<l;i++){var c=sortList[i][0];var order=sortList[i][1];var s=(table.config.parsers[c].type=="text")?((order==0)?makeSortFunction("text","asc",c):makeSortFunction("text","desc",c)):((order==0)?makeSortFunction("numeric","asc",c):makeSortFunction("numeric","desc",c));var e="e"+i;dynamicExp+="var "+e+" = "+s;dynamicExp+="if("+e+") { return "+e+"; } ";dynamicExp+="else { ";}var orgOrderCol=cache.normalized[0].length-1;dynamicExp+="return a["+orgOrderCol+"]-b["+orgOrderCol+"];";for(var i=0;i<l;i++){dynamicExp+="}; ";}dynamicExp+="return 0; ";dynamicExp+="}; ";if(table.config.debug){benchmark("Evaling expression:"+dynamicExp,new Date());}eval(dynamicExp);cache.normalized.sort(sortWrapper);if(table.config.debug){benchmark("Sorting on "+sortList.toString()+" and dir "+order+" time:",sortTime);}return cache;};function makeSortFunction(type,direction,index){var a="a["+index+"]",b="b["+index+"]";if(type=='text'&&direction=='asc'){return"("+a+" == "+b+" ? 0 : ("+a+" === null ? Number.POSITIVE_INFINITY : ("+b+" === null ? Number.NEGATIVE_INFINITY : ("+a+" < "+b+") ? -1 : 1 )));";}else if(type=='text'&&direction=='desc'){return"("+a+" == "+b+" ? 0 : ("+a+" === null ? Number.POSITIVE_INFINITY : ("+b+" === null ? Number.NEGATIVE_INFINITY : ("+b+" < "+a+") ? -1 : 1 )));";}else if(type=='numeric'&&direction=='asc'){return"("+a+" === null && "+b+" === null) ? 0 :("+a+" === null ? Number.POSITIVE_INFINITY : ("+b+" === null ? Number.NEGATIVE_INFINITY : "+a+" - "+b+"));";}else if(type=='numeric'&&direction=='desc'){return"("+a+" === null && "+b+" === null) ? 0 :("+a+" === null ? Number.POSITIVE_INFINITY : ("+b+" === null ? Number.NEGATIVE_INFINITY : "+b+" - "+a+"));";}};function makeSortText(i){return"((a["+i+"] < b["+i+"]) ? -1 : ((a["+i+"] > b["+i+"]) ? 1 : 0));";};function makeSortTextDesc(i){return"((b["+i+"] < a["+i+"]) ? -1 : ((b["+i+"] > a["+i+"]) ? 1 : 0));";};function makeSortNumeric(i){return"a["+i+"]-b["+i+"];";};function makeSortNumericDesc(i){return"b["+i+"]-a["+i+"];";};function sortText(a,b){if(table.config.sortLocaleCompare)return a.localeCompare(b);return((a<b)?-1:((a>b)?1:0));};function sortTextDesc(a,b){if(table.config.sortLocaleCompare)return b.localeCompare(a);return((b<a)?-1:((b>a)?1:0));};function sortNumeric(a,b){return a-b;};function sortNumericDesc(a,b){return b-a;};function getCachedSortType(parsers,i){return parsers[i].type;};this.construct=function(settings){return this.each(function(){if(!this.tHead||!this.tBodies)return;var $this,$document,$headers,cache,config,shiftDown=0,sortOrder;this.config={};config=$.extend(this.config,$.tablesorter.defaults,settings);$this=$(this);$.data(this,"tablesorter",config);$headers=buildHeaders(this);this.config.parsers=buildParserCache(this,$headers);cache=buildCache(this);var sortCSS=[config.cssDesc,config.cssAsc];fixColumnWidth(this);$headers.click(function(e){var totalRows=($this[0].tBodies[0]&&$this[0].tBodies[0].rows.length)||0;if(!this.sortDisabled&&totalRows>0){$this.trigger("sortStart");var $cell=$(this);var i=this.column;this.order=this.count++%2;if(this.lockedOrder)this.order=this.lockedOrder;if(!e[config.sortMultiSortKey]){config.sortList=[];if(config.sortForce!=null){var a=config.sortForce;for(var j=0;j<a.length;j++){if(a[j][0]!=i){config.sortList.push(a[j]);}}}config.sortList.push([i,this.order]);}else{if(isValueInArray(i,config.sortList)){for(var j=0;j<config.sortList.length;j++){var s=config.sortList[j],o=config.headerList[s[0]];if(s[0]==i){o.count=s[1];o.count++;s[1]=o.count%2;}}}else{config.sortList.push([i,this.order]);}};setTimeout(function(){setHeadersCss($this[0],$headers,config.sortList,sortCSS);appendToTable($this[0],multisort($this[0],config.sortList,cache));},1);return false;}}).mousedown(function(){if(config.cancelSelection){this.onselectstart=function(){return false};return false;}});$this.bind("update",function(){var me=this;setTimeout(function(){me.config.parsers=buildParserCache(me,$headers);cache=buildCache(me);},1);}).bind("updateCell",function(e,cell){var config=this.config;var pos=[(cell.parentNode.rowIndex-1),cell.cellIndex];cache.normalized[pos[0]][pos[1]]=config.parsers[pos[1]].format(getElementText(config,cell),cell);}).bind("sorton",function(e,list){$(this).trigger("sortStart");config.sortList=list;var sortList=config.sortList;updateHeaderSortCount(this,sortList);setHeadersCss(this,$headers,sortList,sortCSS);appendToTable(this,multisort(this,sortList,cache));}).bind("appendCache",function(){appendToTable(this,cache);}).bind("applyWidgetId",function(e,id){getWidgetById(id).format(this);}).bind("applyWidgets",function(){applyWidget(this);});if($.metadata&&($(this).metadata()&&$(this).metadata().sortlist)){config.sortList=$(this).metadata().sortlist;}if(config.sortList.length>0){$this.trigger("sorton",[config.sortList]);}applyWidget(this);});};this.addParser=function(parser){var l=parsers.length,a=true;for(var i=0;i<l;i++){if(parsers[i].id.toLowerCase()==parser.id.toLowerCase()){a=false;}}if(a){parsers.push(parser);};};this.addWidget=function(widget){widgets.push(widget);};this.formatFloat=function(s){var i=parseFloat(s);return(isNaN(i))?0:i;};this.formatInt=function(s){var i=parseInt(s);return(isNaN(i))?0:i;};this.isDigit=function(s,config){return/^[-+]?\d*$/.test($.trim(s.replace(/[,.']/g,'')));};this.clearTableBody=function(table){if($.browser.msie){function empty(){while(this.firstChild)this.removeChild(this.firstChild);}empty.apply(table.tBodies[0]);}else{table.tBodies[0].innerHTML="";}};}});$.fn.extend({tablesorter:$.tablesorter.construct});var ts=$.tablesorter;ts.addParser({id:"text",is:function(s){return true;},format:function(s){return $.trim(s.toLocaleLowerCase());},type:"text"});ts.addParser({id:"digit",is:function(s,table){var c=table.config;return $.tablesorter.isDigit(s,c);},format:function(s){return $.tablesorter.formatFloat(s);},type:"numeric"});ts.addParser({id:"currency",is:function(s){return/^[£$€?.]/.test(s);},format:function(s){return $.tablesorter.formatFloat(s.replace(new RegExp(/[£$€]/g),""));},type:"numeric"});ts.addParser({id:"ipAddress",is:function(s){return/^\d{2,3}[\.]\d{2,3}[\.]\d{2,3}[\.]\d{2,3}$/.test(s);},format:function(s){var a=s.split("."),r="",l=a.length;for(var i=0;i<l;i++){var item=a[i];if(item.length==2){r+="0"+item;}else{r+=item;}}return $.tablesorter.formatFloat(r);},type:"numeric"});ts.addParser({id:"url",is:function(s){return/^(https?|ftp|file):\/\/$/.test(s);},format:function(s){return jQuery.trim(s.replace(new RegExp(/(https?|ftp|file):\/\//),''));},type:"text"});ts.addParser({id:"isoDate",is:function(s){return/^\d{4}[\/-]\d{1,2}[\/-]\d{1,2}$/.test(s);},format:function(s){return $.tablesorter.formatFloat((s!="")?new Date(s.replace(new RegExp(/-/g),"/")).getTime():"0");},type:"numeric"});ts.addParser({id:"percent",is:function(s){return/\%$/.test($.trim(s));},format:function(s){return $.tablesorter.formatFloat(s.replace(new RegExp(/%/g),""));},type:"numeric"});ts.addParser({id:"usLongDate",is:function(s){return s.match(new RegExp(/^[A-Za-z]{3,10}\.? [0-9]{1,2}, ([0-9]{4}|'?[0-9]{2}) (([0-2]?[0-9]:[0-5][0-9])|([0-1]?[0-9]:[0-5][0-9]\s(AM|PM)))$/));},format:function(s){return $.tablesorter.formatFloat(new Date(s).getTime());},type:"numeric"});ts.addParser({id:"shortDate",is:function(s){return/\d{1,2}[\/\-]\d{1,2}[\/\-]\d{2,4}/.test(s);},format:function(s,table){var c=table.config;s=s.replace(/\-/g,"/");if(c.dateFormat=="us"){s=s.replace(/(\d{1,2})[\/\-](\d{1,2})[\/\-](\d{4})/,"$3/$1/$2");}else if(c.dateFormat=="uk"){s=s.replace(/(\d{1,2})[\/\-](\d{1,2})[\/\-](\d{4})/,"$3/$2/$1");}else if(c.dateFormat=="dd/mm/yy"||c.dateFormat=="dd-mm-yy"){s=s.replace(/(\d{1,2})[\/\-](\d{1,2})[\/\-](\d{2})/,"$1/$2/$3");}return $.tablesorter.formatFloat(new Date(s).getTime());},type:"numeric"});ts.addParser({id:"time",is:function(s){return/^(([0-2]?[0-9]:[0-5][0-9])|([0-1]?[0-9]:[0-5][0-9]\s(am|pm)))$/.test(s);},format:function(s){return $.tablesorter.formatFloat(new Date("2000/01/01 "+s).getTime());},type:"numeric"});ts.addParser({id:"metadata",is:function(s){return false;},format:function(s,table,cell){var c=table.config,p=(!c.parserMetadataName)?'sortValue':c.parserMetadataName;return $(cell).metadata()[p];},type:"numeric"});ts.addWidget({id:"zebra",format:function(table){if(table.config.debug){var time=new Date();}var $tr,row=-1,odd;$("tr:visible",table.tBodies[0]).each(function(i){$tr=$(this);if(!$tr.hasClass(table.config.cssChildRow))row++;odd=(row%2==0);$tr.removeClass(table.config.widgetZebra.css[odd?0:1]).addClass(table.config.widgetZebra.css[odd?1:0])});if(table.config.debug){$.tablesorter.benchmark("Applying Zebra widget",time);}}});})(jQuery);

data/app/assets/stylesheets/admin/advanced_reporting/advanced_reporting.css.erb

@@ -0,0 +1,18 @@
+/* without overriding the default spree_core in spree admin you can't include CSS */
+/* easier to precompile this asset and include manually via stylesheet tag */
+
+div.canvas { padding-bottom: 20px; }
+
+table.tablesorter th.header { background-image: url(<%= asset_path 'admin/advanced_reporting/bg.gif'%>); cursor: pointer; font-weight: bold; background-repeat: no-repeat; background-position: center left; padding-left: 20px; border-right: 1px solid #dad9c7;  margin-left: -1px; } 
+table.tablesorter th.headerSortUp { background-image: url(<%= asset_path 'admin/advanced_reporting/asc.gif'%>); background-color: #3399FF; }
+table.tablesorter th.headerSortDown { background-image: url(<%= asset_path 'admin/advanced_reporting/desc.gif'%>); background-color: #3399FF; }
+
+#sidebar #advanced_report_search h1, 
+#sidebar #advanced_report_search h2,
+#sidebar #advanced_report_search h3 {
+	margin-left:0;
+}
+
+#sidebar #advanced_report_search select {
+	max-width: 100%;
+}

data/app/assets/stylesheets/pdf.css

@@ -0,0 +1,15 @@
+body { font:normal 100%/1.25 Helvetica, Arial, Verdana, sans-serif; }
+
+.odd { background-color: #e6e6e6; }
+
+/*
+ * Page breaking seems like a tricky issue...
+ * http://stackoverflow.com/questions/1763639/how-to-deal-with-page-breaks-when-printing-a-large-html-table
+ * http://stackoverflow.com/questions/8786755/wkhtmltopdf-characters-in-single-line-partially-cut-between-pages
+ * http://stackoverflow.com/questions/1539876/controlling-css-page-breaks-when-printing-in-webkit
+ * 
+ * as long as vertical-align:bottom is set on all tds, and a recent version of the binary is installed, 
+ * things seem to work well enough (not clean breaks, but nothing is cut off)
+ */
+
+td { vertical-align: bottom; padding:5px; }

data/app/controllers/spree/admin/advanced_report_overview_controller.rb

@@ -0,0 +1,21 @@
+class Spree::Admin::AdvancedReportOverviewController < Spree::Admin::BaseController
+  def index
+    @reports = Spree::Admin::ReportsController::ADVANCED_REPORTS
+    @products = Spree::Product.all
+    @taxons = Spree::Taxon.all
+    if defined?(MultiDomainExtension)
+      @stores = Store.all
+    end
+    @report = Spree::AdvancedReport::IncrementReport::Revenue.new({ :search => {} })
+    @top_products_report = Spree::AdvancedReport::TopReport::TopProducts.new({ :search => {} }, 5)
+    @top_customers_report = Spree::AdvancedReport::TopReport::TopCustomers.new({ :search => {} }, 5)
+    @top_customers_report.ruportdata.remove_column(I18n.t("adv_report.units"))
+
+    # From overview_dashboard, Cleanup eventually
+    orders = Spree::Order.find(:all, :order => "completed_at DESC", :limit => 10, :include => :line_items, :conditions => "completed_at is not null")
+    @last_orders = orders.inject([]) { |arr, o| arr << [o.bill_address.firstname, o.line_items.sum(:quantity), o.total, o.number]; arr }
+    @best_taxons =  Spree::Taxon.connection.select_rows("select t.name, count(li.quantity) from spree_line_items li inner join spree_variants v on
+           li.variant_id = v.id inner join spree_products p on v.product_id = p.id inner join spree_products_taxons pt on p.id = pt.product_id
+           inner join spree_taxons t on pt.taxon_id = t.id where t.taxonomy_id = #{Spree::Taxonomy.last.id} group by t.name order by count(li.quantity) desc limit 5;")
+  end
+end

data/app/controllers/spree/admin/reports_controller_decorator.rb

@@ -0,0 +1,127 @@
+require_dependency 'spree/admin/reports_controller'
+
+Spree::Admin::ReportsController.class_eval do
+  # until https://github.com/spree/spree/issues/1863 is taken care of
+  # this is a workaround hack to get the report definitions to load
+
+  I18n.load_path << Spree::AdvancedReporting::Engine.config.paths["config/locales"].first
+  I18n.locale = Spree::Config[:default_locale]
+  I18n.reload!
+
+  # TODO there has got to be a more ruby way to do this...
+  ADVANCED_REPORTS ||= {}
+  [ :outstanding, :revenue, :units, :profit, :count, :top_products, :top_customers, :geo_revenue, :geo_units, :geo_profit, :transactions].each do |x|
+    # TODO we should pull the name + description for the report models themselves rather than redefining them as I18n definitions
+    ADVANCED_REPORTS[x]= {name: I18n.t("adv_report.#{x}"), :description => I18n.t("adv_report.#{x}")}
+  end
+
+  Spree::Admin::ReportsController::AVAILABLE_REPORTS.merge!(ADVANCED_REPORTS)
+
+  before_filter :basic_report_setup, :actions => ADVANCED_REPORTS.keys
+   
+  def basic_report_setup
+    @reports = ADVANCED_REPORTS
+    @products = Spree::Product.all
+    @taxons = Spree::Taxon.all
+    if defined?(MultiDomainExtension)
+      @stores = Store.all
+    end
+  end
+
+  def geo_report_render(filename)
+    params[:advanced_reporting] ||= {}
+    params[:advanced_reporting]["report_type"] = params[:advanced_reporting]["report_type"].to_sym if params[:advanced_reporting]["report_type"]
+    params[:advanced_reporting]["report_type"] ||= :state
+    respond_to do |format|
+      format.html { render :template => "spree/admin/reports/geo_base" }
+      format.pdf { send_data @report.ruportdata[params[:advanced_reporting]['report_type']].to_pdf }
+      format.csv { send_data @report.ruportdata[params[:advanced_reporting]['report_type']].to_csv }
+    end
+  end
+
+  def base_report_top_render(filename)
+    respond_to do |format|
+      format.html { render :template => "spree/admin/reports/top_base" }
+      format.pdf { send_data @report.ruportdata.to_pdf }
+      format.csv { send_data view_context.strip_tags(@report.ruportdata.to_csv) }
+    end
+  end
+
+  def base_report_render(filename)
+    params[:advanced_reporting] ||= {}
+    params[:advanced_reporting]["report_type"] = params[:advanced_reporting]["report_type"].to_sym if params[:advanced_reporting]["report_type"]
+    params[:advanced_reporting]["report_type"] ||= I18n.t("adv_report.daily").downcase.to_sym
+    respond_to do |format|
+      format.html { render :template => "spree/admin/reports/increment_base" }
+      format.pdf do
+        if params[:advanced_reporting]["report_type"] == :all
+          send_data @report.all_data.to_pdf
+        else
+          send_data @report.ruportdata[params[:advanced_reporting]["report_type"]].to_pdf
+        end
+      end
+      format.csv do
+        if params[:advanced_reporting]["report_type"] == :all
+          send_data @report.all_data.to_csv
+        else
+          send_data @report.ruportdata[params[:advanced_reporting]['report_type']].to_csv
+        end
+      end
+    end
+  end
+  
+  def outstanding
+    @orders = Spree::Order.complete.where("state != 'canceled'").select{ |o| o.outstanding_balance? }
+    @outstanding_balance = @orders.inject(0){ |outstanding, o| outstanding += o.outstanding_balance }
+  end
+
+  def revenue
+    @report = Spree::AdvancedReport::IncrementReport::Revenue.new(params)
+    base_report_render("revenue")
+  end
+
+  def units
+    @report = Spree::AdvancedReport::IncrementReport::Units.new(params)
+    base_report_render("units")
+  end
+
+  def profit
+    @report = Spree::AdvancedReport::IncrementReport::Profit.new(params)
+    base_report_render("profit")
+  end
+
+  def count
+    @report = Spree::AdvancedReport::IncrementReport::Count.new(params)
+    base_report_render("profit")
+  end
+
+  def top_products
+    @report = Spree::AdvancedReport::TopReport::TopProducts.new(params, 4)
+    base_report_top_render("top_products")
+  end
+
+  def top_customers
+    @report = Spree::AdvancedReport::TopReport::TopCustomers.new(params, 4)
+    base_report_top_render("top_customers")
+  end
+
+  def geo_revenue
+    @report = Spree::AdvancedReport::GeoReport::GeoRevenue.new(params)
+    geo_report_render("geo_revenue")
+  end
+
+  def geo_units
+    @report = Spree::AdvancedReport::GeoReport::GeoUnits.new(params)
+    geo_report_render("geo_units")
+  end
+
+  def geo_profit
+    @report = Spree::AdvancedReport::GeoReport::GeoProfit.new(params)
+    geo_report_render("geo_profit")
+  end
+
+  def transactions
+    @report = Spree::AdvancedReport::TransactionReport.new(params)
+    base_report_top_render("transactions")
+  end
+end

data/app/helpers/advanced_report_helper.rb

@@ -0,0 +1,13 @@
+module AdvancedReportHelper
+  def order_states_options
+    order_states.inject([]){ |acc, value| acc << [t("order_state.#{value}"), value]; acc}
+  end
+  
+  def order_states
+    if Spree::Order.respond_to? :progress_states
+      Spree::Order.progress_states.unshift "complete"
+    else
+      Spree::Order.state_machines[:state].states.map(&:name)
+    end
+  end
+end

data/app/models/ruport/formatter/html_decorator.rb

@@ -0,0 +1,29 @@
+Ruport::Formatter::HTML.class_eval do
+  # Renders individual rows for the table.
+  def build_row(data = self.data)
+    @odd = !@odd
+    klass = @odd ? "odd" : "even"
+    output <<
+    "\t\t<tr class=\"#{klass}\">\n\t\t\t<td>" +
+      data.to_a.join("</td>\n\t\t\t<td>") +
+      "</td>\n\t\t</tr>\n"
+  end
+
+  def html_table
+    @odd = false
+    "<table class=\"tablesorter\">\n" << yield << "</table>\n"
+  end
+
+  def build_table_header
+    output << "\t<table class=\"tablesorter\">\n"
+    unless data.column_names.empty? || !options.show_table_headers
+      output << "\t\t<thead><tr>\n\t\t\t<th>" + 
+        data.column_names.join("</th>\n\t\t\t<th>") + 
+        "</th>\n\t\t</tr></thead>\n"
+    end
+  end
+
+  def build_group_header
+    output << "\t<h1>#{data.name}</h1>\n"
+  end
+end

data/app/models/ruport/formatter/wicked_pdf_decorator.rb

@@ -0,0 +1,12 @@
+Ruport::Formatter::WickedPDF.class_eval do
+  def finalize_table
+    # TODO would be great to eliminate this hack
+    
+    # I think the reason the helper doesn't work is because of the pdf_from_string call vs the standard render :pdf
+    # <%= wicked_pdf_stylesheet_link_tag "pdf" %>
+
+    output.replace(WickedPdf.new.pdf_from_string("<style>" + Rails.application.assets.find_asset("pdf").body + "</style>" + output,
+      :print_media_type => false
+    ))
+  end
+end

data/app/views/spree/admin/advanced_report_overview/index.html.erb

@@ -0,0 +1,117 @@
+<table width="100%">
+    <tr>
+        <td colspan="3">
+            <% @report.increments.each do |type| -%>
+                <div id="<%= type.to_s %>_data" <%= type.to_s == 'daily' ? '' : 'style=display:none;' %> class="advanced_reporting_data">
+                    <h3><%=t "adv_report."+ type.to_s %>  <%=t "adv_report."+@report.name.downcase %></h3>
+                    <div id="<%= type.to_s %>_chart_revenue"></div>
+                </div>
+            <% end -%>
+        </td>
+    </tr>
+    <tr>
+        <td width="33%">
+            <h3><%=t("adv_report.top_products_by_revenue")%></h3>
+            <div id="top_products_chart"></div>
+            <h3>Top Taxons by Quantity</h3>
+            <div id="top_taxons_chart"></div>
+        </td>
+        <td width="33%">
+            <h3><%=t("adv_report.top_customers_by_revenue")%></h3>
+            <div id="top_customers">
+                <%= raw @top_customers_report.ruportdata.to_html %>
+            </div>
+        </td>
+        <td width="33%">
+            <h3><%=t("adv_report.last_10_orders")%></h3>
+            <div id="recent_orders">
+                <table class="tablesorter">
+                    <thead><tr>
+                            <th><%=t(:order_number)%></th>
+                            <th><%=t(:order)%></th>
+                            <th><%=t("adv_report.items_count")%></th>
+                            <th><%=t(:total)%></th>
+                    </tr></thead>
+                    <% @last_orders.each do |order| %>
+                        <tr class="odd">
+                            <td><%=link_to order[3], admin_order_path(:id => order[3]) %></td>
+                            <td><%= order[0] %></td>
+                            <td><%= order[1] %></td>
+                            <td><%= number_to_currency order[2] %></td>
+                        </tr>
+                    <% end -%>
+                </table>
+            </div>
+        </td>
+    </tr>
+</table>
+
+<% content_for :sidebar do %>
+    <div class="report_details">
+        <h1><%= t("adv_report.dashboard")%></h1>
+    </div>
+    
+    <ul id="show_data">
+        <% @report.increments.each do |inc| %>
+            <li <%= inc == :daily ? 'class=selected' : '' %> id="<%= inc %>">
+                <label><%= t("adv_report.#{inc}") %></label><br />
+                <a href="<%= @report.download_url('/admin/reports/revenue', 'csv', inc) %>">CSV</a>
+                <a href="<%= @report.download_url('/admin/reports/revenue', 'pdf', inc) %>">PDF</a>
+            </li>
+        <% end -%>
+    </ul>
+    <%= render :partial => 'spree/admin/reports/advanced_report_criteria', :locals => {} %>
+<% end %>
+
+<% content_for :head do -%>
+    <script src="http://www.google.com/jsapi"></script>
+    <script >
+        google.load('visualization', '1', {'packages': ['corechart']});	
+    </script>
+    <script >
+        google.setOnLoadCallback(drawChart);
+
+        function drawChart() {
+            <% @report.increments.each do |type| -%>
+                var data_<%= type.to_s %> = new google.visualization.DataTable();
+                data_<%= type.to_s %>.addColumn('string', 'Display');
+                data_<%= type.to_s %>.addColumn('number', '<%= @report.name %>');
+                data_<%= type.to_s %>.addRows(<%= @report.ruportdata[type].size %>);
+                <% @report.ruportdata[type].each_with_index do |p, i| %>
+                    data_<%= type.to_s %>.setValue(<%= i.to_s %>, 0, "<%= p.data[type.to_s.capitalize] %>");
+                    data_<%= type.to_s %>.setValue(<%= i.to_s %>, 1, <%= p.data[@report.column].to_s.gsub(/^\$/, '') %>);
+                <% end -%>
+                var chart_<%= type.to_s %> = new google.visualization.ColumnChart(document.getElementById('<%= type.to_s %>_chart_revenue'));
+                chart_<%= type.to_s %>.draw(data_<%= type.to_s %>, {
+                    width: 800,
+                    height: 400,
+                    legend : 'none',
+                    title: '' });
+            <% end -%> 
+
+            var product_data = new google.visualization.DataTable();
+            product_data.addColumn('string', 'Product');
+            product_data.addColumn('number', 'Revenue');
+            product_data.addRows(<%= @top_products_report.ruportdata.size %>);
+            <% @top_products_report.ruportdata.each_with_index do |p, i| %>
+                product_data.setValue(<%= i.to_s %>, 0, "<%= p.data["Product Name"].gsub('"', '\"') %>");
+                product_data.setValue(<%= i.to_s %>, 1, <%= p.data["Revenue"].to_s.gsub(/^\$/, '') %>);
+            <% end -%>
+
+            var chart = new google.visualization.PieChart(document.getElementById('top_products_chart'));
+            chart.draw(product_data, {width: "100%", height: 300, title: ''});
+
+            var taxon_data = new google.visualization.DataTable();
+            taxon_data.addColumn('string', 'Taxon');
+            taxon_data.addColumn('number', 'Orders');
+            taxon_data.addRows(<%= @best_taxons.size %>);
+            <% @best_taxons.each_with_index do |p, i| %>
+                taxon_data.setValue(<%= i.to_s %>, 0, "<%= p[0] %>");
+                taxon_data.setValue(<%= i.to_s %>, 1, <%= p[1] %>);
+            <% end -%>
+
+            var taxon_chart = new google.visualization.PieChart(document.getElementById('top_taxons_chart'));
+            taxon_chart.draw(taxon_data, {width: "100%", height: 300, title: ''});
+        }
+    </script>
+<% end -%>