From d85ece03edc3669726b50e9c8c193e5626268ea8 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sat, 10 Apr 2021 15:48:17 +0200 Subject: Add skeleton of a Haunt web site. --- website/README | 17 ++ website/backronyms.txt | 13 ++ website/haunt.scm | 125 +++++++++++ website/index.md | 35 +++ website/social-contract.md | 52 +++++ website/static/css/code.css | 33 +++ website/static/css/main.css | 321 +++++++++++++++++++++++++++ website/static/fonts/FiraMono-Regular.ttf | Bin 0 -> 174632 bytes website/static/fonts/OFL.txt | 94 ++++++++ website/static/fonts/Roboto-Bold.ttf | Bin 0 -> 162464 bytes website/static/fonts/Roboto-Light.ttf | Bin 0 -> 162420 bytes website/static/fonts/Roboto-LightItalic.ttf | Bin 0 -> 166492 bytes website/static/images/background.png | Bin 0 -> 753 bytes website/static/images/favicon.png | Bin 0 -> 4210 bytes website/static/images/feed.png | Bin 0 -> 815 bytes website/static/images/h-separator-darker.png | Bin 0 -> 1091 bytes website/static/images/logo-small.png | Bin 0 -> 9619 bytes website/static/images/logo.png | Bin 0 -> 7616 bytes 18 files changed, 690 insertions(+) create mode 100644 website/README create mode 100644 website/backronyms.txt create mode 100644 website/haunt.scm create mode 100644 website/index.md create mode 100644 website/social-contract.md create mode 100644 website/static/css/code.css create mode 100644 website/static/css/main.css create mode 100755 website/static/fonts/FiraMono-Regular.ttf create mode 100644 website/static/fonts/OFL.txt create mode 100644 website/static/fonts/Roboto-Bold.ttf create mode 100644 website/static/fonts/Roboto-Light.ttf create mode 100644 website/static/fonts/Roboto-LightItalic.ttf create mode 100644 website/static/images/background.png create mode 100644 website/static/images/favicon.png create mode 100644 website/static/images/feed.png create mode 100644 website/static/images/h-separator-darker.png create mode 100644 website/static/images/logo-small.png create mode 100644 website/static/images/logo.png (limited to 'website') diff --git a/website/README b/website/README new file mode 100644 index 0000000..d011a5e --- /dev/null +++ b/website/README @@ -0,0 +1,17 @@ +To build the web site, you need Haunt: + + https://dthompson.us/projects/haunt.html + +You can install it with something like: + + guix install haunt + +The following command builds the web site: + + haunt build + +… and this one serves a copy of the web site: + + haunt serve + +Enjoy! diff --git a/website/backronyms.txt b/website/backronyms.txt new file mode 100644 index 0000000..9e42d1a --- /dev/null +++ b/website/backronyms.txt @@ -0,0 +1,13 @@ +random ideas: + + - “GNU” as in “new” + - Gathering under a New Umbrella + - Group Now Unified + - GNU’s Now Unionized + - Getting New Users + - Graphics, Networking, Utilities — Software for a variety of use + cases. + + - Gather, Grow, Group, Game, Grab, Guile + - Never, Now, New, Not + - Ultimate, Unequaled, Unprecedented, User, Unity, Unified diff --git a/website/haunt.scm b/website/haunt.scm new file mode 100644 index 0000000..18a7b2d --- /dev/null +++ b/website/haunt.scm @@ -0,0 +1,125 @@ +;;; The GNU Assembly Web Site +;;; Copyright © 2021 Ludovic Courtès +;;; +;;; This program is free software; you can redistribute it and/or modify it +;;; under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 3 of the License, or (at +;;; your option) any later version. +;;; +;;; This program is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with this program. If not, see . + +(use-modules (haunt asset) + (haunt site) + (haunt page) + (haunt html) + (haunt builder assets) + (haunt reader) + (haunt reader commonmark) + (srfi srfi-71)) + +(define %cwd + (and=> (assq-ref (current-source-location) 'filename) + dirname)) + +(define (base-url . location) + (string-concatenate (cons "" location))) + +(define (image-url location) + (base-url "/static/images" location)) + +(define (css-url location) + (base-url "/static/css" location)) + +(define* (base-layout body #:key (title "") (meta '()) + (posts '()) site) + `((doctype "html") + (html (@ (lang "en")) + (head + (meta (@ (http-equiv "Content-Type") + (content "text/html; charset=utf-8"))) + (link (@ (rel "icon") + (type "image/x-icon") + (href ,(image-url "/favicon.png")))) + (link (@ (rel "stylesheet") + (href ,(css-url "/main.css")) + (type "text/css") + (media "screen"))) + (title ,title)) + (body + (div (@ (id "header") + ,@(if (assoc-ref meta 'frontpage) + '((class "frontpage")) + '())) + (div (@ (id "header-inner") + (class "width-control")) + (a (@ (href ,(base-url "/"))) + (img (@ (class "logo") + (src ,(image-url (if (assoc-ref meta 'frontpage) + "/logo.png" + "/logo-small.png")))))) + ,@(if (assoc-ref meta 'frontpage) + '((div (@ (class "baseline")) + "Software for human empowerment.")) + '()))) + (div (@ (id "menubar") + (class "width-control")) + (ul + (li (a (@ (href ,(base-url "/"))) + "About")) + (li (a (@ (href ,(base-url "/blog"))) + "Blog")) + (li (a (@ (href ,(base-url "/blog/feed.xml"))) + (img (@ (alt "Atom feed") + (src ,(image-url "/feed.png")))))))) + + (div (@ (id "content") + (class "width-control")) + (div (@ (id "content-inner")) + (article ,body))) + + (div (@ (id "footer-box") + (class "width-control")) + (p (a (@ (href "https://wiki.gnu.tools/git/")) ;FIXME + "Source of this site"))))))) + +(define read-markdown + (reader-proc commonmark-reader)) + +(define (read-markdown-page file posts site) + "Read the CommonMark page from FILE. Return its final SXML +representation." + (let ((meta body (read-markdown (string-append %cwd "/" file)))) + (base-layout `(div (@ (class "post")) + (div (@ (class "post-body")) ,body)) + #:title (string-append "The GNU Assembly — " + (assoc-ref meta 'title)) + #:meta meta + #:posts posts + #:site site))) + +(define (static-pages) + "Return the list of static web pages." + (define (markdown-page html md) + (lambda (site posts) + (make-page html (read-markdown-page md posts site) + sxml->html))) + + (list (markdown-page "index.html" "index.md") + (markdown-page "/en/documents/social-contract/index.html" + "social-contract.md"))) + + +(site #:title "The GNU Assembly" + #:domain "gnu.tools" + #:default-metadata + '((author . "The GNU Assembly") + (email . "assembly@lists.gnu.tools")) + #:readers (list commonmark-reader) + #:builders (cons (static-directory "static") + (static-pages))) diff --git a/website/index.md b/website/index.md new file mode 100644 index 0000000..f433b67 --- /dev/null +++ b/website/index.md @@ -0,0 +1,35 @@ +title: The GNU Assembly — Software for human empowerment +frontpage: yes +--- + +**DRAFT** + +Welcome to the GNU Assembly! Wondering what this is? Here are the +highlights: + + - Gathering under a New Umbrella — + [We](https://wiki.gnu.tools/gnu:social-contract-endorsement), + maintainers and contributors of well-known free software projects + are making this place our new home, fighting for the freedom of + computer users and hacking the good hack. + - Governance, Not Unilateralism — This new home is governed by those + who build it [following common goals and sharing the same + values](/en/documents/social-contract): the + [Assembly](https://lists.gnu.tools/hyperkitty/list/assembly@lists.gnu.tools/) + is where we openly and respectfully discuss day-to-day operation and + the general direction of our umbrella project. + - This Group’s Not Uniform — We have common goals but also different + backgrounds, and we view it as a strength. Our interactions in this + project are subject to its [code of + conduct](https://wiki.gnu.tools/wiki:code-of-conduct). + - GNU’s Novelty is Unequaled — We contribute to projects that go back + to the roots of free software, some of us even know what “CVS” + means. These projects and newer ones are leading in their own + domain and we plan to keep it that way. + - GNU Needs U! — It’s about building a software commons to empower + computer users. We need you — as a user, developer, speaker, + coordinator, translator, system administrator: if you share [our + goals](https://wiki.gnu.tools/gnu:social-contract), bring your own + contributions! + +“GNU” as in “new” — join us now! diff --git a/website/social-contract.md b/website/social-contract.md new file mode 100644 index 0000000..7779132 --- /dev/null +++ b/website/social-contract.md @@ -0,0 +1,52 @@ +title: GNU Social Contract 1.0 +author: The GNU Assembly +--- + +# GNU Social Contract 1.0 + +These are the core commitments of the GNU Project, which creates and +distributes a software system that respects users' freedoms. + +## The GNU Project respects users' freedoms + +The GNU Project provides software that guarantees to all users the +_Four Essential Freedoms_, without compromise: + 0. The freedom to run the program as they wish, for any purpose. + 1. The freedom to study how the program works, and change it so it does + their computing as they wish. + 2. The freedom to redistribute copies so they can help others. + 3. The freedom to distribute copies of their modified versions to others. + +The GNU Project adopts policies that encourage and enable developers +to actively defend user freedom. These policies include using +_copyleft licenses_, designed to ensure that users’ freedoms cannot be +stripped off, when appropriate. + +Besides upholding the Four Essential Freedoms, the GNU Project pays +attention to new threats to users' freedom, and responds to them as they +arise. + + +## The GNU Project provides a consistent system + +The GNU Project develops an operating system, the _GNU System_, as well as +a set of applications. Each software component developed by the GNU Project +is referred to as a _GNU package_. GNU package developers work together to +ensure consistency across packages. + + +## The GNU Project collaborates with the broader free software community + +The GNU Project works together with other free software projects to +advance its goals, and aims to extend the reach of the project beyond +the GNU System. + + +## The GNU Project welcomes contributions from all and everyone + +The GNU Project commits to providing a harassment-free +experience for all contributors. It wants to give everyone the +opportunity of contributing to its efforts on any of the many tasks that +require work. It welcomes all contributors, regardless of their gender, +ethnicity, sexual orientation, level of experience, or any other +personal characteristics. diff --git a/website/static/css/code.css b/website/static/css/code.css new file mode 100644 index 0000000..c308845 --- /dev/null +++ b/website/static/css/code.css @@ -0,0 +1,33 @@ +/* Syntax highlighting code, by David Thompson, borrowed + from: + https://git.dthompson.us/blog.git/blob_plain/refs/heads/haunt-migration:/css/dthompson.css + David Thompson gives permission for this to be GPLv3+ and CC BY-SA 4.0 + + Modified significantly since. +*/ + + +.syntax-special, .syntax-element { + color: #856; + font-weight: bold; +} + +.syntax-symbol { + color: #423; +} + +.syntax-string { + color: #484; +} + +.syntax-keyword, .syntax-attribute { + color: #921; +} + +.syntax-comment { + color: #666; +} + +.syntax-open, .syntax-close { + color: #688; +} diff --git a/website/static/css/main.css b/website/static/css/main.css new file mode 100644 index 0000000..16f4836 --- /dev/null +++ b/website/static/css/main.css @@ -0,0 +1,321 @@ +@import url("code.css"); + +@font-face { + font-family: 'Roboto'; + src: url('/static/fonts/Roboto-Light.ttf') format('truetype'); + font-weight: normal; + font-style: normal; +} + +@font-face { + font-family: 'Roboto-Italic'; + src: url('/static/fonts/Roboto-LightItalic.ttf') format('truetype'); + font-weight: normal; + font-style: italic; +} + +@font-face { + font-family: 'Roboto-Bold'; + src: url('/static/fonts/Roboto-Bold.ttf') format('truetype'); + font-weight: normal; + font-style: bold; +} + +@font-face { + font-family: 'FiraMono'; + src: url('/static/fonts/FiraMono-Regular.ttf') format('truetype'); + font-weight: normal; + font-style: bold; +} + +@media all {html {font-size: 20px;}} +@media all and (max-width:1260px){html {font-size: 20px;}} +@media all and (max-width:1000px){html {font-size: 20px;}} +@media all and (max-width:960px){html {font-size: 19px;}} +@media all and (max-width:920px){html {font-size: 18px;}} +@media all and (max-width:880px){html {font-size: 17px;}} +@media all and (max-width:840px){html {font-size: 16px;}} +@media all and (max-width:800px){html {font-size: 16px;}} +@media all and (max-width:760px){html {font-size: 16px;}} + +/*#ffbf2d*/ + +body,html { + background-color: #fff; + width: 100%; + height: 100%; + line-height: 1.6em; + padding: 0px; + margin: 0px; + font-family: 'Roboto', sans-serif; +} + +pre { + border-style: none; + border-radius: 0.3em; + background-color: #f2efe4; + border-width: thin; + color: #423; + font-size: 0.9em; + padding: 10px; + text-align: left; + font-family: fixed-width; + overflow-x: auto; + margin-bottom: 0.8rem; +} + +code { + font-family: 'FiraMono', monospace; + border-radius: 0.3em; +} + +/* Arrange to have between 40 and 70 characters per line. */ + +.width-control { + max-width: 800px; + width: 65%; +} + +@media all and (max-width: 760px) { .width-control { width: 90%; } }; + +p { + max-width: 70rem; + margin-bottom: 0; +} + +p + p { + /*text-indent: 0.5rem;*/ + margin-top: 1.0rem; +} + +#header { + background: #fff; + height: 90px; + width: 100%; + box-shadow: 0 3px 8px #ccc; +} + +#header .logo { + padding: 10px; + display: block; +} + +#header .baseline { + color: #073b4c; + font-size: 16px; + font-family: 'Roboto', sans-serif; + font-weight: bold; + display: none; /* overridden below */ + padding: 10px; + padding-top: 2px; +} + +#header .members { + float: right; +} + +@media screen and (min-width: 640px) { + #header .baseline { + display: block; + } + #header { + height: 110px; + } +} + +#header.frontpage { + height: auto; + margin-bottom: 1em; + text-align: center; + padding-top: 2rem; + padding-bottom: 1rem; +} + +#header.frontpage .logo { + padding: 0; + margin: 0 auto; + max-width: 100%; +} + +#header.frontpage .baseline { + padding-top: 1rem; +} + +#menubar { + margin: auto; + padding: 0px; + clear: both; +} + +#header-inner { + margin: auto; + padding: 0px; +} + + +.latest-news { + margin-top: 20px; + padding-top: 0px; + padding-bottom: 0px; + padding-left: 10pt; + border-left: solid 10px #ffbf2d; + color: #533; +} + +.news-brief { +} + +#collaboration { + border-top: solid 4px #aaaaaa; + border-bottom: solid 4px #aaaaaa; + background: #ffffff; + width: 100%; + bottom: 0px; +} +#collaboration-inner { margin: 10px auto 10px auto; } +#collaboration .members { text-align: center; } +#collaboration p { padding: 0px 10px 0px 10px; } +#collaboration .members ul { display: inline-block; padding: 0px; margin: 0px; } +#collaboration .members li { + display: inline-block; padding: 0px 10px; 0px 0px; + vertical-align: middle; +} + +.post { + background: #ffffff; + padding: 10px; + margin-bottom: 25px; +} + +hr { + height: 3px; + background: url('/static/images/h-separator-darker.png'); + background-repeat: no-repeat; + background-position: center; + width: 100%; + border: none; +} + +.post h1 { color: #433; } +.post h2 { color: #433; padding: 0pt; font-size: 1.3rem; } + +.post-about { + color: #4D4D4D; + font-size: 0.9em; + margin-top: -3em; +} + +#menubar ul { display: inline-block; padding: 0px; margin: 0px; } +#menubar li { + display: inline-block; + color: #000000; + height: 32px; + line-height: 32px; + list-style-type: none; + margin: 0px; + margin: 0px 13px 0px 0px; + text-transform: uppercase; + text-decoration: none; + font-size: small; +} + +#menubar li img { + vertical-align: middle; +} + +#menubar ul:first-child { + padding-left: 10px; +} + +#content { + margin: auto; + padding: 0px; +} + +#content .search-field { + border: solid thin #aaaaaa; + width: 100%; + padding: 7px; + -webkit-border-radius: 5px; + -moz-border-radius: 5px; + border-radius: 5px; +} + +#content table { + border-spacing: 0px; + padding: 0px; +} + +#content table td { padding: 3px 5px 3px 5px; height: 25px; } + +#packages-table-wrapper { + font-size: 16px; +} + +#stand-by { + background: #decd87; + -webkit-border-radius: 5px; + -moz-border-radius: 5px; + border-radius: 5px; + font-size: 16px; +} + +#stand-by p { padding: 7px } + +#footer-box { + width: 100%; + margin: auto; + text-align: center; + color: #333333; + font-size: 0.8rem; +} + +#footer-box p { + max-width: 100%; + text-align: center; +} + +h1 { + clear: both; + line-height: 125%; + margin-top: 1.3rem; + margin-bottom: .3rem; + padding: 0px; + display: block; + font-size: 1.6rem; + font-weight: 800; +} + +h1:first-child { + font-size: 1.8rem; + margin-bottom: 3rem; + margin-top: 0; +} + +.title a { border: none; } +a { + color: #000000; + outline: none; + border-style: none none solid none; + border-width: 2px; + border-color: #ef476f; + text-decoration: none; +} +a:visited { + color: #433; + border-color: #06d6a0; + border-style: none none solid none; + border-width: 2px; + text-decoration: none; +} +a img { outline : none; } +img { border: none; } + +audio, video, .full-width { + display: block; + margin: 50px auto; + max-width: 100%; +} + +#footer-box a { color: #333333; } +#footer-box a:visited { color: #333333; } diff --git a/website/static/fonts/FiraMono-Regular.ttf b/website/static/fonts/FiraMono-Regular.ttf new file mode 100755 index 0000000..59e1e1a Binary files /dev/null and b/website/static/fonts/FiraMono-Regular.ttf differ diff --git a/website/static/fonts/OFL.txt b/website/static/fonts/OFL.txt new file mode 100644 index 0000000..ae50f94 --- /dev/null +++ b/website/static/fonts/OFL.txt @@ -0,0 +1,94 @@ +Copyright (c) 2010, Matt McInerney (matt@pixelspread.com), +Copyright (c) 2011, Pablo Impallari (www.impallari.com|impallari@gmail.com), +Copyright (c) 2011, Rodrigo Fuenzalida (www.rfuenzalida.com|hello@rfuenzalida.com), with Reserved Font Name Raleway +This Font Software is licensed under the SIL Open Font License, Version 1.1. +This license is copied below, and is also available with a FAQ at: +http://scripts.sil.org/OFL + + +----------------------------------------------------------- +SIL OPEN FONT LICENSE Version 1.1 - 26 February 2007 +----------------------------------------------------------- + +PREAMBLE +The goals of the Open Font License (OFL) are to stimulate worldwide +development of collaborative font projects, to support the font creation +efforts of academic and linguistic communities, and to provide a free and +open framework in which fonts may be shared and improved in partnership +with others. + +The OFL allows the licensed fonts to be used, studied, modified and +redistributed freely as long as they are not sold by themselves. The +fonts, including any derivative works, can be bundled, embedded, +redistributed and/or sold with any software provided that any reserved +names are not used by derivative works. The fonts and derivatives, +however, cannot be released under any other type of license. The +requirement for fonts to remain under this license does not apply +to any document created using the fonts or their derivatives. + +DEFINITIONS +"Font Software" refers to the set of files released by the Copyright +Holder(s) under this license and clearly marked as such. This may +include source files, build scripts and documentation. + +"Reserved Font Name" refers to any names specified as such after the +copyright statement(s). + +"Original Version" refers to the collection of Font Software components as +distributed by the Copyright Holder(s). + +"Modified Version" refers to any derivative made by adding to, deleting, +or substituting -- in part or in whole -- any of the components of the +Original Version, by changing formats or by porting the Font Software to a +new environment. + +"Author" refers to any designer, engineer, programmer, technical +writer or other person who contributed to the Font Software. + +PERMISSION & CONDITIONS +Permission is hereby granted, free of charge, to any person obtaining +a copy of the Font Software, to use, study, copy, merge, embed, modify, +redistribute, and sell modified and unmodified copies of the Font +Software, subject to the following conditions: + +1) Neither the Font Software nor any of its individual components, +in Original or Modified Versions, may be sold by itself. + +2) Original or Modified Versions of the Font Software may be bundled, +redistributed and/or sold with any software, provided that each copy +contains the above copyright notice and this license. These can be +included either as stand-alone text files, human-readable headers or +in the appropriate machine-readable metadata fields within text or +binary files as long as those fields can be easily viewed by the user. + +3) No Modified Version of the Font Software may use the Reserved Font +Name(s) unless explicit written permission is granted by the corresponding +Copyright Holder. This restriction only applies to the primary font name as +presented to the users. + +4) The name(s) of the Copyright Holder(s) or the Author(s) of the Font +Software shall not be used to promote, endorse or advertise any +Modified Version, except to acknowledge the contribution(s) of the +Copyright Holder(s) and the Author(s) or with their explicit written +permission. + +5) The Font Software, modified or unmodified, in part or in whole, +must be distributed entirely under this license, and must not be +distributed under any other license. The requirement for fonts to +remain under this license does not apply to any document created +using the Font Software. + +TERMINATION +This license becomes null and void if any of the above conditions are +not met. + +DISCLAIMER +THE FONT SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, +EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY WARRANTIES OF +MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT +OF COPYRIGHT, PATENT, TRADEMARK, OR OTHER RIGHT. IN NO EVENT SHALL THE +COPYRIGHT HOLDER BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, +INCLUDING ANY GENERAL, SPECIAL, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL +DAMAGES, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING +FROM, OUT OF THE USE OR INABILITY TO USE THE FONT SOFTWARE OR FROM +OTHER DEALINGS IN THE FONT SOFTWARE. diff --git a/website/static/fonts/Roboto-Bold.ttf b/website/static/fonts/Roboto-Bold.ttf new file mode 100644 index 0000000..a355c27 Binary files /dev/null and b/website/static/fonts/Roboto-Bold.ttf differ diff --git a/website/static/fonts/Roboto-Light.ttf b/website/static/fonts/Roboto-Light.ttf new file mode 100644 index 0000000..94c6bcc Binary files /dev/null and b/website/static/fonts/Roboto-Light.ttf differ diff --git a/website/static/fonts/Roboto-LightItalic.ttf b/website/static/fonts/Roboto-LightItalic.ttf new file mode 100644 index 0000000..04cc002 Binary files /dev/null and b/website/static/fonts/Roboto-LightItalic.ttf differ diff --git a/website/static/images/background.png b/website/static/images/background.png new file mode 100644 index 0000000..8772226 Binary files /dev/null and b/website/static/images/background.png differ diff --git a/website/static/images/favicon.png b/website/static/images/favicon.png new file mode 100644 index 0000000..448d4cb Binary files /dev/null and b/website/static/images/favicon.png differ diff --git a/website/static/images/feed.png b/website/static/images/feed.png new file mode 100644 index 0000000..0bfc69d Binary files /dev/null and b/website/static/images/feed.png differ diff --git a/website/static/images/h-separator-darker.png b/website/static/images/h-separator-darker.png new file mode 100644 index 0000000..2f20098 Binary files /dev/null and b/website/static/images/h-separator-darker.png differ diff --git a/website/static/images/logo-small.png b/website/static/images/logo-small.png new file mode 100644 index 0000000..ba0f29b Binary files /dev/null and b/website/static/images/logo-small.png differ diff --git a/website/static/images/logo.png b/website/static/images/logo.png new file mode 100644 index 0000000..209287c Binary files /dev/null and b/website/static/images/logo.png differ -- cgit v1.2.1