<?php
/***********************************************

Commento
Questo frammento è l'operazione di voto che porta all'elezione di qualcuno
$soglia = $sogliagruppo; // 1 è  il numero di voti minimo per essere eletti max = 6

$scambio = 1; // se questo valore è vero il voto di scambio è inibito
$sogliaspoglio = 11; // significa che 12 sono le persone che possono essere elette
                                  in ogni assemblea dal gruppo alla regione
$sogliaspoglio = (($nuprov * 4) -1) ; // Qui si determina che i senatori sono 4 per ogni provincia
$sogliaspoglio = $nuprov -1 ; // questo determina che esiste un deputato per ogni provincia
$sogliaspoglio = 19; // 20 è il numero di persone che possono essere elette nel consiglio dei ministri
$urna = "voto_gruppo"; // è la tabella di chi ha votato e per chi ha votato al livello corrente
$urnapiu = "voto_zona";  // è la tabella di chi ha votato e per chi ha votato al livello superiore
$assemblea = "assemblea_zona";   //è la tabella degli eletti al livello corrente
$assembleapiu = "assemblea_quartiere"; //è la tabella degli eletti al livello superiore
$livelloplus = 10; // è il livello superiore 10 = ministro
$livellominus = 9; // è il livello corrente  9 = deputato
$luogo = $provincia; //è il valore del luogo corrente
$luogopiu = $regione; // è il valore del luogo superiore

$porta = $arassporta["Provincia"]; // è la porta del luogo corrente
$portapiu = $arassporta["Regione"]; // è la porta del luogo superiore
$id = $_POST['userid'] ; // è l'identificativo di quello che ha espresso il voto
$voto = $_POST['voto'] ; // è l'identificativo di quello che ha ricevuto il voto

Fine del commento
**********************************************/

// questi due caratteri servono per indicare un commento

// $ questo carattere davanti ad un nome rende il nome una variabile

$nuvotanti =  0 ; // Numero dei votanti
$giaeletto =  0; // se ilvoto si aggiunge ad un cittadino eletto in precedenza la variabile diventa vera
$papa = 0 ; //se avremo un eletto questa variabilediventa vera
$espulso = 0; // se si determina un elezione in seguito ad un espulsione questa variabile assume l'id di chi sarà espulso
$oldvoto = 0; // l'id di chi aveva ricevuto il voto in precedenza
$fortunato = 0; // se chi doveva essere espulso non lo sarà perchè ha una carica superiore questa variabile ne assume l'id
$votiavuti = 0 ; // numero dei voti ricevuti da chi è stato votato
$regolare = 1;// se ci sarà un voto di scambio questa variabile diventa falsa e non si produrrà un elezione
$oassemblea->tavola = $assemblea; // l'assemblea del livello corrente (esempio regione)
$oassemblea->porta = $arassporta["Cittadino"];
$oassembleapiu = new Assemblea();  //l'assemblea del livello superiore (esempio Stato)
$oassembleapiu->tavola = $assembleapiu;   
$oassembleapiu->porta = $arassporta["Cittadino"];
$ourna->tavola = $urna;    // l'elenco di chi a votato chi a questo livello (esempio Provincia)
$ournapiu->tavola = $urnapiu;// l'elenco di chi a votato chi a livello superiore (esempio Regione)
 // prima verifica: il numero dei votanti
