~kris/dots

srice

ref: e9b48d06a8541f3eda5c4db90382ab3c77183afb srice/.local/bin/blog-archive-url -rwxr-xr-x 780 bytes
e9b48d06 — Kris Yotam xprofile: systemd-aware pipewire start + blueman-applet; sb-internet: tolerate missing /proc/net/wireless 2 months ago
                                                                                
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
#!/usr/bin/env sh
set -eu

if [ "$#" -ne 1 ]; then
  printf 'usage: blog-archive-url URL\n' >&2
  exit 2
fi

url=$1
domain=$(printf '%s' "$url" | awk -F[/:] '{print $4}')
hash=$(printf '%s' "$url" | sha1sum | awk '{print $1}')
root=${BLOG_ARCHIVE_DIR:-archives/www}
dir="$root/$domain"
mkdir -p "$dir"

if command -v single-file >/dev/null 2>&1; then
  out="$dir/$hash.html"
  single-file "$url" "$out"
elif command -v monolith >/dev/null 2>&1; then
  out="$dir/$hash.html"
  monolith "$url" -o "$out"
elif command -v wget >/dev/null 2>&1; then
  out="$dir/$hash"
  mkdir -p "$out"
  wget --page-requisites --convert-links --adjust-extension --no-host-directories --directory-prefix="$out" "$url"
else
  out="$dir/$hash.html"
  curl -Lfs "$url" -o "$out"
fi

printf '%s\n' "$out"