wisq

defmodule CertChecker do
  alias X509.Certificate, as: Cert

  def check_file(file) do
    [cert | chain] = read_pem_file(file)
    check_certs(cert, chain)
  end

  def check_certs(cert, chain) do
    cert_map = chain |> map_by_subject()

wisq

#!/bin/sh

SAS='/opt/brew/bin/SwitchAudioSource'

DOCK='CalDigit Thunderbolt 3 Audio'
EXT_MIC='External Microphone'
EXT_PHONES='External Headphones'
HEADSET='WH-1000XM3'
MAC_MIC='MacBook Pro Microphone'
MAC_SPEAKERS='MacBook Pro Speakers'

wisq

-- Record current app so we can switch back to it after.
tell application "System Events"
	set frontmostApplicationName to name of 1st process whose frontmost is true
end tell

-- Switch to Discord and hit cmd-shift-M.
-- This is a built-in keybind and does not require any setup.
tell application "Discord" to activate
tell application "System Events"
	keystroke "m" using {command down, shift down}

wisq

on run argv
	if (count of argv) = 1 then
		set p to (item 1 of argv) as text
	else
		log "(development mode)"
		set p to "/tmp/test.png"
	end if
	
	# Reveal the file in Finder.
	# If QuickLook is already open, this will change it to the new file.

wisq

#! /usr/bin/env elixir

defmodule Fixer do
  def parse_args(["-n" | args]), do: {false, args}
  def parse_args(["-f" | args]), do: {true, args}
  def parse_args(args), do: {false, args}

  def fix_all({rename, files}) do
    {:ok, stdout} = File.open("/dev/stdout", [:write])
    Process.register(stdout, :stdout_binary)

wisq

#!/bin/sh

wget -nc -r --accept-regex='https://www.rockpapershotgun.com/2018/12/[0-9]+/the-rps-advent-calendar-2018-dec-[^/]+/$|https://www.rockpapershotgun.com/tag/the-rps-advent-calendar-2018/page/[0-9]+/$' https://www.rockpapershotgun.com/tag/the-rps-advent-calendar-2018/
echo
echo "===================================="
find www.rockpapershotgun.com/2018 -name 'index.html' -print0 | sort -z | xargs -0 grep "</a>!</p>" | cut -d/ -f2-4,8- | sed "s#/www#>#g" | cut -d'>' -f1,3 | cut -d'<' -f1 | sed -e "s/>/: /" -e "s#/#-#g" -e "s/&#8217;/'/g"
echo "===================================="
echo

wisq

defmodule StrNext do
  @character_ranges [
    {'A', 'Z'},
    {'a', 'z'},
    {'0', '9'}
  ]
  @characters Enum.map(@character_ranges, fn {a, z} ->
                hd(a)..hd(z)
                |> Enum.to_list()
              end)

wisq

defmodule Benchmark do
  defmacro __using__(_) do
    quote do
      import Benchmark
      def measure(name, function) do
        {usecs, retval} = function |> :timer.tc
        IO.puts("#{name} took #{usecs} µs")
        retval
      end
    end

wisq

#!/bin/sh

exec 1>&2
MIX_ENV=test exec mix git.test

wisq

task(default: [:link_hooks, :test])

task :link_hooks do
  sh 'ln', '-nsf', '../../hooks/pre-commit', '.git/hooks/pre-commit'
end

task :pre_commit do
  require 'open3'

  Dir.mktmpdir do |tmpdir|