3 Commits
main ... add-vm

Author SHA1 Message Date
77998b3ef5 README: clean, add build instructions 2025-09-21 20:10:09 +02:00
d15e8e5cf9 flake.nix: add vm + runnables 2025-09-21 20:09:14 +02:00
3a1dcee2db package.nix: set mainProgram 2025-09-21 20:07:00 +02:00
6 changed files with 50 additions and 6 deletions

View File

@@ -1,6 +1,6 @@
# QOTD daemon
> [!CAUTION]
> [! CAUTION]
> This is WIP
The idea was to create a uiua program that serves the [qotd port

View File

@@ -42,7 +42,7 @@
});
overlays.default = final: prev: {
qotd = self.packages.${prev.stdenv.hostPlatform.system}.default;
qotd = self.packages.${prev.system}.default;
};
nixosModules.default = ./nix/module.nix;

47
main.uasm Normal file
View File

@@ -0,0 +1,47 @@
"quotes"
["f_read_all_str",1]
"\n\n---\n\n"
["SPLIT_BY",[[1,1,["BOX",6]]],5]
[["DUP",11],["LEN",7],["RAND",8],["MUL",9],["FLOOR",10]]
["PICK",12]
["UN_BOX",13]
{"bind_global":[0,15]}
"127.0.0.1:10017"
["tcp_listen",16]
"listening on localhost:10017"
["print",17]
["DO",[[1,1,[["DUP",19],["tcp_accept",20],{"copy_to_under":[1,20]},{"call_global":[0,[0,1]]},["write",21],{"pop_under":[1,20]},["close",20]]],[0,1,[[],[1],{"flags":"SORTED_UP | SORTED_DOWN"}]]],18]
["close",23]
BINDINGS
const null
FUNCTIONS
SPANS
"main.ua" [3,1,13,13] [3,6,18,18]
"main.ua" [4,19,53,46] [4,20,54,47]
"main.ua" [4,5,37,32] [4,6,40,33]
"main.ua" [4,3,34,30] [4,4,36,31]
"main.ua" [4,1,28,28] [4,2,31,29]
"main.ua" [4,2,31,29] [4,3,34,30]
"main.ua" [5,9,75,56] [5,10,78,57]
"main.ua" [5,8,72,55] [5,9,75,56]
"main.ua" [5,7,70,54] [5,8,72,55]
"main.ua" [5,6,67,53] [5,7,70,54]
"main.ua" [5,4,63,51] [5,5,66,52]
"main.ua" [5,3,60,50] [5,4,63,51]
"main.ua" [5,2,57,49] [5,3,60,50]
"main.ua" [5,1,55,48] [5,2,57,49]
"main.ua" [6,1,80,59] [6,2,81,60]
"main.ua" [10,1,123,100] [10,6,128,105]
"main.ua" [11,1,147,124] [11,3,149,126]
"main.ua" [12,1,181,158] [12,2,184,159]
"main.ua" [13,15,202,175] [13,16,203,176]
"main.ua" [13,4,191,164] [13,9,196,169]
"main.ua" [13,10,197,170] [13,12,199,172]
"main.ua" [13,3,188,163] [13,4,191,164]
"main.ua" [15,1,207,180] [15,4,210,183]
FILES
main.ua: "# find qotd\n\n&fras \"quotes\"\n⊜□¬ ⦷\"\\n\\n---\\n\\n\".\n°□⊡⊸(⌊×⚂⧻)\nq ←\n\n# continuously wait for connection\n\n&tcpl \"127.0.0.1:10017\"\n&p \"listening on localhost:10017\"\n⍢(\n ⍜&tcpa(&w q).\n)1\n&cl\n"

View File

@@ -82,9 +82,5 @@ in
Accept = "yes";
};
};
networking.firewall.allowedTCPPorts = [
17
];
};
}

1
result Symbolic link
View File

@@ -0,0 +1 @@
/nix/store/s5d4lav4mz1j2mv7zjdc5bkrvsi0f6rs-qotd-unstable

0
test Normal file
View File