AtlatestRepositorysigil-crypto
sigil-crypto / tree / test / wasm / src / crypto-probefixtures.sgl
1
;;; GENERATED by test/wasm/gen-fixtures.sh from test/fixtures/minisign.2
;;; Do not edit by hand.3
(define-library (crypto-probe fixtures)4
(export fixture)5
(import (sigil core) (sigil math))6
(begin7
(define (hex->bv s)8
(let* ((n (quotient (string-length s) 2))9
(bv (make-bytevector n 0)))10
(let loop ((i 0))11
(if (< i n)12
(begin13
(bytevector-u8-set! bv i (string->number (substring s (* 2 i) (+ 2 (* 2 i))) 16))14
(loop (+ i 1)))15
bv))))16
(define fixtures17
(list18
(cons "a.pub" "756e7472757374656420636f6d6d656e743a206d696e697369676e207075626c6963206b657920313445423346423239304239363230340a5257514559726d51736a2f72464f49547836574f666b314a56754f736c4a56377a777668366d4d334e43444a48687359666c6c634153414d0a")19
(cons "b.pub" "756e7472757374656420636f6d6d656e743a206d696e697369676e207075626c6963206b657920433138413242433839433131313645340a5257546b466847637943754b77636161794b67714268463474584262784c6c596435597a7752414a6945312b55424e2f566a734f36656d740a")20
(cons "hello.txt" "68656c6c6f2c206d696e697369676e0a")21
(cons "hello.txt.ED.minisig" "756e7472757374656420636f6d6d656e743a207369676e61747572652066726f6d206d696e697369676e20736563726574206b65790a5255514559726d51736a2f724647417954744b512b34785a4b2b30673366544d78727764775678375a6a6a393948413777746b494c704270354b4a4b633630513647622f2b5945424f464d47644f2f69457a507345315374456c59744b536c6664674d3d0a7472757374656420636f6d6d656e743a20736967696c2d63727970746f20666978747572653a207072656861736865640a6757456d34687931356a54394a4e517154716c6c6335387742647075316d3462444a79636d677162504b6b722f5a622b51752f522b523561534879336b4c3351377679344c5a74414253644750344f595075546241673d3d0a")22
(cons "hello.txt.Ed.minisig" "756e7472757374656420636f6d6d656e743a207369676e61747572652066726f6d206d696e697369676e20736563726574206b65790a5257514559726d51736a2f724642796b59426163384f654b69624a53594b63642b7672564d513434426e6d70624269626732524d6937356143347a4a4b6e506232713459776d554566616e665563634a344e6e39756a476d6b7875692f4d73316351383d0a7472757374656420636f6d6d656e743a20736967696c2d63727970746f20666978747572653a206c65676163790a6e3346334b6255765a454e5a4d72674d656b38634d343872526174476257306e3552684b505237594b637577416277396262304e6351706f3633355042775134516a6f47356d4f584162557a317453687a314a7741673d3d0a")23
(cons "hello.txt.keyb.minisig" "756e7472757374656420636f6d6d656e743a207369676e61747572652066726f6d206d696e697369676e20736563726574206b65790a5255546b466847637943754b7759544d556f345838636465433363334c664731725344667a304d6e6341344a55363062353152656155533533544f4b307a6a6e594873354a5773686374457a554d414c73493069776d2b364d563264416f72305a676f3d0a7472757374656420636f6d6d656e743a20736967696c2d63727970746f20666978747572653a206b657920620a32667a314277766f35386777676b6554483443587a79484133634f365969423975325a656a6e47346d495a47305a374b7158763153544d6f6e5a307931354259356e3535476e512b3937647866612b6c52704f6c41673d3d0a")24
(cons "binary.bin" "000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f202122232425262728292a2b2c2d2e2f303132333435363738393a3b3c3d3e3f404142434445464748494a4b4c4d4e4f505152535455565758595a5b5c5d5e5f606162636465666768696a6b6c6d6e6f707172737475767778797a7b7c7d7e7f808182838485868788898a8b8c8d8e8f909192939495969798999a9b9c9d9e9fa0a1a2a3a4a5a6a7a8a9aaabacadaeafb0b1b2b3b4b5b6b7b8b9babbbcbdbebfc0c1c2c3c4c5c6c7c8c9cacbcccdcecfd0d1d2d3d4d5d6d7d8d9dadbdcdddedfe0e1e2e3e4e5e6e7e8e9eaebecedeeeff0f1f2f3f4f5f6f7f8f9fafbfcfdfeff000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f202122232425262728292a2b2c2d2e2f303132333435363738393a3b3c3d3e3f404142434445464748494a4b4c4d4e4f505152535455565758595a5b5c5d5e5f606162636465666768696a6b6c6d6e6f707172737475767778797a7b7c7d7e7f808182838485868788898a8b8c8d8e8f909192939495969798999a9b9c9d9e9fa0a1a2a3a4a5a6a7a8a9aaabacadaeafb0b1b2b3b4b5b6b7b8b9babbbcbdbebfc0c1c2c3c4c5c6c7c8c9cacbcccdcecfd0d1d2d3d4d5d6d7d8d9dadbdcdddedfe0e1e2e3e4e5e6e7e8e9eaebecedeeeff0f1f2f3f4f5f6f7f8f9fafbfcfdfeff000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f202122232425262728292a2b2c2d2e2f303132333435363738393a3b3c3d3e3f404142434445464748494a4b4c4d4e4f505152535455565758595a5b5c5d5e5f606162636465666768696a6b6c6d6e6f707172737475767778797a7b7c7d7e7f808182838485868788898a8b8c8d8e8f909192939495969798999a9b9c9d9e9fa0a1a2a3a4a5a6a7a8a9aaabacadaeafb0b1b2b3b4b5b6b7b8b9babbbcbdbebfc0c1c2c3c4c5c6c7c8c9cacbcccdcecfd0d1d2d3d4d5d6d7d8d9dadbdcdddedfe0e1e2e3e4e5e6e7e8e9eaebecedeeeff0f1f2f3f4f5f6f7f8f9fafbfcfdfeff000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f202122232425262728292a2b2c2d2e2f303132333435363738393a3b3c3d3e3f404142434445464748494a4b4c4d4e4f505152535455565758595a5b5c5d5e5f606162636465666768696a6b6c6d6e6f707172737475767778797a7b7c7d7e7f808182838485868788898a8b8c8d8e8f909192939495969798999a9b9c9d9e9fa0a1a2a3a4a5a6a7a8a9aaabacadaeafb0b1b2b3b4b5b6b7b8b9babbbcbdbebfc0c1c2c3c4c5c6c7c8c9cacbcccdcecfd0d1d2d3d4d5d6d7d8d9dadbdcdddedfe0e1e2e3e4e5e6e7e8e9eaebecedeeeff0f1f2f3f4f5f6f7f8f9fafbfcfdfeff")25
(cons "binary.bin.ED.minisig" "756e7472757374656420636f6d6d656e743a207369676e61747572652066726f6d206d696e697369676e20736563726574206b65790a5255514559726d51736a2f72464c5637755a7575444f5a6e64626c434731743768765341702b377376636d35436f38496d556e555232362f4664307a44614f2b55702b304e5253654c446c5a7a376f32694b466d6d324b534f5069682f5969692b51633d0a7472757374656420636f6d6d656e743a20736967696c2d63727970746f20666978747572653a2062696e6172790a7832334f395961554a63626d41414f6f5266357a536f52476a3867766c33666a4556356e4d746c43717a38694775443263304e6556622b74636f733930764d496b6a4f763748496c44446c7253332b4d6730696143413d3d0a")26
(cons "registry.json" "7b0a202022736368656d61223a20312c0a20202270726f746f636f6c223a20312c0a2020227265676973747279223a2022706b672e757365736967696c2e6f7267222c0a202022736571223a20312c0a20202275706461746564223a2022323032362d30372d33305430383a30343a35345a222c0a2020226b657973223a205b0a202020207b226964223a2243343545313135304432443346353541222c22616c676f726974686d223a226d696e697369676e2d65643235353139222c22726f6c6573223a5b22726f6f74225d2c227075626c69632d6b6579223a225257526139645053554246657842624c647a5a496675416d7543594c3733365565484337496264414f49597067474979446d575261514859222c22737461747573223a22616374697665227d2c0a202020207b226964223a2232314343394245333136433645304644222c22616c676f726974686d223a226d696e697369676e2d65643235353139222c22726f6c6573223a5b22696e646578225d2c227075626c69632d6b6579223a2252575439344d59573435764d49624964517572494d6b343649445a514d69487a6c50375677595150564e7a74784a77453233466b48755231222c22737461747573223a22616374697665227d2c0a202020207b226964223a2237463932423432363036304632463036222c22616c676f726974686d223a226d696e697369676e2d65643235353139222c22726f6c6573223a5b22746f6f6c636861696e225d2c227075626c69632d6b6579223a22525751474c7738474a725353667a756463792f766e4d67557a6f45557656646d5a78797a413230414a36675375736a516b33656233614255222c22737461747573223a22616374697665227d2c0a202020207b226964223a2244423141383238424430333446353935222c22616c676f726974686d223a226d696e697369676e2d65643235353139222c22726f6c6573223a5b227375627374697475746573225d2c227075626c69632d6b6579223a22525753563954545169344961327a7647674261636c48483877494334632f4531323439587265696b4a38673055342f7a2b76734d37377032222c22737461747573223a22616374697665227d2c0a202020207b226964223a2239383945463534463545393343373336222c22616c676f726974686d223a226d696e697369676e2d65643235353139222c22726f6c6573223a5b226368616e6e656c73225d2c227075626c69632d6b6579223a225257513278354e65542f57656d4773493361562f4738676e724c65765166746149594943326430364650636f5356376e316863616e306a30222c22737461747573223a22616374697665227d0a20205d2c0a2020226c6f67223a206e756c6c2c0a202022726570726f6475636962696c697479223a206e756c6c0a7d0a")27
(cons "registry.json.minisig" "756e7472757374656420636f6d6d656e743a207369676e61747572652066726f6d206d696e697369676e20736563726574206b65790a52555261396450535542466578474a4743366d2b6672345552583343362f31346237637638354662546775693464434f41524f6a2f784130567934536e35755862426c734f5739504259514e7a2b625a326676515072344f35712f2f2b626b4c6b51773d0a7472757374656420636f6d6d656e743a2072656769737472793d706b672e757365736967696c2e6f726720706174683d2f76312f6d6574612f72656769737472792e6a736f6e207365713d312074733d323032362d30372d33305430383a30343a35345a0a434c37584e576d56354b6c6f366249484538783249584631384c777148665a503272796e6d6f535072527a44434c4a746c4766772b4d4c783763514759535a6f2f4c6b346341324f474d46412f4f31517a59425943773d3d0a")28
))29
;; The fixture's bytes; raises for an unknown name.30
(define (fixture name)31
(let ((entry (assoc name fixtures)))32
(if entry33
(hex->bv (cdr entry))34
(error (string-append "no such fixture: " name)))))))