From 8e5880a022943eb7472e1e03a4aa26ed69eb5900 Mon Sep 17 00:00:00 2001 From: Superkooka Date: Mon, 11 Dec 2023 16:04:33 +0100 Subject: [PATCH] remove vagrant + index and blog page Signed-off-by: Superkooka --- .gitignore | 5 ++- Vagrantfile | 31 ---------------- blog.janet | 85 ++++++++++++++++++++++++++++++++++++++++++ blog.pl | 0 index.html | 63 +++++++++++++++++++++++++++++++ public/style.css | 0 sample.html | 97 ++++++++++++++++++++++++++++++++++++++++++++++++ 7 files changed, 248 insertions(+), 33 deletions(-) delete mode 100644 Vagrantfile delete mode 100644 blog.pl create mode 100644 index.html delete mode 100644 public/style.css create mode 100644 sample.html diff --git a/.gitignore b/.gitignore index 72a9567..b1118f2 100644 --- a/.gitignore +++ b/.gitignore @@ -1,3 +1,6 @@ +.idea +.vscode + public/~blog/**/* public/~notes/**/* public/flux.rss @@ -7,5 +10,3 @@ raw/~blog/**/* raw/~notes/**/* !.gitkeep - -ubuntu-bionic-18.04-cloudimg-console.log \ No newline at end of file diff --git a/Vagrantfile b/Vagrantfile deleted file mode 100644 index 8f151cf..0000000 --- a/Vagrantfile +++ /dev/null @@ -1,31 +0,0 @@ -Vagrant.configure("2") do |config| - config.vm.box = "ubuntu/bionic64" - - config.vm.provision "shell" do |s| - s.inline = <<-SHELL - sudo apt update -y - sudo apt install -y build-essential - - # Installation of Janet from source - git clone https://github.com/janet-lang/janet.git - cd janet - sudo make - sudo make test - - sudo cp build/janet /usr/local/bin/ - cd .. - - # Installation of Perl from source - git clone https://github.com/Perl/perl5 - cd perl5 - ./Configure -des -Dprefix=/usr/local -Dusedevel - make test - make install - SHELL - end - - config.vm.provider "virtualbox" do |v| - v.memory = 2048 - v.cpus = 4 - end -end \ No newline at end of file diff --git a/blog.janet b/blog.janet index e69de29..d674133 100644 --- a/blog.janet +++ b/blog.janet @@ -0,0 +1,85 @@ +#!/usr/bin/env janet + +(defn read-from-file [file-path] + (let [f (file/open file-path :r) + content (file/read f :all)] + (file/close f) + content)) + +(def md-to-ast + "A custom markdown flavored grammar" + ~{ + # Symbole + :end-of-line (* (? "\r") "\n") + :space "\u0020" + :code-block-tag "```" + :list-item-starter (+ "*" "-") + + :paragraph (some (if-not :end-of-line 1)) + + # Block + :heading (cmt (* (<- (between 1 6 "#")) :space (<- :paragraph)),|[:heading (length $0) $1]) + :hr (cmt (at-least 3 (+ "-" "_" "*")),|[:hr]) + :code-block (cmt (* :code-block-tag (? (<- :paragraph)) :end-of-line (<- (some (if-not :code-block-tag 1))) :code-block-tag),|[:code-block $0 $1]) + :quote (cmt (* ">" :space (<- :paragraph)),|[:quote $0]) + :list-item (cmt (* :list-item-starter :space (<- :paragraph)),|[:list-item $0]) + :list (cmt (some (* :list-item (? :end-of-line))),|[:list $&]) + + # :table-cel "" + :table-row (* "|" (cmt (some (* (<- (some (if-not "|" 1))) "|")),|[:table-row (map string/trim $&)]) :end-of-line) + :table-delimiter (* "|" (cmt (some (* (any :space) (at-least 3 "-") (any :space) "|")),|[:delimiter]) :end-of-line) # Delimiter Row + :table # + (cmt (* + :table-row + :table-delimiter + (some :table-row)),|[:table $&]) + + :line (cmt (<- :paragraph),|[:line $0]) + + :block (+ :heading + :hr + :code-block + :quote + :list + :table + :table-row + :line + :end-of-line) + + :main (some (* :block (? :end-of-line)))}) + +(defn to-html + "Convert AST to HTML" + [ast] + (if ast + (string/join + (map + |(match $0 + [:heading level value] + (string "" value "") + [:quote value] + (string "
" value "
") + [:list items] + (string/join @["
    " + ;(map |(string "
  • " $0 "
    • ") (get items 0)) + "
"] "\n") + [:line value] + (string "

" value "

