#!/does/not/exist/but/fools/vim/perl
# Htag.pl 0.0.18 - config file.
# Customized by Ataualpa, AD 2007 31 August
# This file is parsed as Perl by perl.


### Opzioni Generali

# setta debug a 0 quando funziona tutto
$cfg{'debug'}     = 0;

# path in cui sono stati installati i plugin
# la directory impostata è OK per Debian
# per altre distro controllare
$cfg{'plugindir'} = "/usr/share/htag/plugins";

# tmpdir dovrebbe essere una directory utilizzata solo da htag
# la directory va creata (non se ne preoccupa lo script!)
$cfg{'tmpdir'} = "~/.htag/";

# tmpsigfile and tmptagfile dovrebbero puntare a file distinti
$cfg{'tmpsigfile'} = "~/.htag/tmp/sig";
$cfg{'tmptagfile'} = "~/.htag/tmp/tag";

# richiede la pressione di un tasto in caso di errore o abend
# di uno dei plugin
$cfg{'nicedie'}   = 1;


#####################################################################
### Multiple Config File support (see docs)                       ###
#####################################################################

# This is my magic to take email addresses out of a file called
# ~/.htagrc/notech_addresses and put them into a pattern called
# $notech_addresses with "|" between each.
# Note that it's not very efficient since it's executed between every
# plugin.

# my $notech_addresses;
# my $HOME = $ENV{"HOME"} || $ENV{"LOGDIR"} || (getpwuid($<))[7];
# open(NOTECH, "$HOME/.htagrc/notech_addresses")
# or htagdie "Could not open $HOME/.htagrc/notech_addresses: $!";
# while () {
#       next if ($_ =~ /^(?:#.*|\s*)$/);
#       chomp;
#       $_ = quotemeta;
#       $notech_addresses .= $_ . "|";
# }
# close(NOTECH);
# $notech_addresses =~ s/\|$//;

# Some random config stuff for multiple configs

# $cfg{'changeheaders'} = [
#       [ '^Foo: no','^From:.*?(\w+)@earth.li','~/.htagrc/$1' ],
#       [ '(?x)^To:.*
#               (?:'.$notech_addresses.
#               ')','~/.htagrc/notech' ],
#       [ '^From:.*@blackcatnetworks\.co\.uk','~/.htagrc/blackcat' ],
#       [ '^Cc:.*@blackcatnetworks\.co\.uk','~/.htagrc/blackcat' ],
#       [ '', '~/.htagrc/default' ],
#       ];


#####################################################################
### plugins/02catsig.pl                                           ###
### Simple Signature output                                       ###
#####################################################################

# setta catsig in modo da chiedere quale signature file utilizzare
# altrimenti ne prende uno random
# asksig = 1 chiede
# asksig = 0 non chiede
$cfg{'asksig'}    = 0;

# Per aggiungere una random signature al messaggio si deve definire il file
# (i files) che contengono le frasi da estrarre.

# sigs/sigdir vanno definite di seguito se non si utilizzano i changeheaders.
# per utilizzare i changeheader vedi sample.htrc.changeheaders.default

# specifica tramite un array (@) la locazione dei signature files.
# Utile nel caso in cui i signature file non siano tutti nella stessa directory.
# @{cfg{'sigs'}} = ( "~/.htag/sigs", "~/.htag/sigs1" );

# specifica la directory contenente i signature files da utilizzare
# creare la directory e copiarci dentro i propri file signature
$cfg{'sigdir'} = "~/.htag/sigs/";

# Specificando sigdir E sigs vengono aggiunti alla lista tutti file
# contenuti in sigs, poi quelli contenuti in sigdir che matchano la
# regexp impostata sotto con sigmatch.
# Se sigmatch non viene impostato vengono aggiunti tutti i file di sigdir. 

# sigmatch consente di restingere l'utilizzo dei signature file contenuti in
# sigdir a quelli che matchano la regexp impostata.
# esempio
# $cfg{'sigdir'} = "~/.sigs/";
# $cfg{'sigmatch'} = '^/home/huggie/\.sigs/(bc-.*|blackcat.*)$';
# matches all the sigs in /home/huggie/.sigs/ which start with bc- or
# blackcat.


#####################################################################
### plugins/10grep.pl                                             ###
### Choosing a tagline by grepping the message file                ###
#####################################################################

