Azione E3

Realizzazione di un rapporto divulgativo (Layman's report)

Verrà realizzato un rapporto divulgativo in lingua inglese ed italiana, in formato cartaceo ed elettronico (cd). Il documento conterrà una descrizione del progetto, dei suoi obiettivi ed azioni e dei risultati con un linguaggio semplice ma preciso, per la diffusione al ‘grande pubblico’. Il rapporto divulgativo sarà progettato dall’ Università di Parma (nei testi e nelle immagini), realizzato e diffuso a cura del partner EGPB parallelamente alle altre attività di comunicazione/sensibilizzazione di cui è responsabile (V. azioni E4 ed E5). I prodotti cartacei saranno stampati su carata riciclata.

Avanzamento Stato: Terminato - Avvio: 01-01-2018 Conclusione: 31-05-2018
2014 2015 2016 2017 2018
I II III IV I II III IV I II III IV I II III IV I II III IV
E3 CronoprogrammaOOOOOOOOOOOOOOOOAAOO
AvanzamentoOOOOOPPPPPPPPPPPAXXX

Grazie ad una collaborazione proficua tra Università di Parma e EGPB - Parchi del Ducato è stato ideato e realizzato (anche in forma cartacea) il rapporto divulgativo di progetto. Il documento bilingue (ITA/ENG) è scaricabile gratuitamente.

Documenti
Layman's report LIFE BARBIE - Layman.pdf - 
S. Anelli - Le attività di sensibilizzazione e comunicazione nel LIFE BARBIE: l'importanza del coinvolgimento del territorio nei progetti di conservazione della natura - Anelli.pdf - 
Francesco Magna & Alice Pellegrino - Azioni di supporto della lasca: l'esperienza del progetto LIFE for LASCA - Magna&Pellegrino.pdf - 
Francesco Nonnis Marzano - Lo stato della fauna ittica in Italia e l'opportunità offerta dal programma LIFE della Commissione Europea - NonnisMarzano1.pdf - 
Francesco Nonnis Marzano - Chiusura dei Lavori e prospettive future : l'After LIFE Plan del "LIFE BARBIE" - NonnisMarzano2.pdf - 
Federica Piccoli - Il Piano di Recupero del barbo canino e del barbo comune in Emilia Romagna - Piccoli.pdf - 
Cesare Puzzi - Il progetto LIFE Con.flu.PO - la riapertura del più grande corridoio fluviale italiano - Puzzi.pdf - 
Pierluigi Viaroli - Lo stato dei fiumi: aspetti di ecologia e strategie di intervento - Viaroli.pdf - 
Aronne Ruffini & Marco Monaci - L'importanza della riqualificazione fluviale per la tutela della biodiversità acquatica: il progetto LIFE RINASCE - Ruffini&Monaci.pdf - 
Marco Zanetti - L'esperienza del progetto LIFE SILIFFE nel recupero delle biocenosi fluviali autoctone - Zanetti.pdf - 
Andrea Voccia & Pietro Rontani - Attività ittiogeniche nel LIFE BARBIE: il protocollo di riproduzione in cattività del barbo comune e del barbo canino - Voccia&Rontani.pdf - 
Massimo Lorenzoni - I progetti LIFE per la conservazione della biodiversità ittica: i progetti LIFE TROTA e LIFE STREAMS - Lorenzoni.pdf - 
Claudio Ferrari - Genetica della conservazione dei barbi mediterranei all'interno dei siti Rete Natura 2000 - Ferrari.pdf - 
Stefano Martellos - La Citizen Science come strumento di monitoraggio e tutela della biodiversit? - Martellos.pdf - 
Roberto Zanzucchi - Interventi di deframmentazione fluviale nel LIFE BARBIE - Zanzucchi.pdf - 
Galleria

Download
class "Gallery" already exists
    while executing
"::itcl::class Gallery {
        inherit Barbie

        private variable galleria_d
        private variable gallery_sect_menu
        private variabl..."
    (in namespace eval "::rwdatas" script line 3)
    invoked from within
"namespace eval ::rwdatas {

    ::itcl::class Gallery {
        inherit Barbie

        private variable galleria_d
        private variable gallery_s..."


OUTPUT BUFFER:

source [file join $rweb_root tcl before.tcl]
#
# -- gallery.tcl
#
# datasource per pagina gestione delle
#
#

package require Barbie
package require rwbinary

namespace eval ::rwdatas {

    ::itcl::class Gallery {
        inherit Barbie

        private variable galleria_d
        private variable gallery_sect_menu
        private variable gallery_menu
        private common   thumb_h_size   200
        private common   gallery_dir
        private common   thumbnails_dir 

        private method page_handled {v p}
        public method willHandle {arglist keyvar} 
        public method fetchData {key reassigned_key} 
        public method init {args} 
        public method menu_list {page}
        #public method to_url {lm} { return [Barbie::to_url $lm] }
        #public method will_provide {keyword reassigned_key}
        public proc create_thumbnail {photo}
        public proc gallery {}
        public proc gallery_latest_entries {dbhandle nentries}
        public proc thumbnail_fs_path {photo}
	public proc thumbnail_path {photo}
	public proc thumbnail_exists {photo}
    }

    ::itcl::body Gallery::thumbnail_exists {photo} {
	return [file exists [thumbnail_fs_path $photo]]
    }

    ::itcl::body Gallery::thumbnail_fs_path {photo} {
	return [file join galleria thumbnails ${photo}]
    }

    ::itcl::body Gallery::thumbnail_path {photo} {
	return [::rivetweb::rewrite_generic_path [join [list galleria thumbnails $photo] "/"]]
    }

    ::itcl::body Gallery::create_thumbnail {photo} {
        set thumbnail 	[thumbnail_fs_path $photo]
        set photo_name  [file join $gallery_dir $photo]
 
        if {[catch {exec gm convert $photo_name -geometry $thumb_h_size $thumbnail} e]} {
            ::rivet::apache_log_error err "Error creating thumbnail $thumbnail: $e"
            return -code error -errorcode thumbnail_creation_error $e $e
        }
    }


    # -- page_handled
    #
    #

    ::itcl::body Gallery::page_handled {varsqs page_key} {
        upvar $page_key p

        foreach p [list photo gallery] {
            if {[dict exists $varsqs $p]} {
                return true 
            }
        }
        return false

    }

    ::itcl::body Gallery::willHandle {arglist keyvar} { 
        upvar $keyvar key 

        set varsqs [dict create {*}$arglist]
        if {[dict exists $varsqs photo]} {
            set photo_filename [dict get $varsqs photo]
	    #
	    # proposed change
            #set key "view_photo_[regsub -all {[^[:alnum:]]} ${photo_filename}]"
	    #
            set key "view_photo_[::rivet::escape_string ${photo_filename}]"

            return -code break -errorcode rw_ok
        } elseif {[dict exists $varsqs gallery]} {
            set key "view_gallery"
            return -code break -errorcode rw_ok
        }

        return -code continue -errorcode rw_continue 
    }

    ::itcl::body Gallery::fetchData {key reassigned_key} {
        upvar $reassigned_key rkey
        
        set rkey $key

        set key [::rivet::unescape_string $key]
        switch -regexp -matchvar photo_name -- $key {
            view_photo_(.+) {
                $this check_class ::rwpage::Photo

                set photo_name [lindex $photo_name 1]

                set p [::rwpage::Photo ::#auto $key $gallery_dir $photo_name]

                #::rivet::apache_log_error notice "new instance of $p ::rwpage::Photo"
            }
            view_gallery {
                $this check_class ::rwpage::Gallery

                set p [::rwpage::Gallery ::#auto $key $gallery_dir]

                #::rivet::apache_log_error notice "new instance of $p ::rwpage::Gallery"
            }
            default {
				set p ""
			}
        }
        #::rivet::apache_log_error notice "new instance of ::rwpage::Photo (binary: [$p binary_content])"
        return $p
    }

    ::itcl::body Gallery::gallery_latest_entries {dbhandle nentries} {
        set     q "select g.*,s.descrizione from galleria g "
        append  q "join sezioni s on s.sectionid=g.sezione "
        append  q "order by g.creazione desc limit $nentries;"

        set galleria_d  [dict create]
        $dbhandle forall $q photo_a {
            dict set galleria_d [incr idx] [dict create {*}[array get photo_a]]
        }

        return $galleria_d
    }

    ::itcl::body Gallery::gallery {} {

        set     q "select g.*,s.descrizione from galleria g "
        append  q "join sezioni s on s.sectionid=g.sezione order by s.descrizione,s.ordine,g.ordine;"

        set galleria_d [dict create]
        $::barbie::dbhandle forall $q photo_a {
            
            set photo_name  $photo_a(filename)
            set sezione     $photo_a(sezione)
            set descrizione $photo_a(descrizione)
            unset photo_a(sezione)
            unset photo_a(filename)
            unset photo_a(descrizione)

            dict set galleria_d $sezione photos $photo_name \
							    [dict create {*}[array get photo_a]]
            dict set galleria_d $sezione descrizione $descrizione

        }

        return $galleria_d
    }

    ::itcl::body Gallery::init {args} { 
        Barbie::init $args       
    
        set gallery_dir [file join $::rivetweb::site_base galleria]
        if {![file exists $gallery_dir]} {
            file mkdir $gallery_dir
        }

        set thumbnails_dir [file join $gallery_dir thumbnails]
        if {![file exists $thumbnails_dir]} {
            file mkdir $thumbnails_dir
        }
        
        set galleria_d [::rwdatas::Gallery::gallery]
        $this register_class ::rwpage::Photo
        $this register_class ::rwpage::Gallery
    }

    ::itcl::body Gallery::menu_list {page} {

        set page_class [$page info class]
        if {($page_class == "::rwpage::Gallery") || \
            ($page_class == "::rwpage::Photo")} {

            set mm $::rivetweb::menumodel
            set lm $::rivetweb::linkmodel

            set galleria_d [::rwdatas::Gallery::gallery]
            if {[dict size $galleria_d] == 0} { return [Datasource::menu_list $page] }

            catch {$gallery_menu destroy}
            set gallery_menu [$mm create_menu sezioni_galleria none normal]
            $gallery_menu assign title "Photo Gallery" en
            $gallery_menu assign title "Galleria Fotografica" it
            dict for {sectid section_d} $galleria_d {

                set gallery_section [$lm create Gallery "" \
                                    [list it [dict get $galleria_d $sectid descrizione]] \
                                    [dict create gallery 1 section $sectid] ""]

                $gallery_menu add_link $gallery_section

            }

            return [list evidenza $gallery_menu]
        } else {
            return {} 
        }
    }

}

package provide Gallery 1.0
source [file join $rweb_root tcl after.tcl]