source: trunk/client/modules/Elezioni/funzioni.php@ 328

Last change on this file since 328 was 318, checked in by roby, 5 years ago
File size: 14.8 KB
Line 
1<?php
2
3/************************************************************************/
4/* Eleonline - Raccolta e diffusione dei dati elettorali */
5/* by Luciano Apolito & Roberto Gigli */
6/* http://www.eleonline.it */
7/* info@eleonline.it luciano@aniene.net rgigli@libero.it */
8/************************************************************************/
9
10
11/*******************************************************
12 #'Pagina precedente' e 'Pagina Successiva' #
13 immettere nel file da dividere la lettura
14 del numero complessivo dei dati:
15 Es: $max=sql_num_rows($res);
16
17 l'offset settato al numero dei dati da
18 visualizzare per pagina:
19 Es: $offset=5;
20
21 l'azzeramento della variabile $min
22 Es: if (!isset($min)) $min=0;
23
24 il nome del file (opzione) da ricaricare)
25 Es: $file="gruppopercsez"; // nome op per pagine
26
27
28*/
29
30
31
32function page($id_cons,$go,$max,$min,$prev,$next,$offset,$file){
33global $lettera,$ordine,$id_comune;
34
35
36 echo"<br /><div class=\"modulo\">";
37 $prev=$min-$offset;
38 if ($prev>=0) {
39 echo "<a href=\"modules.php?name=Elezioni&amp;op=$go&amp;min=$prev&amp;id_cons_gen=$id_cons&amp;id_comune=$id_comune&amp;file=$file&amp;lettera=$lettera&amp;ordine=$ordine\">";
40 echo "[ <b>$offset "._PREV_MATCH."</b> ]</a>";
41 }
42
43 $next=$min+$offset;
44 if ($next>=($offset-1)) {
45 if($next>=$max) $next = $max;
46 else {
47
48 echo "<a href=\"modules.php?name=Elezioni&amp;op=$go&amp;min=$next&amp;id_cons_gen=$id_cons&amp;id_comune=$id_comune&amp;file=$file&amp;lettera=$lettera&amp;ordine=$ordine\">";
49 echo " [<b>$offset "._NEXT_MATCH."</b> ] </a>";
50 }
51 }
52 echo "</div><br /><br/>";
53
54}
55
56
57
58
59
60// *********************************
61// Funzioni formattazione data
62// ***********************************
63
64
65function giorno()
66{
67$giorni= array('--','01','02','03','04','05','06','07','08','09','10','11','12','13','14','15','16','17','18','19','20','21','22','23','24','25','26','27','28','29','30','31');
68foreach($giorni as $gi)
69 $giorno .= "<option value=$gi>$gi</option>";
70$giorno .= "</select>";
71echo "$giorno";
72}
73
74
75function mese()
76{
77$mesi= array('--','01','02','03','04','05','06','07','08','09','10','11','12');
78foreach($mesi as $me)
79 $mese .= "<option value=$me>$me </option>";
80$mese .= "</select>";
81echo "$mese";
82}
83
84function anno()
85{
86$curr=date("Y",time());
87$anni=array('--',$curr--,$curr--,$curr--,$curr--,$curr--,$curr--,$curr--);
88foreach($anni as $an)
89 $anno .= "<option value=$an>$an</option>";
90$anno .= "</select>";
91echo "$anno";
92}
93
94function ore()
95{
96$ore= array('00','01','02','03','04','05','06','07','08','09','10','11','12','13','14','15','16','17','18','19','20','21','22','23','24');
97foreach($ore as $ori)
98 $ore .= "<option value=$ori>$ori</option>";
99$ore .= "</select>";
100echo "$ore";
101}
102
103
104function minuti()
105{
106$minuti= array('00','01','02','03','04','05','06','07','08','09','10','11','12','13','14',
107'15', '16', '17', '18','19','20','21','22','23','24','25','26','27','28','29','30','31','32','33',
108'34','35','36','37','38','39','40','41','42','43','44','45','46','47','48','49','50',
109'51','52','53','54','55','56','57','58','59');
110foreach($minuti as $minu)
111 $minuti .= "<option value=$minu>$minu </option>";
112$minuti .= "</select>";
113echo "$minuti";
114}
115
116function secondi()
117{
118$secondi= array('00','01','02','03','04','05','06','07','08','09','10','11','12','13','14',
119'15', '16', '17', '18','19','20','21','22','23','24','25','26','27','28','29','30','31','32','33',
120'34','35','36','37','38','39','40','41','42','43','44','45','46','47','48','49','50',
121'51','52','53','54','55','56','57','58','59');
122foreach($secondi as $sec)
123 $secondi .= "<option value=$sec>$sec</option>";
124$secondi .= "</select>";
125echo "$secondi";
126}
127
128
129
130function form_data($data)
131
132 {
133 list($anno,$mese,$giorno) = explode("-", $data) ;
134 if ($giorno>0)
135 return("$giorno-$mese-$anno");
136 else
137 return("&nbsp; ");
138 }
139
140
141function taglio($parole,$descrizione)
142{
143
144/* funzione per il taglio di una frase giusta senza
145troncare le parole by luc 13 febbraio 2007
146uso:
147taglio(numero di parole, frase)
148*/
149
150$lunghezza=strlen($descrizione);
151$altra='0';
152$testo='';
153$lettera='';
154
155
156for ($x=0;$x<$parole;$x++){
157 if($testo!='')$testo .=" ";
158
159 for ($j=$altra;$j<$lunghezza;$j++){
160 $lettera=$descrizione{$j};
161 if ($lettera!=" "){
162 $testo .=$lettera;
163 }else{
164 $altra=$j+1; $j=$lunghezza;
165 }
166
167 }
168}
169
170
171return "$testo";
172
173}
174#### legge freed rss 1.0
175
176function readrss($url) {
177
178
179 $rdf = parse_url($url);
180 $fp = fsockopen($rdf['host'], 80, $errno, $errstr, 15);
181 if (!$fp) {
182 $content = "";
183 echo $content;
184 return;
185 }
186
187 if ($fp) {
188 if (!empty($rdf['query']))
189 $rdf['query'] = "?" . $rdf['query'];
190
191 fputs($fp, "GET " . $rdf['path'] . $rdf['query'] . " HTTP/1.0\r\n");
192 fputs($fp, "HOST: " . $rdf['host'] . "\r\n\r\n");
193 $string = "";
194
195 while(!feof($fp)) {
196 $pagetext = fgets($fp,300);
197 $string .= chop($pagetext);
198 }
199
200
201
202
203 fputs($fp,"Connection: close\r\n\r\n");
204 fclose($fp);
205 $items = explode("</item>",$string);
206 $content ="<h5>Risultati </h5>";
207 $content .= "<span class=\"content\">";
208
209 for ($i=0;$i<20;$i++) {
210 $link = preg_replace("/.*<link>/","",$items[$i]);
211 $link = preg_replace("/</link>.*/","",$link);
212 $title2 = preg_replace("/.*<title>/","",$items[$i]);
213 $title2 = preg_replace("/</title>.*/","",$title2);
214 $title2 = stripslashes($title2);
215 $descr = preg_replace("/.*<description>/","",$items[$i]);
216 $descr = preg_replace("/</description>.*/","",$descr );
217 $descr = stripslashes($descr );
218
219 if (empty($items[$i]) AND $cont != 1) {
220 $content = "";
221
222 $cont = 0;
223
224 echo $content;
225 return;
226 } else {
227 if (strcmp($link,$title2) AND !empty($items[$i])) {
228 $cont = 1;
229 $content .= "<strong><big>&middot;</big></strong> <a href=\"$link\" target=\"new\">$title2</a> $descr<br />\n";
230 }
231 }
232
233 }
234
235
236 }
237
238 if (($cont == 0) OR (empty($content))) {
239 $content = "<span class=\"content\">Problema feed rss</span>";
240 }
241
242 echo $content;
243
244}
245### legge i risultati e li reinvia
246### richiamare con
247### list ($gruppo,$pro)=grupporss();
248
249function grupporss() {
250global $admin, $bgcolor1, $bgcolor5, $prefix, $dbi, $offset, $min,$descr_cons,$genere,$votog,$votol,$votoc,$circo, $id_cons,$id_cons_gen,$id_comune,$id_circ,$tipo_cons,$w,$l,$op,$siteistat,$flash,$circondt1 ;
251
252
253
254
255 //if($genere=='4' || $tipo_cons>='10') $tab="ele_voti_lista";
256 if($genere=='4' || $votog) $tab="ele_voti_lista";
257 else $tab="ele_voti_gruppo";
258 if($circo and !$circondt1) $circondt1="and t1.id_circ=$id_circ";
259
260
261 $sql="select id_sez from ".$prefix."_$tab where id_cons='$id_cons' group by id_sez ";
262 $res = $dbi->prepare("$sql");
263 $res->execute();
264
265
266 $numero=$res->rowCount();
267 $sql="select t2.* from ".$prefix."_ele_sezioni as t2, ".$prefix."_ele_sede as t1 where t2.id_cons='$id_cons' and t1.id_sede=t2.id_sede $circondt1";
268 $res = $dbi->prepare("$sql");
269 $res->execute();
270
271 if ($res) $sezioni=$res->rowCount();else $sezioni=0;
272 if ($numero>0){
273 if ($genere!=0){
274 $sql="select sum(voti) from ".$prefix."_$tab where id_cons='$id_cons' ";
275 $restotv = $dbi->prepare("$sql");
276 $restotv->execute();
277
278 list($tot) = $restotv->fetch(PDO::FETCH_NUM);
279 $i=0;
280 // lista o gruppo
281 if ($genere!=4){
282 if ($votog){
283 $sql="select t1.id_gruppo, t1.num_gruppo, t1.descrizione, sum(t2.voti) as somma
284 from ".$prefix."_ele_gruppo as t1,
285 ".$prefix."_ele_voti_lista as t2,
286 ".$prefix."_ele_lista as t3
287 where t1.id_cons='$id_cons'
288 and t2.id_lista=t3.id_lista
289 and t1.id_gruppo=t3.id_gruppo
290 group by t1.id_gruppo, t1.num_gruppo, t1.descrizione
291 order by somma desc";
292 }else{
293 $sql="select t1.id_gruppo, t1.num_gruppo, t1.descrizione, sum(t2.voti) as somma
294 from ".$prefix."_ele_gruppo as t1
295 left join ".$prefix."_ele_voti_gruppo as t2 on (t1.id_gruppo=t2.id_gruppo)
296 where t1.id_cons='$id_cons' and t1.id_cons=t2.id_cons $circondt1
297 group by t1.id_gruppo, t1.num_gruppo, t1.descrizione
298 order by somma desc";
299 }
300 }else{
301 $sql="select t1.id_lista, t1.num_lista, t1.descrizione, sum(t2.voti) as somma
302 from ".$prefix."_ele_lista as t1
303 left join ".$prefix."_$tab as t2 on (t1.id_lista=t2.id_lista)
304 where t1.id_cons='$id_cons' and t1.id_cons=t2.id_cons
305 group by t1.id_lista, t1.num_lista, t1.descrizione
306 order by somma desc";
307 }
308 $res = $dbi->prepare("$sql");
309 $res->execute();
310 $gruppinum=$res->rowCount();
311 $altrivoti=0;
312###### gestione percentuali
313 $arperc=array();
314 $arval=array();
315 $arvaltot=0;
316 while (list($id,$num,$descrizione,$voti) = $res->fetch(PDO::FETCH_NUM)){
317 $arval[$id]=$voti;
318 $arvaltot+=$voti;
319 }
320 $arperc=arrayperc($arval,$arvaltot);
321 $res = $dbi->prepare("$sql");
322 $res->execute();
323 while (list($id,$num,$descrizione,$voti) = $res->fetch(PDO::FETCH_NUM)){
324 // funz per il taglio corretto della frase 13 feb 2007
325 $descrizione=substr($descrizione,0,20);
326 $gruppo[$i]=ucwords(strtolower($descrizione));
327 if ($tot!='' and $tot!='0')
328 $pro[$i]=number_format($voti*100/$tot,3);
329 $pro[$i]=number_format($arperc[$id],2); // arrotondamento
330 $i++;
331 }
332
333
334
335
336 $titolo=""._PERCE." "._VOTIE."";
337 return array($gruppo,$pro);
338 }
339
340 }
341}
342
343function caricablocchi(){
344#### carica i blocchi presenti in modules/Elezioni/blocchi
345#### nome del file da carica xx_nome.php
346#### dove xx sta per un numero per visualizzare in ordine
347### 01_votanto.php Ú un nome valido
348### off_votanto.php per disabilitare la visualizzazione
349
350
351
352$list = array();
353$bl=opendir('modules/Elezioni/blocchi');
354 while ($file = readdir($bl)) {
355 if (!is_dir("modules/Elezioni/blocchi/$file") and (!preg_match('/^\./',$file)) and !stristr($file,"off_")) {
356 array_push($list, $file);
357 }
358 }
359 closedir($bl);
360
361 if(count($list)>0)
362 sort($list);
363 for ($item_num=0; $item_num < count($list); $item_num++) {
364 $tmp=preg_replace('/^[0-9][0-9]_/i',"",$list[$item_num]);
365 $title=str_replace("_"," ",str_replace(".php","",$tmp));
366 // backward theme compatibility
367
368 include ("modules/Elezioni/blocchi/$list[$item_num]");
369
370 //echo "<br />";
371 }
372}
373
374function block($pos){
375
376global $prefix,$dbi;
377
378 if($pos=="dx") $p=0; elseif($pos=="sx")$p=1;else $p='';
379
380 $sql="SELECT nome_file FROM ".$prefix."_ele_widget where pos_or='$p' and attivo='1' order by pos_ver asc";
381 $resp = $dbi->prepare("$sql");
382 $resp->execute();
383 if($resp->rowCount()){
384 while (list($nome) = $resp->fetch(PDO::FETCH_NUM)) {
385# $nome=$row['nome_file'];
386 include ("modules/Elezioni/blocchi/$nome");
387 }
388 }
389}
390
391function check_block($pos){
392# verifica se ci sono blocchi nel db
393global $prefix,$dbi;
394if($pos=="dx") $p=0; elseif($pos=="sx")$p=1;else $p='';
395
396 $sql="SELECT * FROM ".$prefix."_ele_widget where pos_or='$p' and attivo='1' order by pos_ver asc";
397 $res = $dbi->prepare("$sql");
398 $res->execute();
399 if ($res) $numero=$res->rowCount();else $numero=0;
400
401 return $numero;
402
403}
404
405
406function arrayperc($temp,$sevaltot)
407{
408
409 $temp2tot=0;$temp2=array();$temp3=array();
410 while (list($key,$voti)= each($temp)) {
411 if($sevaltot>0){
412 $temp4=(ceil($voti*10000/$sevaltot)-($voti*10000/$sevaltot));
413 if ($temp4) $temp2[$key]=$temp4;
414 $valperc=number_format($voti*100/$sevaltot,2);
415 $temp3[$key]=$valperc;
416 $temp2tot+=$valperc;
417 }
418 }
419 if($temp2tot>100 && ($temp2tot-100)>0.01)
420 //if($temp2tot>100)
421 while ($temp2tot>100){
422 foreach ($temp2 as $key => $val) {
423 if ($val == max($temp2)) {$temp3[$key]-=0.01;$temp2tot-=0.01;$temp2[$key]=0; break;}
424 }
425 }
426 if("$temp2tot"=="100" or $temp2tot==0) return($temp3);
427 while ($temp2tot<100.00){
428 foreach ($temp2 as $key => $val) {
429 if ($val == min($temp2)) {$temp3[$key]+=0.01;$temp2tot+=0.01;$temp2[$key]=1;break;}
430 }
431
432 }
433 return($temp3);
434
435
436}
437
438# ritorna l'estensione del file
439function file_extension($filename)
440{
441 $path_info = pathinfo($filename);
442 return $path_info['extension'];
443}
444
445
446# verifica stemma e lo salva come file per pdf e grafici
447function verificasimbolo()
448{
449 global $prefix,$dbi,$id_comune,$ins_logo;
450 if($ins_logo=="0"){
451 $logo="vuoto.jpg"; //var nel config.php
452 }else{
453
454 $sql="SELECT simbolo,stemma FROM ".$prefix."_ele_comuni where id_comune='$id_comune' ";
455 $res = $dbi->prepare("$sql");
456 $res->execute();
457 list($simbolo,$stemma) = $res->fetch(PDO::FETCH_NUM);
458 if($simbolo!=''){
459 if (!file_exists("modules/Elezioni/images/$simbolo")) {
460
461 if(!is_writeable("modules/Elezioni/images"))
462 die("la dir modules/Elezioni/images non ha i permessi di scrittura. Correggere per continuare");
463
464 $filename=$simbolo;
465 $file=fopen("modules/Elezioni/images/$filename",'w');
466 if (fwrite($file,$stemma));
467 $close = fclose($file);
468 }
469 $logo=$simbolo;
470 }else{
471 $logo="logo.gif";
472 }
473
474 }return $logo;
475}
476
477# funzione per verifica se esiste il voto disgunto tra sindaco e lista nelle amministrative siciliane
478function isdisgiunto(){
479global $prefix,$dbi,$id_cons,$limite,$fascia,$ops;
480 #voti di lista e di gruppo completamente disgiunti
481 $sql="select infdisgiunto, supdisgiunto from ".$prefix."_ele_conf as t2 left join ".$prefix."_ele_cons_comune as t1 on t1.id_conf=t2.id_conf where id_cons = '$id_cons' ";
482 $result = $dbi->prepare("$sql");
483 $result->execute();
484 $glsep='';
485 if ($result) {
486 list($infdis,$supdis)=$result->fetch(PDO::FETCH_NUM);
487 if((($fascia>$limite and $supdis) or ($fascia<$limite and $infdis)) and $ops==3)
488 $glsep='_lista';
489 }
490return $glsep;
491}
492
493
494# funzione per il titolo della pagina
495function pagetitle($op,$info){
496$pagetitle='';
497
498 if($op=="consiglieri")$pagetitle="Proiezione del Consiglio Comunale"; //mettere l'elenco
499 if($op=="gruppo_circo")$pagetitle="Risultati per Circoscrizioni";
500 if($op=="gruppo_sezione")$pagetitle="Risultati per Sezione";
501 if($op=="lista_circo")$pagetitle="Risultati Lista per Circoscrizione";
502 if($op=="lista_sezione")$pagetitle="Risultati Lista per Sezione";
503 if($op=="candidato_circo")$pagetitle="Risultati Candidati per Circoscrizione";
504 if($op=="candidato_sezione")$pagetitle="Risultati Candidati per Sezione";
505
506
507
508 if($op=="affluenze_graf")$pagetitle="Grafici Affluenze";
509 if($op=="graf_votanti")$pagetitle="Grafici Votanti";
510 if($op=="graf_candidato")$pagetitle="Grafici Candidati";
511 if($op=="graf_gruppo")$pagetitle="Grafico Principale";
512 if($op=="graf_lista")$pagetitle="Grafico Lista";
513
514 if($op=="gruppo")$pagetitle="Quadro elezioni riassuntivo";
515 if($op=="liste")$pagetitle="Voti Liste";
516 if($op=="partiti")$pagetitle="Voti Partito";
517 if($op=="contatti")$pagetitle="Contatti";
518
519
520 if($info=="come")$pagetitle="Come si vota";
521 if($info=="numeri")$pagetitle="Numeri Utili";
522 if($info=="servizi")$pagetitle="Servizi elettorali";
523 if($info=="link")$pagetitle="Link Utili";
524 if($info=="dati")$pagetitle="Dati Generali";
525
526 return $pagetitle;
527}
528
529
530
531
532?>
Note: See TracBrowser for help on using the repository browser.