") + [:code-block lang value] + (string "
" value "
") + _ + (error (string "Invalid symbol: " (get $0 0)))) + ast) "\n" ))) + +(defn pp-ast + "Pretty prints the Mardown AST (as provided by (peg/match md-to-ast))" + [ast] + (if ast + (do + (print "[") + (map |(printf "\t%q" $0) ast) + (print "]")))) + +(defn main [bin & args] + (pp-ast (peg/match md-to-ast (read-from-file "raw/~notes/blog.md")))) + # (print (to-html (peg/match md-to-ast (read-from-file "raw/~notes/blog.md"))))) diff --git a/blog.pl b/blog.pl deleted file mode 100644 index e69de29..0000000 diff --git a/index.html b/index.html new file mode 100644 index 0000000..1701592 --- /dev/null +++ b/index.html @@ -0,0 +1,63 @@ + + + + + + + + + + + + Meow + + + +
+
+ + BCrypt, MD5, Argon2Id... Quoi choisir pour hasher ses mots de passe +
+
+ + Les intermittents de l’audiovisuel en grève : « On demande juste le rattrapage de nos salaires » +
+
+ + L’affaire du sénateur Guerriau menace tout un « système » local +
+
+ + En Israël, les proches des otages à Gaza militent contre l’oubli +
+
+ + + \ No newline at end of file diff --git a/public/style.css b/public/style.css deleted file mode 100644 index e69de29..0000000 diff --git a/sample.html b/sample.html new file mode 100644 index 0000000..aa238b0 --- /dev/null +++ b/sample.html @@ -0,0 +1,97 @@ + + + + + + + + + + + + + Meow + + + + +
+

Suspendisse quam dolor, sollicitudin nec velit sodales, tempus iaculis elit.

+

Neque porro quisquam est qui dolorem ipsum quia dolor sit amet, + consectetur, adipisci velit...

+
+

Lorem ipsum dolor sit amet, consectetur adipiscing elit. Vivamus porta erat non maximus + porttitor. Etiam massa felis, + luctus at eros nec, vestibulum sodales dolor. Donec pellentesque, tellus eu pharetra fringilla, arcu + sapien fringilla + nulla, eget gravida arcu mi eu diam. In hac habitasse platea dictumst. Vestibulum neque mauris, faucibus + eget hendrerit + molestie, ultrices sed purus. In porttitor scelerisque euismod. Sed ultrices efficitur interdum. + Maecenas massa urna, + lobortis ac arcu ac, hendrerit ultricies turpis. Nulla in consectetur justo, sit amet elementum lacus. +

+

Lorem ipsum dolor sit amet, consectetur adipiscing elit. Nam vitae consequat massa. Aliquam + egestas pellentesque + elementum. Ut efficitur justo eu libero vestibulum dapibus. Etiam vitae turpis nunc. Maecenas sit amet + elementum dolor. + In luctus tellus non rhoncus dictum. Mauris laoreet velit velit, in pellentesque enim auctor a. Nulla at + lacus vel magna + lacinia tincidunt. Ut aliquet suscipit tincidunt. + + Nulla arcu tortor, aliquet quis congue in, vestibulum vitae arcu. Duis nisi ex, tincidunt quis + condimentum in, + sollicitudin quis nisi. In fringilla ultricies venenatis. Aliquam a quam eros. Curabitur eget tincidunt + orci. Quisque + hendrerit porta augue, eget venenatis diam pellentesque sed. Sed pellentesque vitae urna blandit + lobortis. Sed tellus + nulla, rutrum rhoncus ante at, lacinia efficitur augue. Pellentesque habitant morbi tristique senectus + et netus et + malesuada fames ac turpis egestas. Nam eget dolor ut augue commodo lacinia et at dolor. Sed ut vehicula + lacus. Integer + semper vehicula dignissim. +

+

Donec vitae nisl in sem viverra cursus.

+

Suspendisse dictum urna nunc, non laoreet tortor vulputate eget. Praesent sit amet risus a + lacus eleifend bibendum. + Vivamus et placerat tellus, ut tristique nibh. Maecenas porttitor ex ac turpis interdum iaculis. Etiam + egestas erat non + metus vehicula, viverra vulputate est condimentum. Interdum et malesuada fames ac ante ipsum primis in + faucibus. Nam + vehicula diam sed pharetra malesuada. Etiam non libero et risus viverra volutpat. Donec in justo tortor. + Mauris gravida + finibus sem eget lacinia. Praesent lacinia posuere lacus eget dignissim. Morbi tempus mauris id ante + aliquet finibus. + Quisque ut dignissim neque, ut accumsan urna. Morbi interdum erat eu erat tempus finibus. +

+
+
+ + + \ No newline at end of file