Skip to content

Instantly share code, notes, and snippets.

View juergenhoetzel's full-sized avatar

Jürgen Hötzel juergenhoetzel

View GitHub Profile
juergenhoetzel / utf16.go
Created December 8, 2018 09:43
Decode utf16 (little or big endian) to string
package main
import (
func DecodeUtf16(b []byte, order binary.ByteOrder) (string, error) {
juergenhoetzel /
Last active April 16, 2023 09:50
List starred Github repos in Shell (curl + jq)
while curl -s "$user/starred?per_page=100&page=${page:-1}" \
|jq -r -e '.[].full_name' && [[ ${PIPESTATUS[1]} != 4 ]]; do
let page++
juergenhoetzel / getstarred.ps1
Last active August 3, 2022 20:26
List starred Github repos in Powershell
$user = "juergenhoetzel"
$p = 1
do {
$full_names = Invoke-RestMethod "$user/starred?per_page=100&page=$p"
} while ($full_names.Length -gt 0)
juergenhoetzel / b64_encode_decode.c
Created December 12, 2020 14:32
Base64 encoding and decoding using OpenSSL
// Encodes Base64
#include <openssl/bio.h>
#include <openssl/buffer.h>
#include <openssl/evp.h>
#include <stdint.h>
// Decodes Base64
#include <assert.h>
#include <openssl/bio.h>
#include <openssl/evp.h>
#include <stdint.h>
juergenhoetzel / go-find-external.el
Created March 13, 2018 19:27
Faster external package indexing for go-mode
(defun go-packages-find ()
(cl-mapcan (lambda (topdir)
(let ((pkgdir (concat topdir "/pkg")))
(mapcar (lambda (file)
(let ((sub (substring file 0 -2)))
(mapconcat #'identity (cdr (split-string sub "/")) "/")))
(split-string (shell-command-to-string
(format "find \"%s\" -not -path \"%s/tool*\" -not -path \"%s/obj/*\" -name \"*.a\" -printf \"%%P\\n\""
juergenhoetzel / window-rotate.el
Created December 1, 2011 11:01
Rotate windows to left
(require 'cl)
(defun rotate-left (l) (append (cdr l) (list (car l))))
(defun rotate-windows ()
(let ((start-positions (rotate-left (mapcar 'window-start (window-list))))
(buffers (rotate-left (mapcar 'window-buffer (window-list)))))
(mapcar* (lambda (window buffer pos)
(set-window-buffer window buffer)
(set-window-start window pos))
juergenhoetzel /
Created December 22, 2010 09:36
Set Window Title using OpenSSHs LocalCommand
LocalCommand echo -ne "\033]0;"%r@%h"\007"
PermitLocalCommand yes
# emojify completion -*- shell-script -*-
local cur
_get_comp_words_by_ref -n : cur
COMPREPLY=( $(compgen -W "${_emojis[*]}" -- ${cur}) )
__ltrim_colon_completions "$cur"
# sanity checks

Keybase proof

I hereby claim:

  • I am juergenhoetzel on github.
  • I am juergenhoetzel ( on keybase.
  • I have a public key whose fingerprint is 355B DB97 ED47 24E6 B3A4 50E7 A3D9 562A 5898 74AB

To claim this, I am signing this object:

juergenhoetzel / db.clj
Created August 22, 2012 12:13
(defn get-user [handle]
(sql/with-connection db
(sql/with-query-results rs ["select * from users where handle=?" handle] (first rs))))