robur/builder-web
4
0
Fork 0
Code Issues Pull requests 1 Projects Releases Packages Wiki Activity Actions

remove unused css

Browse source
This commit is contained in:
Pizie Dust 2025-02-12 23:29:40 +01:00
parent 28113becd5
commit 24d93026af
2 changed files with 26 additions and 1056 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1046
lib/styles.ml
View file

File diff suppressed because it is too large Load diff

36
lib/views.ml
View file

@ -97,14 +97,14 @@ let layout
[H.style ~a:H.[a_mime_type "text/css"] static_css]) [H.style ~a:H.[a_mime_type "text/css"] static_css])
(H.body ~a:[H.a_class ["bg-gray-50 dark:bg-black-molly w-full text-gray-800 dark:text-gray-50 mx-auto p-10 md:grid md:grid-cols-4"]] [ (H.body ~a:[H.a_class ["bg-gray-50 dark:bg-black-molly w-full text-gray-800 dark:text-gray-50 mx-auto p-10 md:grid md:grid-cols-4"]] [
H.div ~a:[H.a_class ["text-center md:col-span-1 hidden md:block"]; H.a_style ""] [ H.div ~a:[H.a_class ["text-center md:col-span-1 hidden md:block"]; H.a_style ""] [
H.img ~a:[H.a_class ["fixed"]; H.a_id "robur-logo"] ~src:"https://i.ibb.co/Y4YsvcDb/robur-logo.png" ~alt:"Robur Logo" () H.img ~a:[H.a_id "robur-logo"] ~src:"https://i.ibb.co/Y4YsvcDb/robur-logo.png" ~alt:"Robur Logo" ()
]; ];
H.div ~a:[H.a_class ["mx-auto w-full md:col-span-3 px-4"]] [ H.div ~a:[H.a_class ["mx-auto w-full md:col-span-3 px-4"]] [
H.(div ~a:[a_class ["flex justify-between items-center"]] [ H.(div ~a:[a_class ["flex justify-between items-center"]] [
div [breadcrumb]; div [breadcrumb];
div ~a:[a_class ["flex items-center space-x-4"]] [ div ~a:[a_class ["flex items-center space-x-4"]] [
form ~a:[a_action "/hash"; a_method `Get; a_class ["mt-6 p-4"]] [ form ~a:[a_action "/hash"; a_method `Get; a_class ["my-4 p-4"]] [
label ~a:[a_class ["block text-lg font-semibold mb-2 text-right"]] [ label ~a:[a_class ["block text-lg font-semibold my-2 text-right"]] [
txt "Search artifact by SHA256"; txt "Search artifact by SHA256";
]; ];
div ~a:[a_class ["w-full flex space-x-2 justify-end justify-items-center items-center"]] [ div ~a:[a_class ["w-full flex space-x-2 justify-end justify-items-center items-center"]] [
@ -114,14 +114,14 @@ let layout
a_id "sha256"; a_id "sha256";
a_required (); a_required ();
a_name "sha256"; a_name "sha256";
a_class ["w-full border bg-gray-200 text-gray-800 rounded px-3 py-2 focus:ring-0 focus:ring-primary-500"] a_class ["w-full border bg-gray-200 text-gray-800 rounded px-3 py-2 focus:ring-0 focus:ring-primary-200"]
] () ] ()
]; ];
div ~a:[a_class ["text-center"]] [ div ~a:[a_class ["text-center"]] [
input ~a:[ input ~a:[
a_input_type `Submit; a_input_type `Submit;
a_value "Search"; a_value "Search";
a_class ["mt-3 bg-primary-500 text-gray-50 cursor-pointer font-bold py-2 px-4 rounded hover:bg-primary-800"] a_class ["my-4 bg-primary-500 text-gray-50 cursor-pointer font-bold py-2 px-4 rounded hover:bg-primary-800"]
] () ] ()
] ]
] ]
@ -266,22 +266,22 @@ module Builds = struct
H.([ H.([
div ~a:[a_class ["header container mx-auto px-4 py-8 text-gray-800"]] [ div ~a:[a_class ["header container mx-auto px-4 py-8 text-gray-800"]] [
(* Logo Section *) (* Logo Section *)
div ~a:[a_class ["flex items-center mb-6"]] [ div ~a:[a_class ["flex items-center my-4"]] [
]; ];
h1 ~a:[a_class ["text-7xl font-bold text-primary-600 text-center"]] h1 ~a:[a_class ["text-7xl font-bold text-primary-500 text-center"]]
[txt "Reproducible OPAM Builds"] [txt "Reproducible OPAM Builds"]
]; ];
div ~a:[a_class ["grid grid-cols-2 gap-3"]] [ div ~a:[a_class ["grid grid-cols-2 gap-3"]] [
div [ div [
p ~a:[a_class ["text-lg mb-4"]] [ p ~a:[a_class ["text-lg my-4"]] [
txt "This website offers binary MirageOS unikernels and supplementary OS packages. "; txt "This website offers binary MirageOS unikernels and supplementary OS packages. ";
txt "If you want to use our binary packages and setup unikernels, follow "; txt "If you want to use our binary packages and setup unikernels, follow ";
a ~a:[a_href "https://robur.coop/Projects/Reproducible_builds"; a_class ["text-primary-500 underline font-mono"]] a ~a:[a_href "https://robur.coop/Projects/Reproducible_builds"; a_class ["text-primary-500 underline font-mono"]]
[txt "these instructions"]; [txt "these instructions"];
txt "." txt "."
]; ];
p ~a:[a_class ["text-lg mb-4"]] [ p ~a:[a_class ["text-lg my-4"]] [
txt "The unikernels are statically linked executables where the execution target is "; txt "The unikernels are statically linked executables where the execution target is ";
txt "independent of the build platform - so even if they're compiled on a FreeBSD "; txt "independent of the build platform - so even if they're compiled on a FreeBSD ";
txt "system they can be run on a Linux or OpenBSD host. Many are executed using a "; txt "system they can be run on a Linux or OpenBSD host. Many are executed using a ";
@ -291,7 +291,7 @@ module Builds = struct
]; ];
]; ];
div [ div [
p ~a:[a_class ["text-lg mt-6 mb-4"]] [ p ~a:[a_class ["text-lg my-4"]] [
txt "A persistent link to the latest successful build is available as "; txt "A persistent link to the latest successful build is available as ";
code ~a:[a_class ["px-2 py-1 rounded text-sm font-mono text-primary-500"]] code ~a:[a_class ["px-2 py-1 rounded text-sm font-mono text-primary-500"]]
[txt "/job/*jobname*/build/latest/"]; [txt "/job/*jobname*/build/latest/"];
@ -300,7 +300,7 @@ module Builds = struct
[txt "orb"]; [txt "orb"];
txt "." txt "."
]; ];
p ~a:[a_class ["text-lg mb-4"]] [ p ~a:[a_class ["text-lg my-4"]] [
txt "The builds are scheduled and executed daily by "; txt "The builds are scheduled and executed daily by ";
a ~a:[a_href "https://github.com/robur-coop/builder/"; a_class ["text-primary-500 underline font-mono"]] a ~a:[a_href "https://github.com/robur-coop/builder/"; a_class ["text-primary-500 underline font-mono"]]
[txt "builder"]; [txt "builder"];
@ -312,7 +312,7 @@ module Builds = struct
[txt "on our project page"]; [txt "on our project page"];
txt "." txt "."
]; ];
p ~a:[a_class ["text-lg mt-6 mb-4"]] [ p ~a:[a_class ["text-lg my-4"]] [
txt "This work has been funded by the European Union under the "; txt "This work has been funded by the European Union under the ";
a ~a:[a_href "https://pointer.ngi.eu"; a_class ["text-primary-500 underline font-mono"]] a ~a:[a_href "https://pointer.ngi.eu"; a_class ["text-primary-500 underline font-mono"]]
[txt "NGI Pointer"]; [txt "NGI Pointer"];
@ -321,7 +321,7 @@ module Builds = struct
]; ];
]; ];
div ~a:[a_class ["my-4"]] [ div ~a:[a_class ["my-4"]] [
h2 ~a:[a_class ["text-xl font-semibold mt-6 mb-2"]] h2 ~a:[a_class ["text-xl font-semibold my-2"]]
[txt "Execution Environments"]; [txt "Execution Environments"];
ul ~a:[a_class ["list-disc list-inside text-lg space-y-2 font-mono"]] [ ul ~a:[a_class ["list-disc list-inside text-lg space-y-2 font-mono"]] [
li [span ~a:[a_class ["text-primary-500"]] [txt ".spt: "]; txt "sandboxed process - requires solo5-spt (Linux with seccomp)"]; li [span ~a:[a_class ["text-primary-500"]] [txt ".spt: "]; txt "sandboxed process - requires solo5-spt (Linux with seccomp)"];
@ -403,14 +403,14 @@ module Builds = struct
Utils.String_map.fold aux section_job_map [] Utils.String_map.fold aux section_job_map []
let make_failed_builds = let make_failed_builds =
[ H.div ~a:H.[a_class ["flex justify-center mt-6"]] [ [ H.div ~a:H.[a_class ["flex justify-center my-4"]] [
H.a ~a:H.[a_href "/failed-builds"; H.a ~a:H.[a_href "/failed-builds";
a_class ["text-secondary-500 underline font-semibold"]] a_class ["text-secondary-500 underline font-semibold"]]
[H.txt "View Latest Failed Builds"]; [H.txt "View Latest Failed Builds"];
]] ]]
let make_all_or_active all = let make_all_or_active all =
[ H.div ~a:H.[a_class ["flex justify-center mt-6"]] [ [ H.div ~a:H.[a_class ["flex justify-center my-4"]] [
H.a ~a:H.[a_href (if all then "/" else "/all-builds"); H.a ~a:H.[a_href (if all then "/" else "/all-builds");
a_class ["text-primary-500 underline font-semibold"]] a_class ["text-primary-500 underline font-semibold"]]
[H.txt (if all then "View Active Jobs" else "View All Jobs")]; [H.txt (if all then "View Active Jobs" else "View All Jobs")];
@ -724,7 +724,7 @@ module Job_build = struct
[ [
"px-4 py-4 text-center \ "px-4 py-4 text-center \
font-bold \ font-bold \
text-primary-600 uppercase"; text-primary-500 uppercase";
]; ];
] ]
[ txt "Platform" ]; [ txt "Platform" ];
@ -735,7 +735,7 @@ module Job_build = struct
[ [
"px-4 py-4 text-center \ "px-4 py-4 text-center \
font-bold \ font-bold \
text-primary-600 uppercase"; text-primary-500 uppercase";
]; ];
] ]
[ txt "Duration" ]; [ txt "Duration" ];
@ -746,7 +746,7 @@ module Job_build = struct
[ [
"px-4 py-4 text-center \ "px-4 py-4 text-center \
font-bold \ font-bold \
text-primary-600 uppercase"; text-primary-500 uppercase";
]; ];
] ]
[ txt "Execution Result" ]; [ txt "Execution Result" ];