dotfiles/scripts.org

#+PROPERTY: header-args :mkdirp yes
#+title:General-Use Scripts
* Purpose
This repo contains scripts that I like to have available from my $PATH
#+TOC: headlines 2
* GUI-ish
- Glue scripts for sxhkd / bspwm / polybar
** Dmenu_run_top
- Dmenu configured how I like it
*** TODO
- test monospace instead of bitstream
- remove flavours placeholder (once flavours is ready)
- consider moving this to an alias
#+begin_src sh :tangle ~/usr/local/bin/dmenu_run_top
#!/bin/sh

# start flavours
norm_fg="#C0C5CE"
norm_bg="#1B2B34"
sel_fg="#1B2B34"
sel_bg="#99C794"
# end flavours

dmenu_run \
  -i \
  -fn BitstreamVeraSansMono:size=11 \
  -l 15 \
  -nf "$norm_fg" \
  -nb "$norm_bg" \
  -sf "$sel_fg" \
  -sb "$sel_bg"
#+end_src

** Dmenuunicode
- Get emojis from dmenu
*** TODO
- make work on mac
- recreate the emojis file and test
#+begin_src sh :tangle ~/usr/local/bin/dmenuunicode
  #!/bin/sh

  # Get user selection via dmenu from emoji file.
  chosen=$(cut -d ';' -f1 ~/.local/share/emoji | dmenu -i -l 30 | sed "s/ .*//")

  # Exit if none chosen.
  [ -z "$chosen" ] && exit

  # If you run this command with an argument, it will automatically insert the
  # character. Otherwise, show a message that the emoji has been copied.
  if [ -n "$1" ]; then
          xdotool type "$chosen"
  else
          printf "$chosen" | xclip -selection clipboard
          notify-send "'$chosen' copied to clipboard." &
  fi
#+end_src

** Languagecycle
- Cycle between a couple languages
- Better handled through polybar probably
*** TODO
- Add support for 3+ languages
#+begin_src fish :tangle ~/usr/local/bin/languagecycle
#!/usr/bin/fish

if [ (xkblayout-state print "%n") = "Russian" ]
        setxkbmap -layout us
    else
        setxkbmap -layout ru
    end
#+end_src

** Layoutcycle
- Cycle windows between different layouts
*** TODO
- Currently this adds layouts to an endless list of layouts which can cause lag
- This should be fixed but I'm not sure if I even like using alternate layouts
#+begin_src fish :tangle ~/usr/local/bin/layoutcycle
#!/usr/bin/fish

bsp-layout next --layouts tall,grid,rgrid,tiled

set layout (bsp-layout get)

if ps -aux | grep layoutcycle | grep -v grep
    exit
else if [ $layout = "tall" ]
    notify-send -t 1000 "Layout: Tall" (echo \
    "    ______________   \n" \
    "   |        |____|   \n" \
    "   |        |____|   \n" \
    "   |        |____|   \n" \
    "   |________|____|   " )
else if [ $layout = "grid" ]
    notify-send -t 1000 "Layout: hGrid" (echo \
    "   ____________   \n" \
    "  |   |   |   |   \n" \
    "  |___|___|___|   \n" \
    "  |   |   |   |   \n" \
    "  |___|___|___|   " )
else if [ $layout = "rgrid" ]
   vgrid
    notify-send -t 1000 "Layout: vGrid" (echo \
    "   ____________   \n" \
    "  |_____|_____|   \n" \
    "  |_____|_____|   \n" \
    "  |_____|_____|   " )
else if [ $layout = "tiled" ]
    notify-send -t 1000 "Layout: Tiled" (echo \
    "   ______________   \n" \
    "  |        |    |   \n" \
    "  |        |____|   \n" \
    "  |        |  | |   \n" \
    "  |________|__|_|   " )
end

#+end_src

* Appearance
** Colors
> Taken from https://stackoverflow.com/questions/69138165/how-to-get-the-rgb-values-of-a-256-color-palette-terminal-color
- Returns a representation of your currently set color scheme
#+begin_src sh :tangle ~/usr/local/bin/colors
#!/bin/sh

xdef="$HOME/.Xresources"

colors=( $( sed -re '/^!/d; /^$/d; /^#/d; s/(\*color)([0-9]):/\10\2:/g;' $xdef | grep 'color[01][0-9]:' | sort | sed  's/^.*: *//g' )
)

echo
for i in {0..7}; do echo -en "\e[$((30+$i))m ${colors[i]} \u2588\u2588 \e[0m\n"; done
echo
for i in {8..15}; do echo -en "\e[1;$((22+$i))m ${colors[i]} \u2588\u2588 \e[0m\n"; done
echo -e "\n"
#+end_src

