[emacs] add cpitclaudel's tangomod{,-dark} themes
[~bandali/configs] / rc.org
diff --git a/rc.org b/rc.org
index 03975b7..c96454e 100644 (file)
--- a/rc.org
+++ b/rc.org
@@ -389,6 +389,52 @@ wintypes:
 };
 #+end_src
 
+** dovecot
+:PROPERTIES:
+:header-args+: :tangle "/sudo::/etc/dovecot/dovecot.conf"
+:END:
+
+#+begin_src conf
+protocols = imap
+
+listen = 127.0.0.1
+log_path = /var/log/dovecot.log
+info_log_path = /var/log/dovecot-info.log
+
+ssl = no
+disable_plaintext_auth = no
+
+auth_verbose = yes
+auth_mechanisms = plain
+
+passdb {
+  driver = passwd-file
+  args = /etc/dovecot/passwd
+}
+
+userdb {
+  driver = static
+  args = uid=amin gid=amin home=/home/amin/mail/%d/%n
+  default_fields = mail=maildir:/home/amin/mail/%d/%n/mail
+}
+
+# mail_home = /home/amin/mail/%d/%n
+# mail_location = maildir:/home/amin/mail/%d/%n/mail:LAYOUT=fs:INBOX=/home/amin/mail/%d/%n/mail/Inbox
+
+# namespace {
+#   inbox = yes
+#   separator = /
+# }
+
+mail_plugins = $mail_plugins fts fts_lucene
+
+plugin {
+  fts = lucene
+  fts_lucene = whitespace_chars=@.
+  fts_autoindex = yes
+}
+#+end_src
+
 ** Dunst
 :PROPERTIES:
 :header-args+: :tangle ~/.config/dunst/dunstrc
@@ -643,7 +689,7 @@ timeout = 0
 [retriever]
 type = SimplePOP3SSLRetriever
 server = fencepost.gnu.org
-username = aminb
+username = bandali
 password_command = ("gpg2", "--no-tty", "-q", "-d", "/home/amin/.passwd/gnu.gpg")
 port = 995
 use_apop = True
@@ -781,7 +827,7 @@ WantedBy=timers.target
 **** send-email
 #+begin_src conf
 [sendemail]
-       smtpuser = aminb
+       smtpuser = bandali
        smtpserver = fencepost.gnu.org
        smtpserverport = 587
        smtpencryption = tls
@@ -921,6 +967,7 @@ separator_width=0
 general {
         colors = true
         interval = 5
+        output_format = "i3bar"
 }
 
 # order += "ipv6"
