xkr47

import ceylon.collection {
    MutableMap
}

shared object help {
    // Don't create functions taking >= 1 arguments until 1.2.1 because that triggers bug 5808
    shared dynamic createEmptyObj;
    // could use this instead but then it limits arguments and return types to not be "dynamic"
    //shared Callable<Return,Args> uncurryThis<Return,Args,ThisType>(Callable<Return,Tuple<Nothing,ThisType,Args>> f);
    dynamic {

xkr47

#!/usr/bin/perl
# takes black&white xpm file on input and produces "RLE compression" integer array on output
use strict;use warnings;
for (my $i=0; $i<5; ++$i) { <>; }
my $a = "";
while(<>) {
    chomp;
    s!^"!!;
    s!"(?:,|\};)!!;
    $a .= $_;

xkr47

Game of Life + Happy New Year 2015 mod by xkr47

Click here to open in Web IDE (if you aren't there already), then click "Run" in the toolbar to start.

Original Game of Life code from http://try.ceylon-lang.org/?gist=8860a7a70fb92e306f1f

Force-resurrects from fixed bitmap image every 2 seconds. Bitmap & conversion tool available at https://gist.github.com/xkr47/898134539c9cf02af818 - insert converted image into gridpack variable.

xkr47

import ceylon.collection {
    MutableMap
}

object help {
    shared dynamic createEmptyObj;
    dynamic {
        createEmptyObj = eval("(function(){return {};})");
    }
}

xkr47

; For finnish keyboard layout. Uses Ctrl + the two keys to the right of non-numpad number key "0"
(define-key global-map [?\C-+] 'text-scale-increase)
(define-key global-map [?\C-'] 'text-scale-decrease)

xkr47

In "internet sharing" mode

• as-is implemented now, no changes needed
• phone has static ip configuraton for usb network interface
• phone runs udhcpd, which
  • provides gateway & dns info as made available by e.g. cellular internet connection
• pc runs dhcp client, gets ip, gateway & dns info from phone

xkr47

import ceylon.file {
    Path,
    Nil,
    File,
    createFileIfNil,
    parsePath
}
import ceylon.logging {
    Logger
}

xkr47

void hexdump(String s) {
	value hexes = { for (ch in s) let (x = "_____" + formatInteger(ch.integer, 16)) x[x.size - 5 ...] };
	log.debug(hexes.fold("")((x,y) => x + y + " ")+ s);
}

xkr47

//$webrun_wrapped
shared void run() {
value cn = "foo.bar";

print(cn[(cn.lastIndexWhere((Character ch) => ch == '.') else 0)   ...]);
// vs
print(cn[(cn.lastIndexWhere((Character ch) => ch == '.') else 0)+1 ...]);
// vs
print(cn[ cn.lastIndexWhere((Character ch) => ch == '.') else 0    ...]);

xkr47

# input: fullchain.pem and privkey.pem as generated by the "letsencrypt-auto" script when run with
# the "auth" aka "certonly" subcommand

# convert certificate chain + private key to the PKCS#12 file format
openssl pkcs12 -export -out keystore.pkcs12 -in fullchain.pem -inkey privkey.pem

# convert PKCS#12 file into Java keystore format
keytool -importkeystore -srckeystore keystore.pkcs12 -srcstoretype PKCS12 -destkeystore keystore.jks

# don't need the PKCS#12 file anymore