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

Last change on this file since 358 was 344, checked in by roby, 4 years ago

Segue modifiche per la compatibilità php7.x

File size: 14.7 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 if($genere=='4' || $votog) $tab="ele_voti_lista";
255 else $tab="ele_voti_gruppo";
256 if($circo and !$circondt1) $circondt1="and t1.id_circ=$id_circ";
257
258
259 $sql="select id_sez from ".$prefix."_$tab where id_cons='$id_cons' group by id_sez ";
260 $res = $dbi->prepare("$sql");
261 $res->execute();
262
263
264 $numero=$res->rowCount();
265 $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";
266 $res = $dbi->prepare("$sql");
267 $res->execute();
268
269 if ($res) $sezioni=$res->rowCount();else $sezioni=0;
270 if ($numero>0){
271 if ($genere!=0){
272 $sql="select sum(voti) from ".$prefix."_$tab where id_cons='$id_cons' ";
273 $restotv = $dbi->prepare("$sql");
274 $restotv->execute();
275
276 list($tot) = $restotv->fetch(PDO::FETCH_NUM);
277 $i=0;
278 // lista o gruppo
279 if ($genere!=4){
280 if ($votog){
281 $sql="select t1.id_gruppo, t1.num_gruppo, t1.descrizione, sum(t2.voti) as somma
282 from ".$prefix."_ele_gruppo as t1,
283 ".$prefix."_ele_voti_lista as t2,
284 ".$prefix."_ele_lista as t3
285 where t1.id_cons='$id_cons'
286 and t2.id_lista=t3.id_lista
287 and t1.id_gruppo=t3.id_gruppo
288 group by t1.id_gruppo, t1.num_gruppo, t1.descrizione
289 order by somma desc";
290 }else{
291 $sql="select t1.id_gruppo, t1.num_gruppo, t1.descrizione, sum(t2.voti) as somma
292 from ".$prefix."_ele_gruppo as t1
293 left join ".$prefix."_ele_voti_gruppo as t2 on (t1.id_gruppo=t2.id_gruppo)
294 where t1.id_cons='$id_cons' and t1.id_cons=t2.id_cons $circondt1
295 group by t1.id_gruppo, t1.num_gruppo, t1.descrizione
296 order by somma desc";
297 }
298 }else{
299 $sql="select t1.id_lista, t1.num_lista, t1.descrizione, sum(t2.voti) as somma
300 from ".$prefix."_ele_lista as t1
301 left join ".$prefix."_$tab as t2 on (t1.id_lista=t2.id_lista)
302 where t1.id_cons='$id_cons' and t1.id_cons=t2.id_cons
303 group by t1.id_lista, t1.num_lista, t1.descrizione
304 order by somma desc";
305 }
306 $res = $dbi->prepare("$sql");
307 $res->execute();
308 $gruppinum=$res->rowCount();
309 $altrivoti=0;
310###### gestione percentuali
311 $arperc=array();
312 $arval=array();
313 $arvaltot=0;
314 while (list($id,$num,$descrizione,$voti) = $res->fetch(PDO::FETCH_NUM)){
315 $arval[$id]=$voti;
316 $arvaltot+=$voti;
317 }
318 $arperc=arrayperc($arval,$arvaltot);
319 $res = $dbi->prepare("$sql");
320 $res->execute();
321 while (list($id,$num,$descrizione,$voti) = $res->fetch(PDO::FETCH_NUM)){
322 // funz per il taglio corretto della frase 13 feb 2007
323 $descrizione=substr($descrizione,0,20);
324 $gruppo[$i]=ucwords(strtolower($descrizione));
325 if ($tot!='' and $tot!='0')
326 $pro[$i]=number_format($voti*100/$tot,3);
327 $pro[$i]=number_format($arperc[$id],2); // arrotondamento
328 $i++;
329 }
330
331
332
333
334 $titolo=""._PERCE." "._VOTIE."";
335 return array($gruppo,$pro);
336 }
337
338 }
339}
340
341function caricablocchi(){
342#### carica i blocchi presenti in modules/Elezioni/blocchi
343#### nome del file da carica xx_nome.php
344#### dove xx sta per un numero per visualizzare in ordine
345### 01_votanto.php Ú un nome valido
346### off_votanto.php per disabilitare la visualizzazione
347
348
349
350$list = array();
351$bl=opendir('modules/Elezioni/blocchi');
352 while ($file = readdir($bl)) {
353 if (!is_dir("modules/Elezioni/blocchi/$file") and (!preg_match('/^\./',$file)) and !stristr($file,"off_")) {
354 array_push($list, $file);
355 }
356 }
357 closedir($bl);
358
359 if(count($list)>0)
360 sort($list);
361 for ($item_num=0; $item_num < count($list); $item_num++) {
362 $tmp=preg_replace('/^[0-9][0-9]_/i',"",$list[$item_num]);
363 $title=str_replace("_"," ",str_replace(".php","",$tmp));
364 // backward theme compatibility
365
366 include ("modules/Elezioni/blocchi/$list[$item_num]");
367
368 //echo "<br />";
369 }
370}
371
372function block($pos){
373
374global $prefix,$dbi;
375
376 if($pos=="dx") $p=0; elseif($pos=="sx")$p=1;else $p='';
377
378 $sql="SELECT nome_file FROM ".$prefix."_ele_widget where pos_or='$p' and attivo='1' order by pos_ver asc";
379 $resp = $dbi->prepare("$sql");
380 $resp->execute();
381 if($resp->rowCount()){
382 while (list($nome) = $resp->fetch(PDO::FETCH_NUM)) {
383# $nome=$row['nome_file'];
384 include ("modules/Elezioni/blocchi/$nome");
385 }
386 }
387}
388
389function check_block($pos){
390# verifica se ci sono blocchi nel db
391global $prefix,$dbi;
392if($pos=="dx") $p=0; elseif($pos=="sx")$p=1;else $p='';
393
394 $sql="SELECT * FROM ".$prefix."_ele_widget where pos_or='$p' and attivo='1' order by pos_ver asc";
395 $res = $dbi->prepare("$sql");
396 $res->execute();
397 if ($res) $numero=$res->rowCount();else $numero=0;
398
399 return $numero;
400
401}
402
403
404function arrayperc($temp,$sevaltot)
405{
406
407 $temp2tot=0;$temp2=array();$temp3=array();
408
409 foreach($temp as $key=>$voti) {
410 if($sevaltot>0){
411 $temp4=(ceil($voti*10000/$sevaltot)-($voti*10000/$sevaltot));
412 if ($temp4) $temp2[$key]=$temp4;
413 $valperc=number_format($voti*100/$sevaltot,2);
414 $temp3[$key]=$valperc;
415 $temp2tot+=$valperc;
416 }
417 }
418 if($temp2tot>100 && ($temp2tot-100)>0.01)
419 //if($temp2tot>100)
420 while ($temp2tot>100){
421 foreach ($temp2 as $key => $val) {
422 if ($val == max($temp2)) {$temp3[$key]-=0.01;$temp2tot-=0.01;$temp2[$key]=0; break;}
423 }
424 }
425 if("$temp2tot"=="100" or $temp2tot==0) return($temp3);
426 while ($temp2tot<100.00){
427 foreach ($temp2 as $key => $val) {
428 if ($val == min($temp2)) {$temp3[$key]+=0.01;$temp2tot+=0.01;$temp2[$key]=1;break;}
429 }
430
431 }
432 return($temp3);
433
434
435}
436
437# ritorna l'estensione del file
438function file_extension($filename)
439{
440 $path_info = pathinfo($filename);
441 return $path_info['extension'];
442}
443
444
445# verifica stemma e lo salva come file per pdf e grafici
446function verificasimbolo()
447{
448 global $prefix,$dbi,$id_comune,$ins_logo;
449 if($ins_logo=="0"){
450 $logo="vuoto.jpg"; //var nel config.php
451 }else{
452
453 $sql="SELECT simbolo,stemma FROM ".$prefix."_ele_comuni where id_comune='$id_comune' ";
454 $res = $dbi->prepare("$sql");
455 $res->execute();
456 list($simbolo,$stemma) = $res->fetch(PDO::FETCH_NUM);
457 if($simbolo!=''){
458 if (!file_exists("modules/Elezioni/images/$simbolo")) {
459
460 if(!is_writeable("modules/Elezioni/images"))
461 die("la dir modules/Elezioni/images non ha i permessi di scrittura. Correggere per continuare");
462
463 $filename=$simbolo;
464 $file=fopen("modules/Elezioni/images/$filename",'w');
465 if (fwrite($file,$stemma));
466 $close = fclose($file);
467 }
468 $logo=$simbolo;
469 }else{
470 $logo="logo.gif";
471 }
472
473 }return $logo;
474}
475
476# funzione per verifica se esiste il voto disgunto tra sindaco e lista nelle amministrative siciliane
477function isdisgiunto(){
478global $prefix,$dbi,$id_cons,$limite,$fascia,$ops;
479 #voti di lista e di gruppo completamente disgiunti
480 $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' ";
481 $result = $dbi->prepare("$sql");
482 $result->execute();
483 $glsep='';
484 if ($result) {
485 list($infdis,$supdis)=$result->fetch(PDO::FETCH_NUM);
486 if((($fascia>$limite and $supdis) or ($fascia<$limite and $infdis)) and $ops==3)
487 $glsep='_lista';
488 }
489return $glsep;
490}
491
492
493# funzione per il titolo della pagina
494function pagetitle($op,$info){
495$pagetitle='';
496
497 if($op=="consiglieri")$pagetitle="Proiezione del Consiglio Comunale"; //mettere l'elenco
498 if($op=="gruppo_circo")$pagetitle="Risultati per Circoscrizioni";
499 if($op=="gruppo_sezione")$pagetitle="Risultati per Sezione";
500 if($op=="lista_circo")$pagetitle="Risultati Lista per Circoscrizione";
501 if($op=="lista_sezione")$pagetitle="Risultati Lista per Sezione";
502 if($op=="candidato_circo")$pagetitle="Risultati Candidati per Circoscrizione";
503 if($op=="candidato_sezione")$pagetitle="Risultati Candidati per Sezione";
504
505
506
507 if($op=="affluenze_graf")$pagetitle="Grafici Affluenze";
508 if($op=="graf_votanti")$pagetitle="Grafici Votanti";
509 if($op=="graf_candidato")$pagetitle="Grafici Candidati";
510 if($op=="graf_gruppo")$pagetitle="Grafico Principale";
511 if($op=="graf_lista")$pagetitle="Grafico Lista";
512
513 if($op=="gruppo")$pagetitle="Quadro elezioni riassuntivo";
514 if($op=="liste")$pagetitle="Voti Liste";
515 if($op=="partiti")$pagetitle="Voti Partito";
516 if($op=="contatti")$pagetitle="Contatti";
517
518
519 if($info=="come")$pagetitle="Come si vota";
520 if($info=="numeri")$pagetitle="Numeri Utili";
521 if($info=="servizi")$pagetitle="Servizi elettorali";
522 if($info=="link")$pagetitle="Link Utili";
523 if($info=="dati")$pagetitle="Dati Generali";
524
525 return $pagetitle;
526}
527
528
529
530
531?>
Note: See TracBrowser for help on using the repository browser.