fstamour

(defun iota (m &optional (n 1) (step 1))
	(defun iter (m n lst)
		(cond ((> n m) (reverse lst))
			(t (iter m (+ n step) (cons n lst)))))
	(iter m n nil))

fstamour

#!/usr/bin/env python3
# -*- coding: utf-8 -*-

# Author: Damien Garaud
# Date: 2014-2015
# License: Simplified BSD

"""Allow you to pipe command results into an Emacs buffer. Suppose you have an
Emacs server since you launch 'emacsclient'.

fstamour

Org-mode Org-mode Reference Card

Org mode reference card

Created from the plain text reference card on orgmode.org Download this file, and open it in Emacs org-mode!

fstamour

58 bytes of CSS to look great nearly everywhere

When making this website, i wanted a simple, reasonable way to make it look good on most displays. Not counting any minimization techniques, the following 58 bytes worked well for me:

main {
  max-width: 38rem;
  padding: 2rem;
  margin: auto;
}

fstamour

$ ruby unique-unordered-pairing-function.rb

Cantor Pairing Function
-----------------------

<x, y> = (x + y) * (x + y + 1) / 2 + y

       0     1     2     3     4     5     6     7     8     9    10    11    12    13
   + ——— + ——— + ——— + ——— + ——— + ——— + ——— + ——— + ——— + ——— + ——— + ——— + ——— + ——— +
 0 |   0 |   1 |   3 |   6 |  10 |  15 |  21 |  28 |  36 |  45 |  55 |  66 |  78 |  91 |

fstamour

#!/bin/sh
OUTPUT="sbql"
PRELOADS="alexandria cl-ppcre local-time cffi cl-interpol"
PREUSES="split-sequence anaphora iterate"

# sbcl --script <<EOF
sbcl --no-sysinit --no-userinit --noprint <<EOF
;; load quicklisp (from .sbclrc content added when quicklisp installation)
(let ((quicklisp-init (merge-pathnames "quicklisp/setup.lisp"
                                       (user-homedir-pathname))))

fstamour

Backing up and recovering 2FA tokens from FreeOTP

Backing up FreeOTP

Using adb, create a backup of the app using the following command:

adb backup -f freeotp-backup.ab -apk org.fedorahosted.freeotp

fstamour

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <gmp.h>

char * polynomial="-74101463560860539810482394216134472786413399/404009590666424903383979388988167534591844018460526499864038804741201731572423877094984692537474105135297393596654648304117684895744000000000000000000000*x^99 + 1786563401621773217421750502452955853226339781/1943688752347061390850759947022111850270039951356484879070977067483444756705819339975871373032521468004867185688372878439054154137600000000000000000000*x^98 - 27321291157050372775340569532625689973429185264741/12024094960310264981666053243695462339042976739896622019763059664916718201560234437350734896948634081407660523709959770955883479040000000000000000000000*x^97 + 4936870031754926645682423836151042176171669450909/1336493173680525187613977630110369004256312194947800263402124063124652591386915768177479078216982141485276408003996973457735680000000000000000000000*x^96 - 24473118674386691114350902920738421254018653211816783/55093218603941649400531744530105211175454647

fstamour

-- from https://gist.github.com/anonymous/83b1f8d2da6ee35d172b

import Data.Bits ((.&.), shiftR)
import Data.Char (chr)
import Data.Ratio ((%), Ratio, numerator)
import Data.Word (Word32)

poly :: Ratio Integer -> Ratio Integer
poly x = 
	- 74101463560860539810482394216134472786413399%404009590666424903383979388988167534591844018460526499864038804741201731572423877094984692537474105135297393596654648304117684895744000000000000000000000*x^99