 |
archiveorg-uri - annna - Annna the nice friendly bot. |
 |
git clone git://bitreich.org/annna/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws6… |
 |
Log |
|
Files |
|
Refs |
|
Tags |
|
README |
|
--- |
|
archiveorg-uri (598B) |
|
--- |
|
1 #!/bin/sh |
|
2 |
|
3 export PATH="$HOME/bin:$PATH" |
|
4 |
|
5 usage() { |
|
6 printf "usage: %s [-h] URI\n" "$(basename "$0")" >&2 |
|
7 exit 1 |
|
8 } |
|
9 |
|
10 if [ $# -lt 1 ] || [ $# -gt 2 ] |
|
11 then |
|
12 usage |
|
13 fi |
|
14 |
|
15 if [ $# -eq 2 ] |
|
16 then |
|
17 [ $1 = -h ] || usage |
|
18 opth=-I |
|
19 shift |
|
20 fi |
|
21 |
|
22 uri="$1" |
|
23 aiapiuri="http://archive.org/wayback/available?url=${uri}" |
|
24 usetor=0 |
|
25 apiai="$(fetch-uri "$aiapiuri")" |
|
26 available="$(echo "$apiai" | grep 'available')" |
|
27 if [ -n "${available}" ]; |
|
28 then |
|
29 aiuri="$(echo "$apiai" | awk -F 'url": "' '{print $3}' 2>/dev/nu… |
|
30 printf "%s\n" "${aiuri}" |
|
31 fi |
|
32 |
