jeroenvandijk’s gists

jeroenvandijk / bb_reitit_demo_openapi.clj

Created October 30, 2025 19:52

	;; Follow up of https://gist.github.com/jeroenvandijk/cb5f3411943c24dc68b225f34a3e474b
	;;
	;; Now trying to use reitit.openapi still some work in muuntaja.format.json or maybe the json part can be done differently
	;;
	;; Run this script with `bb bb_reitit_demo_openapi.clj` and visit http://localhost:3000/openapi.json


	(require '[babashka.deps :as deps])

	(deps/add-deps '{:deps {metosin/reitit {:mvn/version "0.9.2"}}})

jeroenvandijk / reitit_demo.clj

Created October 30, 2025 18:25

Reitit in Babashka with monkey patching

	;; TODO create a PR to Reitit to add some `:bb` conditionals
	;;
	;; Run this script with `bb reitit_demo.clj` and visit http://localhost:3000

	(require '[babashka.deps :as deps])

	(deps/add-deps '{:deps {metosin/reitit {:mvn/version "0.9.2"}}})

	;; --- START Reitit monkey patch

jeroenvandijk / .clj

Last active February 19, 2025 08:19 — forked from apeckham/.clj

find free port in clojure

	(defn get-free-port []
	(with-open [socket (java.net.ServerSocket. 0)]
	(.getLocalPort socket)))

jeroenvandijk / malli_inline_output.clj

Created November 3, 2022 14:25

Malli inline validation printing

	(ns malli.inline-output
	(:require
	[edamame.core :refer [parse-string]]
	[malli.core :as m]
	[malli.error :as me]))

	;; -- helper code to find location data in an edn file

	(defprotocol IUnwrap
	(unwrap [_]))

jeroenvandijk / smart_middleware.clj

Last active February 9, 2022 16:00

An example of composing ring middleware in a more robust and intuitive way?


	;; When middleware comes with a certain dependency order things get a bit tedious and error prone.
	;; Consider example 1 below:

	(defn add-cmd [req cmd]
	(update req :cmd (fnil conj []) cmd))


	(defn add-cmd-handler [cmd]
	(fn [req]

jeroenvandijk / kahn_sort.clj

Last active January 20, 2022 18:16

Malli composite schema that reuses the values of the underlying values during data generation

	;; Copy of https://gist.github.com/alandipert/1263783
	;;
	;; Copyright (c) Alan Dipert. All rights reserved.
	;; The use and distribution terms for this software are covered by the
	;; Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
	;; By using this software in any fashion, you are agreeing to be bound by
	;; the terms of this license.
	;; You must not remove this notice, or any other, from this software.

	(ns alandipert.kahn

jeroenvandijk / com.plex.pms.plist

Created January 18, 2022 10:01 — forked from wahlmanj/com.plex.pms.plist

Plex Media center startup plist for use with launchctl

	<?xml version="1.0" encoding="UTF-8"?>
	<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN"
	"http://www.apple.com/DTDs/PropertyList-1.0.dtd">
	<plist version="1.0">
	<dict>
	<key>Label</key>
	<string>com.plex.pms</string>
	<key>OnDemand</key>
	<false/>
	<key>ProgramArguments</key>

jeroenvandijk / bookmarklet-search-in-clojurians-slack-archive.cljs

Last active May 27, 2021 16:25

	{:name "Search the Clojurians Slack-archive"
	:author "Gert Goet"
	:license "MIT"}
	;;---
	(when-some [q (js/prompt "Search the Clojurians Slack-archive:")]
	(.open js/window (str "https://clojurians.zulipchat.com/#narrow/stream/180378-slack-archive/search/" q)))

jeroenvandijk / sorted.clj

Last active July 3, 2020 09:02

Babashka script for sorting clojure code lines

	#!/usr/bin/env bb

	(doseq [line (->> (file-seq (clojure.java.io/file (System/getenv "PWD")))
	(filter #(.isFile %))
	(filter (fn [f] (contains? #{"clj" "cljc" "cljs" "bb"}
	(last (clojure.string/split (.getName f) #"\.")))))
	(mapcat #(clojure.string/split-lines (slurp %)))
	sort
	)]
	(println line))

jeroenvandijk / multitime.clj

Last active June 12, 2020 15:49

Idea for multitime test in Babashka

	;; Like https://github.com/ltratt/multitime but with the power of Clojure: multi-processor, shuffling, advanced statistics

	;; export BABASHKA_CLASSPATH=$(clojure -Sdeps '{:deps {org.clojure/data.generators {:mvn/version "1.0.0"}, org.clojure/math.combinatorics {:mvn/version "0.1.6"}}}' -Spath)
	(do
	(require '[clojure.math.combinatorics :as combo]
	'[clojure.data.generators :as gen])

	(let [binaries ["../sci/tmp/sci-25ace7c"
	"../sci/tmp/sci-3c01531"
	"../sci/tmp/sci-6c8852d"]

Jeroen van Dijk jeroenvandijk