The log of my #100DaysOfCode challenge. Started on 1 January 2018.
Created [SwiftJson] as a Swift port of [ktjson] and [c++17-json]. Coded
up the basic JsonValue enum type.
| #!/usr/bin/ruby | |
| require 'openssl' | |
| TYPES = { | |
| 6 => {magic: 'RSA1', private_key: false}, | |
| 7 => {magic: 'RSA2', private_key: true} | |
| } | |
| data = ARGV[0] ? File.binread(ARGV[0]) : $stdin.binmode.read | |
| type, version, algo, magic, bits, rest = data.unpack('ccx2l<a4l<a*') |
| function flatten(x) { | |
| var result = []; | |
| var appendToResult = function (xs) { | |
| result.splice(result.length, 0, ...xs); | |
| } | |
| if (Array.isArray(x)) { | |
| x.map(flatten).forEach(appendToResult); | |
| } else { | |
| result.push(x); | |
| } |
| #lang racket | |
| (define (expmod base exp m) | |
| (let recur ([exp exp]) | |
| (cond [(zero? exp) 1] | |
| [(even? exp) (let* ([prev (recur (quotient exp 2))] | |
| [result (modulo (sqr prev) m)]) | |
| (if (and (< 1 prev (sub1 m)) | |
| (= result 1)) | |
| 0 | |
| result))] |
| #lang racket | |
| (define (determinant p1 p2) | |
| (- (* (car p1) (cdr p2)) | |
| (* (cdr p1) (car p2)))) | |
| (define points (read)) | |
| (define first (cons (read) (read))) | |
| (define-values (area last) | |
| (for/fold ([area 0] [last first]) | |
| ([i (in-range (sub1 points))] |
| #lang racket | |
| (require (for-syntax unstable/syntax)) | |
| (provide (rename-out [*in-nest-sequence in-nest-sequence])) | |
| (define in-nest-sequence | |
| (case-lambda | |
| [(func init) | |
| (make-do-sequence | |
| (thunk (values identity func init #f #f #f)))] | |
| [(func . inits) |
| #lang racket | |
| (for ((c (in-range (read))) | |
| (smax (in-port)) | |
| (line (in-port (compose string-trim read-line)))) | |
| (define-values (extras total) | |
| (for/fold ((extras 0) (total 0)) | |
| ((i (in-range (add1 smax))) | |
| (j (in-string line))) | |
| (define n (- (char->integer j) (char->integer #\0))) | |
| (define cur-extras (max (- i total) 0)) |
| import java.io.DataInputStream; | |
| import java.io.DataOutputStream; | |
| import java.io.File; | |
| import java.io.IOException; | |
| import java.net.ServerSocket; | |
| import java.net.Socket; | |
| import java.util.ArrayList; | |
| import java.util.Arrays; | |
| import java.util.Collection; |
I hereby claim:
To claim this, I am signing this object:
| package nz.kiwi.chris.demo; | |
| import java.util.Arrays; | |
| import java.util.Comparator; | |
| import com.sun.jna.Callback; | |
| import com.sun.jna.Function; | |
| import com.sun.jna.IntegerType; | |
| import com.sun.jna.Library; | |
| import com.sun.jna.Native; |