|
- #!/bin/sh
-
- prefix="/usr/local"
- maildir="${XDG_DATA_HOME:-$HOME/.local/share}/mail"
- muttshare="$prefix/share/mutt-wizard"
- cachedir="${XDG_CACHE_HOME:-$HOME/.cache}/mutt-wizard"
- muttrc="${XDG_CONFIG_HOME:-$HOME/.config}/mutt/muttrc"
- accdir="${XDG_CONFIG_HOME:-$HOME/.config}/mutt/accounts"
- msmtprc="${XDG_CONFIG_HOME:-$HOME/.config}/msmtp/config"
- msmtplog="${XDG_CONFIG_HOME:-$HOME/.config}/msmtp/msmtp.log"
- mbsyncrc="${MBSYNCRC:-$HOME/.mbsyncrc}"
- mpoprc="${XDG_CONFIG_HOME:-$HOME/.config}/mpop/config"
- alias mbsync='mbsync -c "$mbsyncrc"'
-
- # On Ubuntu/Debian, a link is needed since they use an older version.
- if command -V apt-get >/dev/null 2>&1; then
- ln -s "$msmtprc" "$HOME/.msmtprc" 2>/dev/null
- master="Master"
- slave="Slave"
- fi
-
- for x in "/etc/ssl/certs/ca-certificates.crt" \
- "/etc/pki/tls/certs/ca-bundle.crt" "/etc/ssl/cert.pem" \
- "/etc/ssl/ca-bundle.pem" "/etc/pki/tls/cacert.pem" \
- "/etc/pki/ca-trust/extracted/pem/tls-ca-bundle.pem" \
- "/usr/local/share/ca-certificates/"; do
- [ -f "$x" ] && sslcert="$x" && break
- done || { echo "CA Certificate not found. Please install one or link it to /etc/ssl/certs/ca-certificates.crt" && exit 1 ;}
-
- checkbasics() { command -V gpg >/dev/null 2>&1 && GPG="gpg" || GPG="gpg2"
- PASSWORD_STORE_DIR="${PASSWORD_STORE_DIR:-$HOME/.password-store}"
- [ -r "$PASSWORD_STORE_DIR/.gpg-id" ] || {
- echo "First run \`pass init <yourgpgemail>\` to set up a password archive."
- echo "(If you don't already have a GPG key pair, first run \`$GPG --full-generate-key\`.)"
- exit 1 ;} ;}
-
- getaccounts() { accounts="$(find -L "$accdir" -type f 2>/dev/null | grep -o "\S*.muttrc" | sed "s|.*/\([0-9]-\)*||;s/\.muttrc$//" | nl)" ;}
-
- list() { getaccounts && [ -n "$accounts" ] && echo "$accounts" || exit 1 ;}
-
- prepmsmtp() { echo "account $fulladdr
- host $smtp
- port ${sport:-465}
- from $fulladdr
- user $login
- passwordeval \"pass $fulladdr\"
- auth ${auth:-on}
- tls on
- tls_trust_file $sslcert
- logfile $msmtplog
- ${tlsline:-tls_starttls off}
- " >> "$msmtprc"
- }
-
- prepmbsync() { mkdir -p "${mbsyncrc%/*}"
- echo "
- IMAPStore $fulladdr-remote
- Host $imap
- Port ${iport:-993}
- User $login
- PassCmd \"pass $fulladdr\"
- AuthMechs LOGIN
- SSLType ${imapssl:-IMAPS}
- CertificateFile $sslcert
-
- MaildirStore $fulladdr-local
- Subfolders Verbatim
- Path ${XDG_DATA_HOME:-$HOME/.local/share}/mail/$fulladdr/
- Inbox ${XDG_DATA_HOME:-$HOME/.local/share}/mail/$fulladdr/${inbox:-INBOX}
-
- Channel $fulladdr
- Expunge Both
- ${master:-Far} :$fulladdr-remote:
- ${slave:-Near} :$fulladdr-local:
- Patterns * !\"[Gmail]/All Mail\"
- Create Both
- SyncState *
- MaxMessages ${maxmes:-0}
- ExpireUnread no
- # End profile
- " >> "$mbsyncrc" ;}
-
- prepmpop() { mkdir -p "${mpoprc%/*}"
- echo "
- account $fulladdr
- tls on
- user $login
- host $imap
- delivery maildir ${XDG_DATA_HOME:-$HOME/.local/share}/mail/$fulladdr/${inbox:-INBOX}
- passwordeval pass $fulladdr
- " >> "$mpoprc" ;}
-
- prepmutt() { echo "# vim: filetype=neomuttrc
- # muttrc file for account $fulladdr
- set realname = \"$realname\"
- set from = \"$fulladdr\"
- set sendmail = \"msmtp -a $fulladdr\"
- alias me $realname <$fulladdr>
- set folder = \"$folder\"
- set header_cache = $cachedir/$fulladdr/headers
- set message_cachedir = $cachedir/$fulladdr/bodies
- set mbox_type = Maildir
- set hostname = \"$hostname\"
- source $muttshare/switch.muttrc
- set spoolfile = "+INBOX"
- set postponed = "+Drafts"
- set trash = "+Trash"
- set record = "+Sent"
- $extra
- $synccmd
- " > "$accdir/$fulladdr.muttrc"
-
- [ ! -f "$muttrc" ] && echo "# vim: filetype=neomuttrc" > "$muttrc"
- ! grep -q "^source.*mutt-wizard.muttrc" "$muttrc" && echo "source $muttshare/mutt-wizard.muttrc" >> "$muttrc"
- ! grep "^source.*.muttrc" "$muttrc" | grep -qv "$muttshare/mutt-wizard.muttrc" && echo "source $accdir/$fulladdr.muttrc" >> "$muttrc"
- echo "macro index,pager i$idnum '<sync-mailbox><enter-command>source $accdir/$fulladdr.muttrc<enter><change-folder>!<enter>;<check-stats>' \"switch to $fulladdr\"" >> "$muttrc"
- }
-
- getprofiles() { \
- mkdir -p "${muttrc%/*}" "$accdir" "${XDG_CONFIG_HOME:-$HOME/.config}/msmtp"
- unset msmtp_header msmtp_profile mutt_profile mbsync_profile
- case "$iport" in
- 1143) imapssl=None ;;
- 143) imapssl=STARTTLS ;;
- esac
- case "$type" in
- online) folder="imaps://$login@$imap:${iport:-993}"
- extra="set imap_user = \"$login\"
- set imap_pass = \"\`pass $fulladdr\`\"
- set ssl_starttls = yes
- set ssl_force_tls = yes"
- ;;
- pop) synccmd="macro index o \"<shell-escape>mpop $fulladdr<enter>\" \"run mpop to get $fulladdr's mail\""
- folder="$maildir/$fulladdr"
- prepmpop ;;
- *) synccmd="macro index o \"<shell-escape>mw -y $fulladdr<enter>\" \"run mbsync to sync $fulladdr\""
- folder="$maildir/$fulladdr"
- prepmbsync ;;
- esac
- prepmsmtp
- prepmutt
- prepnotmuch # Create a notmuch config file if not present already.
- }
-
- parsedomains(){ serverinfo="$(grep "^${fulladdr#*@}" "$muttshare/domains.csv" 2>/dev/null)"
-
- [ -z "$serverinfo" ] && serverinfo="$(grep "$(echo "${fulladdr#*@}" | sed "s/\.[^\.]*$/\.\\\*/")" "$muttshare/domains.csv" 2>/dev/null)"
-
- IFS=, read -r service imapsugg iportsugg smtpsugg sportsugg <<EOF
- $serverinfo
- EOF
- imap="${imap:-$imapsugg}"
- smtp="${smtp:-$smtpsugg}"
- sport="${sport:-$sportsugg}"
- iport="${iport:-$iportsugg}"
- }
-
- delete() { if [ -z "${fulladdr+x}" ]; then
- echo "Select the account you would like to delete (by number):"
- list || exit 1
- read -r input
- match="^\s*$input\s\+"
- else
- match="\s\+$fulladdr$"
- getaccounts
- fi
-
- fulladdr="$(echo "$accounts" | grep "$match" | grep -o "\S*@\S*")"
-
- [ -z "$fulladdr" ] && echo "$fulladdr is not a valid account name." && return 1
-
- sed -ibu "/IMAPStore $fulladdr-remote$/,/# End profile/d" "$mbsyncrc" 2>/dev/null ; rm -f "$mbsyncrc"bu
- rm -rf "${cachedir:?}/${fulladdr:?}" "$accdir/$fulladdr.muttrc" "$accdir/"[0-9]-"$fulladdr.muttrc"
- sed -ibu "/\([0-9]-\)\?$fulladdr.muttrc/d" "$muttrc" 2>/dev/null; rm -f "$muttrc"bu
- sed -ibu "/account $fulladdr$/,/^\(\s*$\|account\)/d" "$msmtprc" 2>/dev/null; rm -f "$msmtprc"bu
- sed -ibu "/account $fulladdr$/,/^\(\s*$\|account\)/d" "$mpoprc" 2>/dev/null; rm -f "$mpoprc"bu
- pass rm -f "$fulladdr" >/dev/null 2>&1
- [ -n "${purge+x}" ] && rm -rf "${maildir:?}/${fulladdr:?}"
-
- for file in "$msmtprc" "$mbsyncrc" "$mpoprc"; do
- sed -ibu 'N;/^\n$/D;P;D;' "$file" 2>/dev/null; rm -f "$file"bu
- done
- }
-
- askinfo() { \
- [ -z "$fulladdr" ] && echo "Give the full email address to add:" &&
- read -r fulladdr
- while ! echo "$fulladdr" | grep -qE "^.+@.+\.[A-Za-z]+$"; do
- echo "$fulladdr is not a valid email address. Please retype the address:"
- read -r fulladdr
- done
- getaccounts; echo "$accounts" | grep -q "\s$fulladdr$" 2>/dev/null &&
- { echo "$fulladdr has already been added" && exit 1 ;}
- { [ -z "$imap" ] || [ -z "$smtp" ] ;} && parsedomains
- [ -z "$imap" ] && echo "Give your email server's IMAP address (excluding the port number):" &&
- read -r imap
- [ -z "$smtp" ] && echo "Give your email server's SMTP address (excluding the port number):" &&
- read -r smtp
- [ "$sport" = 587 ] && tlsline="# tls_starttls"
- [ -z "$realname" ] && realname="${fulladdr%%@*}"
- hostname="${fulladdr#*@}"
- login="${login:-$fulladdr}"
- if [ -n "${password+x}" ]; then
- createpass
- else
- getpass
- fi
- }
-
- createpass() { echo "$password" > "$PASSWORD_STORE_DIR/$fulladdr"
- "$GPG" -qe $(printf -- " -r %s" $(cat "$PASSWORD_STORE_DIR/.gpg-id")) "$PASSWORD_STORE_DIR/$fulladdr"
- rm -f "$PASSWORD_STORE_DIR/$fulladdr" ;}
-
- getpass() { while : ; do pass rm -f "$fulladdr" >/dev/null 2>&1
- pass insert -f "$fulladdr" && break; done ;}
-
- getboxes() { if [ -n "${force+x}" ] ; then
- mailboxes="$(printf "INBOX\\nDrafts\\nJunk\\nTrash\\nSent\\nArchive")"
- else
- info="$(curl --location-trusted -s -m 5 --user "$login:$(pass "$fulladdr")" --url "${protocol:-imaps}://$imap:${iport:-993}")"
- [ -z "$info" ] && echo "Log-on not successful." && return 1
- mailboxes="$(echo "$info" | grep -v HasChildren | sed "s/.*\" //;s/\"//g" | tr -d '\r')"
- fi
- [ "$type" = "pop" ] && mailboxes="INBOX"
- for x in $(sed -n "/^macro.* i[0-9] / s/\(^macro.* i\| .*\)//gp " "$muttrc" | sort -u; echo 0); do
- idnum=$((idnum + 1))
- [ "$idnum" -eq "$x" ] || break
- done
- toappend="mailboxes $(echo "$mailboxes" | sed "s/^/\"=/;s/$/\"/" | paste -sd ' ' - )"
- }
-
- finalize() { echo "$toappend" >> "$accdir/$fulladdr.muttrc"
- [ "$type" != "online" ] && echo "$mailboxes" | xargs -I {} mkdir -p "$maildir/$fulladdr/{}/cur" "$maildir/$fulladdr/{}/tmp" "$maildir/$fulladdr/{}/new"
- echo "$fulladdr (account #$idnum) added successfully."
- command -V urlview >/dev/null 2>&1 && [ ! -f "$HOME/.urlview" ] && echo "COMMAND \$BROWSER" > "$HOME/.urlview"
- return 0 ;}
-
- prepnotmuch() { \
- [ -z "$NOTMUCH_CONFIG" ] && NOTMUCH_CONFIG="$HOME/.notmuch-config"
- [ -f "$NOTMUCH_CONFIG" ] && return 0
- echo "[database]
- path=$maildir
- [user]
- name=$realname
- primary_email=$fulladdr
- [new]
- tags=unread;inbox;
- ignore=.mbsyncstate;.uidvalidity
- [search]
- exclude_tags=deleted;spam;
- [maildir]
- synchronize_flags=true
- [crypto]
- gpg_path=$GPG" > "$NOTMUCH_CONFIG" ;}
-
- togglecron() { cron="$(mktemp)"
- crontab -l > "$cron"
- if grep -q mailsync "$cron"; then
- echo "Removing automatic mailsync..."
- sed -ibu /mailsync/d "$cron"; rm -f "$cron"bu
- else
- echo "Adding automatic mailsync every ${cronmin:-10} minutes..."
- echo "*/${cronmin-10} * * * * $prefix/bin/mailsync" >> "$cron"
- fi &&
- crontab "$cron"; rm -f "$cron" ;}
-
- setact() { if [ -n "${action+x}" ] && [ "$action" != "$1" ]; then
- echo "Running $1 with $action..."
- echo "Incompatible options given. Only one action may be specified per run."
- return 1
- else
- action="$1"
- fi; }
-
- mwinfo() { cat << EOF
- mw: mutt-wizard, auto-configure email accounts for mutt
- including downloadable mail with \`isync\`.
-
- Main actions:
- -a your@email.com Add an email address
- -l List email addresses configured
- -d Remove an already added address
- -D your@email.com Force remove account without confirmation
- -y your@email.com Sync mail for account by name
- -Y Sync mail for all accounts
- -t number Toggle automatic mailsync every <number> minutes
- -T Toggle automatic mailsync
- -r Reorder account numbers
-
- Options allowed with -a:
- -u Account login name if not full address
- -n "Real name" to be on the email account
- -i IMAP/POP server address
- -I IMAP/POP server port
- -s SMTP server address
- -S SMTP server port
- -x Password for account (recommended to be in double quotes)
- -p Install for a Protonmail account.
- -P Add for a POP server instead of IMAP.
- -X Delete an account's local email too when deleting.
- -o Configure address, but keep mail online.
- -f Assume typical English mailboxes without attempting log-on.
-
- NOTE: Once at least one account is added, you can run
- \`mbsync -a\` to begin downloading mail.
-
- To change an account's password, run \`pass edit your@email.com\`.
- EOF
- }
-
- reorder(){
- tempfile="$(mktemp -u)"
- trap 'rm -f $tempfile' HUP INT QUIT TERM PWR EXIT
- echo "# Carefully reorder these accounts with the desired numbers." > "$tempfile"
- sed -n "
- / i[0-9] / s?\(.* i\|'<sync.*/\|\.muttrc.*\)??g p
- " "$muttrc" > "$tempfile"
- ${EDITOR:-vim} "$tempfile" || exit 1
- default="$(sort -n "$tempfile" | head -n 1)"
- default="${default#* }"
- sed -ibu "/.* i[0-9] .*.muttrc/d" "$muttrc" 2>/dev/null; rm -f "$muttrc"bu
- awk -v a="$accdir" -v d="$default" ' BEGIN { print "source "a"/"d".muttrc" }
- {
- print "macro index,pager i"$1" '\''<sync-mailbox><enter-command>source "a"/"$2".muttrc<enter><change-folder>!<enter>;<check-stats>'\'' \"switch to "$2"\""
- }
- ' "$tempfile" >> "$muttrc"
-
- }
-
- while getopts "rfpPXlhodTYD:y:i:I:s:S:u:a:n:x:m:t:" o; do case "${o}" in
- l) setact list || exit 1 ;;
- r) setact reorder || exit 1 ;;
- d) setact delete || exit 1 ;;
- D) setact delete || exit 1 ; fulladdr="$OPTARG" ;;
- y) setact sync || exit 1 ; fulladdr="$OPTARG" ;;
- Y) setact sync || exit 1 ;;
- a) setact add || exit 1 ; fulladdr="$OPTARG" ;;
- i) setact add || exit 1 ; imap="$OPTARG" ;;
- I) setact add || exit 1 ; iport="$OPTARG" ;;
- s) setact add || exit 1 ; smtp="$OPTARG" ;;
- S) setact add || exit 1 ; sport="$OPTARG" ;;
- u) setact add || exit 1 ; login="$OPTARG" ;;
- n) setact add || exit 1 ; realname="$OPTARG" ;;
- m) setact add || exit 1 ; maxmes="$OPTARG" ;;
- o) setact add || exit 1 ; type="online" ;;
- P) setact add || exit 1 ; type="pop"; protocol="pop3s" ; iport="${iport:-995}" ;;
- f) setact add || exit 1 ; force=True ;;
- x) setact add || exit 1 ; password="$OPTARG" ;;
- X) setact delete || exit 1 ; purge=True ;;
- t) setact toggle || exit 1 ; cronmin="$OPTARG" ;;
- T) setact toggle || exit 1 ;;
- p) echo "NOTE: Protonmail users must install and configure Protonmail Bridge first for the first sync to work."
- protocol="imap"
- imap="127.0.0.1"
- iport="1143"
- smtp="127.0.0.1"
- sport="1025"
- auth="login"
- tlsline="tls_fingerprint $(msmtp --serverinfo --host=$smtp --port=$sport --tls --tls-certcheck=off | sed -n '/SHA256:/ s/^\s*SHA256:\s*// p')"
- setact add || exit 1
- ;;
- *) mwinfo; exit 1 ;;
- esac done
-
- case "$action" in
- list) list ;;
- add) checkbasics && askinfo && getboxes && getprofiles && finalize ;;
- delete) delete ;;
- sync) mailsync $fulladdr ;;
- toggle) togglecron ;;
- reorder) reorder ;;
- *) mwinfo; exit 1 ;;
- esac
|