@@ -181,9 +181,9 @@ function write_comparaison () {

     fi

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

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

+    declare -A style=(["Pour"]=Good ["Contre"]=Bad ["Abstention"]=Neutral ["oui"]=Good ["non"]=Bad)

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

-    nb_cols=$(( ${#id_cols[@]} + ${#typevotes[@]} * ${#groupe[@]} ))

-    last_col=$(awk -v n=$nb_cols 'BEGIN{printf("%c%c", n < 27 ? "" : int(n/26) + 64, (n % 26) + (n % 26 == 0 ? 26 : 0) + 64)}' | tr -d '\0')

+    nb_cols=$(( ${#id_cols[@]} + ${#groupe[@]} ))

     colors=($(awk -v n=${#groupe[@]} -v from=${from_color:-2A0636} -v to=${to_color:-D09B8A} '

         function rgbL (p) {

             r = rgb_from[1] + p * (rgb_to[1] - rgb_from[1])

@@ -206,20 +206,30 @@ function write_comparaison () {

             if (n > 1) rgbL(1)

         }

     '))

+    function get_colname () {

+        awk -v n=$1 '

+            BEGIN{

+                printf("%c%c", n < 27 ? "" : int(n/26) + 64, (n % 26) + (n % 26 == 0 ? 26 : 0) + 64)

+            }' | tr -d '\0'

+    }

     function write_cell () {

+        cell='<table:table-cell office:value-type='

         case $1 in

             url)

-                cell='<table:table-cell office:value-type="string" calcext:value-type="string">'

+                cell+='"string" calcext:value-type="string">'

                 cell+="<text:p><text:a xlink:href=$2 xlink:type=\"simple\">$3</text:a></text:p>"

                 ;;

             texte)

-                cell='<table:table-cell office:value-type="string" calcext:value-type="string">'

-                cell+="<text:p>$2</text:p>"

+                cell+='"string" calcext:value-type="string"'${style[${2:- }]:+ table:style-name=\"${style[$2]}\"}'>'

+                cell+="<text:p>${2:- }</text:p>"

                 ;;

             nombre)

-                cell="<table:table-cell office:value-type=\"float\" office:value=\"$2\" calcext:value-type=\"float\">"

+                cell+='"float" office:value="'$2'" calcext:value-type="float">'

                 cell+="<text:p>$2</text:p>"

                 ;;

+            formule)

+                cell+='"string" table:formula="of:='"$2"'" calcext:value-type="string"'${3:+ table:style-name=\"${3}\"}'>'

+                ;;

             *)

                 return 1;;

         esac

@@ -238,9 +248,38 @@ function write_comparaison () {

 <manifest:manifest xmlns:manifest="urn:oasis:names:tc:opendocument:xmlns:manifest:1.0" manifest:version="1.2">

  <manifest:file-entry manifest:full-path="/" manifest:version="1.2" manifest:media-type="application/vnd.oasis.opendocument.spreadsheet"/>

  <manifest:file-entry manifest:full-path="content.xml" manifest:media-type="text/xml"/>

+ <manifest:file-entry manifest:full-path="settings.xml" manifest:media-type="text/xml"/>

 </manifest:manifest>

 EOmetainf

+    cat > "/dev/shm/$result/settings.xml" << EOsettings

+<?xml version="1.0" encoding="UTF-8"?>

+<office:document-settings xmlns:config="urn:oasis:names:tc:opendocument:xmlns:config:1.0" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:ooo="http://openoffice.org/2004/office" xmlns:office="urn:oasis:names:tc:opendocument:xmlns:office:1.0" office:version="1.3">

+  <office:settings>

+    <config:config-item-set config:name="ooo:view-settings">

+      <config:config-item-map-indexed config:name="Views">

+        <config:config-item-map-entry>

+          <config:config-item config:name="ViewId" config:type="string">view1</config:config-item>

+          <config:config-item-map-named config:name="Tables">

+            <config:config-item-map-entry config:name="$result">

+              <config:config-item config:name="HorizontalSplitMode" config:type="short">2</config:config-item>

+              <config:config-item config:name="VerticalSplitMode" config:type="short">2</config:config-item>

+              <config:config-item config:name="HorizontalSplitPosition" config:type="int">${#id_cols[@]}</config:config-item>

+              <config:config-item config:name="VerticalSplitPosition" config:type="int">1</config:config-item>

+              <config:config-item config:name="ActiveSplitRange" config:type="short">1</config:config-item>

+              <config:config-item config:name="PositionLeft" config:type="int">0</config:config-item>

+              <config:config-item config:name="PositionRight" config:type="int">${#id_cols[@]}</config:config-item>

+              <config:config-item config:name="PositionTop" config:type="int">0</config:config-item>

+              <config:config-item config:name="PositionBottom" config:type="int">1</config:config-item>

+            </config:config-item-map-entry>

+          </config:config-item-map-named>

+        </config:config-item-map-entry>

+      </config:config-item-map-indexed>

+    </config:config-item-set>

+  </office:settings>

+</office:document-settings>

+EOsettings

+

     printf 'application/vnd.oasis.opendocument.spreadsheet' > "/dev/shm/$result/mimetype"

     echo '<?xml version="1.0" encoding="UTF-8"?>' > "$content"

@@ -272,11 +311,20 @@ EOcontent

     <style:style style:name="ta1" style:family="table" style:master-page-name="Default">

     <style:table-properties table:display="true" style:writing-mode="lr-tb"/>

     </style:style>

+    <style:style style:name="T1" style:family="text">

+    <style:text-properties fo:font-weight="bold" style:font-weight-asian="bold" style:font-weight-complex="bold" fo:color="#5eb91e"/>

+    </style:style>

+    <style:style style:name="T2" style:family="text">

+    <style:text-properties fo:font-weight="bold" style:font-weight-asian="bold" style:font-weight-complex="bold" fo:color="#c9211e"/>

+    </style:style>

+    <style:style style:name="T3" style:family="text">

+    <style:text-properties fo:font-weight="bold" style:font-weight-asian="bold" style:font-weight-complex="bold" fo:color="#e8a202"/>

+    </style:style>

 EOcontent

     for i in $(seq ${#groupe[@]}); do

         cat >> "$content" << EOcontent

-        <style:style style:name="ce$i" style:family="table-cell" style:parent-style-name="Default">

+        <style:style style:name="groupe$i" style:family="table-cell" style:parent-style-name="Default">

         <style:table-cell-properties fo:wrap-option="wrap" style:vertical-align="middle" fo:background-color="#${colors[$i]%:*}"/>

         <style:text-properties fo:hyphenate="false" fo:color="#${colors[$i]}"/>

         </style:style>

@@ -293,12 +341,10 @@ EOcontent

     <table:table-column table:style-name="co1" table:number-columns-repeated="${#id_cols[@]}" table:default-cell-style-name="Default"/>

 EOcontent

-    for i in $(seq ${#typevotes[@]}); do

-        for g in $(seq ${#groupe[@]}); do

-            cat >> "$content" << EOcontent

-            <table:table-column table:style-name="co1" table:default-cell-style-name="ce$g"/>

+    for g in $(seq ${#groupe[@]}); do

+        cat >> "$content" << EOcontent

+        <table:table-column table:style-name="co1" table:default-cell-style-name="ce$g"/>

 EOcontent

-        done

     done

     echo '<table:table-row table:style-name="ro1">' >> "$content"

@@ -307,10 +353,9 @@ EOcontent

         write_cell texte $colonne

     done

-    for typevote in ${typevotes[@]}; do

-        for g in "${groupe[@]}"; do

-            write_cell texte "$typevote - $g"

-        done

+    for (( g=0; g<${#groupe[@]}; g++ )); do

+        colname=$(get_colname $(( ${#id_cols[@]} + $g + 1)) )

+        write_cell formule "COM.MICROSOFT.CONCAT("${groupe[$g]} ("; $(($last-$first+1))-COUNTIF([.${colname}2:.${colname}$(($last-$first+2))];" "); ")")" groupe$(($g+1))

     done

     echo '</table:table-row>' >> "$content"

@@ -342,37 +387,38 @@ EOcontent

         write_cell url   "${dossier_url/#null/\"\"}" "${dossier_texte/#null}"

         unset votes

-        for typevote in $(seq ${#typevotes[@]}); do

-            for (( g = 0; g < ${#groupe[@]}; g++ )); do

-                votes[${#votes[@]}]=$(sqlite_request "select

-                                            count(député)

-                                         from

-                                            dépouillements

-                                         inner join

-                                            députés, groupes

-                                         on

-                                            députés.groupe = groupes.id and dépouillements.député = députés.id

-                                         where

-                                            scrutin is $scrutin

-                                         and

-                                            vote is $typevote

-                                         and

-                                            ${id_groupe[$g]%:*}.nom = '${groupe[$g]//\'/\'\'}'")

-            done

-        done

-        for ((j = 0; j < ${#groupe[@]}; j++)); do

-            presence=1 # `let presence+=0` sort en erreur si variable est unset ou égale à 0

-            for ((i = $j; i < ${#votes[@]}; i += ${#groupe[@]})); do

-                let presence+=${votes[$i]}

-            done

-            if test $presence -eq 1; then

-                for ((i = $j; i < ${#votes[@]}; i += ${#groupe[@]})); do

-                    votes[$i]=-1

-                done

-            fi

+        for (( g = 0; g < ${#groupe[@]}; g++ )); do

+            case ${id_groupe[$g]%:*} in

+                groupes)

+                    unset _vote

+                    eval $(sqlite_request "select '_vote[' || vote || ']=' || count(vote) from dépouillements

+                                           where scrutin = $scrutin and député in (

+                                               select id from députés

+                                               where groupe in (${id_groupe[$g]#*:})

+                                           )

+                                           group by vote")

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

+                        unset _votes

+                        for i in {1..3}; do

+                            _votes+="<text:span text:style-name=\"T$i\">${_vote[$i]:-0}</text:span> / "

+                        done

+                        _votes+="${_vote[4]:-0}"

+                        votes[${#votes[@]}]=$_votes

+                    else

+                        votes[${#votes[@]}]=" "

+                    fi

+                ;;

+                députés)

+                    votes[${#votes[@]}]=$(sqlite_request "select nom from votes

+                                                          where id in (

+                                                              select vote from dépouillements

+                                                              where scrutin = $scrutin and député in (${id_groupe[$g]#*:})

+                                                          )")

+                ;;

+            esac

         done

         for ((i = 0; i < ${#votes[@]}; i ++)); do

-            write_cell nombre ${votes[$i]}

+            write_cell texte ${votes[$i]}

         done

         echo '</table:table-row>' >> "$content"

@@ -393,7 +439,7 @@ EOcontent

     </table:table>

     <table:named-expressions/>

     <table:database-ranges>

-    <table:database-range table:name="__Anonymous_Sheet_DB__0" table:target-range-address="&apos;$result&apos;.D1:&apos;$result&apos;.$last_col$line" table:display-filter-buttons="true"/>

+    <table:database-range table:name="__Anonymous_Sheet_DB__0" table:target-range-address="&apos;$result&apos;.D1:&apos;$result&apos;.$(get_colname $nb_cols)$line" table:display-filter-buttons="true"/>

     </table:database-ranges>

     </office:spreadsheet>

     </office:body>

@@ -468,18 +514,9 @@ trap save_database EXIT

 test -z "$database" && database="${0}.db"

+echo "$0 $@" > $token_file

 declare -A acronymes

-if test -n "$config_file"; then

-    source "$config_file"

-else

-    config_file="${0}.conf"

-    if test -r "$config_file"; then

-        source "$config_file"

-    fi

-fi

-

 true_flag=$(mktemp --dry-run XXXXX)

-echo "$0 $@" > $token_file

 while [[ $# -gt 0 ]]; do

     case "$1" in

@@ -610,6 +647,7 @@ while [[ $# -gt 0 ]]; do

             update_progress="$2"

             shift;;

         "--mail")

+#<adresse mail>|envoie le fichier généré à l'adresse mail indiquée

             envoi_par_mail=$true_flag

             destinataire="$2"

             no_db_update=$true_flag

@@ -633,6 +671,15 @@ done

 test "$options_error" = $true_flag && exit 1

+if test -n "$config_file"; then

+    source "$config_file"

+else

+    config_file="${0}.conf"

+    if test -r "$config_file"; then

+        source "$config_file"

+    fi

+fi

+

 while true; do

     if ls -1rt /dev/shm/*."${0##*/}" | head -1 | grep -q "^$token_file$"; then

         # c'est notre tour

@@ -682,8 +729,8 @@ if test "$periode" = $true_flag; then

     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)

+elif test "$dossier" != $true_flag -a "$no_db_update" = $true_flag; then

+    test -z "$last" && last=$(sqlite_request "select max(num) from scrutins")

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

 fi

@@ -0,0 +1,226 @@

+#!/bin/bash

+

+DB=/var/lib/navidrome/navidrome.db

+medias=/music

+no_cover_flag=.no_cover

+cover_img=cover

+mbz_agent='getCover/0.1 (https://seb.lautre.net/git/seb/scripts)'

+

+test -e $0.conf && source $0.conf

+

+coverartarchive_api="https://coverartarchive.org/release"

+coverart=$(mktemp --dry-run /dev/shm/XXXXXXXX)

+sizes=(small 250 500 large 1200)

+

+OK      () { echo -e "\e[3;32m ${1:-OK} \e[0;m";     return 0; }

+WARNING () { echo -e "\e[3;33m ${1:-alerte} \e[0;m"; return 1; }

+ERROR   () { echo -e "\e[3;31m ${1:-erreur} \e[0;m"; return 1; }

+

+sql_request () {

+    sqlite3 $DB <<< "$1"

+}

+

+covered () {

+    case "${forcing_level:-none}" in

+        retry)

+            if test -w "${album#*:}/$no_cover_flag"; then

+                rm -f "${album#*:}/$no_cover_flag" 2>/dev/null

+                return 1

+            else

+                return 0

+            fi

+            ;;

+        force)

+            rm -f "${album#*:}/$no_cover_flag" 2>/dev/null

+            return 1

+            ;;

+        none)

+            if compgen -G "${album#*:}/$cover_img.*" > /dev/null; then

+                return 0

+            elif test -e "${album#*:}/$no_cover_flag"; then

+                return 0

+            else

+                return 1

+            fi

+            ;;

+    esac

+}

+

+get_image () {

+    if curl -Ls $1 > /dev/shm/$2; then

+        mime_type=$(file -bn --mime-type /dev/shm/$2)

+        if [[ ${mime_type:-erreur} =~ ^image/ ]]; then

+            mv -f /dev/shm/$2 ${album#*:}/$cover_img.${2##*.} \

+            || ERROR "échec en écriture"

+        else

+            WARNING "${album%%:*} type $mime_type"

+        fi

+    else

+        ERROR "${album%%:*} échec du téléchargement"

+    fi

+}

+

+get_spotify_access_token () {

+    if test -n "$spotifyID" -a -n "$spotifySecret"; then

+        spotify_access_token=$(curl --silent \

+            --request POST \

+            --url https://accounts.spotify.com/api/token \

+            --header 'Content-Type: application/x-www-form-urlencoded' \

+            --header "Authorization: Basic $(base64 -w0 <<< $spotifyID:$spotifySecret | sed 's/K$/=/')" \

+            -d 'grant_type=client_credentials' | jq -r '.access_token // empty')

+        if test -z "$spotify_access_token"; then

+            ERROR "problème d'identifant Spotify"

+            spotify_access_token_error=1

+            echo ID: $spotifyID

+        fi

+    fi

+}

+

+get_from_mbz () {

+    curl -Ls $coverartarchive_api/${album%%:*} > $coverart

+    if test $(file -bn --mime-type $coverart) = application/json; then

+        unset img

+        for size in ${sizes[@]}; do

+            img=$(jq -r '.images | .[] | select(.front == true) | .thumbnails | ."'$size'"?' $coverart 2>/dev/null)

+            test -n "$img" && break

+        done

+        if test -n "$img"; then

+            get_image "$img" "${album%%:*}.${img##*.}"

+        fi

+    else

+        return 1

+    fi

+}

+

+get_from_spotify () {

+    if test -n "$album_name" -a -n "$artist"; then

+        curl --request GET --silent \

+            --header "Authorization: Bearer $spotify_access_token" \

+            --header 'Content-Type: application/json' \

+            --data 'type=album' \

+            --data "query==album:${_album_name}%20artist:${_artist}" \

+            --url "https://api.spotify.com/v1/search" > $coverart

+        found_albums=$(jq -r '.albums .total // empty' $coverart)

+        if test ${found_albums:-0} -gt 0; then

+            img=$(jq --raw-output --arg artist "${artist^^}" --arg album "${album_name^^}" "

+                    .albums .items

+                    | .[]

+                    | select(.name | ascii_upcase == \$album)

+                    | select(.artists | .[].name | ascii_upcase == \$artist)

+                    | .images

+                    | .[]

+                    | select(.height == 300)

+                    | .url // empty" $coverart)

+            if test -n "$img"; then

+                get_image "$img" "${img##*/}.jpg"

+            else

+                WARNING "pas d'image trouvée sur spotify (artist: $artist; album: $album_name)"

+            fi

+        else

+            WARNING "aucun album trouvé sur spotify"

+        fi

+    else

+        ERROR "album: $album_name; artist: $artist"

+    fi

+}

+

+if ! test -d $medias; then

+    ERROR "$medias n'est pas un répertoire"

+    exit 1

+fi

+

+if declare -f pre_get_cover > /dev/null; then

+    pre_get_cover

+fi

+

+IFS=$'\n'

+for arg in $@; do

+    if [[ $arg =~ ^[0-9a-f]{8}-[0-9a-f]{4}-[0-9a-f]{4}-[0-9a-f]{4}-[0-9a-f]{12}:/ ]]; then

+        from_CLI=1

+        albums[${#albums[@]}]="${arg%/}"

+    elif [[ $arg =~ ^/ ]]; then

+        from_CLI=1

+        albums[${#albums[@]}]=":${arg%/}"

+    elif [[ $arg =~ ^(force|retry)$ ]]; then

+        forcing_level=$arg

+    else

+        WARNING "incohérence sur $arg"

+    fi

+done

+if test -n "$from_CLI"; then

+    forcing_level=force

+fi

+

+if test ${#albums[@]} -eq 0; then

+    albums=($(sql_request 'select printf("%s:'${medias%/}'/%s/%s", mbz_album_id, artist, name)

+             from album where cover_art_path = ""

+             and name != "[Unknown Album]"'))

+fi

+

+for album in ${albums[@]}; do

+    mbz_related=0

+    if ! test -d "${album#*:}"; then

+        if test -n "$from_CLI"; then

+            WARNING "${album#*:}: chemin inconnu"

+        fi

+        continue

+    fi

+    if covered; then

+        continue

+    fi

+    echo -n "${album#*:} "

+    if test -n "${album%%:*}"; then

+        mbz_related=1

+        if get_from_mbz; then

+            OK

+            continue

+        fi

+    fi

+

+    eval "$(sql_request 'select printf("artist=""%s"";album_name=""%s""", artist, name)

+                        from album

+                        where artist || "/" || name = "'${album#*:$medias/}'"')"

+    eval $(php -r 'echo "_artist=".rawurlencode($argv[1]).";_album_name=".rawurlencode($argv[2]);' -- "$artist" "$album_name")

+

+    curl \

+        --request GET \

+        --user-agent "$mbz_agent" \

+        --silent --location \

+        --url "http://musicbrainz.org/ws/2/release/?fmt=json&query=release:$_album_name%20AND%20artist:$_artist" > $coverart

+

+    mbids=($(jq --raw-output --arg artist "${artist^^}" --arg album "${album_name^^}" '

+            .releases

+            | .[]

+            | select(.title | ascii_upcase == $album)

+            | select(."artist-credit" | .[].name | ascii_upcase == $artist)

+            | .id // empty' $coverart))

+

+    for mbid in ${mbids[@]}; do

+        album="$mbid:${album#*:}"

+        if get_from_mbz; then

+            OK

+            continue 2

+        fi

+    done

+

+    if test -z "$spotify_access_token" -a -z "$spotify_access_token_error"; then

+        get_spotify_access_token

+    fi

+

+    if test -n "$spotify_access_token"; then

+        if get_from_spotify; then

+            OK

+        else

+            WARNING "pas trouvé (spotify)"

+            touch "${album#*:}/$no_cover_flag"

+        fi

+    else

+        WARNING "pas trouvé ($(( ${mbz_related:-0} + ${#mbids[@]} )) relations sur musicbrainz)"

+        touch "${album#*:}/$no_cover_flag"

+    fi

+done

+

+rm -f $coverart 

+if declare -f post_get_cover > /dev/null; then

+    post_get_cover

+fi