Skip to content

Instantly share code, notes, and snippets.

View Soul-Clinic's full-sized avatar

Can Soul-Clinic

View GitHub Profile
@Soul-Clinic
Soul-Clinic / chat-room-sockets.lisp
Created November 12, 2019 19:50
Exploring Common Lisp socket...
(ql:quickload :usocket)
;; (ql:quickload 'cl-cpus)
(use-package :sb-thread)
(use-package :usocket)
(defun start-server (port)
"Starts a socket server to with multiple threads, can be input and output"
(format t "~A Let's Start!! ~%" (now))
(let ((input *standard-input*)
(output *standard-output*)
var crypto = require('crypto');
var key = 'rmyrm80lo2me1bv5o5fkpeq5yv0b61dl';
function md5 (str) {
var md5sum = crypto.createHash('md5');
md5sum.update(str);
str = md5sum.digest('hex');
return str;
};