@@ -987,10 +1034,12 @@ disk "/data" {
 #+begin_src conf
 # Global defaults
 CopyArrivalDate yes
+Create Both
+Expunge Both
 
 ######
 IMAPAccount amin
-Host nix.aminb.org
+Host mail.aminb.org
 User amin@aminb.org
 PassCmd "gpg -q --for-your-eyes-only --no-tty -d ~/.passwd/amin.gpg"
 SSLType IMAPS
@@ -998,17 +1047,20 @@ SSLType IMAPS
 IMAPStore amin-remote
 Account amin
 
-MaildirStore amin-local
-Path ~/mail/amin/
-Inbox ~/mail/amin/Inbox
-SubFolders Verbatim
+IMAPAccount amin-dovecot
+Host 127.0.0.1
+Port 143
+User amin@aminb.org
+PassCmd "gpg -q --for-your-eyes-only --no-tty -d ~/.passwd/amin-dovecot.gpg"
+SSLType None
+
+IMAPStore amin-local
+Account amin-dovecot
 
 Channel amin
 Master :amin-remote:
 Slave :amin-local:
-Patterns * !dovecot*
-Create Both
-SyncState *
+Patterns *
 
 ######
 IMAPAccount uwaterloo
@@ -1020,17 +1072,20 @@ SSLType IMAPS
 IMAPStore uwaterloo-remote
 Account uwaterloo
 
-MaildirStore uwaterloo-local
-Path ~/mail/uwaterloo/
-Inbox ~/mail/uwaterloo/Inbox
-SubFolders Verbatim
+IMAPAccount uwaterloo-dovecot
+Host 127.0.0.1
+Port 143
+User abandali@uwaterloo.ca
+PassCmd "gpg -q --for-your-eyes-only --no-tty -d ~/.passwd/uwaterloo-dovecot.gpg"
+SSLType None
+
+IMAPStore uwaterloo-local
+Account uwaterloo-dovecot
 
 Channel uwaterloo
 Master :uwaterloo-remote:
 Slave :uwaterloo-local:
-Patterns * !dovecot*
-Create Both
-SyncState *
+Patterns *
 #+end_src
 
 *** mbsync.service
@@ -1534,9 +1589,9 @@ logfile ~/.msmtp.log
 
 # aminb
 account aminb
-host nix.aminb.org
+host mail.aminb.org
 # use `msmtp -a aminb --serverinfo --tls --tls-certcheck=off --tls-fingerprint=` to get the current fingerprint
-tls_fingerprint 98:C7:F0:02:7F:2B:D8:B6:D3:BF:E8:C1:D4:07:6B:B5:6C:B1:C7:5D:97:20:70:88:AB:9E:B5:09:5D:2C:DC:8E
+tls_fingerprint C7:A4:2E:A3:11:FA:80:45:C4:29:D6:62:4D:73:DB:34:43:67:8F:16:F1:2E:54:43:06:1B:41:B6:A9:09:E0:37
 tls_starttls on
 from amin@aminb.org
 user amin@aminb.org
@@ -1546,15 +1601,19 @@ passwordeval gpg2 --no-tty -q -d ~/.passwd/amin.gpg
 account gnu
 host fencepost.gnu.org
 # use `msmtp -a gnu --serverinfo --tls --tls-certcheck=off --tls-fingerprint=` to get the current fingerprint
-tls_fingerprint 34:60:91:B5:71:5B:76:87:50:F3:83:13:26:0F:EE:75:42:83:93:9A:E2:AF:1E:87:72:02:C9:61:CE:28:1B:8E
+tls_fingerprint 93:59:52:1D:A6:95:13:31:7C:81:ED:DB:A5:BA:B5:2B:C8:BC:38:3E:71:A5:DF:8C:80:46:C1:E0:5D:2D:F4:E3
 tls_starttls on
-from aminb@gnu.org
-user aminb
+from bandali@gnu.org
+user bandali
 passwordeval gpg2 --no-tty -q -d ~/.passwd/gnu.gpg
 
-# gnu (bandali)
-account gnu-bandali : gnu
-from bandali@gnu.org
+# gnu (old)
+account gnu-aminb : gnu
+from aminb@gnu.org
+account gnu-amin : gnu
+from amin@gnu.org
+account gnu-mab : gnu
+from mab@gnu.org
 
 # uwaterloo
 account uwaterloo
@@ -2167,7 +2226,7 @@ def_key "K"
 # configured here named ".notmuch".
 #
 [database]
-path=/home/amin/mail
+path=/home/amin/oldmail
 
 # User configuration
 #
@@ -2464,18 +2523,19 @@ prime_gpg_agent()
 #+end_src
 
 ** pigeonhole
-*** gnu.sieve
+*** amin.sieve
 :PROPERTIES:
-:header-args+: :tangle ~/sieve/gnu.sieve :comments none
+:header-args+: :tangle ~/mail/aminb.org/amin/sieve/amin.sieve :comments none
 :END:
 
 #+begin_src conf
-require [ "regex", "variables", "fileinto", "envelope", "mailbox", "imap4flags", "include" ];
+require ["regex", "variables", "fileinto", "envelope",
+         "mailbox", "imap4flags", "include"];
 
+# webmasters
 if anyof (
-  address :is "from" "webmasters@gnu.org",
-  address :is "from" "webmasters-comment@gnu.org") {
-  fileinto :create "webmasters";
+  address :is "from" ["webmasters@gnu.org", "webmasters-comment@gnu.org"]) {
+  fileinto :create "gnu.webmasters";
   stop;
 }
 
@@ -2484,44 +2544,53 @@ include :personal "lists";
 
 *** lists.sieve
 :PROPERTIES:
-:header-args+: :tangle ~/sieve/lists.sieve :comments none
+:header-args+: :tangle ~/mail/aminb.org/amin/sieve/lists.sieve :comments none
 :END:
 
 #+begin_src conf
-require [ "regex", "variables", "fileinto", "envelope", "mailbox", "imap4flags",
"include" ];
+require ["regex", "variables", "fileinto", "envelope",
        "mailbox", "imap4flags", "include"];
 
+# mailing lists
 if anyof (
-    header :contains "list-id" "<emacs-devel.gnu.org>",
-    header :contains "list-id" "<emacs-orgmode.gnu.org>",
-    header :contains "list-id" "<emacsconf-discuss.gnu.org>",
-    header :contains "list-id" "<fencepost-users.gnu.org>",
-    header :contains "list-id" "<guix-devel.gnu.org>",
-    header :contains "list-id" "<guile-devel.gnu.org>",
-    header :contains "list-id" "<help-gnu-emacs.gnu.org>",
-    header :contains "list-id" "<info-gnu-emacs.gnu.org>",
-    header :contains "list-id" "<www-commits.gnu.org>",
-    header :contains "list-id" "<www-discuss.gnu.org>",
-    header :contains "list-id" "<deepspec.lists.cs.princeton.edu>",
-    header :contains "list-id" "<haskell-cafe.haskell.org>",
-    header :contains "list-id" "<haskell-art.we.lurk.org>",
-    header :contains "list-id" "<notmuch.notmuchmail.org>") {
+    header :contains "list-id"
+        [ "<emacs-devel.gnu.org>"
+        , "<emacs-orgmode.gnu.org>"
+        , "<emacsconf-discuss.gnu.org>"
+        , "<fencepost-users.gnu.org>"
+        , "<guix-devel.gnu.org>"
+        , "<guile-devel.gnu.org>"
+        , "<help-gnu-emacs.gnu.org>"
+        , "<info-gnu-emacs.gnu.org>"
+        , "<info-guix.gnu.org>"
+        , "<www-commits.gnu.org>"
+        , "<www-discuss.gnu.org>"
+        , "<deepspec.lists.cs.princeton.edu>"
+        , "<haskell-cafe.haskell.org>"
+        , "<haskell-art.we.lurk.org>"
+        , "<notmuch.notmuchmail.org>"
+        ] ) {
     if header :regex "list-id" "<([a-z_0-9-]+)[.@]" {
         set :lower "listname" "${1}";
-        fileinto :create "l/${listname}";
+        fileinto :create "gnu.${listname}";
+        stop;
     }
 }
 
+# sr.ht lists, with dots ('.') omitted
 if anyof (
-    header :contains "list-id" "<~aminb/test-priv@lists.sr.ht>",
-    header :contains "list-id" "<~sircmpwn/sr.ht-admins@lists.sr.ht>",
-    header :contains "list-id" "<~sircmpwn/sr.ht-announce@lists.sr.ht>",
-    header :contains "list-id" "<~sircmpwn/sr.ht-dev@lists.sr.ht>",
-    header :contains "list-id" "<~sircmpwn/sr.ht-discuss@lists.sr.ht>") {
-    if header :regex "list-id" "(~[a-z_0-9-]+)/([a-z_0-9.-]+)@" {
+    header :contains "list-id"
+        [ "<~bandali/public-inbox@lists.sr.ht>"
+        , "<~sircmpwn/sr.ht-admins@lists.sr.ht>"
+        , "<~sircmpwn/sr.ht-announce@lists.sr.ht>"
+        , "<~sircmpwn/sr.ht-dev@lists.sr.ht>"
+        , "<~sircmpwn/sr.ht-discuss@lists.sr.ht>"
+        ] ) {
+    if header :regex "list-id" "(~[a-z_0-9-]+)/([^.]*)\\.?([^.]*)\\.?([^.]*)\\.?([^.]*)\\.?([^.]*)\\.?([^.]*)@" {
         set :lower "username" "${1}";
-        set :lower "listname" "${2}";
-        fileinto :create "l/${username}/${listname}";
+        set :lower "listname" "${2}${3}${4}${5}${6}${7}";
+        fileinto :create "gnu.${username}.${listname}";
+        stop;
     }
 }
 #+end_src
@@ -3768,12 +3837,6 @@ insert_pass="Alt+n"
 :END:
 
 #+begin_src conf
-exec xrdb .Xresources
-exec dunst
-exec pgrep -x "systemd-inhibit" || \
-     systemd-inhibit --what=handle-power-key --who=aminb \
-     --why="Handle power button in sway" sleep infinity
-
 ### Variables
 # super
 set $mod Mod4
@@ -3800,9 +3863,8 @@ output * bg /usr/share/backgrounds/sway/Sway_Wallpaper_Blue_1920x1080.png fill
 ### Idle configuration
 
 exec swayidle \
-   timeout 120  'swaymsg "output * dpms off"' \
-   resume       'swaymsg "output * dpms on"'  \
-   before-sleep swaylock
+   timeout 120  '[ -f ~/.nosleep ] || swaymsg "output * dpms off"' \
+        resume  '[ -f ~/.nosleep ] || swaymsg "output * dpms on"'  \
 
 
 ### Key bindings
@@ -3843,6 +3905,8 @@ exec swayidle \
     bindsym XF86AudioMute exec pamixer --toggle-mute
     bindsym XF86AudioMicMute exec pactl set-source-mute 1 toggle
 
+    bindsym $mod+Shift+apostrophe exec rofi-remmina.py # choose remmina connection
+
     # original sway workspace switch and window move
     bindsym $mod+bracketleft workspace prev
     bindsym $mod+bracketright workspace next
@@ -3987,6 +4051,39 @@ mode "$mode_system" {
 }
 bindsym XF86PowerOff mode "$mode_system"
 
+#
+# Presentation mode
+#
+
+bindsym $mod+$mod2+p exec ([ ! -e ~/.nosleep ] && touch ~/.nosleep || rm ~/.nosleep) && killall -USR1 i3status
+
+#
+# Notifications
+#
+
+bindsym $mod+Shift+n mode notifications
+mode notifications {
+    bindsym Return  exec makoctl invoke; exec makoctl dismiss; mode default
+    bindsym d       exec makoctl dismiss; mode default
+    bindsym Shift+d exec makoctl dismiss -a; mode default
+
+    bindsym Escape mode default
+    bindsym q      mode default
+}
+
+#
+# Screenshotting
+#
+
+bindsym $mod+Shift+s mode screenshot
+mode screenshot {
+    bindsym a exec grim $(xdg-user-dir PICTURES)/shots/$(date +'%Y-%m-%d-%H%M%S.png'); mode default
+    bindsym r exec slurp | grim -g - $(xdg-user-dir PICTURES)/shots/$(date +'%Y-%m-%d-%H%M%S.png'); mode default
+
+    bindsym Escape mode default
+    bindsym q      mode default
+}
+
 #
 # Status Bar:
 #
@@ -3998,7 +4095,7 @@ bar {
         background #323232
         inactive_workspace #32323200 #32323200 #5c5c5c
     }
-    status_command i3status
+    status_command i3status | my-i3status.py
 }
 
 # font pango: benis uushi 9
@@ -4007,9 +4104,18 @@ bar {
 font pango: DejaVu Sans Mono 9
 # font pango: Liberation Mono 9
 
+exec xrdb .Xresources
+exec pgrep -x "systemd-inhibit" || \
+     systemd-inhibit --what=handle-power-key --who=aminb \
+     --why="Handle power button in sway" sleep infinity
+exec mako 2>&1 >/tmp/mako.log
+exec /usr/lib/polkit-gnome/polkit-gnome-authentication-agent-1
+
 include /etc/sway/config.d/*
 include ~/.config/sway/`hostname`
 
+exec systemd-notify --ready || true
+
 #+end_src
 
 *** langa
@@ -5348,10 +5454,11 @@ alias mv="mv -iv"
 alias cp="cp -iv"
 alias scl=systemctl
 alias jcl=journalctl
-alias m="mbsync -a; getmail; notmuch new"
+alias m="mbsync uwaterloo; mbsync amin"
 alias best="youtube-dl -f best"
-alias nixx="ssh amin@nix.aminb.org"
-alias fence="ssh aminb@fencepost.gnu.org"
+alias sd="ssh deb"
+alias sf="ssh fp"
+alias sn="ssh nix"
 
 aur() {
    cd ~/usr/build
@@ -5401,6 +5508,83 @@ fi
 printf '%s%%%%%2dh%02dm \n' "$perc" $((secs / 3600)) $((secs % 3600 / 60))
 #+end_src
 
+** my-i3status.py
+:PROPERTIES:
+:header-args+: :tangle ~/.local/bin/my-i3status.py :shebang "#!/usr/bin/env python2"
+:END:
+
+#+begin_src python :comments none
+# -*- coding: utf-8 -*-
+
+# This script is a simple wrapper which prefixes each i3status line with custom
+# information. It is based on:
+# https://github.com/i3/i3status/blob/master/contrib/wrapper.py
+#
+# In ~/.i3status.conf, add the following line:
+#     output_format = "i3bar"
+# in the 'general' section.
+# Then, in ~/.config/i3/config or ~/.config/sway/config add:
+#     status_command i3status | my-i3status.py
+# in the 'bar' section.  Make sure my-i3status.py is in $PATH.
+#
+# © 2012 Valentin Haenel <valentin.haenel@gmx.de>
+# © 2018 Amin Bandali <bandali@gnu.org>
+#
+# This program is free software. It comes without any warranty, to the extent
+# permitted by applicable law. You can redistribute it and/or modify it under
+# the terms of the Do What The Fuck You Want To Public License (WTFPL), Version
+# 2, as published by Sam Hocevar. See http://sam.zoy.org/wtfpl/COPYING for more
+# details.
+
+import sys
+import json
+import os
+
+def get_nosleep():
+    """ Return true if ~/.nosleep exists. """
+    return os.path.isfile(os.path.expanduser("~/.nosleep"))
+
+def print_line(message):
+    """ Non-buffered printing to stdout. """
+    sys.stdout.write(message + '\n')
+    sys.stdout.flush()
+
+def read_line():
+    """ Interrupted respecting reader for stdin. """
+    # try reading a line, removing any extra whitespace
+    try:
+        line = sys.stdin.readline().strip()
+        # i3status sends EOF, or an empty line
+        if not line:
+            sys.exit(3)
+        return line
+    # exit on ctrl-c
+    except KeyboardInterrupt:
+        sys.exit()
+
+if __name__ == '__main__':
+    # Skip the first line which contains the version header.
+    print_line(read_line())
+
+    # The second line contains the start of the infinite array.
+    print_line(read_line())
+
+    while True:
+        line, prefix = read_line(), ''
+        # ignore comma at start of lines
+        if line.startswith(','):
+            line, prefix = line[1:], ','
+
+        if get_nosleep():
+            j = json.loads(line)
+            # insert information into the start of the json, but could be anywhere
+            j.insert(0, {'full_text' : '🖵 ', 'name' : 'nosleep'})
+            # and echo back new encoded json
+            print_line(prefix+json.dumps(j))
+        else:
+            print_line(prefix+line)
+#+end_src
+
 ** rofi-light
 :PROPERTIES:
 :header-args+: :tangle ~/.local/bin/rofi-light :shebang "#!/bin/bash"
@@ -5409,7 +5593,44 @@ printf '%s%%%%%2dh%02dm \n' "$perc" $((secs / 3600)) $((secs % 3600 / 60))
 #+begin_src bash
 cur=$(light -G)
 val=$(rofi -dmenu -mesg "light    $cur" -p "light -S " -l 0 -width 12)
-light -S $val
+[ -n "$val" ] && light -S $val
+#+end_src
+
+** rofi-remmina.py
+:PROPERTIES:
+:header-args+: :tangle ~/.local/bin/rofi-remmina.py :shebang "#!/usr/bin/env python2"
+:END:
+
+#+begin_src python
+import ConfigParser
+import os
+from subprocess import Popen, PIPE
+
+remmina_dir = os.path.expanduser("~/.local/share/remmina")
+
+fdict = dict()
+
+for f in os.listdir(remmina_dir):
+    fp = os.path.join(remmina_dir, f)
+    c = ConfigParser.ConfigParser()
+    c.read(fp)
+    n = c.get('remmina', 'name')
+    fdict[n] = fp
+
+lines = max(min(15, len(fdict)), 1);
+width = len(max(fdict.keys(), key=len))
+rofi = Popen(["rofi", "-i", "-dmenu", \
+              "-l", str(lines), "-width", str(width), \
+              "-p", "connection"], stdout=PIPE, stdin=PIPE)
+selected = rofi.communicate("\n" \
+                            .join(fdict.keys()) \
+                            .encode("utf-8"))[0] \
+               .decode("utf-8") \
+               .strip()
+rofi.wait()
+
+r = Popen(["remmina", "-c", fdict[selected]])
+r.wait()
 #+end_src
 
 ** s (run sway)