| (ns webdav | |
| (:require [clojure.string :as str] | |
| [clojure.data.xml :as xml] | |
| [org.httpkit.server :as hk-server])) | |
| ;; add the XML namespace that we'll use later | |
| (xml/alias-uri 'd "DAV:") | |
| (defn dissoc-in | |
| "Should be in the standard library..." |
| (let [buf (java.nio.ByteBuffer/wrap byte-buffer-containing-appledouble-binary) | |
| magic-number (.getInt buf) | |
| version-number (.getInt buf) | |
| _ (.position buf 24) ; after magic / version / filler bytes | |
| num-entries (.getShort buf) | |
| ;; first entry header, for the data fork | |
| _ (Integer/toUnsignedLong (.getInt buf)) ; entry-id | |
| offset (Integer/toUnsignedLong (.getInt buf))] | |
| ;; some sanity checking |
| #!/usr/bin/env bb | |
| ;; This script was written using: | |
| ;; https://github.com/babashka/babashka | |
| ;; ... go there for install instructions. | |
| (ns reco | |
| (:require [babashka.http-client :as http] | |
| [cheshire.core :as json]) | |
| (:import [java.net URLEncoder])) |
| #!/usr/bin/osascript | |
| tell application "Chrome" to tell the active tab of its first window | |
| reload | |
| end tell |
| # command line to deploy the project | |
| gcloud functions deploy hello --runtime nodejs14 --trigger-http |
| ;; Boot to PRINT10 | |
| ;; | |
| ;; Use nasm to assemble the code to a binary: | |
| ;; | |
| ;; $ nasm -f bin -o boot.bin boot.nasm | |
| ;; | |
| ;; Use dd to make an empty floppy disk image: | |
| ;; | |
| ;; $ dd if=/dev/zero of=boot.flp ibs=1k count=1440 | |
| ;; |
| (def ■ '■) | |
| (def ▲ '▲) | |
| (def ● '●) | |
| (first [● ■ ▲]) ; ● | |
| (second [● ■ ▲]) ; ■ | |
| (nth [● ■ ▲] 2) ; ▲ | |
| (rest [● ■ ▲]) ; (■ ▲) | |
| (last [● ■ ▲]) ; ▲ | |
| (butlast [● ■ ▲]) ; (● ■) |
Twitter abuses all media file uploads, each type in its own way. If we want to upload a good looking animation loop from some low-color, high-detail generative art, we have to game their system's mechanisms.
don't upload a video file, they will re-encode it into absolute 💩
create a GIF, which they will auto-convert into a video file 😱
The frames of the GIF will be resized to an even-sized width using an extremely naive algorithm. Your GIF should be an even size (1000, 2000,
| // three indices to efficiently support all lookups | |
| function createDB() { | |
| return {eav: new Map(), | |
| ave: new Map(), | |
| vea: new Map()}; | |
| } | |
| function addToIndex(xs, x, y, z, triple) { | |
| let ys = xs.get(x); | |
| if(ys == undefined) { |
A minimal example of creating a (mostly) working FUSE filesystem using Clojure. NOTE: I have only tested this with OSX, and it assumes you have already installed libfuse.
Create an empty directory at /tmp/meld to serve as your mount point,
put these files in a directory called meld, then: