From 61839232124e7db4f9384aac04cf9334ce8c7be4 Mon Sep 17 00:00:00 2001
From: Miquel Lionel <lionelmiquel@sfr.fr>
Date: Tue, 10 Nov 2020 10:54:21 +0100
Subject: Commit initial
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

On ajoute les fichiers. On normalise le nom des icônes en favicon.ico puis on
met la notif de suppression des fichiers au-dessus du tableau, plus pratique
si il y a BEAUCOUP de liens créés.
---
 install.sh | 174 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 174 insertions(+)
 create mode 100755 install.sh

(limited to 'install.sh')

diff --git a/install.sh b/install.sh
new file mode 100755
index 0000000..508f4bb
--- /dev/null
+++ b/install.sh
@@ -0,0 +1,174 @@
+# !/bin/sh
+THIS_SCRIPT_DIR="$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)"
+emailre=".\+@.\+\\..\+"
+GPIGEON_SCRIPT=$THIS_SCRIPT_DIR/cgi-bin/gpigeon.cgi
+
+command -V gpg >/dev/null 2>&1 && GPG="gpg" || GPG="gpg2"
+printf "Welcome to the gpigeon.cgi installer. We will first install the
+dependencies.\n"
+
+apt install perl gcc make cpanminus libnet-ssleay-perl
+cpanm Digest::SHA Email::Valid String::Random HTML::Entities CGI CGI::Carp
+Net::SMTP Net::SMTPS GPG || ( printf "\nInstallation of dependencies failed\n" && exit 1 )
+
+while [[ -z $_APP_PASSWORD ]]; do
+    printf "Choose a password for the gpigeon web application: \n"
+    read -r -s _APP_PASSWORD
+done
+
+while [[ $_APP_PASSWORD_VERIFICATION != $_APP_PASSWORD ]]; do
+    printf "\nRepeat password: "
+    read -r -s _APP_PASSWORD_VERIFICATION
+done
+
+# prevent obscure errors with q{} from perl
+_APP_PASSWORD="$(echo $_APP_PASSWORD | sed s/{/\\\\{/g | sed s/}/\\\\}/g)"
+HASHED_PASSWORD=`perl -e "use Digest::SHA qw(sha256_hex);print sha256_hex(q{$_APP_PASSWORD});"`
+printf "\nPassword matches. The SHA256 hash of it is: \033[32m$HASHED_PASSWORD\033[0m\n"
+
+printf "\nWhat is your email address: "
+read -r _YOUR_EMAIL
+while ! echo "$_YOUR_EMAIL" | grep "$emailre" >/dev/null; do
+    printf "\nYour email address is not a valid one. Type it again: "
+    read -r _YOUR_EMAIL
+done
+printf "\033[32m$_YOUR_EMAIL\033[0m seems a valid e-mail address."
+
+while [[ -z $_YOUR_EMAIL_PASSWORD ]]; do
+    printf "\nPassword for your email account: "
+    read -r -s _YOUR_EMAIL_PASSWORD
+done
+
+while [[ -z $_YOUR_EMAIL_PASSWORD_VERIFICATION != $_YOUR_EMAIL_PASSWORD ]]; do
+    printf "\nAgain for confirmation: "
+    read -r -s _YOUR_EMAIL_PASSWORD_VERIFICATION
+done
+
+_YOUR_EMAIL_PASSWORD_VERIFICATION=$(printf '%s\n' "$_YOUR_EMAIL_PASSWORD" | sed -e 's/[]\/$*.^[]/\\&/g');
+
+
+domain="$(echo "$_YOUR_EMAIL" | sed "s/.*@//")"
+serverinfo="$(grep "^$domain" "domains.csv" 2>/dev/null)"
+if [ -z "$serverinfo" ]; then
+    printf "\nAh. Your email domain isn't listed in the domains.csv file. Don't
+    worry, you can find info relating to that easily on the domain website /
+    the Internet, and type it in here."
+    while ! echo "$smtp" | grep -Eo "[.[:alnum:]]"; do
+        printf "\nWhat is the SMTP server address of your domain (generally it
+        is like this: smtp.domain.net)? "
+        read -r smtp
+    done
+
+    while ! echo "$sport" | grep -Eo "[0-9]{1,5}"; do
+        printf "\nWhat is the SMTP server port (it is 465 or 587 in most
+        cases) ? "
+        read -r sport
+    done
+else
+    print "Yay! Your email domain seems to be listed in domains.csv, so you don't
+    have to manually type the smtp server address and port manually."
+    IFS=, read service imap iport smtp sport <<EOF
+    $serverinfo
+EOF
+    # smtp and sport variable are the only useful variable for our use case
+fi
+gpgidlong="$($GPG -k --with-colons $_YOUR_EMAIL| awk -F: '/^pub:/ {print $5}')"
+
+if [ -z gpgid ]; then
+    printf "No GPG key pair are related to your email. Create one and launch
+    this script again."
+    exit 0
+else
+    printf "\nGPG keyid associated to $_YOUR_EMAIL : \033[32m0x$gpgidlong\033[0m."
+fi
+
+while ! echo "$SCRIPT_DIR" | grep -Eo "^/"; do
+    printf "\nWhich directory you want the script to be in (defaults to
+    /var/www/cgi-bin/) ? Please provide an absolute path: "
+    read -r SCRIPT_DIR
+done
+
+printf "\nWhat user and group you want to use for the gpigeon CGI script
+(defaults to www-data for both):"
+printf "\nUser: "
+read -r SCRIPT_USER
+printf "\nGroup (leave blank for same as user): "
+read -r SCRIPT_GROUP
+
+if [ -z SCRIPT_USER ]; then
+    SCRIPT_USER="www-data"
+else
+    while ! id $SCRIPT_USER; do
+        printf "\nThe user you typed doesn't seem to exist. Try again with a
+        valid one: "
+        read -r SCRIPT_USER
+    done
+fi
+
+if [ -z SCRIPT_GROUP ]; then
+    SCRIPT_GROUP=$SCRIPT_USER
+else
+    while ! getent group $SCRIPT_GROUP; do
+        printf "\nThe group you typed doesn't seem to exist. Try again with a
+        valid one: "
+        read -r SCRIPT_GROUP
+    done
+fi
+
+printf "\nWhere will be put the static files ? Defaults to
+/var/www/html/gpigeon. Please provide an absolute path: "
+read -r SCRIPT_STATIC_DIR
+
+if [ -z SCRIPT_STATIC_DIR ]; then
+    SCRIPT_STATIC_DIR='/var/www/html/gpigeon'
+else
+    while ! echo $SCRIPT_STATIC_DIR | grep -Eo "^/"; do
+        printf "\nSeems you didn't provided an absolute path. Try again : "
+        read -r SCRIPT_STATIC_DIR
+    done
+fi
+
+cp $THIS_SCRIPT_DIR/gpigeon-template.cgi $GPIGEON_SCRIPT
+sed "s/password_hash_goes_here/$HASHED_PASSWORD/g" -i $GPIGEON_SCRIPT
+sed "s/your_mail_address_goes_here/$_YOUR_EMAIL/g" -i $GPIGEON_SCRIPT
+sed "s/your_mail_address_password_goes_here/$_YOUR_EMAIL_PASSWORD_VERIFICATION/g" -i $GPIGEON_SCRIPT
+sed "s/smtp_domain_goes_here/$smtp/g" -i $GPIGEON_SCRIPT
+sed "s/smtp_port_goes_here/$sport/g" -i $GPIGEON_SCRIPT
+sed "s/gpgid_goes_here/$gpgidlong/g" -i $GPIGEON_SCRIPT
+
+printf "\n\nCreating script directory at $SCRIPT_DIR ..."
+mkdir -p "$SCRIPT_DIR/l" || exit 1
+
+printf "\nCreating static files directory at $SCRIPT_STATIC_DIR"
+mkdir -p "$SCRIPT_STATIC_DIR" || exit 1
+
+printf "\nCopying personalized gpigeon.cgi script to $SCRIPT_DIR ..."
+cp $GPIGEON_SCRIPT $SCRIPT_DIR/ || exit 1
+
+printf "\nCopying static files to $SCRIPT_STATIC_DIR ..."
+cp -r $THIS_SCRIPT_DIR/gpigeon $SCRIPT_STATIC_DIR || exit 1
+cp $THIS_SCRIPT_DIR/gpigeon.css $SCRIPT_STATIC_DIR || exit 1
+
+printf "\nSetting ownership as $SCRIPT_USER:$SCRIPT_GROUP for directory $SCRIPT_DIR ..."
+chown $SCRIPT_GROUP:$SCRIPT_USER $SCRIPT_DIR || exit 1
+
+printf "\nSetting ownership as $SCRIPT_USER:$SCRIPT_GROUP for static directory
+$SCRIPT_STATIC_DIR ..."
+chown $SCRIPT_GROUP:$SCRIPT_USER $SCRIPT_STATIC_DIR || exit 1
+
+printf "\nSetting up the GPG directory for the script ..."
+if [ -z GNUPGHOME ]; then
+    mkdir -p /usr/share/www-data/.gnupg
+    cp -r ~/.gnupg /usr/share/www-data/
+    chown $SCRIPT_USER:$SCRIPT_GROUP /usr/share/www-data/.gnupg
+    chmod 600 /usr/share/www-data/.gnupg
+else
+    mkdir -p $GNUPGHOME
+    cp -r ~/.gnupg /usr/share/www-data/
+    chown $SCRIPT_USER:$SCRIPT_GROUP $GNUPGHOME
+    chmod 600 $GNUPGHOME
+fi
+
+printf "\n\033[32mCongrats, we are done! You should now configure your web server in
+order to execute the CGI scripts in the $SCRIPT_DIR folder. Manuals and
+websites of these softwares will help you.\033[0m\n\n"
-- 
cgit v1.2.3-70-g09d2