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()