// csv_to_bubblechart.js // RJM Programming // July, 2018 // Help out csv_to_bubblechart.html var rawcsv=''; var csvlines=[]; var seltemplate=''; var bcfields=[]; function getfld(ihow,cwhat) { var thisi=-1, ip=0; var thisv=''; while (thisi < ihow) { if (cwhat.substring(ip,eval(1 + eval('' + ip))) == '"') { thisv=cwhat.substring(eval(1 + eval('' + ip))).split('"')[0]; ip+=eval('' + ('"' + thisv + '",').length); } else if (cwhat.substring(ip,eval(1 + eval('' + ip))) == "'") { thisv=cwhat.substring(eval(1 + eval('' + ip))).split("'")[0]; ip+=eval('' + ('"' + thisv + '",').length); } else { thisv=cwhat.substring(ip).split(',')[0]; ip+=eval('' + (thisv + ',').length); } thisi++; } return thisv.replace(/\'/g,'`'); } function retchart() { var outd='//www.rjmprogramming.com.au/PHP/BubbleChart/bubble_chart.php'; if (document.getElementById('myform')) { outd=document.getElementById('myform').action; } if (outd.indexOf('/') == -1) { if (outd.toLowerCase().indexOf('map') != -1) { return '//www.rjmprogramming.com.au/PHP/Map/map.php'; } else if (outd.toLowerCase().indexOf('bubble') != -1) { return '//www.rjmprogramming.com.au/PHP/BubbleChart/bubble_chart.php'; } else if (outd.toLowerCase().indexOf('line') != -1) { return '//www.rjmprogramming.com.au/PHP/LineChart/line_chart.php'; } else if (outd.toLowerCase().indexOf('area') != -1) { return '//www.rjmprogramming.com.au/PHP/AreaChart/area_chart.php'; } else if (outd.toLowerCase().indexOf('column') != -1) { return '//www.rjmprogramming.com.au/PHP/ColumnChart/column_chart.php'; } else if (outd.toLowerCase().indexOf('bar') != -1) { return '//www.rjmprogramming.com.au/PHP/BarChart/bar_chart.php'; } else if (outd.toLowerCase().indexOf('pie') != -1) { return '//www.rjmprogramming.com.au/PHP/PieChart/pie_chart.php'; } else if (outd.toLowerCase().indexOf('histogram') != -1) { return '//www.rjmprogramming.com.au/PHP/HistogramChart/histogram_chart.php'; } else if (outd.toLowerCase().indexOf('geo') != -1) { return '//www.rjmprogramming.com.au/PHP/GeoChart/geo_chart.php'; } else if (outd.toLowerCase().indexOf('intensity') != -1) { return '//www.rjmprogramming.com.au/PHP/IntensityChart/intensity_chart.php'; } } return outd; } function extractcsv(how) { // &data=,%20[~ID1~,1,2,%27three%27,4] var xdata=''; var fs=how.split(','); for (var irows=1; irows') != -1) { rawcsv=aconto.body.innerHTML.replace(ciois.split('>')[0] + '>','').replace('',''); } else { rawcsv=ciois; } if (rawcsv.indexOf('
') != -1) { csvlines=rawcsv.split('
'); } else { csvlines=rawcsv.split(String.fromCharCode(10)); } if (seltemplate == '') { if (document.getElementById('th1')) { seltemplate = document.getElementById('th1').innerHTML; } } if (csvlines.length > 0) { if (csvlines[0].indexOf('",') != -1) { bcfields=csvlines[0].split('",'); } else if (csvlines[0].indexOf(',') != -1) { bcfields=csvlines[0].split(','); } } if (document.getElementById('trhead')) { for (itd=1; itd<=bcfields.length; itd++) { trstuff+="" + bcfields[eval(-1 + itd)] + " eg. " + getfld(eval(-1 + itd),csvlines[1]) + " " + seltemplate.replace('none','block').replace('1','' + itd) + ""; } document.getElementById('trhead').innerHTML=trstuff; } } else if (iois != null && csvlines.length < 2) { var aconto = (iois.contentWindow || iois.contentDocument); if (aconto != null) { if (aconto.document) { aconto = aconto.document; } if (aconto.body != null) { if (aconto.body.innerHTML.indexOf('') != -1) { rawcsv=aconto.body.innerHTML.replace(aconto.body.innerHTML.split('>')[0] + '>','').replace('',''); } else { rawcsv=aconto.body.innerHTML; } if (rawcsv.indexOf('
') != -1) { csvlines=rawcsv.split('
'); } else { csvlines=rawcsv.split(String.fromCharCode(10)); } if (seltemplate == '') { if (document.getElementById('th1')) { seltemplate = document.getElementById('th1').innerHTML; } } if (csvlines.length > 0) { if (csvlines[0].indexOf('",') != -1) { bcfields=csvlines[0].split('",'); } else if (csvlines[0].indexOf(',') != -1) { bcfields=csvlines[0].split(','); } } if (document.getElementById('trhead')) { for (itd=1; itd<=bcfields.length; itd++) { trstuff+="" + bcfields[eval(-1 + itd)] + " eg. " + getfld(eval(-1 + itd),csvlines[1]) + " " + seltemplate.replace('none','block').replace('1','' + itd) + ""; } document.getElementById('trhead').innerHTML=trstuff; } } } } }