[pages] Update about section.

1 files changed, 72 insertions, 4 deletions

diff --git a/haunt/pages/about.sxml b/haunt/pages/about.sxml
index be8114e..4db61a4 100644
--- a/haunt/pages/about.sxml
+++ b/haunt/pages/about.sxml
@@ -1,6 +1,6 @@
 ;;; -*- scheme -*-
 
-;;; Copyright © 2019 - 2020 Jakob L. Kreuze <zerodaysfordays@sdf.org>
+;;; Copyright © 2019 - 2021 Jakob L. Kreuze <zerodaysfordays@sdf.org>
 ;;;
 ;;; This program is free software; you can redistribute it and/or
 ;;; modify it under the terms of the GNU General Public License as
@@ -113,6 +113,50 @@ maintain the Arch Linux package, which is unfortunate, as I no longer use Arch
 Linux.")
      ,(string->date "Apr 15 2018" "~b ~e ~Y"))))
 
+(define %ctf-teams
+  `((2016
+     "Shaq Overflow"
+     "https://ctftime.org/team/28150"
+     "https://ctftime.org/media/cache/81/35/813561ed466cd4ea5303de2cb394a5f5.png"
+     178
+     3244)
+    (2017
+     "Shaq Overflow"
+     "https://ctftime.org/team/28150"
+     "https://ctftime.org/media/cache/81/35/813561ed466cd4ea5303de2cb394a5f5.png"
+     349
+     12096)
+    (2017
+     "0xBU"
+     "https://ctftime.org/team/22064"
+     "https://ctftime.org/media/cache/1c/a8/1ca85a2b2f131b0c3b73439b06f5f9dc.png"
+     25
+     216)
+    (2018
+     "0xBU"
+     "https://ctftime.org/team/22064"
+     "https://ctftime.org/media/cache/1c/a8/1ca85a2b2f131b0c3b73439b06f5f9dc.png"
+     29
+     267)
+    (2019
+     "0x7C_Jake"
+     "https://ctftime.org/team/77995"
+     "https://ctftime.org/media/cache/05/52/05526f1aa281e0b1e6792ffaaa08cd2c.png"
+     "Unranked"
+     "Unranked")
+    (2019
+     "SavedByTheShell"
+     "https://ctftime.org/team/78233"
+     "https://ctftime.org/media/cache/37/37/37370fff4b9f8c907a4fee83fb6950bf.png"
+     102
+     942)
+    (2020
+     "SavedByTheShell"
+     "https://ctftime.org/team/78233"
+     "https://ctftime.org/media/cache/37/37/37370fff4b9f8c907a4fee83fb6950bf.png"
+     63
+     492)))
+
 (define (lang-to-button lang)
   (case lang
     ((c)      '(button (@ (class "lang-c"))      "C"))
@@ -231,11 +275,18 @@ If `end' is specified, return `#t' iff `date' is prior to `end'."
                   (format #f "~a - Present" (date->string start-date "~b ~e ~Y"))))
          (td (p ,@description)))))
 
-(define* (project-section title format items #:key subtitle folded)
+(define* (ctf-team year name url icon-url country-rating global-rating)
+  `(tr (td ,year)
+       (td (img (@ (src ,icon-url) (alt "Team logo."))))
+       (td ,(hyperlink url name))
+       (td ,country-rating)
+       (td ,global-rating)))
+
+(define* (project-section title format items #:key class subtitle folded)
   #<(section
     (h4 ,title)
     ,(when subtitle `(p ,subtitle))
-    (table (@ (class "project-section"))
+    (table (@ (class ,(or class "project-section")))
      (tbody
       ,@(map (lambda (args) (apply format args)) items)))))
 
@@ -297,4 +348,21 @@ projects, which I enumerate here. I take pride in giving back code.")
      "The unfortunate reality of hobbyist programming is that projects to be
 abandoned once that coding itch is satisfied. That's true of many of my
 projects."
-     #:folded #t)))
+     #:folded #t)
+   (h3 "Capture the Flag")
+   ,(project-section
+     "Team Timeline"
+     ctf-team
+     %ctf-teams
+     #:class "team-timeline-section")
+   (h3 "Events Hosted")
+   (ul
+    (li "UMass CTF 2020")
+    (li ,(hyperlink "https://ctftime.org/event/1282" "UMass CTF 2021")))
+   (h3 "Presentations")
+   (table
+    (tr (td "Introduction to Binary Exploitation") (td "UMass Amherst") (td "October 23rd, 2019"))
+    (tr (td "Learning Assembly for Fun and Profit (and Flags)") (td "UMass Amherst") (td "March 4th, 2020"))
+    (tr (td "UMass Cybersecurity Club Reverse Engineering Workshop") (td "UMass Amherst") (td "October 4th, 2021")))
+   (h3 "Publications")
+   (p (em "None. Yet..."))))