io-ii

   1 # wrapper script for ii irc client http://tools.suckless.org/ii
   2
   3
   4 II_DIR="$HOME/.cache/irc"
   5 USER="${USER:-$(whoami)}"
   6 FULL="$USER - http://tools.suckless.org/ii"
   7
   8
   9 #
  10 # Prompt for server to connect to and maintain ii connection active
  11 #
  12 server()
  13 {
  14         stop
  15
  16         host="$(
  17                 find . -maxdepth 1 -mindepth 1 -type d | cut -c 3- |
  18                         iomenu -p 'host' -l 10
  19         )"
  20
  21         [ "$host" ] && pgrep -f "^ii -i . -s $host" &> /dev/null || while
  22                 nohup ii -i . -s "$host" -p 6667 -n "$USER" -f "$FULL" &> errors
  23                 [ "$?" -eq 2 ]
  24         do :
  25         done &
  26
  27         while [ ! -f "$host/out" ]; do sleep 0.1; done
  28         printf '%s\n' "$host" > channel
  29         tail -f -n 0 "$host/out" | print_lines &
  30 }
  31
  32
  33 #
  34 # Interactively prompt for a channel to connect to, and change the tail running.
  35 #
  36 channel()
  37 {
  38         stop
  39
  40         find . -mindepth 1 -type d | cut -c 3- | iomenu -p 'chan' -l 9 > channel
  41
  42         print_screen
  43
  44         IFS='' read -r channel < channel
  45         [ -f "$channel/out" ] && tail -f -n 0 "$channel/out" | print_lines &
  46 }
  47
  48
  49 #
  50 # Get channel name and kill associated "tail -f" instance.
  51 #
  52 stop()
  53 {
  54         read -r channel < channel
  55         pid="$(pgrep -f "tail -f -n 0 $channel/out")"
  56         [ "$pid" ] && kill -14 $pid
  57 }
  58
  59
  60 #
  61 # Read one character from /dev/tty in raw mode.
  62 #
  63 get_char()
  64 {
  65         stty -echo raw
  66         dd count=1 2> /dev/null
  67         stty sane
  68 }
  69
  70
  71 #
  72 # Manage characters typed by user.
  73 #
  74 input()
  75 {
  76         printf '' > input
  77
  78         print_prompt
  79
  80         while key="$(get_char)"
  81         do
  82                 case "$key" in
  83                 [[:print:]] )
  84                         printf %s "$key" >> input
  85                         ;;
  86
  87                 "$(printf '\020')" | "$(printf '\016')" )  # Ctrl-P  Ctrl-N
  88                         [ "$pid" ] && kill -9 "$pid"
  89                         channel
  90                         ;;
  91
  92                 "$(printf '\023')" )                       # Ctrl-S
  93                         server
  94                         ;;
  95
  96                 "$(printf '\033')" | "$(printf '\003')" )  # Escape  Ctrl-C
  97                         exit 0
  98                         ;;
  99
 100                 "$(printf '\015')" )                       # Ctrl-M  Enter
 101                         IFS='' read -r channel < channel
 102                         sed 's/$/\n/' input > "$channel/in"
 103                         printf '' > input
 104                         ;;
 105
 106                 "$(printf '\025')" )                       # Ctrl-U
 107                         printf '' > input
 108                         ;;
 109
 110                 "$(printf '\027')" )                       # Ctrl-W
 111                         sed -i 's/[^ \t]* *$//' input
 112                         ;;
 113
 114                 "$(printf '\010')" | "$(printf '\177')" )  # Ctrl-H  Backspace
 115                         sed -i 's/.$//' input
 116                         ;;
 117
 118                 "$(printf '\014')" )                       # Ctrl-L
 119                         IFS='' read -r channel < channel
 120                         less "$channel/out"
 121                         print_screen
 122                         ;;
 123                 esac
 124
 125                 print_prompt
 126         done
 127 }
 128
 129
 130 #
 131 # Print a prompt with the current input
 132 #
 133 print_prompt()
 134 {
 135         size="$(stty -F /dev/tty size)"
 136
 137         IFS='' read -r channel < channel
 138         IFS='' read -r input   < input
 139
 140         width="$(((${#input} + ${#channel} + 4) - ${size#* }))"
 141
 142         if [ "$width" -gt 0 ]
 143         then
 144                 input="$(printf %s "$input" | cut -c "$width"- | tr -d '\n')"
 145         fi
 146
 147         printf '\r\033[K%s> %s' "$channel" "$input"
 148 }
 149
 150
 151 #
 152 # Update the buffer lines and prompt
 153 #
 154 print_screen()
 155 {
 156         size="$(stty -F /dev/tty size)"
 157
 158         printf '\033[H\033[J'
 159         stty sane
 160
 161         IFS='' read -r channel < channel
 162         [ -f "$channel/out" ] && tail -n "${size#* }" "$channel/out"
 163
 164         print_prompt
 165
 166         stty raw
 167 }
 168
 169
 170 #
 171 # Print lines after formatting them and update the prompt.
 172 #
 173 print_lines()
 174 {
 175         while IFS='' read -r line
 176         do
 177                 printf '\a\r\033[K%s\n' "$line"
 178                 print_prompt
 179         done
 180 }
 181
 182
 183 main()
 184 {
 185         mkdir -p "$II_DIR"
 186         cd "$II_DIR" || exit 1
 187         touch channel in
 188
 189         trap 'print_screen'    SIGWINCH
 190         trap 'stty sane; stop' EXIT
 191
 192         server
 193         input
 194 }
 195
 196
 197 main "$@"