| 1 | <?php
|
|---|
| 2 | /************************************************************************/
|
|---|
| 3 | /* Eleonline - Raccolta e diffusione dei dati elettorali */
|
|---|
| 4 | /* by Roberto Gigli & Luciano Apolito */
|
|---|
| 5 | /* http://www.eleonline.it */
|
|---|
| 6 | /* info@eleonline.it luciano@aniene.net rgigli@libero.it */
|
|---|
| 7 | /************************************************************************/
|
|---|
| 8 | /* Modulo eletti */
|
|---|
| 9 | /* Amministrazione */
|
|---|
| 10 | /************************************************************************/
|
|---|
| 11 | if (!defined('MODULE_FILE')) {
|
|---|
| 12 | die ("You can't access this file directly...");
|
|---|
| 13 | }
|
|---|
| 14 | //$limite=5; //fascia di separazione del maggioritario
|
|---|
| 15 | $param=strtolower($_SERVER['REQUEST_METHOD']) == 'get' ? $_GET : $_POST;
|
|---|
| 16 | $id_cons_gen=intval($param['id_cons_gen']);
|
|---|
| 17 | $perms=ChiSei($id_cons_gen);
|
|---|
| 18 | if ($perms<32 or !$id_cons_gen) die("$id_cons_gen -Non hai i permessi per inserire dati, o non hai scelto la consultazione!");
|
|---|
| 19 | include("modules/Elezioni/ele.php");
|
|---|
| 20 | $res = mysql_query("SELECT t1.tipo_cons,t2.id_cons FROM ".$prefix."_ele_consultazione as t1, ".$prefix."_ele_cons_comune as t2 where t1.id_cons_gen=t2.id_cons_gen and t2.id_cons_gen='$id_cons_gen' and t2.id_comune='$id_comune'" , $dbi);
|
|---|
| 21 | if (isset($param['gruppo'])) $gruppo=intval($param['gruppo']); else $gruppo='';
|
|---|
| 22 | if (isset($param['numgruppo'])) $numgruppo=intval($param['numgruppo']); else $numgruppo='';
|
|---|
| 23 | if (isset($param['listecol'])) $listecol=intval($param['listecol']); else $listecol=0;
|
|---|
| 24 | ele();
|
|---|
| 25 | $collegate= array();
|
|---|
| 26 | for ($x=1;$x<=$listecol;$x++)
|
|---|
| 27 | if ($param[$x]=='on') array_push($collegate,$x);
|
|---|
| 28 | $collperd= array();
|
|---|
| 29 | for ($x=1;$x<=$listecolper;$x++)
|
|---|
| 30 | if ($param[$x]=='on') array_push($collperd,$x);
|
|---|
| 31 | if (mysql_num_rows($res)){
|
|---|
| 32 | list($tipo_cons,$id_cons) = mysql_fetch_row($res);
|
|---|
| 33 | $result = mysql_query("select fascia, capoluogo from ".$prefix."_ele_comuni where id_comune='$id_comune'", $dbi);
|
|---|
| 34 | list($fascia,$capoluogo) = mysql_fetch_row($result);
|
|---|
| 35 | if (!$gruppo){
|
|---|
| 36 | $res_val = mysql_query("SELECT sum(validi) from ".$prefix."_ele_sezioni where id_cons='$id_cons'",$dbi);
|
|---|
| 37 | list($validi) = mysql_fetch_row($res_val);
|
|---|
| 38 | $res_lis = mysql_query("SELECT t1.num_gruppo,sum(t2.voti) from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_voti_gruppo as t2 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo group by t1.num_gruppo order by t1.num_gruppo",$dbi);
|
|---|
| 39 | while (list($num_gruppo,$voti)= mysql_fetch_row($res_lis)){
|
|---|
| 40 | if ($voti>($validi/2)) {$gruppo=$num_gruppo;break;}
|
|---|
| 41 | }
|
|---|
| 42 | }
|
|---|
| 43 | if($fascia<6 and $capoluogo) $fascia=6;
|
|---|
| 44 | if ($fascia<$limite) consmin($fascia);
|
|---|
| 45 | elseif ($gruppo>0) conssup($fascia,$gruppo,$collegate,$collperd);
|
|---|
| 46 | elseif ($numgruppo>0){
|
|---|
| 47 | echo "<form name=\"gruppo\" action=\"admin.php\">"
|
|---|
| 48 | ."<input type=\"hidden\" name=\"op\" value=\"consiglieri\">";
|
|---|
| 49 | echo "<input type=\"hidden\" name=\"id_cons_gen\" value=\"$id_cons_gen\">";
|
|---|
| 50 | echo "<br>";
|
|---|
| 51 | echo "<table><tr><td bgcolor=\"$bgcolor1\"><b>"._GRUVIN."</b></td>";
|
|---|
| 52 | $res = mysql_query("SELECT id_gruppo,descrizione FROM ".$prefix."_ele_gruppo where id_cons='$id_cons' and num_gruppo=$numgruppo", $dbi);
|
|---|
| 53 | list($idgruppo, $descr_gruppo) = mysql_fetch_row($res);
|
|---|
| 54 | echo "<td bgcolor=\"$bgcolor1\"><b>$descr_gruppo</b></td></tr></table>";
|
|---|
| 55 | $res_lis = mysql_query("SELECT num_lista,descrizione from ".$prefix."_ele_lista where id_cons='$id_cons' and id_gruppo!=$idgruppo",$dbi);
|
|---|
| 56 | echo "Selezionare le liste collegate al secondo turno <table>";
|
|---|
| 57 | $x=0;
|
|---|
| 58 | while(list($num_lista,$descr) = mysql_fetch_row($res_lis)) {
|
|---|
| 59 | echo "<tr><td>$num_lista</td><td>$descr</td><td><input type=\"checkbox\" name=\"$num_lista\" ></td></tr>";
|
|---|
| 60 | if ($num_lista>$x) $x=$num_lista;
|
|---|
| 61 | }
|
|---|
| 62 | echo "<tr><td><input type=\"hidden\" name=\"listecol\" value=\"$x\"><input type=\"hidden\" name=\"gruppo\" value=\"$numgruppo\">";
|
|---|
| 63 | echo "<input type=\"submit\" name=\"invia\" value=\""._OK."\"></td></tr></table></form>";
|
|---|
| 64 | }else {
|
|---|
| 65 | echo "<form name=\"numgruppo\" action=\"admin.php\">"
|
|---|
| 66 | ."<input type=\"hidden\" name=\"op\" value=\"consiglieri\">";
|
|---|
| 67 | echo "<input type=\"hidden\" name=\"id_cons_gen\" value=\"$id_cons_gen\">";
|
|---|
| 68 | echo "<br>";
|
|---|
| 69 | echo "<table><tr><td bgcolor=\"$bgcolor1\"><b>"._GRUVIN."</b></td><td>";
|
|---|
| 70 | $res = mysql_query("SELECT t1.num_gruppo,t1.descrizione, sum(t2.voti) as pref FROM ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_voti_gruppo as t2 where t1.id_gruppo=t2.id_gruppo and t1.id_cons='$id_cons' group by t1.num_gruppo,t1.descrizione order by pref desc limit 0,2", $dbi);
|
|---|
| 71 | while(list($num_gruppo, $descr_gruppo,$pref) = mysql_fetch_row($res)) {
|
|---|
| 72 | # echo "<option value=\"$num_gruppo\">$descr_gruppo";
|
|---|
| 73 | echo "<input type=\"radio\" name=\"numgruppo\" value=\"$num_gruppo\">$descr_gruppo<br>";
|
|---|
| 74 | }
|
|---|
| 75 | echo "</td></tr>";
|
|---|
| 76 | echo "<tr><td><input type=\"submit\" name=\"invia\" value=\""._OK."\"></td></tr></table></form>";
|
|---|
| 77 |
|
|---|
| 78 | }
|
|---|
| 79 | }
|
|---|
| 80 |
|
|---|
| 81 |
|
|---|
| 82 | function consmin($fascia) {
|
|---|
| 83 | global $id_cons, $prefix,$dbi;
|
|---|
| 84 | $sorteggio=0;
|
|---|
| 85 | #funzione di calcolo per comuni fino a 15.000 abitanti
|
|---|
| 86 | #carica numero di liste e voti, i voti sono quelli del gruppo perche' non c'e' voto di lista
|
|---|
| 87 | $res_lis = mysql_query("SELECT t1.num_gruppo,sum(t2.voti) from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_voti_gruppo as t2 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo group by t1.num_gruppo order by t1.num_gruppo",$dbi);
|
|---|
| 88 | $num_liste = mysql_num_rows($res_lis);
|
|---|
| 89 | #carica le preferenze
|
|---|
| 90 | $pref = array();
|
|---|
| 91 | $test = 0;
|
|---|
| 92 | $lisvin=0;
|
|---|
| 93 | while (list($num_lista,$voti)= mysql_fetch_row($res_lis)){
|
|---|
| 94 | array_push($pref,$voti);
|
|---|
| 95 | if ($voti>$test) {$lisvin=$num_lista; $test=$voti;}
|
|---|
| 96 | }
|
|---|
| 97 | #setta a zero la lista vincente
|
|---|
| 98 | $pref[($lisvin-1)]=0;
|
|---|
| 99 | #carica il numero di consiglieri per la minoranza
|
|---|
| 100 | switch ($fascia) {
|
|---|
| 101 | case 1: $numcons=12; break;
|
|---|
| 102 | case 2: $numcons=16; break;
|
|---|
| 103 | case 3: $numcons=20; break;
|
|---|
| 104 | case 4: $numcons=20; break;
|
|---|
| 105 | case 5: $numcons=30; break;
|
|---|
| 106 | case 6: $numcons=40; break;
|
|---|
| 107 | case 7: $numcons=46; break;
|
|---|
| 108 | case 8: $numcons=50; break;
|
|---|
| 109 | case 9: $numcons=60; break;
|
|---|
| 110 | }
|
|---|
| 111 | $num_cons=number_format($numcons/3);
|
|---|
| 112 | #carica gli array dei quozienti
|
|---|
| 113 | for ($y=0;$y<$num_cons;$y++){
|
|---|
| 114 | for ($x=0;$x<10;$x++)
|
|---|
| 115 | $ele[$y][$x]= $pref[$y]/($x+1);
|
|---|
| 116 | }
|
|---|
| 117 | #inizializza l'array degli eletti
|
|---|
| 118 | for ($x=0;$x<$num_liste;$x++)
|
|---|
| 119 | $eletti[$x]=0;
|
|---|
| 120 |
|
|---|
| 121 | #for ($x=0;$x<$num_liste;$x++)
|
|---|
| 122 | #echo $ele[$x][0]." <br>";
|
|---|
| 123 | #estrae i quozienti piu' alti
|
|---|
| 124 | $sorteggio=0;
|
|---|
| 125 | for ($y=0;$y<$num_cons;$y++){
|
|---|
| 126 | $temp=0;
|
|---|
| 127 | $cand=0;
|
|---|
| 128 | for ($x=0;$x<$num_liste;$x++){
|
|---|
| 129 | if ($ele[$x][0]==$temp and $pref[$x]==$pref[$cand] and ($y+1)==$num_cons) {$sorteggio=1; $mex="Per attribuire l'ultimo seggio è necessario un sorteggio tra la lista n. ".($x+1)." e la lista n. ".($cand+1);}
|
|---|
| 130 | if ($ele[$x][0]>$temp or ($ele[$x][0]==$temp and $pref[$x]>$pref[$cand])) {
|
|---|
| 131 | $temp=$ele[$x][0];
|
|---|
| 132 | $cand=$x;
|
|---|
| 133 | $sorteggio=0;
|
|---|
| 134 | }
|
|---|
| 135 | }
|
|---|
| 136 | if (!$sorteggio){
|
|---|
| 137 | $eletti[$cand]++;
|
|---|
| 138 | array_shift($ele[$cand]);echo "<br>";
|
|---|
| 139 | }
|
|---|
| 140 | }
|
|---|
| 141 | for ($x=0;$x<$num_liste;$x++)
|
|---|
| 142 | echo "lista n. ".intval($x+1)." ".$eletti[$x]." eletti <br>";
|
|---|
| 143 | echo "sorteggio: $sorteggio <br>";
|
|---|
| 144 | echo "lista vincente ".$lisvin." ".number_format(($numcons*2)/3)." eletti";
|
|---|
| 145 | }
|
|---|
| 146 |
|
|---|
| 147 |
|
|---|
| 148 |
|
|---|
| 149 |
|
|---|
| 150 |
|
|---|
| 151 | function calcoloseggi($gruppi,$num_cons){
|
|---|
| 152 | global $ultimo,$mex,$sorteggio;
|
|---|
| 153 |
|
|---|
| 154 | include ("crea_pagina.php");
|
|---|
| 155 | #carica le preferenze
|
|---|
| 156 | $pref = array();
|
|---|
| 157 | $ultimo=0;
|
|---|
| 158 | $mex='';
|
|---|
| 159 | $sorteggio=0;
|
|---|
| 160 | unset($eletti);
|
|---|
| 161 | #inizializza l'array degli eletti
|
|---|
| 162 | #for ($x=1;$x<=$num_liste;$x++)
|
|---|
| 163 | foreach ($gruppi as $x=>$val){
|
|---|
| 164 | $eletti[$x]=0;
|
|---|
| 165 | }
|
|---|
| 166 | #carica gli array dei quozienti
|
|---|
| 167 | #for ($y=0;$y<$num_liste;$y++)
|
|---|
| 168 | foreach($gruppi as $y=>$tmp){
|
|---|
| 169 | for ($x=0;$x<$num_cons;$x++)
|
|---|
| 170 | $ele[$y][$x]= $tmp/($x+1);
|
|---|
| 171 | }
|
|---|
| 172 | #estrae i quozienti piu' alti
|
|---|
| 173 | for ($y=0;$y<$num_cons;$y++){
|
|---|
| 174 | $temp=0;
|
|---|
| 175 | $cand=0;
|
|---|
| 176 | # for ($x=0;$x<$num_liste;$x++){
|
|---|
| 177 |
|
|---|
| 178 | foreach($gruppi as $x=>$tmp){
|
|---|
| 179 | if ($ele[$x][0]==$temp and $pref[$x]==$pref[$cand] and ($y+1)==$num_cons) {$sorteggio=1; $mex="Per attribuire l'ultimo seggio è necessario un sorteggio tra la lista n. ".($x+1)." e la lista n. ".($cand+1);}
|
|---|
| 180 | if ($ele[$x][0]>$temp or ($ele[$x][0]==$temp and $pref[$x]>$pref[$cand])) {
|
|---|
| 181 | $temp=$ele[$x][0];
|
|---|
| 182 | $cand=$x;
|
|---|
| 183 | $sorteggio=0;
|
|---|
| 184 | }
|
|---|
| 185 | }
|
|---|
| 186 | if (!$sorteggio){
|
|---|
| 187 | $eletti[$cand]++;
|
|---|
| 188 | $ultimo=$cand;
|
|---|
| 189 | array_shift($ele[$cand]);
|
|---|
| 190 | }
|
|---|
| 191 | }
|
|---|
| 192 | return ($eletti);
|
|---|
| 193 | }
|
|---|
| 194 |
|
|---|
| 195 | function stampalista($arvin,$arper) {
|
|---|
| 196 | //echo "<table><tr><td>";
|
|---|
| 197 | $x=0;
|
|---|
| 198 | while (isset($arvin[$x][0])) {
|
|---|
| 199 | echo "--------------vince key:$key - val:$val<br>";
|
|---|
| 200 | $y=0;
|
|---|
| 201 | while (isset($arvin[$x][$y])){
|
|---|
| 202 | echo "-----chiave:$lista val:$y<br>";
|
|---|
| 203 | $y++;
|
|---|
| 204 | }
|
|---|
| 205 | $x++;
|
|---|
| 206 | }
|
|---|
| 207 | foreach ($arper as $key=>$val) {
|
|---|
| 208 | foreach($val as $x=>$y) echo "-----chiave:$x val:$y<br>";
|
|---|
| 209 | echo "perde key:$key - val:$val<br>";
|
|---|
| 210 | }
|
|---|
| 211 |
|
|---|
| 212 | }
|
|---|
| 213 |
|
|---|
| 214 | function conssup($fascia,$gruppo,$collegate,$collperd) {
|
|---|
| 215 | global $id_cons, $prefix,$dbi;
|
|---|
| 216 | global $groups,$lists,$eletti,$ultimo;
|
|---|
| 217 | $groups=array();
|
|---|
| 218 | $lists=array();
|
|---|
| 219 | $eletti=array();
|
|---|
| 220 |
|
|---|
| 221 | #$sorteggio=0;
|
|---|
| 222 | #funzione di calcolo per comuni oltre 15.000 abitanti
|
|---|
| 223 | #carica il numero di consiglieri da eleggere
|
|---|
| 224 | switch ($fascia) {
|
|---|
| 225 | case 1: $numcons=12; break;
|
|---|
| 226 | case 2: $numcons=16; break;
|
|---|
| 227 | case 3: $numcons=20; break;
|
|---|
| 228 | case 4: $numcons=20; break;
|
|---|
| 229 | case 5: $numcons=30; break;
|
|---|
| 230 | case 6: $numcons=40; break;
|
|---|
| 231 | case 7: $numcons=46; break;
|
|---|
| 232 | case 8: $numcons=50; break;
|
|---|
| 233 | case 9: $numcons=60; break;
|
|---|
| 234 | }
|
|---|
| 235 |
|
|---|
| 236 |
|
|---|
| 237 |
|
|---|
| 238 |
|
|---|
| 239 |
|
|---|
| 240 |
|
|---|
| 241 |
|
|---|
| 242 |
|
|---|
| 243 |
|
|---|
| 244 |
|
|---|
| 245 |
|
|---|
| 246 | /////////////////////test
|
|---|
| 247 | $varper="<table><tr><td>SEGGI ASSEGNATI ALLA MINORANZA</TD></TR></TABLE><table><tr> ";
|
|---|
| 248 | $varvin="<table><tr><td>SEGGI ASSEGNATI ALLA MAGGIORANZA</TD></TR></TABLE><table><tr> ";
|
|---|
| 249 | $res_val = mysql_query("SELECT sum(validi) from ".$prefix."_ele_sezioni where id_cons='$id_cons'",$dbi);
|
|---|
| 250 | list($validi) = mysql_fetch_row($res_val);
|
|---|
| 251 | $res_per = mysql_query("SELECT t1.descrizione,t1.num_gruppo,sum(t3.voti) as voti from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista group by t1.descrizione,t1.num_gruppo order by t1.num_gruppo",$dbi);
|
|---|
| 252 | $groups=array();
|
|---|
| 253 | $premio=0;
|
|---|
| 254 | #carica l'array deui gruppi e della cifra di gruppo
|
|---|
| 255 | while (list($descr,$num_gruppo,$voti)= mysql_fetch_row($res_per)){
|
|---|
| 256 | $desgruppi[$num_gruppo]=$descr;
|
|---|
| 257 | #controlla se un gruppo di liste, tra quelle perdenti, ha superato il 50%
|
|---|
| 258 | if ($num_gruppo!=$gruppo and $voti>= $validi/2) $premio=2;
|
|---|
| 259 | $groups[($num_gruppo)]=$voti;
|
|---|
| 260 | #elimina gruppi che non hanno superato lo sbarramento
|
|---|
| 261 | if ($voti< ($validi*3)/100) unset($groups[($num_gruppo)]);
|
|---|
| 262 | }
|
|---|
| 263 | #controlla se la percentuale del gruppo vincente e' tra il 40 e il 60%
|
|---|
| 264 | #e se nessun altro gruppo ha superato il 50% assegna il premio di maggioranza
|
|---|
| 265 | if ($groups[$gruppo]>number_format(($validi*4)/10) and $groups[$gruppo]<number_format(($validi*6)/10) and !$premio) $premio=1;
|
|---|
| 266 | else $premio=0;
|
|---|
| 267 |
|
|---|
| 268 | $candidati=array();
|
|---|
| 269 | if ($premio) {
|
|---|
| 270 | $sindaco[$gruppo]=$groups[$gruppo];
|
|---|
| 271 | unset($groups[$gruppo]);
|
|---|
| 272 | $gruppomag=calcoloseggi($sindaco,($numcons*6/10));
|
|---|
| 273 | #######calcola i seggi per lista
|
|---|
| 274 | $arvin[0][0]=$desgruppi[$gruppo];
|
|---|
| 275 | foreach ($gruppomag as $key=>$val){
|
|---|
| 276 | echo " gruppo n. : $key : val : $val<br>";
|
|---|
| 277 | echo "ultimo assegnato al gruppo: $ultimo<br>";
|
|---|
| 278 | $res_lis = mysql_query("SELECT t2.id_lista,t2.descrizione,t2.num_lista,sum(t3.voti) as voti from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista and t1.num_gruppo='$key' group by t2.id_lista,t2.descrizione,t2.num_lista order by t2.num_lista",$dbi);
|
|---|
| 279 | while (list($id_lista,$descr,$x,$y)=mysql_fetch_row($res_lis)){
|
|---|
| 280 | $pos=1;
|
|---|
| 281 | $arvin[$x][$pos++]=$descr." - Voti: $y (".number_format($y*100/$validi,2)."%)";
|
|---|
| 282 | $res_can = mysql_query("SELECT concat(t1.cognome,' ',t1.nome) as descr,sum(t2.voti) as voti from ".$prefix."_ele_candidati as t1, ".$prefix."_ele_voti_candidati as t2 where t1.id_lista='$id_lista' and t1.id_cand=t2.id_cand GROUP BY descr order by voti desc,num_cand",$dbi);
|
|---|
| 283 | while(list($cand,$pre)=mysql_fetch_row($res_can)) $arvin[$x][$pos++]=$descr." - $y ";
|
|---|
| 284 | $listemag[$x]=$y;
|
|---|
| 285 | $desliste[$x]=$descr;
|
|---|
| 286 | }
|
|---|
| 287 | #foreach ($groups as $key=>$val)echo " key: $key : val : $val<br>";
|
|---|
| 288 | $seggimag=array();
|
|---|
| 289 | $seggimag=calcoloseggi($listemag,$val);
|
|---|
| 290 | foreach ($seggimag as $key=>$val){
|
|---|
| 291 | $arvin[$key][0]=$val;
|
|---|
| 292 | echo "lista n. $key seggi spettanti:$val<br>";
|
|---|
| 293 | # $consiglio
|
|---|
| 294 | }
|
|---|
| 295 | }
|
|---|
| 296 | $numcons=($numcons*4/10);
|
|---|
| 297 | }
|
|---|
| 298 |
|
|---|
| 299 | #####calcolo per la minoranza o in caso non ci sia premio di maggioranza
|
|---|
| 300 | $gruppomin=calcoloseggi($groups,$numcons);
|
|---|
| 301 | foreach ($gruppomin as $key=>$val){
|
|---|
| 302 | if(!$premio and $key==$gruppo) $arvin[0][0]=$desgruppi[$gruppo];
|
|---|
| 303 | else $arper[0][0]=$desgruppi[$key];
|
|---|
| 304 | echo " gruppo n. : $key : val : $val<br>";
|
|---|
| 305 | echo "ultimo assegnato al gruppo: $ultimo<br>";
|
|---|
| 306 | $res_lis = mysql_query("SELECT t2.id_lista,t2.descrizione,t2.num_lista,sum(t3.voti) as voti from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista and t1.num_gruppo='$key' group by t2.id_lista,t2.descrizione,t2.num_lista order by t2.num_lista",$dbi);
|
|---|
| 307 | $x=0;
|
|---|
| 308 | while (list($id_lista,$descr,$x,$y)=mysql_fetch_row($res_lis)){
|
|---|
| 309 | unset($listemin);
|
|---|
| 310 | $pos=1;
|
|---|
| 311 | if(!$premio and $key==$gruppo) $arvin[$x][$pos++]=$descr." - Voti: $y (".number_format($y*100/$validi,2)."%)";
|
|---|
| 312 | else $arper[$x][$pos++]=$descr." - Voti: $y (".number_format($y*100/$validi,2)."%)";
|
|---|
| 313 | $res_can = mysql_query("SELECT concat(t1.cognome,' ',t1.nome) as descr,sum(t2.voti) as voti from ".$prefix."_ele_candidati as t1, ".$prefix."_ele_voti_candidati as t2 where t1.id_lista='$id_lista' and t1.id_cand=t2.id_cand GROUP BY descr order by voti desc,num_cand",$dbi);
|
|---|
| 314 | while(list($cand,$pre)=mysql_fetch_row($res_can))
|
|---|
| 315 | if(!$premio and $key==$gruppo) $arvin[$x][$pos++]=$descr." - $y ";
|
|---|
| 316 | else $arper[$x][$pos++]=$descr." - $y ";
|
|---|
| 317 | $listemin[$x]=$y;
|
|---|
| 318 | $desliste[$x]=$descr;
|
|---|
| 319 | }
|
|---|
| 320 | #foreach ($groups as $key=>$val)echo " key: $key : val : $val<br>";
|
|---|
| 321 | $seggimin=array();
|
|---|
| 322 | $seggimin=calcoloseggi($listemin,$val);
|
|---|
| 323 | foreach ($seggimin as $key=>$val){
|
|---|
| 324 | if(!$premio and $key==$gruppo) $arvin[$key][0]=$val;
|
|---|
| 325 | else $arper[$key][0]=$val;
|
|---|
| 326 | echo "lista n. $key seggi spettanti:$val<br>";
|
|---|
| 327 | # $consiglio
|
|---|
| 328 | }
|
|---|
| 329 | }
|
|---|
| 330 | crea_tabella($arvin);
|
|---|
| 331 | crea_tabella($arper);
|
|---|
| 332 |
|
|---|
| 333 | /*if(isset($listemin)) unset($listemin);
|
|---|
| 334 | echo "<br><br><br> gruppo n. : $key : val : $val<br>";
|
|---|
| 335 | echo "ultimo assegnato al gruppo: $ultimo<br>";
|
|---|
| 336 | $res_lis = mysql_query("SELECT t2.num_lista,sum(t3.voti) from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista and t1.num_gruppo='$key' group by t2.num_lista order by t2.num_lista",$dbi);
|
|---|
| 337 | $x=0;
|
|---|
| 338 | while (list($x,$y)=mysql_fetch_row($res_lis)) $listemin[$x]=$y;
|
|---|
| 339 | #foreach ($groups as $key=>$val)echo " key: $key : val : $val<br>";
|
|---|
| 340 | $seggimin=array();
|
|---|
| 341 | $seggimin=calcoloseggi($listemin,$val);
|
|---|
| 342 | foreach ($seggimin as $key=>$val){
|
|---|
| 343 | if ($key==$ultimo) $val--;
|
|---|
| 344 | echo "lista n. $key seggi spettanti:$val<br>";
|
|---|
| 345 | }
|
|---|
| 346 | }
|
|---|
| 347 | /*$seggi = array();
|
|---|
| 348 | $seggi=calcoloseggi($groups,$numcons);
|
|---|
| 349 | foreach ($seggi as $key=>$val){
|
|---|
| 350 | unset($groups);
|
|---|
| 351 | echo " gruppo n. : $key : val : $val<br>";
|
|---|
| 352 | echo "ultimo assegnato al gruppo: $ultimo<br>";
|
|---|
| 353 | $res_lis = mysql_query("SELECT t2.num_lista,sum(t3.voti) from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista and t1.num_gruppo='$key' group by t2.num_lista order by t2.num_lista",$dbi);
|
|---|
| 354 | $x=0;
|
|---|
| 355 | while (list($x,$y)=mysql_fetch_row($res_lis)) $groups[$x]=$y;
|
|---|
| 356 | #foreach ($groups as $key=>$val)echo " key: $key : val : $val<br>";
|
|---|
| 357 | $seggilista=array();
|
|---|
| 358 | $seggilista=calcoloseggi($groups,$val);
|
|---|
| 359 | foreach ($seggilista as $key=>$val){
|
|---|
| 360 | if ($key==$ultimo) $val--;
|
|---|
| 361 | echo "lista n. $key seggi spettanti:$val<br>";
|
|---|
| 362 | }
|
|---|
| 363 | }
|
|---|
| 364 | /*while (list($num_gruppo,$num_lista,$voti)= mysql_fetch_row($res_lis)){
|
|---|
| 365 | //array_push($groups[($num_gruppo)],($num_lista));
|
|---|
| 366 | $groups[($num_gruppo)][($num_lista)]=array();
|
|---|
| 367 | array_push($groups[($num_gruppo)][($num_lista)],$voti);
|
|---|
| 368 | }
|
|---|
| 369 | foreach ($groups as $key=>$val){
|
|---|
| 370 | echo "gruppo: $key -- voti: ".$val[0]."<br>";
|
|---|
| 371 | foreach($val[1] as $lis=>$vot)
|
|---|
| 372 | foreach ($vot as $des=>$che)
|
|---|
| 373 | echo " lista $des voti $che<br>";
|
|---|
| 374 | }*/
|
|---|
| 375 | //////////////////////////
|
|---|
| 376 |
|
|---|
| 377 |
|
|---|
| 378 |
|
|---|
| 379 |
|
|---|
| 380 |
|
|---|
| 381 | #controlla che la lista vincente abbia ottenuto almeno il 40% dei voti validi e meno del 60
|
|---|
| 382 | $res_vin = mysql_query("SELECT sum(t3.voti) from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista and t1.num_gruppo='$gruppo'",$dbi);
|
|---|
| 383 | list($voti)= mysql_fetch_row($res_vin);
|
|---|
| 384 | $res_val = mysql_query("SELECT sum(validi) from ".$prefix."_ele_sezioni where id_cons='$id_cons'",$dbi);
|
|---|
| 385 | list($validi) = mysql_fetch_row($res_val);
|
|---|
| 386 | #ma nessun altro gruppo di liste deve aver raggiunto il 50% dei voti validi
|
|---|
| 387 | $res_per = mysql_query("SELECT t1.num_gruppo,sum(t3.voti) from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista and t1.num_gruppo!='$gruppo' group by t1.num_gruppo order by t1.num_gruppo",$dbi);
|
|---|
| 388 | $premio=0;
|
|---|
| 389 | $gruppi=0;
|
|---|
| 390 | $quorum=array();
|
|---|
| 391 | if ($voti>number_format(($validi*4)/10) and $voti<number_format(($validi*6)/10)) $premio=1;
|
|---|
| 392 | while (list($gruppoper,$voti)= mysql_fetch_row($res_per))
|
|---|
| 393 | {
|
|---|
| 394 | if ($voti>= $validi/2) $premio=0;
|
|---|
| 395 | if ($voti>= ($validi*3)/100) {array_push($quorum,$gruppoper);}
|
|---|
| 396 | $gruppi++;
|
|---|
| 397 | }
|
|---|
| 398 | if (!$premio)array_push($quorum,$gruppo);
|
|---|
| 399 | #carica numero di liste e voti, se c'e' il premio si effettuano due calcoli separati uno per le liste vincenti e uno per le altre
|
|---|
| 400 | if ($premio){
|
|---|
| 401 | $res_lisper = mysql_query("SELECT t1.num_gruppo,t2.num_lista,sum(t3.voti) from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista and t1.num_gruppo != '$gruppo' group by t1.num_gruppo,t2.num_lista order by t2.num_lista",$dbi);
|
|---|
| 402 | $num_liste = mysql_num_rows($res_lisper);
|
|---|
| 403 | $num_cons=number_format(($numcons*4)/10);
|
|---|
| 404 | $res_lisvin = mysql_query("SELECT t2.num_lista,sum(t3.voti) from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista and t1.num_gruppo = '$gruppo' group by t2.num_lista order by t2.num_lista",$dbi);
|
|---|
| 405 | $num_listevin = mysql_num_rows($res_lisvin);
|
|---|
| 406 | $num_consvin=number_format(($numcons*6)/10);
|
|---|
| 407 | }else{
|
|---|
| 408 | $res_lisper = mysql_query("SELECT t1.num_gruppo,t2.num_lista,sum(t3.voti) from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista group by t1.num_gruppo,t2.num_lista order by t2.num_lista",$dbi);
|
|---|
| 409 | $num_liste = mysql_num_rows($res_lisper);
|
|---|
| 410 | $num_cons=$numcons;
|
|---|
| 411 | }
|
|---|
| 412 | #carica le preferenze
|
|---|
| 413 | $pref = array();
|
|---|
| 414 | $liste = array();
|
|---|
| 415 | $digruppo = array();
|
|---|
| 416 | $ultimo = array();
|
|---|
| 417 | $groups = array();
|
|---|
| 418 | #inizializza l'array degli eletti
|
|---|
| 419 | for ($x=0;$x<=$num_liste;$x++){
|
|---|
| 420 | $eletti[$x]=0;
|
|---|
| 421 | }
|
|---|
| 422 | $x=0;
|
|---|
| 423 | while (list($num_gruppo,$num_lista,$voti)= mysql_fetch_row($res_lisper)){
|
|---|
| 424 | if (!in_array($num_gruppo,$quorum)) {$voti=0;}
|
|---|
| 425 | array_push($pref,$voti);
|
|---|
| 426 | array_push($liste,$num_lista);
|
|---|
| 427 | $digruppo[$x]=$num_gruppo;
|
|---|
| 428 | if (!isset($groups[$num_gruppo])) $groups[$num_gruppo]=array();
|
|---|
| 429 | array_push($groups[$num_gruppo],$num_lista);
|
|---|
| 430 | $x++;
|
|---|
| 431 | }
|
|---|
| 432 | #carica gli array dei quozienti
|
|---|
| 433 | for ($y=0;$y<$num_liste;$y++){
|
|---|
| 434 | for ($x=0;$x<$num_cons;$x++)
|
|---|
| 435 | $ele[$y][$x]= $pref[$y]/($x+1);
|
|---|
| 436 | }
|
|---|
| 437 | #estrae i quozienti piu' alti
|
|---|
| 438 | $sorteggio=0;
|
|---|
| 439 | for ($y=0;$y<$num_cons;$y++){
|
|---|
| 440 | $temp=0;
|
|---|
| 441 | $cand=0;
|
|---|
| 442 | $mex='';
|
|---|
| 443 | for ($x=0;$x<$num_liste;$x++){
|
|---|
| 444 | if ($ele[$x][0]==$temp and $pref[$x]==$pref[$cand] and ($y+1)==$num_cons) {$sorteggio=1; $mex="Per attribuire l'ultimo seggio è necessario un sorteggio tra la lista n. ".($x+1)." e la lista n. ".($cand+1);}
|
|---|
| 445 | if ($ele[$x][0]>$temp or ($ele[$x][0]==$temp and $pref[$x]>$pref[$cand])) {
|
|---|
| 446 | $temp=$ele[$x][0];
|
|---|
| 447 | $cand=$x;
|
|---|
| 448 | $sorteggio=0;
|
|---|
| 449 | }
|
|---|
| 450 | }
|
|---|
| 451 | if (!$sorteggio){
|
|---|
| 452 | $eletti[$cand]++;
|
|---|
| 453 | $ultimo[$digruppo[($cand)]]=$cand;
|
|---|
| 454 | array_shift($ele[$cand]);
|
|---|
| 455 | }
|
|---|
| 456 | }
|
|---|
| 457 |
|
|---|
| 458 | foreach ($ultimo as $key=>$sind) { //echo "lista: $sind - gruppo: $key eletti: ".$eletti[($val-1)]."<br>";
|
|---|
| 459 | if($key!=$gruppo) $eletti[$sind]--;
|
|---|
| 460 | }
|
|---|
| 461 | #
|
|---|
| 462 | #foreach($groups as $key=>$val1) foreach ($val1 as $val) echo "gruppo: $key - lista: $val eletti: ".$eletti[($val-1)]."<br>";
|
|---|
| 463 | #for ($x=0;$x<$num_liste;$x++) //caricare in una variabile il testo da visualizzare, e' necessario controllare: if (!$premio) vanno separate le liste vincenti dalle altre
|
|---|
| 464 | # echo "lista n. ".$liste[$x]." ".$eletti[$x]." eletti<br>";
|
|---|
| 465 | #echo "sorteggio: $sorteggio <br>";
|
|---|
| 466 | $varper="<table><tr><td>SEGGI ASSEGNATI ALLA MINORANZA</TD></TR></TABLE><table><tr> ";
|
|---|
| 467 | $varvin="<table><tr><td>SEGGI ASSEGNATI ALLA MAGGIORANZA</TD></TR></TABLE><table><tr> ";
|
|---|
| 468 |
|
|---|
| 469 | #for ($y=0;$y<$gruppi;$y++)
|
|---|
| 470 | foreach($groups as $key=>$val1) {
|
|---|
| 471 | if (isset($ultimo[$key])) {
|
|---|
| 472 | $res_gru = mysql_query("SELECT descrizione from ".$prefix."_ele_gruppo where id_cons='$id_cons' and num_gruppo='".$key."'",$dbi);
|
|---|
| 473 | list($descr) = mysql_fetch_row($res_gru);
|
|---|
| 474 | if ($key==$gruppo){
|
|---|
| 475 | $varvin.= "<td valign=\"top\">\n<table><tr><td> Seggi spettanti al gruppo n. ".$key."</td></tr>";
|
|---|
| 476 | $varvin.="<tr><td bgcolor=\"".$_SESSION['bgcolor2']."\">SINDACO ELETTO: $descr</td></tr><tr></table>\n";
|
|---|
| 477 | $varvin.="<table><tr>";
|
|---|
| 478 | }else{
|
|---|
| 479 | $varper.= "<td valign=\"top\">\n<table><tr><td> Seggi spettanti al gruppo n. ".$key."</td></tr>";
|
|---|
| 480 | $varper.="<tr><td bgcolor=\"".$_SESSION['bgcolor2']."\">$descr</td></tr><tr></table>\n";
|
|---|
| 481 | $varper.="<table><tr>";
|
|---|
| 482 | }
|
|---|
| 483 | foreach($val1 as $val) {
|
|---|
| 484 | if ($eletti[($val-1)]){
|
|---|
| 485 | $res_lis = mysql_query("SELECT id_lista,descrizione from ".$prefix."_ele_lista where id_cons='$id_cons' and num_lista='".$val."'",$dbi);
|
|---|
| 486 | list($id_lista,$descr) = mysql_fetch_row($res_lis);
|
|---|
| 487 | $res_lis = mysql_query("SELECT concat(t1.cognome,' ',t1.nome) as descr,sum(t2.voti) as voti from ".$prefix."_ele_candidati as t1, ".$prefix."_ele_voti_candidati as t2 where t1.id_lista='$id_lista' and t1.id_cand=t2.id_cand GROUP BY descr order by voti desc,num_cand",$dbi);
|
|---|
| 488 | if ($key==$gruppo) $varvin.="<td valign=\"top\">\n<table><tr><td>Lista n. $val: $descr <b>seggi ".$eletti[($val-1)]."</b></td><td></td></tr>";
|
|---|
| 489 | else $varper.="<td valign=\"top\">\n<table><tr><td>Lista n. $val: $descr <b>seggi ".$eletti[($val-1)]."</b></td><td></td></tr>";
|
|---|
| 490 | $x=0;
|
|---|
| 491 | while (list($descr,$voti) = mysql_fetch_row($res_lis)) {
|
|---|
| 492 | $bgcolor1= (($x++)<$eletti[($val-1)]) ? $_SESSION['bgcolor2'] : $_SESSION['bgcolor1'] ;
|
|---|
| 493 | if ($key==$gruppo) $varvin.="<tr><td bgcolor=\"$bgcolor1\">$descr</td><td bgcolor=\"$bgcolor1\">$voti</td></tr>";
|
|---|
| 494 | else $varper.="<tr><td bgcolor=\"$bgcolor1\">$descr</td><td bgcolor=\"$bgcolor1\">$voti</td></tr>";
|
|---|
| 495 | }
|
|---|
| 496 | if ($key==$gruppo) $varvin.= "</table>\n</td>";
|
|---|
| 497 | else $varper.= "</table>\n</td>";
|
|---|
| 498 | }
|
|---|
| 499 | }
|
|---|
| 500 | if ($key==$gruppo) $varvin.="</tr></table>\n</td>";
|
|---|
| 501 | else $varper.="</tr></table>\n</td>";
|
|---|
| 502 | }
|
|---|
| 503 | }
|
|---|
| 504 | $varper.="</tr><tr><td>$mex</td></tr></table>\n";
|
|---|
| 505 |
|
|---|
| 506 | unset ($eletti);
|
|---|
| 507 | unset($ele);
|
|---|
| 508 | if($premio){
|
|---|
| 509 | $num_cons=$num_consvin;
|
|---|
| 510 | $num_liste=$num_listevin;
|
|---|
| 511 | #carica le preferenze
|
|---|
| 512 | $pref = array();
|
|---|
| 513 | $liste = array();
|
|---|
| 514 | while (list($num_lista,$voti)= mysql_fetch_row($res_lisvin)){
|
|---|
| 515 | array_push($pref,$voti);
|
|---|
| 516 | array_push($liste,$num_lista);
|
|---|
| 517 | }
|
|---|
| 518 | #carica gli array dei quozienti
|
|---|
| 519 | for ($y=0;$y<$num_liste;$y++){
|
|---|
| 520 | for ($x=0;$x<$num_cons;$x++)
|
|---|
| 521 | $ele[$y][$x]= $pref[$y]/($x+1);
|
|---|
| 522 | }
|
|---|
| 523 | #inizializza l'array degli eletti
|
|---|
| 524 | for ($x=0;$x<$num_liste;$x++)
|
|---|
| 525 | $eletti[$x]=0;
|
|---|
| 526 | #estrae i quozienti piu' alti
|
|---|
| 527 | $sorteggio=0;
|
|---|
| 528 | for ($y=0;$y<$num_cons;$y++){
|
|---|
| 529 | $temp=0;
|
|---|
| 530 | $cand=0;
|
|---|
| 531 | for ($x=0;$x<$num_liste;$x++){
|
|---|
| 532 | if ($ele[$x][0]==$temp and $pref[$x]==$pref[$cand] and ($y+1)==$num_cons) {$sorteggio=1; $mex="Per attribuire l'ultimo seggio è necessario un sorteggio tra la lista n. ".($x+1)." e la lista n. ".($cand+1);}
|
|---|
| 533 | if ($ele[$x][0]>$temp or ($ele[$x][0]==$temp and $pref[$x]>$pref[$cand])) {
|
|---|
| 534 | $temp=$ele[$x][0];
|
|---|
| 535 | $cand=$x;
|
|---|
| 536 | $sorteggio=0;
|
|---|
| 537 | }
|
|---|
| 538 | }
|
|---|
| 539 | if (!$sorteggio){
|
|---|
| 540 | $eletti[$cand]++;
|
|---|
| 541 | array_shift($ele[$cand]);
|
|---|
| 542 | }
|
|---|
| 543 | }
|
|---|
| 544 | #visualizza il gruppo, il candidato a sindaco eletto consigliere, le liste e i consiglieri
|
|---|
| 545 | #for ($x=0;$x<$num_liste;$x++)
|
|---|
| 546 | # echo "lista n. ".$liste[$x]." ".$eletti[$x]." eletti <br>";
|
|---|
| 547 | #echo "sorteggio: $sorteggio <br>";
|
|---|
| 548 | #foreach($eletti as $key=>$val) echo "lista: ".$liste[$key]." - eletti: $val <br>";
|
|---|
| 549 | ///////////////
|
|---|
| 550 | //foreach($groups as $key=>$val1) {echo "lista: $val - gruppo: $key eletti: ".$eletti[($val-1)]."<br>";
|
|---|
| 551 | $key=$gruppo;
|
|---|
| 552 | $res_gru = mysql_query("SELECT descrizione from ".$prefix."_ele_gruppo where id_cons='$id_cons' and num_gruppo='".$key."'",$dbi);
|
|---|
| 553 | list($descr) = mysql_fetch_row($res_gru);
|
|---|
| 554 | $varvin.= "<td valign=\"top\">\n<table><tr><td> Seggi spettanti al gruppo n. ".$key."</td></tr>";
|
|---|
| 555 | $varvin.="<tr><td bgcolor=\"".$_SESSION['bgcolor2']."\">SINDACO ELETTO: $descr</td></tr><tr></table>\n";
|
|---|
| 556 | $varvin.="<table><tr>";
|
|---|
| 557 | foreach($eletti as $lis=>$val) { //echo "lista: ".$liste[$lis]." - gruppo: $key eletti: ".$val."<br>";
|
|---|
| 558 | // if ($eletti[($val-1)]){
|
|---|
| 559 | $res_lis = mysql_query("SELECT id_lista,descrizione from ".$prefix."_ele_lista where id_cons='$id_cons' and num_lista='".$liste[$lis]."'",$dbi);
|
|---|
| 560 | list($id_lista,$descr) = mysql_fetch_row($res_lis);
|
|---|
| 561 | $res_lis = mysql_query("SELECT concat(t1.cognome,' ',t1.nome) as descr,sum(t2.voti) as voti from ".$prefix."_ele_candidati as t1, ".$prefix."_ele_voti_candidati as t2 where t1.id_lista='$id_lista' and t1.id_cand=t2.id_cand GROUP BY descr order by voti desc,num_cand",$dbi);
|
|---|
| 562 | $varvin.="<td valign=\"top\">\n<table><tr><td>Lista n. ".$liste[$lis].": $descr <b>seggi ".$val."</b></td><td></td></tr>";
|
|---|
| 563 | $x=0;
|
|---|
| 564 | while (list($descr,$voti) = mysql_fetch_row($res_lis)) {
|
|---|
| 565 | $bgcolor1= (($x++)<$val) ? $_SESSION['bgcolor2'] : $_SESSION['bgcolor1'] ;
|
|---|
| 566 | $varvin.="<tr><td bgcolor=\"$bgcolor1\">$descr</td><td bgcolor=\"$bgcolor1\">$voti</td></tr>";
|
|---|
| 567 | }
|
|---|
| 568 | $varvin.= "</table>\n</td>";
|
|---|
| 569 | // }
|
|---|
| 570 | }
|
|---|
| 571 | $varvin.="</tr></table>\n</td>";
|
|---|
| 572 |
|
|---|
| 573 |
|
|---|
| 574 | ///////////////
|
|---|
| 575 | }
|
|---|
| 576 | $varvin.="</tr><tr><td>$mex</td></tr></table>\n";
|
|---|
| 577 | echo $varvin;
|
|---|
| 578 | echo $varper;
|
|---|
| 579 |
|
|---|
| 580 | }
|
|---|
| 581 |
|
|---|
| 582 |
|
|---|
| 583 |
|
|---|
| 584 |
|
|---|
| 585 | ?>
|
|---|
