Merge branch 'master' of github.com:krebscode/painload

5 files changed, 95 insertions, 0 deletions

diff --git a/util/bin/galileo b/util/bin/galileo
new file mode 100755
index 00000000..854f1302
--- /dev/null
+++ b/util/bin/galileo
@@ -0,0 +1,3 @@
+#!/bin/sh
+export voice=klara
+./wiki.firstpar http://de.m.wikipedia.org/wiki/::Random | xargs  ./naturalvoices.att 
diff --git a/util/bin/hrefs b/util/bin/hrefs
new file mode 100755
index 00000000..3a1a51de
--- /dev/null
+++ b/util/bin/hrefs
@@ -0,0 +1,20 @@
+#! /bin/sh
+
+_hrefs() {
+  sed -n 's/href="\([^"]\+\)"/\n&\n/gp' |
+      sed -n 's/^href="\([^"]\+\)"$/\1/p'; }
+
+_add_prefix_to_relative_hrefs() {
+  sed '/^http:/!s^'"$1"''; }
+
+_main() {
+  case $# in
+    (0) _hrefs;;
+    (1) _hrefs | _add_prefix_to_relative_hrefs "$1";;
+    (*)
+      echo "bad command line: $0 $*" >&2; exit 23;;
+  esac; }
+
+set -euf
+_main "$@"
+#### end of file.
diff --git a/util/bin/naturalvoices.att b/util/bin/naturalvoices.att
new file mode 100755
index 00000000..9a944d8b
--- /dev/null
+++ b/util/bin/naturalvoices.att
@@ -0,0 +1,44 @@
+#! /bin/sh
+set -euf
+
+A=Mozilla
+baseURL="http://192.20.225.36"
+url="$baseURL/tts/cgi-bin/nph-talk"
+
+if test -h "$0"; then
+  voice="${voice-"`basename "$0"`"}"
+fi
+
+pwd="$(dirname "$(readlink -f "$0")")"
+
+for x in \
+    "$pwd/../../submodules/github/tmpvar" \
+    "$pwd/../../submodules/github/mikeal" \
+    "$pwd/../../submodules/github/NV" \
+    "$pwd/../../submodules/github/tautologistics" \
+; do
+  export NODE_PATH="`readlink -f "$x"`${NODE_PATH+:$NODE_PATH}"
+done
+
+# ensure query is ready
+(cd "$pwd/../.." && git submodule update --init)
+
+{
+  for arg; do echo "$arg"; done | sed -rn '
+    s/^--(.*=.*)/\1/p;t
+    s/.*/text="${text+$text }&"/p;t
+  '
+  cat<<EOF
+  query() {
+    node "$(readlink -f "$pwd/../../submodules/github/visionmedia/query")" "\$@"
+  }
+  curl -sS -A "\${A-Mozilla}"  \\
+      -d "voice=\${voice-`basename "$0"`}" \\
+      -d "txt=\$text" \\
+      -d "downloadButton=DOWNLOAD" \\
+      "$url" | 
+    query 'p a'
+EOF
+} | sh | while read url; do
+  curl -sS "$baseURL$url" | aplay -q -
+done
diff --git a/util/bin/wiki.firstpar b/util/bin/wiki.firstpar
new file mode 100755
index 00000000..d2181f1b
--- /dev/null
+++ b/util/bin/wiki.firstpar
@@ -0,0 +1,23 @@
+#! /bin/bash
+set -euf
+
+A=Mozilla
+
+pwd="$(dirname "$(readlink -f "$0")")"
+
+for x in \
+    "$pwd/../../submodules/github/tmpvar" \
+    "$pwd/../../submodules/github/mikeal" \
+    "$pwd/../../submodules/github/NV" \
+    "$pwd/../../submodules/github/tautologistics" \
+; do
+  export NODE_PATH="`readlink -f "$x"`${NODE_PATH+:$NODE_PATH}"
+done
+
+# ensure query is ready
+(cd "$pwd/../.." && git submodule update --init)
+
+query() {
+  node "$(readlink -f "$pwd/../../submodules/github/visionmedia/query")" "$@"
+}
+curl -b redirect=seen -L -e http://de.wikipedia.org/wiki/$RANDOM -sS -A "\${A-Mozilla}" "$1" | query 'p' 'first'  |w3m -T text/html -dump| cut -c -750
diff --git a/util/bin/wikipedia b/util/bin/wikipedia
new file mode 100755
index 00000000..cad0d8b1
--- /dev/null
+++ b/util/bin/wikipedia
@@ -0,0 +1,5 @@
+#! /bin/sh
+set -euf
+for w in "$@"; do
+  dig +short txt "$w.wp.dg.cx"
+done