if($livelloplus < 10){ // a partire dai deputati in giu
  $ourna->porta = $arurnaporta["Luogo"];
  $ourna->chiave = $luogo;
  $arurna = $ourna->daiarraywhere($arurnaporta["Cittadino"],$arurnaporta["VotoDatoA"]);
}else{ // per l'elezione del ministro
  $arurna = $ourna->daiarray($arurnaporta["Cittadino"],$arurnaporta["VotoDatoA"]);
}
$numerodeivotanti = 0;
if($arurna != NULL){
  foreach($arurna as $votante => $votato){
    if($votato){$numerodeivotanti++;}
  }
}
//1 devo vedere se chi ha votato, cioè $id,  aveva già dato un voto; in questo caso
//2 devo togliere il voto a quello che lo aveva ricevuto in precedenza.
$ourna->porta = $arurnaporta["Cittadino"];
$ourna->chiave = $id;
$oldvoto = $ourna->dammi($arurnaporta["VotoDatoA"]);  
if($oldvoto){ // se è diverso da 0 significa che $id aveva già votato
  $ourna->chiave = $oldvoto;
  $oldvotiavuti = $ourna->dammi($arurnaporta["VotiConseguiti"]);        
  $oldvotiavuti--; // tolgo un voto
  if($oldvotiavuti < 0){$oldvotiavuti = 0;} // non si può andare a meno di zero
  $modifica = $ourna->modifica($arurnaporta["VotiConseguiti"],$oldvotiavuti);
  // qui dobbiamo inserire una verifica per impedire il voto di scambio
  if($scambio){// solo nel caso di elezione di deputato o ministro
    $oassemblea->chiave = $oldvoto;
    $oldeletto = $oassemblea->dammi($arassporta["Cittadino"]);
    if($oldeletto){// se chi aveva  avuto il voto era già stato eletto   
      if($oldvotiavuti < $soglia){// se chi aveva avuto il voto si trova al di sotto della soglia minima
        /**************************************************************************
        Cerco di sapere se il voto che stiamo dando lo diamo ad uno che non fa parte
        del gruppo che aveva permesso l'elezione di oldvoto se il voto va ad uno di questi
        siamo in presenza di una cricca e quindi potremmo avere un voto di scambio.
        Il voto di scambio è consentito a livello di senatori non a livello di deputati e ministri.
        Che cosa è il voto di scambio?
        Quando ci troviamo in presenza di tanti posti disponibili due senatori o due deputati
        A e B  potrebbero mettersi d'accordo e scambiarsi il voto, prima eleggono A
        poi tolgono tutti e dueil voto ad A e lo danno a B che sarebbe eletto
        e poi si danno un voto a testa.

        In questo caso avremmo due deputati o due ministri eletti con un solo voto.
        Per impedire questo abbiamo introdotto la variabile Regolare.
        Quando B toglie il voto ad A per darlo a B la variabile Cricca diventa vera
        e di conseguenza la variabile Regolare diventa falsa e B non viene eletto.
        Resta aperta la possibilità per due consiglieri di scambiarsi il voto
        per avere entrambi la carica di senatore con un solo voto.
        **********************************************************************/
        $cricca = $ourna->daidiverso($oldvoto);  
        if($cricca){
          $regolare = 0;
          $ourna->chiave = $id;
          $modifica = $ourna->modifica($arurnaporta["Flag"],1);
        }
      }// fine di se oldvotiavuti è minore di soglia minima
    } // fine di se chi aveva  avuto il voto era già stato eletto  
  }// fine di se siamo in un caso di elezione di deputato o ministro

  $ourna->chiave = $id;
  $modifica = $ourna->modifica($arurnaporta["VotoDatoA"],$voto);
  $oassemblea->chiave = $oldvoto;
  $votiavuti = $oassemblea->dammi($arassporta["VotiConseguiti"]);
  $votiavuti--;
  if($votiavuti < 0){$votiavuti = 0;} // non si può andare a meno di zero 
  $modifica = $oassemblea->modifica($arassporta["VotiConseguiti"],$votiavuti);  
  $modifica = $oassemblea->modifica($arassporta["Votanti"],$numerodeivotanti);       
}else{ // se oldvoto è 0 significa che $id non aveva mai votato
  if($voto){$numerodeivotanti++;} // aggiungo il voto che stiamo testè dando
  // Nel momento in cui esprimono il voto,
  // vengono inseriti nella lista degli aventi diritto al voto, e se non vi sono già vengono inseriti
  // nel momento in cui esprimono il voto per la prima volta.
  if($soglia == 1){
    $ourna->chiave = $id;
    $votante = $ourna->dammi($arurnaporta["Cittadino"]);
    if($votante){ // esiste nella lista degli aventi diritto
      $modifica = $ourna->modifica($arurnaporta["VotoDatoA"],$voto);
    }else{ // viene inserito per la prima volta
      $votanteid = $ourna->nuovo($arurnaporta["Cittadino"],$id);
      $ourna->porta = $arurnaporta["IDNumber"];
      $ourna->chiave = $votanteid;
      $modifica = $ourna->modifica($arurnaporta["VotoDatoA"],$voto);
      $modifica = $ourna->modifica($arurnaporta["Luogo"],$luogo);
    }
  }
} //fine della verifica se $id aveva o non aveva già votato
// se soglia >1 significa che siamo ad un livello superiore e quindi l'urna esiste
if($soglia >1){
  $ourna->porta = $arurnaporta["Cittadino"];
  $ourna->chiave = $id;
  $votante = $ourna->dammi($arurnaporta["Cittadino"]);
  if($votante){ // esiste nella lista degli aventi diritto
    $modifica = $ourna->modifica($arurnaporta["VotoDatoA"],$voto);
  }else{ // viene inserito per la prima volta
    $votanteid = $ourna->nuovo($arurnaporta["Cittadino"],$id);
    $ourna->porta = $arurnaporta["IDNumber"];
    $ourna->chiave = $votanteid;
    $modifica = $ourna->modifica($arurnaporta["VotoDatoA"],$voto);
    $modifica = $ourna->modifica($arurnaporta["Luogo"],$luogo);
  }// fine di se viene inserito per la prima volta
}
// dobbiamo stabilire la soglia di inizio dello spoglio dei voti in base alla assemblea
// $id è chi ha dato il voto, $voto è quello che lo ha ricevuto
if($voto){  // se è un voto valido e non un astensione
  $ocittadino->chiave = $voto;
  // prendo i dati di chi Ha ricevuto il voto da usare nel caso fosse eletto
  $tonew = $ocittadino->dammi($arciporta["Email"]);
  $tonamenew = $ocittadino->dammi($arciporta["Nome"]);
  $passwordnew = $ocittadino->dammi($arciporta["Password"]);
  $settore = $ocittadino->dammi($arciporta["Settore"]);       
  if($soglia == 1){
    $ourna->chiave = $id;
    $modifica = $ourna->modifica($arurnaporta["Settore"],$settore);
    // il votante assume il settore del votato
    // settore è un campo disponibile per idee future
  }  

  $ourna->chiave = $voto; //cerchiamo la scheda di quello che ha ricevuto il voto
  $votato = $ourna->dammi($arurnaporta["Cittadino"]);
  $votiavuti = $ourna->dammi($arurnaporta["VotiConseguiti"]);
  $votiavuti++; // diamo il voto a chi lo ha ricevuto

  // dobbiamo impedire che uno possa nominare delle persone a loro insaputa
  $procedi = 0;
  if($soglia == 1){
    if($voto == $id){
      $procedi=1; // si passa con un voto soltanto se il voto è dato a se stesso
    }else{
       if($votiavuti > 0){$procedi=1;} // oppure si possiede più di un voto
    }
  }else{
    if($regolare){$procedi = 1;}
  }
  $flag = $ourna->dammi($arurnaporta["Flag"]);
  if($flag){$soglia++;} // per impedire il voto di scambio
  if($votato){ // se la scheda esiste
     $modifica = $ourna->modifica($arurnaporta["VotiConseguiti"],$votiavuti) ;
  }else{ // se la scheda non esiste la creiamo
    $votatoid = $ourna->nuovo($arurnaporta["Cittadino"],$voto);
    $ourna->porta = $arurnaporta["IDNumber"];
    $ourna->chiave = $votatoid;
    $modifica = $ourna->modifica($arurnaporta["VotiConseguiti"],$votiavuti);
    $modifica = $ourna->modifica($arurnaporta["Luogo"],$luogo);
    $modifica = $ourna->modifica($arurnaporta["Settore"],$settore);
    $modifica = $ourna->modifica($arurnaporta["VotoDatoA"],$voto);
  }
  $ourna->porta = $arurnaporta["Cittadino"];
  // abbiamo assegnato il voto
  //ora dobbiamo vedere se chi ha ricevuto il voto è stato eletto in seguito a questo voto
  //sempre che non abbia già una carica in questo caso incrementa il suo bottino
  $oassemblea->chiave = $voto;
  $giaeletto = $oassemblea->dammi($arassporta["Cittadino"]);
  if($giaeletto){ // è stato già eletto
    // gli assegnamo il voto in più nella assemblea di cui fa già parte
    $modifica = $oassemblea->modifica($arassporta["VotiConseguiti"],$votiavuti);
    $modifica = $oassemblea->modifica($arassporta["Votanti"],$numerodeivotanti);
  }else{ // non è stato già eletto
    if($numerodeivotanti) { // se i votanti sono almeno uno
      if($votiavuti >= $soglia){ // habemus papam!!! questo voto ha prodotto un elezione
        // bisogna tenere conto che i posti sono limitati
        // 1 vediamo se c'è posto
        $oassemblea->porta = $porta;
        $oassemblea->chiave = $luogo;
        $oassemblea->order = $arassporta["VotiConseguiti"];
        if($livelloplus < 10){
          $arassembleapiu = $oassemblea->daiarraywhere_orderd

          ($arassporta["Cittadino"],$arassporta["VotiConseguiti"]) ;
        }else{
          $arassembleapiu = $oassemblea->daiarray_orderd

          ($arassporta["Cittadino"],$arassporta["VotiConseguiti"]) ;
        }
        $espulso = 0;
        if($arassembleapiu != NULL){
          $eletti = count($arassembleapiu);
          if($eletti > $sogliaspoglio){ // se gli eletti sono al completo
            foreach($arassembleapiu as $chiespello => $votiold){
              if($votiavuti > $votiold){
                $ciccia = 0;
                $oassembleapiu->chiave = $chiespello;
                $salvo = $oassembleapiu->dammi($arassporta["Cittadino"]);
                if($salvo){
                  $ciccia = 1;   // se è già stato eletto ad un livello superiore ciccia
                }else{
                  $espulso =  $chiespello;  // altrimenti viene preso e si esce da questa routine
                  break;
                }// fine di se viene espulso  
              }//fine di se votiavuti è maggiore di votiold
            }// fine di for each

            if(!$espulso){$procedi = 0;}// se nessuno ha un voto inferiore non c'è posto
          }// fine di se gli eletti sono al completo
        }// fine di se esistono degli eletti
        if($procedi){
          $papa = 1;
          // avremo un eletto sicuramente perchè nell'assemblea c'è ancora posto
          // e chi ha dato il voto è consapevole di quello che ha fatto
          // 1 aggiorniamo il database superiore delle operazioni di voto
          // colui che viene eletto viene registrato nel'elenco dei componenti
          // che fanno parte dell'assemblea a cui è stato eletto
          // e nella lista elettorale che gli da il diritto di voto per eleggere
          // ed essere eletto al livello superiore $urnapiu
          $ournapiu->porta = $arurnaporta["Cittadino"];
          $ournapiu->chiave = $voto; //quello che ha ricevuto il voto ed è stato eletto
          $esiste = $ournapiu->dammi($arurnaporta["Cittadino"]);
          if(!$esiste){ // se non esiste
            $urnapiuid = $ournapiu->nuovo($arurnaporta["Cittadino"],$voto);
            $ournapiu->porta = $arurnaporta["IDNumber"];
            $ournapiu->chiave = $urnapiuid;
            if($livelloplus < 9){ // a partire dal senatore in giù
              $modifica = $ournapiu->modifica($arurnaporta["Luogo"],$luogopiu);
            }
          }else{ // esiste
            $ournapiu->porta = $arurnaporta["Cittadino"];
            $ournapiu->chiave = $esiste;
            $modifica = $ournapiu->modifica($arurnaporta["VotiConseguiti"],0);
            // non può avere  votato o ricevuto voti se ci fosse rimasto un residuo lo azzeriamo
          }
          // abbiamo inserito l'eletto nella lista elettorale della sua assemblea
          // 2 creiamo il seggio nell'assemblea dove risiederà il nuovo eletto.
          $assembleaid = $oassemblea->nuovo($arassporta["Cittadino"],$voto);
          $oassemblea->porta = $arassporta["IDNumber"];
          $oassemblea->chiave = $assembleaid;
          $modifica = $oassemblea->modifica($arassporta["VotiConseguiti"],$votiavuti);
          $modifica = $oassemblea->modifica($arassporta["Votanti"],$numerodeivotanti);
          if($livellominus < 9){
            $modifica = $oassemblea->modifica($arassporta["Stato"],$stato);
          }else{
            $modifica = $oassemblea->modifica($arassporta["Stato"],$luogo)
          }
          // $livellominus  è il livello corrente 10 = ministro, 9 = deputato, 8 senatore, 7 consigliere
          // qui inseriamo il luogo di appartenenza dell'assemblea  
          if($livellominus < 8){

             $modifica = $oassemblea->modifica($arassporta["Regione"],$regione);

           }
          if($livellominus < 7){

            $modifica = $oassemblea->modifica($arassporta["Provincia"],$provincia);

          }
          if($livellominus < 6){

            $modifica = $oassemblea->modifica($arassporta["Contea"],$contea);

          }
          if($livellominus < 5){

            $modifica = $oassemblea->modifica($arassporta["Comune"],$comune);

          }
          if($livellominus < 4){

            $modifica = $oassemblea->modifica($arassporta["Quartiere"],$quartiere);

          }
          if($livellominus < 3){

            $modifica = $oassemblea->modifica($arassporta["Zona"],$zona);

          }
          if($livellominus < 2){

             $modifica = $oassemblea->modifica($arassporta["Gruppo"],$gruppo);

          }
          // dobbiamo inserire il settore un numero tra uno e quattro
          $arsettore = $oassemblea->daiarray($arassporta["IDNumber"],$arassporta["Settore"]);
          $a = count($arsettore);
          if($a == 1) {$settore = 1;}
          if($a == 2) {$settore = 2;}
          if($a == 3) {$settore = 3;}
          if($a == 4) {$settore = 4;}
          if($a > 4){$settore = $a % 4;} // questa operazione ci da il resto della divisione di $a per 4
          if($settore == 0){$settore = 4;}  
          $modifica = $oassemblea->modifica($arassporta["Settore"],$settore);  
          // il settore è un valore che potrà servire per idee future
          $ourna->porta = $arurnaporta["Cittadino"];
          $ourna->chiave = $voto;
          $modifica = $ourna->modifica($arassporta["Settore"],$settore);
          // abbiamo inserito l'eletto nell' elenco dei componenti dell'assemblea a cui è stato eletto
        } // fine di se rientrava nei primi 12 o se comunque c'era capienza
        if($espulso){
          // abbiamo uno da espellere per fare posto al nuovo
          // devo verificare se il vecchio da espellere dall'assemblea  è già stato eletto al livello superiore
          $oassembleapiu->porta = $arassporta["Cittadino"];
          $oassembleapiu->chiave = $espulso;
          $fortunato = $oassembleapiu->dammi($arassporta["VotiConseguiti"]);
          if($fortunato){
            $papa = 0;  // ciccia: l'espulso è intoccabile quindi ciccia per l'eletto; deve cercare di avere più voti.
          }else{
            $papa = 1; // avremo un nuovo eletto
            // iniziamo la procedura di espulsione
            $ocittadino->chiave = $espulso;
            $to = $ocittadino->dammi($arciporta["Email"]);
            $toname = $ocittadino->dammi($arciporta["Nome"]);
            $password =  $ocittadino->dammi($arciporta["Password"]);
            // abbiamo preso i suoi dati identificativi
            // se nel frattempo l'espulso avesse dato il voto a qualcuno
            // nell' assemblea da cui decade dobbiamo toglierlo.
            $ournapiu->porta = $arurnaporta["Cittadino"];
            $ournapiu->chiave = $espulso;
            $votatodaespulso = $ournapiu->dammi($arurnaporta["VotoDatoA"]);
            $oassembleapiu->porta = $arassporta["Cittadino"];
            if($votatodaespulso){
              $oassembleapiu->chiave = $votatodaespulso;
              $votiavutib = $oassembleapiu->dammi($arassporta["VotiConseguiti"]);
              $nuvotantib = $oassembleapiu->dammi($arassporta["Votanti"]);
              $votiavutib--;
              $nuvotantib --;
              $modifica = $oassembleapiu->modifica($arassporta["VotiConseguiti"],$votiavutib);
              $modifica = $oassembleapiu->modifica($arassporta["Votanti"],$nuvotantib);
            } // fine di se nel frattempo l'espulso avesse votato
            // sostituisco il vecchio con il nuovo
            $oassemblea->porta = $arassporta["Cittadino"];
            $oassemblea->chiave = $espulso;
            $modifica = $oassemblea->modifica($arassporta["VotiConseguiti"],$votiavuti);
            $modifica = $oassemblea->modifica($arassporta["Votanti"],$numerodeivotanti);
            // questo viene per ultimo e metto $voto al posto di $espulso
            $modifica = $oassemblea->modifica($arassporta["Cittadino"],$voto);
            // il numero dei votanti è relativo al numero di votanti al
            // momento di questo voto
            // creo o modifico la scheda elettorale del nuovo eletto
            $ournapiu->porta = $arurnaporta["Cittadino"];
            $ournapiu->chiave = $voto; //quello che ha ricevuto il voto ed è stato eletto
            $esiste = $ourna->dammi($arurnaporta["Cittadino"]);
            if(!$esiste){ // se non esiste
              $urnapiuid = $ournapiu->nuovo($arurnaporta["Cittadino"],$voto);
              $ournapiu->porta = $arurnaporta["IDNumber"];
              $ournapiu->chiave = $urnapiuid;
              if($livelloplus < 9){ // a partire dal senatore (livello 8) compreso in giù
                $modifica = $ournapiu->modifica($arurnaporta["Luogo"],$luogopiu);
              }
            }else{ // se esiste
              $ournapiu->porta = $arurnaporta["Cittadino"];
              $ournapiu->chiave = $esiste;
              $modifica = $ournapiu->modifica($arurnaporta["VotiConseguiti"],0);
              // la lista elettorale del livello superiore parte da 0  non ha ancora votato e non ha ricevuto voti
            }
            // riduciamo il livello di chi è stato espulso
            $modifica = $ocittadino->modifica($arciporta["Accesso"],$livellominus);         
            // gli inviamo una mail di notifica del fattaccio
            $Mess1 = $M1; // "Hai PERSO la carica di Filarco della Zona " . $nomezona;
            $Mess2 = $M2; //"Sei stato DESTITUITO dalla carica di Filarco di " . $nomezona;
            $Mess3 = $M3; //"Provaci ancora SAM !!!)";
            $v = $livellominus;
            include ("votomail.php");
            // aggiorniamo il verbale
            $data =  date("Y-m-d H:i:s",time());
            $verbaleid = $overbale->nuovo($arveporta["Cittadino"],$espulso);
            $overbale->chiave = $verbaleid;
            $modifica = $overbale->modifica($arveporta["Votanti"],$numerodeivotanti);
            $modifica = $overbale->modifica($arveporta["VotiConseguiti"],$votiold);
            $modifica = $overbale->modifica($arveporta["Carica"],0);
            $modifica = $overbale->modifica($arveporta["CaricaOld"],$livelloplus);                 
            $modifica = $overbale->modifica($arveporta["DataNomina"],$data);              
          } // fine di else ciccia
        }// fine di se espulso
        if($papa) { // habemus papam bis completiamo la procedura di elezione
          // 3 aggiorniamo il verbale per il nuovo eletto
          $data =  date("Y-m-d H:i:s",time());
          $verbaleid = $overbale->nuovo($arveporta["Cittadino"],$voto);
          $overbale->chiave = $verbaleid;
          $modifica = $overbale->modifica($arveporta["Votanti"],$nuvotanti);
          $modifica = $overbale->modifica($arveporta["VotiConseguiti"],$votiavuti);
          $modifica = $overbale->modifica($arveporta["Carica"],$livelloplus);
          $modifica = $overbale->modifica($arveporta["DataNomina"],$data);  
          // 4 aumentiamo il livello di chi è stato eletto
          $ocittadino->chiave = $voto;
          $modifica = $ocittadino->modifica($arciporta["Accesso"],$livelloplus);
          // 5 gli mandiamo una mail di avviso per l'avvenuta elezione
          $to = $tonew;
          $toname = $tonamenew;
          $password = $passwordnew;
          $Mess1 = $M11;// " Hai conseguito la carica di Filarco della Zona " . $nomezona;
          $Mess2 = $M21; //" Sei stato eletto Filarco di " . $nomezona ;
          $Mess3 = $M31;  //"Puntando a traguardi ancora più alti! (Presidente!!!)";
          $v = $livelloplus;
          include ("votomail.php");    
        } // fine di se habemus papabis!
      } // fine di se habemus papam!
    }// fine di se i votanti sono almeno 1
  }// fine di se non è stato già eletto
}else{ // fine di se il voto era valido
  $ourna->porta = $arurnaporta["Cittadino"];
  $ourna->chiave = $id;
  $modifica = $ourna->modifica($arurnaporta["VotoDatoA"],0);  
}// fine di se il voto era di astensione
?>