rev |
line source |
pascal@200
|
1 plugin="Calc"
|
pascal@203
|
2 description_fr="Feuille de calcul au format CSV"
|
pascal@200
|
3 description="CSV format spreadsheet"
|
pascal@200
|
4 help_fr="AideCalc"
|
pascal@200
|
5 help="HelpCalc"
|
pascal@200
|
6
|
pascal@200
|
7 case "$1" in
|
pascal@200
|
8 showhead) cat <<EOT
|
pascal@200
|
9 <!-- Based on http://jsfiddle.net/ondras/hYfN3/ by Ondřej Žára -->
|
pascal@200
|
10 <script type="text/javascript">
|
pascal@201
|
11 <!--
|
pascal@200
|
12 function csv(id,rows,cols) {
|
pascal@200
|
13 var data = "";
|
pascal@200
|
14 for (var i=1; i<=rows; i++) {
|
pascal@200
|
15 for (var j=1; j<=cols; j++) {
|
pascal@200
|
16 var letter = String.fromCharCode("A".charCodeAt(0)+j-1);
|
pascal@200
|
17 data += document.getElementById(id+letter+i).title+';';
|
pascal@200
|
18 }
|
pascal@200
|
19 data += "\\\\n";
|
pascal@200
|
20 }
|
pascal@200
|
21 alert(data);
|
pascal@200
|
22 }
|
pascal@200
|
23
|
pascal@200
|
24 var DATA={};
|
pascal@200
|
25 function buildCalc(id, rows, cols) {
|
pascal@200
|
26 DATA[id] = {};
|
pascal@203
|
27 var maths = [ "abs", "acos", "asin", "atan", "atan2", "ceil", "cos", "exp",
|
pascal@203
|
28 "floor", "log", "max", "min", "pow", "random", "round", "sin",
|
pascal@203
|
29 "tan", "sqrt", "PI", "E" ];
|
pascal@203
|
30 for (var i=0; v = maths[i]; i++)
|
pascal@203
|
31 eval("DATA[id]."+v+" = DATA[id]."+v.toUpperCase()+" = Math."+v);
|
pascal@203
|
32 DATA[id].rand = DATA[id].RAND = Math.random;
|
pascal@203
|
33 DATA[id].ln = DATA[id].LN = Math.log;
|
pascal@203
|
34 DATA[id].log10= DATA[id].LOG10= function(n){return Math.log(n)/Math.LN10;};
|
pascal@203
|
35 DATA[id].log2 = DATA[id].LOG2 = function(n){return Math.log(n)/Math.LN2;};
|
pascal@203
|
36 DATA[id].fact = DATA[id].FACT =
|
pascal@204
|
37 function(n){var x=1;while(n>1)x*=n--;return x;};
|
pascal@203
|
38 DATA[id].fib = DATA[id].FIB =
|
pascal@203
|
39 function(n){var c=0,p=1;while(n-->0){var x=c;c+=p;p=x};return c;};
|
pascal@200
|
40 for (var i=0; i<=rows; i++) {
|
pascal@200
|
41 var row = document.getElementById(id).insertRow(-1);
|
pascal@200
|
42 for (var j=0; j<=cols && j<=26; j++) {
|
pascal@200
|
43 var letter = String.fromCharCode("A".charCodeAt(0)+j-1);
|
pascal@200
|
44 var cell = row.insertCell(-1);
|
pascal@200
|
45 if (i&&j) {
|
pascal@200
|
46 cell.className = "cellcalc";
|
pascal@200
|
47 cell.innerHTML = "<input id='"+ id+letter+i +"' class='inputcalc'/>";
|
pascal@200
|
48 }
|
pascal@200
|
49 else {
|
pascal@200
|
50 cell.className = "bordercalc";
|
pascal@200
|
51 cell.title = "Show CSV";
|
pascal@200
|
52 cell.onclick = function(){csv(id,rows,cols);};
|
pascal@200
|
53 cell.innerHTML = (i||j) ? i||letter : "√";
|
pascal@200
|
54 }
|
pascal@200
|
55 }
|
pascal@200
|
56 }
|
pascal@200
|
57 }
|
pascal@200
|
58
|
pascal@200
|
59 function getWidth(s)
|
pascal@200
|
60 {
|
pascal@200
|
61 var e = document.getElementById("widthcalc");
|
pascal@236
|
62 e.innerHTML = s;
|
pascal@200
|
63 return (e.offsetWidth < 80 || s.charAt(0) == "=") ? 80 : e.offsetWidth;
|
pascal@200
|
64 }
|
pascal@200
|
65
|
pascal@200
|
66 function setCell(e, v)
|
pascal@200
|
67 {
|
pascal@200
|
68 e.style.width = getWidth(v)+"px";
|
pascal@200
|
69 e.style.textAlign =
|
pascal@200
|
70 (isNaN(parseFloat(v)) && v.charAt(0) != "=") ? "left" : "right";
|
pascal@200
|
71 e.title = v;
|
pascal@200
|
72 }
|
pascal@201
|
73 //-->
|
pascal@200
|
74 </script>
|
pascal@200
|
75 <span id="widthcalc" class="cellcalc" style="visibility:hidden;"></span>
|
pascal@200
|
76 EOT
|
pascal@200
|
77 exit 0 ;;
|
pascal@200
|
78 showtail) cat <<EOT
|
pascal@200
|
79 <script type="text/javascript">
|
pascal@201
|
80 <!--
|
pascal@200
|
81 var INPUTS=[].slice.call(document.getElementsByClassName("inputcalc"));
|
pascal@200
|
82 INPUTS.forEach(function(elm) {
|
pascal@200
|
83 elm.onfocus = function(e) {
|
pascal@200
|
84 e.target.value = e.target.title || "";
|
pascal@200
|
85 };
|
pascal@200
|
86 elm.onblur = function(e) {
|
pascal@200
|
87 setCell(e.target, e.target.value);
|
pascal@200
|
88 computeAll();
|
pascal@200
|
89 };
|
pascal@200
|
90 var calcid = elm.id.substring(0,4), cellid = elm.id.substring(4);
|
pascal@200
|
91 var getter = function() {
|
pascal@200
|
92 var value = elm.title || "";
|
pascal@200
|
93 if (value.charAt(0) == "=")
|
pascal@200
|
94 with (DATA[calcid]) return eval(value.substring(1));
|
pascal@236
|
95 else return (value == "" || isNaN(value)) ? value : parseFloat(value);
|
pascal@200
|
96 };
|
pascal@200
|
97 Object.defineProperty(DATA[calcid], cellid, {get:getter});
|
pascal@200
|
98 Object.defineProperty(DATA[calcid], cellid.toLowerCase(), {get:getter});
|
pascal@200
|
99 });
|
pascal@200
|
100 (window.computeAll = function() {
|
pascal@200
|
101 INPUTS.forEach(function(elm) {
|
pascal@200
|
102 var calcid = elm.id.substring(0,4), cellid = elm.id.substring(4);
|
pascal@200
|
103 try { elm.value = DATA[calcid][cellid]; } catch(e) {} });
|
pascal@200
|
104 })();
|
pascal@201
|
105 //-->
|
pascal@200
|
106 </script>
|
pascal@200
|
107 EOT
|
pascal@200
|
108 exit 0 ;;
|
pascal@200
|
109 esac
|
pascal@200
|
110
|
pascal@200
|
111 formatEnd()
|
pascal@200
|
112 {
|
pascal@200
|
113 CONTENT=$(awk -v prg=$plugins_dir/wkp_$plugin.sh '
|
pascal@200
|
114 function showcalc()
|
pascal@200
|
115 {
|
pascal@200
|
116 if (lines > 1 && rows > 1) {
|
pascal@200
|
117 id="C" (100+cnt++)
|
pascal@203
|
118 print "<noscript><a href=\"http://www.enable-javascript.com/\" target=\"_blank\">Enable javascript to see the spreadsheet " id "</a></noscript>"
|
pascal@200
|
119 print "<table id=\"" id "\" class=\"tablecalc\"></table>"
|
pascal@200
|
120 print "<script type=\"text/javascript\">"
|
pascal@201
|
121 print "<!--"
|
pascal@200
|
122 print "buildCalc(\"" id "\"," lines "," rows ");"
|
pascal@200
|
123 for (i = 1; i <= lines; i++) {
|
pascal@200
|
124 gsub("<","<",line[i])
|
pascal@200
|
125 for (j = 1; j < split(line[i],tmp,";"); j++) {
|
pascal@200
|
126 if (tmp[j] == "") continue
|
pascal@200
|
127 gsub("\"","\\\\\"",tmp[j])
|
pascal@200
|
128 s = "setCell(document.getElementById(\"" id
|
pascal@200
|
129 c = substr("ABCDEFGHIJKLMNOPQRSTUVWXYZ",j,1)
|
pascal@200
|
130 print s c i "\"), \"" tmp[j] "\")";
|
pascal@200
|
131 }
|
pascal@200
|
132 }
|
pascal@201
|
133 print "//-->"
|
pascal@200
|
134 print "</script>"
|
pascal@200
|
135 }
|
pascal@200
|
136 else for (i = 1; i <= lines; i++) print line[i]
|
pascal@200
|
137 rows = lines = gotcalc = 0
|
pascal@200
|
138 }
|
pascal@200
|
139 {
|
pascal@200
|
140 if (/;<br \/>$/) {
|
pascal@200
|
141 gotcalc = 1
|
pascal@200
|
142 if (!headdone) {
|
pascal@200
|
143 headdone = 1
|
pascal@200
|
144 showtail = 1
|
pascal@200
|
145 system("/bin/sh " prg " showhead")
|
pascal@200
|
146 }
|
pascal@200
|
147 line[++lines] = $0
|
pascal@200
|
148 gsub("<","<",$0)
|
pascal@200
|
149 i = split($0,tmp,";")-1
|
pascal@200
|
150 if (lines == 1) rows = i
|
pascal@200
|
151 if (i != rows) rows = -1
|
pascal@200
|
152 }
|
pascal@200
|
153 else {
|
pascal@200
|
154 if (gotcalc) showcalc()
|
pascal@200
|
155 print
|
pascal@200
|
156 }
|
pascal@200
|
157 }
|
pascal@200
|
158 END {
|
pascal@200
|
159 if (gotcalc) showcalc()
|
pascal@200
|
160 if (showtail) system("/bin/sh " prg " showtail")
|
pascal@200
|
161 }
|
pascal@200
|
162 ' <<EOT
|
pascal@200
|
163 $CONTENT
|
pascal@200
|
164 EOT
|
pascal@200
|
165 )
|
pascal@200
|
166 }
|
pascal@200
|
167
|
pascal@200
|
168 template()
|
pascal@200
|
169 {
|
pascal@200
|
170 html=$(sed 's|</head>|\t<style type="text/css"> @import "plugins/wkp_Calc.css"; </style>\n&|' <<EOT
|
pascal@200
|
171 $html
|
pascal@200
|
172 EOT
|
pascal@200
|
173 )
|
pascal@200
|
174 }
|