ref: e632ea03e5154e539cd4c252c40e365412b10472
parent: c9fda7451e3c2d65968b734ad7eb3ba77e969856
author: sl <sl@x1yg3>
date: Sun Jul 6 18:13:54 EDT 2025
add dsrc
--- a/INDEX
+++ b/INDEX
@@ -16,6 +16,7 @@
contrib - rcpu to or rimport from contrib.9front.org
crip - Repack .cbr as .cbz. Try to fix the file names.
df - du -h /root | tail -1
+dsrc - delete posts on a given barf website
flac2alac - Convert FLAC to ALAC using ffmpeg.
flac2mp3 - Convert FLAC to MP3 using lame.
flacsplit - Split single FLAC into multiple files based on .cue sheet using shntool.
--- /dev/null
+++ b/dsrc
@@ -1,0 +1,31 @@
+#!/bin/rc
+# 2018-08-04T00:22:01-0400
+# Delete posts $low through $high.
+rfork e
+dhost=gaff.inri.net
+fn usage {+ echo usage: dsrc [ -r n ] [ -t n ] >[1=2]
+ exit usage
+}
+switch($1){+case -r
+ site=/usr/sl/www/werc/sites/read.stanleylieber.com
+case -t
+ site=/usr/sl/www/werc/sites/tumblr.stanleylieber.com
+case *
+ usage
+}
+if(! ~ $sysname gaff){+ rcpu -h $dhost -c dsrc $*
+ exit
+}
+low=`{ls -p $site/src | sort -n | sed 1q}+high=$2
+cd $site/src && rm -rf `{seq $low $high}+{+for(i in `{seq $low $high})+ echo ',x/^'$i'\/.*\n/d'
+echo w
+echo w
+echo q
+} | sam -d $site/tags >[2]/dev/null
--
⑨