// Sol - SSR-first Web Framework for MoonBit
//
// Built on top of Mars, providing SSR with Luna VNodes.
// Inspired by Next.js, Solid Start, and Qwik City.
//

///|
/// Mars app type alias
pub type App = @mars.Server

///|
/// Mars context type alias
pub type Ctx = @mars.Context

///|
/// Render a VNode to HTML string with full document wrapper
/// Use hydration=true to enable hydration markers (for pages with Islands)
pub fn[E] render_page(
  node : @luna.Node[E, String],
  title? : String,
  head? : String,
  hydration? : Bool,
) -> String {
  let title_str = title.unwrap_or("App")
  let head_str = head.unwrap_or("")
  let enable_hydration = hydration.unwrap_or(false)
  let body_html = if enable_hydration {
    @render.render_to_string_with_hydration(node)
  } else {
    @render.render_to_string(node).html
  }
  @page_shell.render_document(title_str, head_str, body_html)
}

///|
/// Render a VNode to HTML string without document wrapper (for partial/fragment responses)
pub fn[E] render_fragment(node : @luna.Node[E, String]) -> String {
  @render.render_to_string_with_hydration(node)
}

///|
/// Register a page route that renders a VNode
/// Use hydration=true for pages with Islands (adds loader script and hydration markers)
pub fn[E] page(
  app : App,
  path : String,
  render_fn : (Ctx) -> @luna.Node[E, String],
  title? : String,
  head? : String,
  hydration? : Bool,
  loader_url? : String,
) -> Unit {
  app.get(
    path,
    @mars.handler(async fn(c) {
      let node = render_fn(c)
      let enable_hydration = hydration.unwrap_or(false)
      let base_head = head.unwrap_or("")
      if enable_hydration {
        // Hydration enabled: render with hydration markers and include loader script
        let loader = loader_url.unwrap_or(default_loader_url)
        let loader_script = ""
        let full_head = @hot_reload.with_dev_head_script(base_head + loader_script)
        let html = render_page(node, title?, head=full_head, hydration=true)
        c.html(html)
      } else {
        // Static page: render without hydration (but still add HMR in dev)
        let full_head = @hot_reload.with_dev_head_script(base_head)
        let html = render_page(node, title?, head=full_head)
        c.html(html)
      }
    }),
  )
}

///|
/// Create a JSON object for API responses
pub fn json_obj(pairs : Array[(String, @js.Any)]) -> @js.Any {
  @js_any.json_obj(pairs)
}

///|
/// FFI to convert MoonBit Json to JavaScript value
extern "js" fn ffi_json_to_any(json : Json) -> @js.Any =
  #| (json) => {
  #|   // Handle MoonBit Json tagged union
  #|   if (json === null || json === undefined) return null;
  #|   switch (json.$tag) {
  #|     case 0: return null;                    // Null
  #|     case 1: return json._0;                 // True -> true
  #|     case 2: return json._0;                 // False -> false
  #|     case 3: return json._0;                 // Number
  #|     case 4: return json._0;                 // String
  #|     case 5: return json._0.map(j => arguments.callee(j)); // Array
  #|     case 6: {                               // Object
  #|       const result = {};
  #|       for (const [k, v] of json._0.entries()) {
  #|         result[k] = arguments.callee(v);
  #|       }
  #|       return result;
  #|     }
  #|     default: return json;
  #|   }
  #| }

///|
/// Convert MoonBit Json to JavaScript Any value
pub fn json_to_any(json : Json) -> @js.Any {
  ffi_json_to_any(json)
}

///|
/// Convert MoonBit Json array to JavaScript Any value
pub fn json_array_to_any(arr : Array[Json]) -> @js.Any {
  // Map each Json to Any and return as JS array
  let result : Array[@js.Any] = arr.map(fn(j) { ffi_json_to_any(j) })
  ffi_array_to_any(result)
}

///|
extern "js" fn ffi_array_to_any(arr : Array[@js.Any]) -> @js.Any =
  #| (arr) => arr