Skip to content

Instantly share code, notes, and snippets.

View Rondom's full-sized avatar

Andreas Gnau Rondom

26 followers · 50 following
  • Sweden
View GitHub Profile
@Rondom
Rondom / QuineRelay.rb
Created November 22, 2009 11:41
l=92.chr;eval s="s=s.dump[r=1..-2].gsub(/("+l*4+"){4,}(?!\")/){|t|'\"+l*%d+\"'%(t.size/2)};5.times{s=s.dump[r]};puts\"# python\\nprint(\\\"# perl\\\\nprint(\\\\\\\"# lua"+l*4+"nprint("+l*7+"\"(* ocaml *)"+l*8+"nprint_endline"+l*15+"\"-- haskell"+l*16+"nimport Data.List;import Data.Bits;import Data.Char;main=putStrLn("+l*31+"\"/* C */"+l*32+"n#include<stdio.h>"+l*32+"nint main(void){char*s[501]={"+l*31+"\"++intercalate"+l*31+"\","+l*31+"\"(c(tail(init(show("+l*31+"\"/* Java */"+l*32+"npublic class QuineRelay{public static void main(String[]a){String[]s={"+l*31+"\"++intercalate"+l*31+"\","+l*31+"\"(c("+l*31+"\"brainfuck"+l*64+"n++++++++[>++++<-]+++++++++>>++++++++++"+l*31+"\"++(concat(snd(mapAccumL h 2("+l*31+"\"110"+l*31+"\"++g(length s)++"+l*31+"\"22111211100111112021111102011112120012"+l*31+"\"++concatMap("+l*32+"c->let d=ord c in if d<11then"+l*31+"\"21002"+l*31+"\"else"+l*31+"\"111"+l*31+"\"++g d++"+l*31+"\"22102"+l*31+"\")s++"+l*31+"\"21002111010120211222211211101000120211021120221102111000110120211202"+l
@Rondom
Rondom / logcat_mustard-0.1.9.6-2_twitter_oauth_bug
Created September 2, 2010 22:44
I/ActivityManager( 1069): Starting activity: Intent { act=android.intent.action.VIEW cat=[android.intent.category.BROWSABLE] dat=statusnet://oauth?oauth_token=[removed1]&oauth_verifier=[removed2] cmp=org.mustard.android/.activity.OAuthCallback }
I/ActivityManager( 1069): Start proc org.mustard.android for activity org.mustard.android/.activity.OAuthCallback: pid=10123 uid=10076 gids={3003, 1015}
I/ActivityManager( 1069): Start proc com.facebook.katana for service com.facebook.katana/.service.FacebookService: pid=10126 uid=10054 gids={3003, 1015}
W/dalvikvm( 1069): disableGcForExternalAlloc: false
I/ActivityThread(10126): Publishing provider com.facebook.katana.provider.LoggingProvider: com.facebook.katana.provider.LoggingProvider
I/ActivityThread(10126): Publishing provider com.facebook.katana.provider.KeyValueProvider: com.facebook.katana.provider.KeyValueProvider
I/ActivityThread(10126): Publishing provider com.facebook.katana.provider.MailboxProvider: com.facebook.katana.provider.MailboxProvider
I/Activit
@Rondom
Rondom / amMeistenSterne MitOrderedTeaching MitBugFix
Created April 12, 2011 16:33
Unsers
---------------------------------------------------
Target: rechtsOben
{
(lang,null,null,null,null,vorFans,nein,null);
(kurz,vonRechts,null,ja,null,null,null,null);
(null,null,ja,null,Auswärts,null,null,null);
(kurz,vonLinks,nein,ja,null,null,null,null);
(lang,mitte,null,null,Heimspiel,null,null,null);
(mittel,vonLinks,null,null,null,vorGeger,null,null);
(null,vonRechts,null,ja,null,null,null,null)}
@Rondom
Rondom / Arthurs Daten
Created April 12, 2011 16:52
aktuelle Version mit Bugfix, dieMeistenSterne
---------------------------------------------------
Target: "Buch_C"
{
(null,"m",null,null,null,null,"3000-3999",null);
("25-35",null,null,null,"Realschule",null,null,null);
(null,null,null,null,"Hochschule",null,null,null);
("36-49",null,null,null,"Gymnasium",null,null,null);
(null,null,null,null,"Promotion",null,null,null);
("36-49",null,null,null,"Realschule",null,null,null);
(null,null,null,null,null,null,"5000 und mehr",null);
@Rondom
Rondom / askVariable.sh
Created August 5, 2011 09:33
A helper function for interactive shell-scripts asking for a variable from keyboard. Fallback provided for bash 3
# 1. Text
# 2. variableName
# 3. additonal parameters for read
function askVariable() {
askText="$1"
varName="$2"
eval default="\$$varName"
bashVersionMajor=$(echo ${BASH_VERSION:-3.0.0} | cut -d "." -f1)
if [ "$bashVersionMajor" -ge "4" ]; then
@Rondom
Rondom / _usr_local_bin_okular
Created August 31, 2011 16:22
Texlive 2011: Synctex-Fix for Okular
#!/bin/bash
exec /usr/bin/okular "${@//thesis\//thesis/./}"
@Rondom
Rondom / ask_variable.sh
Created August 30, 2012 15:05
ask_variable (bash-only)
#!/bin/bash
# 1. Text
# 2. variableName
# 3. additonal parameters for read
function ask_variable() {
askText="$1"
varName="$2"
eval default="\$$varName"
bashVersionMajor=$(echo ${BASH_VERSION:-3.0.0} | cut -d "." -f1)
@Rondom
Rondom / empty_oracle_schemas.sql
Last active December 11, 2015 12:58
Empty Oracle schemas without deleting the schema and recreating it. http://technology.amis.nl/2004/11/08/sql-script-to-empty-outcleanse-a-user-schema/
SELECT 'drop ' ||object_type || ' '|| owner||'.' || object_name || ';'
FROM dba_objects
WHERE owner in ('USER1', 'USER2')
AND object_type not in ( 'PACKAGE BODY', 'INDEX', 'TABLE', 'TRIGGER', 'UNDEFINED')
UNION
SELECT 'drop ' || object_type || ' ' || owner||'.'||object_name || ' cascade constraints;'
FROM dba_objects
WHERE owner in ('USER1', 'USER2')
AND object_type = 'TABLE';
@Rondom
Rondom / clionrunner.sh
Last active November 4, 2015 14:45
Downloads clion to /tmp and extracts it. Can be used to circumwent tight disk quotas in home-dirs
#!/bin/bash
SCRIPTDIR="$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd )"
WORKDIR="$SCRIPTDIR/files"
TARURL="https://download.jetbrains.com/cpp/clion-1.2.tar.gz"
HASHURL="${TARURL}.sha256"
TARPATH="$WORKDIR/clion.tar.gz"
EXTRACTDIR="$WORKDIR"
if [ ! -d "$WORKDIR" ]; then
rm "$WORKDIR"
@Rondom
Rondom / disable_gnome_keyring.sh
Created November 21, 2015 02:14
disable gnome-keyrings ssh-agent and use stock ssh-agent
cp /etc/xdg/autostart/gnome-keyring-ssh.desktop ~/.config/autostart
echo 'X-GNOME-Autostart-enabled=false' >> ~/.config/autostart/gnome-keyring-ssh.desktop
echo Now run OpenSSH ssh-agent using systemd https://wiki.archlinux.org/index.php/SSH_keys#Start_ssh-agent_with_systemd_user