# grep is an optional plugin that is in the example-scripts directory
# in the tarball. It checks the messagefile for words and counts their
# frequency and then makes a list of tags which match some of the more
# common words and picks one of them. 
# I ended up not liking it since it always seemed to pull out the same
# tags for messages to the same lists.

# $cfg{'grep_debug'} = 0;
# $cfg{'grep_debugfile'} = "~/perl/huggietag/grep_debug";


#####################################################################
### examples/10dadadodo.pl                                        ###
### Choosing a tagline by using the program dadadodo by jwz       ###
### (http://www.jwz.org/dadadodo/)                                ###
### NB copy to plugins directory first                            ###
#####################################################################

# $cfg{'dadadodo_file'} = "~/Docs/funny/darwin-awards";


#####################################################################
### plugins/06marknlard.pl                                        ###
### Is it x Mark?  Sounds just like y.                            ###
### lettera di richiamo del plugin utilizzabile nelle macro: M    ###
### es: @M*@                                                      ###
### Replace with the Mark and Lard plugin for however many        ###
### characters it takes up without any padding                    ###
### Va personalizzato il file attribution, inserendo almeno una   ###
### coppia x:y.                                                   ###
### Ad esempio: inserendo Buzz Lightyear:him, l'output del plugin:###
### Is it Buzz Lightyear Mark?  Sounds just like him.             ###
###       ^^^^^^^^^^^^^^                         ^^^              ###
#####################################################################

# locazione del file attributions
#$cfg{'attributions'} = "~/.htag/attributions";

#####################################################################
### plugins/08uptime.pl                                           ###
### Give uptime                                                   ###
### lettera di richiamo del plugin utilizzabile nelle macro: U    ###
### es: @U50R@                                                    ###
### Replace with the uptime right aligned over 50 characters      ###
#####################################################################

# da utilizzare se si vuole far calcolare l'uptime che può essere
# aggiunto inserendo nella signature la relativa macro.
# uptime_time = 1 calcola
# uptime_time = 0 non calcola
$cfg{'uptime_time'} = 0;


#####################################################################
### plugins/09date.pl                                             ###
### Print date in any format                                      ###
### lettera di richiamo del plugin utilizzabile nelle macro: D    ###
### es: @D20@                                                     ###
### Replace with twenty characters of the date left aligned       ###
#####################################################################

# indica al plugin date quale formato utilizzare                  ###
# $cfg{'date_format'} = "%a %b %e %H:%M:%S %Y"; # Default
$cfg{'date_format'} = "%d/%m/%Y";


#####################################################################
### plugins/10simple.pl                                           ###
### Pick a tagline from a textfile or use fortune(1)              ###
#####################################################################

# Il plugin estrae:
# - una tagline dal file indicato se non è utilizzata l'opzione fortune
# - una fortune se è utilizzata solo l'opzione fortune
# - random una tagline o una fortiune se sono utilizzate entrambe le ozpioni

# Definisce il carattere di commento utilizzato nei tagfile.
# Si può utilizzare una regexp.
# Le linee che iniziano per il carattere di commento vengono ignorate.
$cfg{'tagline_comment_char'} = '#'; 

# tagfile/tagfiles/tagdir vanno definite di seguito se non si
# utilizzano i changeheaders.
# per utilizzare i changeheader vedi sample.htrc.changeheaders.default

# Specifica la locazione di un singolo tagfile.
# Opzione "Deprecated": preferibile usare tagfiles 
# $cfg{'tagfile'}   = "/usr/local/share/huggietag/taglines.tag";
$cfg{'tagfile'} = "~/.htag/quotes/ataualpa.fortunes.txt";

# Specifica la locazione di uno o più tagfiles.
# $cfg{'tagfiles'} = ["~/.htag/quotes/ataualpa.fortunes.txt","~/altra/path/"];

# tagdir specifica la directory contenente i signature files da utilizzare
# tagmatch consente di restingere l'utilizzo dei tagfile contenuti in
# tagdir a quelli che matchano la regexp impostata.
# The example below includes all files in /home/huggie/.tags/ except 
# /home/huggie/.tags/tech
# $cfg{'tagmatch'} = '^/home/huggie/.tags/(?!tech$)';
# $cfg{'tagdir'} = "~/.tags";

