nim-basic/main.nim

import std/httpclient
import std/htmlparser
import std/xmltree
import std/strtabs
import std/os
import scrap
import std/json
import std/strutils
import std/tables
import std/macros

var client = newHttpClient()
var html: string
#
#      main_loop <------------
#       |       |             |
# normal_loop  array_loop     |
# (var node)   (var array[])  |
#     |            |
#     ----->-------------------
#

proc dbg_dl(level : int)=
  for a in  0..level:
    stdout.write "    "
  stdout.write level
  stdout.write("[do_loop]")
proc dbg_ml(level : int)=
  for a in 0..level:
    stdout.write "    "
  stdout.write level
  stdout.write("[main_loop]")
proc dbg_al(level : int)=
  for a in 0..level:
    stdout.write "    "
  stdout.write level
  stdout.write("[array_loop]")

proc main_loop[T]( node : T , level : int, searchString : string = "",path :string = "H")

proc do_loop[T](node: T,level : int, searchString : string = "", path: string = "", key : string) =
    if searchString == "" or node.contains(searchString):
      dbg_dl(level)
      stdout.write path & "-" & key
    if node.kind == JObject:
      if searchString == "" or node.contains(searchString):
        stdout.write("\n")
        dbg_dl(level)
        echo "childs: "
        for y in node.keys:
          dbg_dl(level)
          stdout.write path & "-" & y," [", node[y].kind,"] \n"
          main_loop(node[y],level+1,searchString,path & "-" & key)

proc do_array_loop(node : JsonNode, level : int, searchString : string = "", path: string = "",key :string = "") =
      if searchString == "" or node.contains(searchString):
        dbg_al(level)
        echo "Key: ",key
        #dbg_al(level)
        #echo "Array Elements: ", node.getElems()
        dbg_al(level)
        echo "Array Length", node.len()
        dbg_al(level)
      for b in node.getElems:
        dbg_al(level)
        echo "node : ", "array_node_len: ", b.len()," ,subkind: " ,b.kind, "mainkind: ", node.kind
        main_loop(b,level+1,searchString,path & "-A-" & key)
  

proc main_loop[T]( node : T , level : int, searchString : string = "",path :string = "H") = 
    if node.len() > 0:
      if node.kind == JObject:
        var elem = node.getElems()
        for b in node.pairs:
          dbg_ml(level)
          echo "element: ",b, " path: ",path  
        for a in node.keys:
          if node[a].kind == JObject:
            do_loop(node[a],level,searchString,path, a)
          elif node[a].kind == JArray:
            do_array_loop(node[a],level+1,searchString,path,a)
          #elif node[a].kind == JString:
          #  dbg_ml(level)
          #  echo "String: ",path & "-" & $node[a]
      elif node.kind == JArray:
          do_array_loop(node,level,searchString,path)
      
echo "URL:"
var url: string = "https://www.comparis.ch/immobilien/marktplatz/lenzburg/mieten?page=2"#readLine(stdin)
echo "given url is: ",url

try:
  html = client.getContent(url)
  let node =  parseHtml(html)
  
  var htmlnode: XmlNode
  var entry : Entry
  
  add(entry.desc,Descriptor(name : "test", html_context_tag : "div",html_context_attrs : "class",html_context_key : "css-19re50j", html_tag : "p",aattrs : "class",attrs_key : "css-svet6u"))
  #comparis stores part of the data in a script tag as a json-string, so we get that part:
  add(entry.desc,Descriptor(name : "script-json", html_context_tag : "script",html_context_attrs : "type",html_context_key : r"application/json", html_tag : "",aattrs : "",attrs_key : ""))

  


  echo("###########")
  discard entry.getEntryFromHtml(node)

  #echo entry.desc[1].content[0]
  let jsonString = replaceWord(entry.desc[1].content[0],sub = r"\"",by = r""")
  let jsonNode = parseJson(jsonString)
  #echo "jsonString: ",jsonString
  #echo "JSON Node:", jsonNode
  #echo "node fields: ",jsonNode["props"]["pageProps"]["pageTitle"].getStr()
  let field = jsonNode.getFields()
  main_loop(jsonNode,0,searchString = "")

  #echo "resultitem", jsonNode["resultItems"]
 # for a in jsonNode.keys:
 #   echo a
 #   if jsonNode[a].len() > 0:
 #     for b in jsonNode[a].keys:
 #       echo ">>>"
 #       main_loop(jsonNode[a][b])
 #   else:
 #     echo "---------------"
finally:
    client.close()