ninewise/configuration
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

flag only unseen messages

Browse Source
This commit is contained in:
Felix Van der Jeugt 2021-03-16 10:47:31 +01:00
parent bc14edc71c
commit da17f79fec
No known key found for this signature in database
GPG Key ID: 58B209295023754D
4 changed files with 27 additions and 30 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
local/bin/marchive
View File

@ -1,6 +0,0 @@
#!/bin/sh
if [ -z "$*" ]; then
mflag -Sf
else
mflag -Sf "$@"
fi

40
local/bin/mfetch
View File

@ -1,18 +1,22 @@
#!/bin/sh #!/bin/sh
# Split outbox emails # Split outbox emails
mlist /data/mail/outbox | mpick -t 'from =~ "posteo"' | mflag -F | mrefile /data/mail/posteo/Sent mlist /data/mail/outbox | mpick -t 'from =~~ "posteo"' | mflag -F | mrefile /data/mail/posteo/Sent
mlist /data/mail/outbox | mpick -t 'from =~ "ugent"' | mflag -F | mrefile /data/mail/ugent/Sent mlist /data/mail/outbox | mpick -t 'from =~~ "ugent"' | mflag -F | mrefile /data/mail/ugent/Sent
mlist /data/mail/outbox | mpick -t 'from =~ "gmail"' | mflag -F | mrefile /data/mail/gmail/Sent mlist /data/mail/outbox | mpick -t 'from =~~ "gmail"' | mflag -F | mrefile /data/mail/gmail/Sent
# Find new messages in feeds # Find new messages in feeds
d="$(mktemp -d)" d="$(mktemp -d)"
mmkdir "$d" mmkdir "$d"
date
sfeed_update sfeed_update
date
sfeed_mbox ~/.sfeed/feeds/* | mdeliver -M -v "$d" | while read mail; do sfeed_mbox ~/.sfeed/feeds/* | mdeliver -M -v "$d" | while read mail; do
if ! mlist /data/mail/feeds | magrep -q message-id:"$(mshow -qh message-id "$mail" | cut -d' ' -f2)"; then if ! mlist /data/mail/feeds | magrep -q message-id:"$(mshow -qh message-id "$mail" | cut -d' ' -f2)"; then
mdeliver /data/mail/feeds < "$mail" mdeliver /data/mail/feeds < "$mail"
# TODO -X dfprst or -X '' (no flags)
fi fi
done done
date
rm -rf "$d" rm -rf "$d"
# Sync email # Sync email
@ -24,28 +28,28 @@ if ! mdirs /data/mail | mlist -N | grep -q .; then
fi fi
# Incorporate new mails and store them in the temp sequence # Incorporate new mails and store them in the temp sequence
minc $(mdirs /data/mail) | mflag -F | mseq -S s="$(mktemp)"
minc $(mdirs /data/mail) > "$s"
{ {
# Ignores # Ignores
mpick -t 'to =~ "unipept@ugent.be" && subject ~~ "*Mysql2::Error::ConnectionError*"' mpick -t 'to =~ "unipept@ugent.be" && subject ~~ "*Mysql2::Error::ConnectionError*"' < "$s"
mpick -t 'to =~ "dodona@ugent.be" && from =~ "KlasCement"' mpick -t 'to =~ "dodona@ugent.be" && from =~ "logcheck system account"' < "$s"
mpick -t 'to =~ "dodona@ugent.be" && from =~ "logcheck system account"' mpick -t 'to =~ "dodona@ugent.be" && subject =~ "A request took"' < "$s"
mpick -t 'to =~ "dodona@ugent.be" && subject =~ "A request took"' mpick -t 'to =~ "dodona@ugent.be" && subject =~ "Onderwijsinstelling aangemaakt voor"' < "$s"
mpick -t 'to =~ "dodona@ugent.be" && subject =~ "Onderwijsinstelling aangemaakt voor"' mpick -t 'to =~ "dodona@ugent.be" && subject =~ "Een gebruiker kon niet inloggen"' < "$s"
mpick -t 'to =~ "dodona@ugent.be" && subject =~ "Een gebruiker kon niet inloggen"' mpick -t 'to =~ "dodona@ugent.be" && subject =~ "Invalid or unknown LTI provider"' < "$s"
mpick -t 'to =~ "dodona@ugent.be" && subject =~ "Invalid or unknown LTI provider"' mpick -t 'to =~ "dodona@ugent.be" && subject =~ "Faraday::ConnectionFailed"' < "$s"
mpick -t 'to =~ "dodona@ugent.be" && subject =~ "Faraday::ConnectionFailed"' mpick -t 'to =~ "dodona@ugent.be" && subject =~ "internal error"' < "$s" \
mpick -t 'to =~ "dodona@ugent.be" && subject =~ "internal error"' \
| xargs grep -E -l 'course_id: (284|317|335|339|346|349|355|359|374|375|376|380|384|414)' | xargs grep -E -l 'course_id: (284|317|335|339|346|349|355|359|374|375|376|380|384|414)'
mpick -t 'to =~ "dodona@ugent.be" && subject =~ "internal error"' \ mpick -t 'to =~ "dodona@ugent.be" && subject =~ "internal error"' < "$s" \
| xargs grep -E -l 'user_id: 3' | xargs grep -E -l 'user_id: 3'
mpick -t 'subject =~ "\[hackers\] \[slstatus\]"' mpick -t 'subject =~ "\[hackers\] \[slstatus\]"' < "$s"
mpick -t 'from =~ "dependabot-preview"' mpick -t 'from =~ "dependabot-preview"' < "$s"
# Muted mails # Muted mails
for muted in $(cat ~/.mblaze/muted); do for muted in $(cat ~/.mblaze/muted); do
mpick -t '"references" =~~ "'"$muted"'"' mpick -t '"references" =~~ "'"$muted"'"' < "$s"
done done
} | sort | uniq | mflag -Sf } | sort | uniq | mflag -Sf
@ -53,5 +57,5 @@ minc $(mdirs /data/mail) | mflag -F | mseq -S
#mseq -f < ~/.mblaze/muted | mpick -t 'date < "'"$(date -I -d '1 month ago')"'"' | sponge ~/.mblaze/muted #mseq -f < ~/.mblaze/muted | mpick -t 'date < "'"$(date -I -d '1 month ago')"'"' | sponge ~/.mblaze/muted
# Show the remaining new mails # Show the remaining new mails
mseq -f | mlist -F | mseq -S mseq -f < "$s" | mpick -t 'flagged || ! seen' | mseq -S
mscan mscan

2
local/bin/mspam
View File

@ -1,2 +0,0 @@
#!/bin/sh
mflag -STf "$@"

9
yashrc
View File

@ -52,13 +52,14 @@ unset GREEN
unset RESET unset RESET
# Color ls # Color ls
# ls_() {
# lr -1FGG "$@" | git column --mode=dense --padding=3
# }
# alias ls="ls_"
alias ls="ls --color=auto" alias ls="ls --color=auto"
alias ll="lr -Fl1Ghov" alias ll="lr -Fl1Ghov"
# Email
alias marchive="mflag -fSt"
alias mspam="mflag -fST"
alias mkeep="mflag -FSt"
# There is only one vis # There is only one vis
alias vim="vis" alias vim="vis"
alias vi="vis" alias vi="vis"