Data.pudu

Pudu75 lines6.2 KB

Copy pathGitHub ↗

1/** @Test.Support.Placeholder.Data.Module — the seed records of the placeholder service */2module Support.Placeholder.Data34import Std.Json as Json56/** @Test.Support.Placeholder.Data.Relation — a nested route: the child resource and its parent key */7export type Relation = { parent: Str, child: Str, key: Str }89/// The resources the service holds, in the order they are listed.10export const RESOURCES: Array[Str] = ["posts", "comments", "albums", "photos", "todos", "users"]1112/// How many records each resource starts with, as the public service holds.13export const COUNTS: Map[Str, Int] = mapOf([("posts", 100), ("comments", 500), ("albums", 100), ("photos", 5000), ("todos", 200), ("users", 10)])1415/// The nested routes: `/parent/:id/child` lists the children whose key is the parent's id.16export const RELATIONS: Array[Relation] = [17  Relation{parent: "posts", child: "comments", key: "postId"},18  Relation{parent: "albums", child: "photos", key: "albumId"},19  Relation{parent: "users", child: "posts", key: "userId"},20  Relation{parent: "users", child: "albums", key: "userId"},21  Relation{parent: "users", child: "todos", key: "userId"}22]2324/// The ten users: name, user name, email, street, suite, city, zip code, latitude, longitude,25/// phone, website, company, catch phrase, and business.26const USERS: Array[Array[Str]] = [27  ["Leanne Graham", "Bret", "Sincere@april.biz", "Kulas Light", "Apt. 556", "Gwenborough", "92998-3874", "-37.3159", "81.1496", "1-770-736-8031 x56442", "hildegard.org", "Romaguera-Crona", "Multi-layered client-server neural-net", "harness real-time e-markets"],28  ["Ervin Howell", "Antonette", "Shanna@melissa.tv", "Victor Plains", "Suite 879", "Wisokyburgh", "90566-7771", "-43.9509", "-34.4618", "010-692-6593 x09125", "anastasia.net", "Deckow-Crist", "Proactive didactic contingency", "synergize scalable supply-chains"],29  ["Clementine Bauch", "Samantha", "Nathan@yesenia.net", "Douglas Extension", "Suite 847", "McKenziehaven", "59590-4157", "-68.6102", "-47.0653", "1-463-123-4447", "ramiro.info", "Romaguera-Jacobson", "Face to face bifurcated interface", "e-enable strategic applications"],30  ["Patricia Lebsack", "Karianne", "Julianne.OConner@kory.org", "Hoeger Mall", "Apt. 692", "South Elvis", "53919-4257", "29.4572", "-164.2990", "493-170-9623 x156", "kale.biz", "Robel-Corkery", "Multi-tiered zero tolerance productivity", "transition cutting-edge web services"],31  ["Chelsey Dietrich", "Kamren", "Lucio_Hettinger@annie.ca", "Skiles Walks", "Suite 351", "Roscoeview", "33263", "-31.8129", "62.5342", "(254)954-1289", "demarco.info", "Keebler LLC", "User-centric fault-tolerant solution", "revolutionize end-to-end systems"],32  ["Mrs. Dennis Schulist", "Leopoldo_Corkery", "Karley_Dach@jasper.info", "Norberto Crossing", "Apt. 950", "South Christy", "23505-1337", "-71.4197", "71.7478", "1-477-935-8478 x6430", "ola.org", "Considine-Lockman", "Synchronised bottom-line interface", "e-enable innovative applications"],33  ["Kurtis Weissnat", "Elwyn.Skiles", "Telly.Hoeger@billy.biz", "Rex Trail", "Suite 280", "Howemouth", "58804-1099", "24.8918", "21.8984", "210.067.6132", "elvis.io", "Johns Group", "Configurable multimedia task-force", "generate enterprise e-tailers"],34  ["Nicholas Runolfsdottir V", "Maxime_Nienow", "Sherwood@rosamond.me", "Ellsworth Summit", "Suite 729", "Aliyaview", "45169", "-14.3990", "-120.7677", "586.493.6943 x140", "jacynthe.com", "Abernathy Group", "Implemented secondary concept", "e-enable extensible e-tailers"],35  ["Glenna Reichert", "Delphine", "Chaim_McDermott@dana.io", "Dayna Park", "Suite 449", "Bartholomebury", "76495-3109", "24.6463", "-168.8889", "(775)976-6794 x41206", "conrad.com", "Yost and Sons", "Switchable contextually-based project", "aggregate real-time technologies"],36  ["Clementina DuBuque", "Moriah.Stanton", "Rey.Padberg@karina.biz", "Kattie Turnpike", "Suite 198", "Lebsackbury", "31428-2261", "-38.2386", "57.2232", "024-648-3804", "ambrose.net", "Hoeger LLC", "Centralized empowering task-force", "target end-to-end models"]37]3839/// Every resource's records as the service starts with them.40export fn seed() -> Map[Str, Array[Json.Json]] {41  mapOf([42      ("posts", numbered(100, |id: Int| Json.object(&[("userId", Json.Number(owner(id, 10))), ("id", Json.Number(id)), ("title", Json.Text("post " + show(id))), ("body", Json.Text("the body of post " + show(id)))]))),43      ("comments", numbered(500, |id: Int| Json.object(&[("postId", Json.Number(owner(id, 5))), ("id", Json.Number(id)), ("name", Json.Text("comment " + show(id))), ("email", Json.Text("reader" + show(id) + "@example.test")), ("body", Json.Text("the body of comment " + show(id)))]))),44      ("albums", numbered(100, |id: Int| Json.object(&[("userId", Json.Number(owner(id, 10))), ("id", Json.Number(id)), ("title", Json.Text("album " + show(id)))]))),45      ("photos", numbered(5000, |id: Int| Json.object(&[("albumId", Json.Number(owner(id, 50))), ("id", Json.Number(id)), ("title", Json.Text("photo " + show(id))), ("url", Json.Text("https://picsum.photos/seed/" + show(id) + "/600")), ("thumbnailUrl", Json.Text("https://picsum.photos/seed/" + show(id) + "/150"))]))),46      ("todos", numbered(200, |id: Int| Json.object(&[("userId", Json.Number(owner(id, 20))), ("id", Json.Number(id)), ("title", Json.Text("todo " + show(id))), ("completed", Json.Boolean(id % 3 == 0))]))),47      ("users", numbered(10, |id: Int| user(id, &USERS[id - 1])))48    ])49}5051/// The records numbered from 1 to `count`.52fn numbered(count: Int, make: fn(Int) -> Json.Json) -> Array[Json.Json] {53  var records: Array[Json.Json] = []54  var id = 155  while id <= count {56    records = records.push(make(id))57    id = id + 158  }59  records60}6162/// The owner of a record when every owner holds `per` records in order.63fn owner(id: Int, per: Int) -> Int { (id - 1) / per + 1 }6465/// One user record from its fields.66fn user(id: Int, fields: &Array[Str]) -> Json.Json {67  let text = |index: Int| Json.Text(fields[index])68  Json.object(&[69      ("id", Json.Number(id)), ("name", text(0)), ("username", text(1)), ("email", text(2)),70      ("address", Json.object(&[("street", text(3)), ("suite", text(4)), ("city", text(5)), ("zipcode", text(6)), ("geo", Json.object(&[("lat", text(7)), ("lng", text(8))]))])),71      ("phone", text(9)), ("website", text(10)),72      ("company", Json.object(&[("name", text(11)), ("catchPhrase", text(12)), ("bs", text(13))]))73    ])74}75