# Specifica la locazione del programma fortune
# $cfg{'fortune'} = '/usr/games/fortune';

# Specifica la probabilità (0 -> 1) che venga utilizzata una fortune
# piuttosto che una tagline se entrambe le opzioni sono state usate.
# $cfg{'fortuneval'} = 0.3;

# parametro opzionale utilizzabile per passare argomenti extra a fortune;
# ad esempio il nome di un fortune file diverso dal default.
# $cfg{'fortuneargs'} =
# '/usr/share/games/fortunes/';

#####################################################################
### plugins/15merge.pl                                            ###
### Merge signature and Tagline                                   ###
#####################################################################

# Il plugin "merge" gestisce i signature file che NON sono templated,
# ovvero che non contengono macro di stile (es: @68C@).
# In questo caso, la tagline è semplicemente aggiunta al sigfile, dopo
# essere stata wrappata, in base al settaggio dei parametri che seguono.

# definisce la lunghezza massima della linea prima che venga wrappata.
# Comprende la lunghezza di leader o first. 
$cfg{'maxlinelen'} = 72;

# First è quanto viene premesso all'estremo sinistro della prima linea.
# First deve essere di un carattere in meno rispetto a Leader.
$cfg{'first'}  = "";

# Leader viene premesso all'estremo sinistro della seconda e
# successive linee.
$cfg{'leader'} = "";

# Specifica quante linee inserire tra il contenuto del sigfile e la
# tagline (estratta dal tagfile) e appesa warappata al sigfile.
$cfg{'newline'} = 0;


#####################################################################
### plugins/25asktag.pl                                           ###
### Ask if you want this tagline                                  ###
#####################################################################

# settato a 1 significa che il plugin asktag mostrerà la tag estratta e
# unita alla signature, chiedendo se va bene.
# Possibili risposte:
# - quit
# - yes
# - go back to the beginning (to pick a new sig) or get a new tag
$cfg{'asktag'}    = 0;


#####################################################################
### plugins/35tearline.pl                                         ###
### Simple Tearline output                                        ###
#####################################################################

# Con il plugin tearline si gestisce l'inserimento di un'ultima linea
# in coda a tutta la signature, dal contenuto specificato tramite.

# tearline può essere valorizzato (case insensitive):
# OFF -> nessuna linea finale
# SHORT -> non include il random trailer (pretear + htag.pl + vers.)
# LONG -> include il random trailer (pretear + htag.pl + vers. + - + trailer)
$cfg{'tearline'} = "LONG";

# Se tearline è OFF si può omettere il settaggio di PRETEAR e RANDTEAR.

# PRETEAR deve essere lungo almeno 3 caratteri
# è il testo che viene premesso al resto della tearline
$cfg{'pretear'} =       "";

# specifica mediante un array delle frasi da attingere random.
# Se RANDTEAR non è settato è tearline è settata LONG, passa di
# default a SHORT

@{$cfg{'randtear'}} = ( "I love linux, my wife hates it! || www.ataualpa.altervista.org",
                        "Avoid the Gates of Hell! Choose Linux. || www.ataualpa.altervista.org",
                        "Linux is better: Open & Free! || www.ataualpa.altervista.org",
                        "Mutt, un bastardo di razza || www.ataualpa.altervista.org",
                        "Il Nirvana con Mutt, per veri mutter !! www.ataualpa.altervista.org",
                        "Marche, l'Italia in una regione! || www.ataualpa.altervista.org",
                        "Jesi e vivi bene. || www.ataualpa.altervista.org",
                        "Vivi a Jesi e non te stizzi. || www.ataualpa.altervista.org",
                        );


#####################################################################
### plugins/80header.pl                                           ###
### header output                                                 ###
#####################################################################

# Specifica tramite un array alcuni saluti introduttivi da attingere random
# e posizionare in testa al messaggio, subito dopo gli header.
# Il plugin lavora mediante parsing del contenuto dell'header "To:"
# @F viene valorizzato con il nome proprio
# @L viene valorizzato con il cognome
# @N viene valorizzato con nome e cognome 
# @B carriage return

@{$cfg{'randhead'}} = ( "Ciao \@F,\@B",
                        "Aloha \@F,\@B",
                        "Allora, caro il mio \@F!\@B",
                        "Azz!, allora caro \@F\@B",
                        "Salut \@F!\@B",
                        );