gitoria

3.6 KB

1. // lib/repos-helpers.hl — what lib/repos.hl looks up: the slug's rules, the row a page shows, a whole record with some
2. // fields changed, the tab title, the Markdown read view of the API. Statics only, no table access.
3. import { NL, localStamp, repoOrigin } from './util.hl'
4. import { nameOfUser } from './users.hl'
6. // names that are addresses of the system itself, or that would read as one (never a repo)
7. // only technical host names; the creator's own apps (ident, tickets, hybriel, …) are repos here too (creator 2026-09-25)
8. static reserved = ['www' 'api' 'git' 'ssh' 'http' 'https' 'ftp' 'mail' 'smtp' 'imap' 'admin' 'root' 'cdn' 'static' 'assets' 'login' 'logout' 'new' 'repos']
10. static isLower = (c) => { return c >= 97 && c <= 122 }
11. static isDigit = (c) => { return c >= 48 && c <= 57 }
13. // the slug's rules → null (fine) or the complaint. A DNS label: 2–40 characters, a–z 0–9 and
14. // single hyphens, starting and ending with a letter or digit ("--" is refused: xn-- is punycode)
15. static slugError = (slug) => {
16. if (slug == null || hlTypeName(slug) != 'String') { return 'the address must be text' }
17. if (slug.length < 2 || slug.length > 40) { return 'the address must have 2–40 characters' }
18. let i = 0
19. while (i < slug.length) {
20. let c = slug.charCodeAt(i)
21. let ok = isLower(c) || isDigit(c) || (c == 45 && i > 0 && i < slug.length - 1)
22. if (!ok) { return 'the address may only have lowercase letters a–z, digits and hyphens, and starts and ends with a letter or digit' }
23. i = i + 1
24. }
25. if (slug.includes('--')) { return 'the address must not have two hyphens in a row' }
26. if (reserved.includes(slug)) { return "'" + slug + "' is reserved for the system" }
27. return null
28. }
30. // what a page and the API show of a repo (never the tickets key)
31. static rowOf = (r) => {
32. return { id = r.id slug = r.slug description = r.description described = r.description != '' owner = nameOfUser(r.owner) branch = r.branch != null ? r.branch : '' ticketsOn = r.tktKey != null && r.tktKey != '' ticketsOff = r.tktKey == null || r.tktKey == '' ticketsProject = r.tktProject != null ? r.tktProject : '' ticketsTitle = r.tktTitle != null ? r.tktTitle : '' created = localStamp(r.created) createdMs = r.created address = repoOrigin(r.slug) + '/' }
33. }
35. // a repo's whole record with some fields changed (update() replaces the record: every field must be given again)
36. static withChange = (r, change) => {
37. o = { id = r.id slug = r.slug description = r.description owner = r.owner created = r.created branch = r.branch != null ? r.branch : '' tktKey = r.tktKey != null ? r.tktKey : '' tktProject = r.tktProject != null ? r.tktProject : '' tktTitle = r.tktTitle != null ? r.tktTitle : '' tktApi = r.tktApi != null ? r.tktApi : '' }
38. for (k of change.keys()) { o[k] = change[k] }
39. return o
40. }
42. // a tab title: 'Code · alpha · gitoria', 'alpha · gitoria', 'gitoria'
43. static pageTitle = (site, slug, what) => {
44. t = slug != null && slug != '' ? slug + ' · ' + site : site
45. return what != null && what != '' ? what + ' · ' + t : t
46. }
48. // ---- the Markdown read view (Accept: text/markdown) — for LLM readers ---------------------------
49. static repoDocument = (row) => {
50. let out = '# ' + row.slug + NL + NL
51. if (row.described) { out = out + row.description + NL + NL }
52. out = out + '- address: ' + row.address + NL + '- owner: ' + row.owner + NL + '- created: ' + row.created + NL
53. return out
54. }
56. static listDocument = (rows) => {
57. let out = '# Repositories (' + rows.length + ')' + NL + NL
58. if (rows.length == 0) { out = out + 'No repository yet.' + NL }
59. for (r of rows) { out = out + '- [' + r.slug + '](' + r.address + ')' + (r.described ? ' — ' + r.description : '') + NL }
60. return out
61. }