** Gapcycle
- Cycle between 3 window gap sizes I find aesthetic
*** TODO
- This is broken
#+begin_src fish :tangle ~/usr/local/bin/gapcycle
  #!/usr/bin/fish

  set gap (bspc config window_gap)

  if [ $gap = 40 ]
    set new_gap 18
  else if [ $gap = 18 ]
    set new_gap 12
  else if [ $gap = 12 ]
    set new_gap 0
  else if [ $gap = 0 ]
    set new_gap 40
  end

  bspc config window_gap $new_gap
#+end_src

** Themepick
- Broken in nix until I find an equivalent base16 theme setter and / or setup flavours
#+begin_src fish :tangle ~/usr/local/bin/themepick
  #!/usr/bin/fish

  set theme (flavours list | tr ' ' '\n' | dmenu)

  flavours apply $theme &&
  eval ~/.config/base16-shell/scripts/base16-$theme.sh
#+end_src

** Opaque-windows
*** TODO
- Handle this through lemonbar instead
#+begin_src fish :tangle ~/usr/local/bin/opaque-windows
  #!/usr/bin/fish
  if ps -aux | grep picom | grep -v grep
      pkill picom
  end
#+end_src

** Transparent-windows
#+begin_src fish :tangle ~/usr/local/bin/transparent-windows
  #!/usr/bin/fish
  if ps -aux | grep picom | grep -v grep
      pkill picom
  end

  sleep 0.2
  picom \
      --conf /dev/null \
      -i 0.8 \
      --active-opacity 1.0 \
      --focus-exclude "x = 0 && y = 0 && override_redirect = true" &
#+end_src

* Password Management
- Some basic scripts to help gnu password-store suit my preferences
** Generate-passphrase
- Generates a pseudo-random CorrectHorseBatteryStaple-style password
  - I prefer this for passwords I might have to type manually occasionally
*** TODO
- This may be better as an alias
#+begin_src bash :tangle ~/usr/local/bin/generate-passphrase
  #!/bin/bash
  shuf -n3 /usr/share/dict/words | tr -d '\n'
#+end_src
** Passphrase
- This more specifically inserts the generated passphrase into gnu pass
#+begin_src fish :tangle ~/usr/local/bin/passphrase
  #!/usr/bin/fish
  generate-passphrase | pass insert -e $argv
#+end_src

* Git
** Prune_local_branches
*** TODO
- Don't do this. Use a git alias.
#+begin_src bash :tangle ~/usr/local/bin/passphrase
#!/bin/bash
git fetch --all -p; git branch -vv | grep ": gone]" | awk '{ print $1 }' | xargs -r -n 1 git branch -D
#+end_src

* APIs
** Sugar
- Get blood sugar from nightscout
  - Useful for gui integrations
*** TODO
- Remove lemobar, test with polybar
- Handle API endpoint as a secret
#+begin_src python :tangle ~/usr/local/bin/sugar
  #!/usr/bin/python3
  import sys
  import requests
  import json
  from termcolor import colored

  tmux = '--tmux' in sys.argv
  lemonbar = '--lb' in sys.argv

  down = '\u2193'     # ↓
  falling = '\u2798'  # ➘
  flat = '\u2192'     # →
  rising = '\u279a'   # ➚
  up = '\u2191'       # ↑

  url = # TODO interpolate or parameterize
  options = '/api/v1/entries.json?count=1&token=phone-7631d7eebc79825b'

  try:
      res = requests.get(url + options)
  except:
      sys.exit()

  sugar = res.json()[0]


  delta = sugar['delta']
  sgv = sugar['sgv']
  direction = sugar['direction']

  if delta < -10:
      arrow = down
  if delta >= -10 and delta < -1:
      arrow = falling
  if delta >= -1 and delta <= 1:
      arrow = flat
  if delta > 1 and delta <= 10:
      arrow = rising
  if delta > 10:
      arrow = up

  if (sgv >= 225 or sgv <= 80):
      color = 'red'
  elif ((sgv >= 180 and sgv <= 225)
          or (sgv <= 100 and sgv >= 80)):
      color = 'yellow'
  else:
      color = 'green'

  if tmux:
      print(f'#[bg={color}] ' +
          str(round(sugar['sgv'], 1)) + ' ' +
          arrow + ' ' +
          '(' + str(delta) + ')'
          )
  elif lemonbar:
      print(str(round(sugar['sgv'], 1)) + ' ' +
            arrow + ' ' +
            '(' + str(delta) + ')'
          )
  else:
      print(colored(str(sugar['sgv']) +
                  ' ' + arrow + ' ' +
                  '(' + str(delta) + ')',
                  color))
#+end_src
* Mac-specific
** Jbrowse
*** TODO
- Probably handle these as aliases
#+begin_src sh :tangle ~/usr/local/bin
  /Applications/Brave\ Browser.app/Contents/MacOS/Brave\ Browser "https://everblue.atlassian.net/browse/"$1 &
#+end_src
** NotifyMe
#+begin_src sh :tangle ~/usr/local/bin
  osascript -e 'display notification "done!" with title "Notification"'
#+end_src