@@ -185,6 +185,9 @@ function update_database () {

 function write_comparaison () {

     result="scrutins ($(sum <<< "${groupe[@]}" | cut -b1-5))${dossier:+ - ${dossier}}"

+    if test "$envoi_par_mail" = $true_flag; then

+        result="scrutins"

+    fi

     content="/dev/shm/$result/content.xml"

     id_cols=(Scrutin Date Séance Titre Adoption Dossier)

     eval $(sqlite_request 'select printf("typevotes[%i]=%s;", id, nom) from votes')

@@ -233,7 +236,9 @@ function write_comparaison () {

         echo $cell >> "$content"

     }

-    echo "génération du fichier $result"

+    if test -z "$envoi_par_mail"; then

+        echo "génération du fichier $result"

+    fi

     mkdir -p "/dev/shm/$result/META-INF"

@@ -408,13 +413,45 @@ EOcontent

     mv -f "/dev/shm/$result.zip" "${destination_path:+$destination_path/}$result.ods"

-    echo -e "\r\033[KTerminé : ${destination_path:+$destination_path/}$result.ods"

+    if test -z "$envoi_par_mail"; then

+        echo -e "\r\033[KTerminé : ${destination_path:+$destination_path/}$result.ods"

+    fi

 }

 function save_database () {

     test -n "$result" -a -d "/dev/shm/$result" && rm -fr "/dev/shm/$result"

     test -n "$database" -a -n "$in_ram_database" || return

-    if test -r "$database" && sqldiff=$(sqldiff $in_ram_database $database) && test -z "$sqldiff"; then

+    if test "$envoi_par_mail" = $true_flag; then

+        if test -n "$mailconfig_file" && test -r "$mailconfig_file"; then

+            source "$mailconfig_file"

+        elif test -r "/usr/local/etc/${0##*/}.mail.conf"; then

+            source "/usr/local/etc/${0##*/}.mail.conf"

+        fi

+        stat -Lc "(date de mise à jour de la base: %x)" $database

+        cat > $process_token.headers << EOC

+From: ${from_mail:?}

+To: $destinataire

+Subject: les scrutins demandés

+EOC

+        curl_opt=(

+                --url smtp://${smtp_address:?}:${smtp_port:?}

+                --mail-rcpt $destinataire

+                -H @$process_token.headers

+                -F "=(;type=multipart/alternative"

+                -F "=<$process_token.txt;encoder=quoted-printable"

+                -F "=<$process_token.html;encoder=quoted-printable"

+                -F "=)"

+        )

+        if test -r "${destination_path:+$destination_path/}$result.ods"; then

+            curl_opt[${#curl_opt[@]}]="-F"

+            curl_opt[${#curl_opt[@]}]="=@${destination_path:+$destination_path/}$result.ods;encoder=base64"

+        fi

+        exec 1>&-

+        aha -f $process_token.mail -t "envoi automatisé" > $process_token.html

+        w3m -dump $process_token.html > $process_token.txt

+        curl ${curl_opt[@]}

+        rm -f "${destination_path:+$destination_path/}$result.ods" $process_token*

+    elif test -r "$database" && sqldiff=$(sqldiff $in_ram_database $database) && test -z "$sqldiff"; then

         echo "pas de modification"

     elif test -w "$database"; then

         rm -f "$database"

@@ -544,6 +581,14 @@ while [[ $# -gt 0 ]]; do

             }

             config_file="$2"

             shift;;

+        "--mailconf")

+#<fichier>|indique le chemin vers le fichier de configuration. Par défaut "{_}.conf"

+            test -r "$2" || {

+                echo "config introuvable $2" >&2

+                options_error=$true_flag

+            }

+            mailconfig_file="$2"

+            shift;;

         "--dest")

 #<répertoire>|génère le fichier dans le répertoire spécifié. Par défaut $PWD

             if test -n "$2" && test -d "$2" -a -r "$2"; then

@@ -571,6 +616,14 @@ while [[ $# -gt 0 ]]; do

 #<chiffre>|affiche de la progression de la mise à jour de la base de données tous les <chiffre>%. Par défaut 1

             update_progress="$2"

             shift;;

+        "--mail")

+            envoi_par_mail=$true_flag

+            destinataire="$2"

+            no_db_update=$true_flag

+            destination_path=/dev/shm

+            generation_progress=1000

+            exec > $process_token.mail 2>&1

+            shift;;

         "--help")

 #|affiche cette aide et quitte

             echo "$0 [options]"

@@ -624,12 +677,18 @@ if test "$periode" = $true_flag; then

     }

     first=$(sqlite_request "select min(num) from scrutins where date = '$(get_date ${periode_value%:*} first)'")

     last=$(sqlite_request "select max(num) from scrutins where date = '$(get_date ${periode_value#*:} last)'")

+    if test "$envoi_par_mail" = $true_flag; then

+        texte_periode="du $(get_date ${periode_value%:*} first) (scrutin n°$first) au $(get_date ${periode_value#*:} last) (scrutin n°$last)"

+    fi

 elif test "$dossier" != $true_flag; then

     test -z "$last" && last=$(dernier_scrutin_public)

     test -z "$first" && first=1

 fi

 if test "$liste_dossiers" = $true_flag; then

+    if test "$envoi_par_mail" = $true_flag; then

+        echo "Voici la liste des dossiers actuellement à l'étude"

+    fi

     sqlite_request "select printf('• %s (%s)', titre, url) from dossiers"

     exit

 fi

@@ -643,6 +702,9 @@ fi

 if test "$liste_deputes" = $true_flag; then

     if test -n "$liste_deputes_value"; then

+        if test "$envoi_par_mail" = $true_flag; then

+            echo "Voici la liste des député·e·s du groupe dont le nom correspond au critère $liste_deputes_value"

+        fi

         sqlite_request "select printf('%s - %s%s',

                                       députés.nom,

                                       groupes.nom,

@@ -654,6 +716,9 @@ if test "$liste_deputes" = $true_flag; then

                         or

                             groupes.nom_court = '$liste_deputes_value'"

     else

+        if test "$envoi_par_mail" = $true_flag; then

+            echo "Voici la liste des député·e·s"

+        fi

         sqlite_request "select printf('%s - %s%s',

                                       députés.nom,

                                       groupes.nom,

@@ -694,5 +759,20 @@ for (( g = 0; g < ${#_groupe[@]}; g++ )); do

     fi

 done

+if test -s $process_token.mail; then

+    exit 1

+fi

+

 update_database

 write_comparaison

+

+if test "$envoi_par_mail" = $true_flag; then

+    echo Vous pourrez trouver en pièce-jointe les résultats demandés avec ces critères:

+    if test ${#groupe[@]} -gt 0; then

+        echo "votes des groupes et député·e·s suivant·e·s:"

+        printf " • %s\n" "${groupe[@]}"

+    fi

+    if test "$periode" = $true_flag; then

+        echo sur la période allant $texte_periode

+    fi

+fi