Editing Module:Test/lib/search

Jump to navigation Jump to search

Warning: You are not logged in. Your IP address will be publicly visible if you make any edits. If you log in or create an account, your edits will be attributed to your username, along with other benefits.

The edit can be undone. Please check the comparison below to verify that this is what you want to do, and then save the changes below to finish undoing the edit.

Latest revision Your text
Line 4: Line 4:
 
-- conductor --
 
-- conductor --
 
---------------
 
---------------
-- ancestry functionality (commented out)
+
-- sibling_key: optional, deprecate the whole thing
-- sibling_key: optional, deprecate the whole thing (commented out)
+
-- query: {key, value}
 
+
-- query: {key, }
-- Possible query combinations:
+
-- query: {nil, value}
--   query: {key, value}
+
-- query: key (string or number)
--   query: {key, nil}
 
--   query: {nil, value}
 
--   query: key (string or number)
 
 
function search.conductor(query, tbl)
 
function search.conductor(query, tbl)
   assert(query, "conductor: missing argument #1 (query)")
+
   local f_name = "conductor"
   assert(tbl, "conductor: missing argument #2 (table to search through)")
+
   assert(query, string.format("bad argument #1 to '%s' (argument missing, search query)", f_name))
   assert(type(tbl) == 'table', string.format("conductor: bad argument #2 (table expected, got %s)", type(tbl)))
+
   assert(tbl, string.format("bad argument #2 to '%s' (argument missing, table to search through)", f_name))
  
 
   search.state = {
 
   search.state = {
Line 21: Line 18:
 
     ["queried"] = {}
 
     ["queried"] = {}
 
   }
 
   }
--~   search.ancestors = {}
+
   search.ancestors = {}
  
 
   search.state.args.query = query
 
   search.state.args.query = query
Line 27: Line 24:
 
--~  search.state.args.sibling_key = sibling_key
 
--~  search.state.args.sibling_key = sibling_key
  
   local result = search.find(query, tbl)
+
   local result = search.find_first(query, tbl)
  
 
   if result then
 
   if result then
Line 39: Line 36:
 
-- ancestry --
 
-- ancestry --
 
--------------
 
--------------
--~ function search.generate_anscestry_of_last_search(quad)
+
function search.generate_anscestry_of_last_search(quad)
--~   quad = quad or {}
+
   quad = quad or {}
  
--~   for _,v in ipairs(search.state.queried) do
+
   for _,v in ipairs(search.state.queried) do
--~     if v.value == quad.parent.table then
+
     if v.value == quad.parent.table then
--~       table.insert(search.ancestors, quad.parent.key)
+
       table.insert(search.ancestors, quad.parent.key)
--~       search.generate_anscestry_of_last_search(v, search.state.queried, ancestors)
+
       search.generate_anscestry_of_last_search(v, search.state.queried, ancestors)
--~     elseif not quad.parent.key then return nil
+
     elseif not quad.parent.key then return nil
--~     end
+
     end
--~   end
+
   end
--~ end
+
end
  
 
----------------------
 
----------------------
Line 58: Line 55:
 
   local condition = false
 
   local condition = false
  
   if type(query) == 'string' or type(query) == 'number' then
+
   if type(query) == "string" or type(query) == "number" then
 
     condition = key == query
 
     condition = key == query
 
   elseif query[1] and query[2] then
 
   elseif query[1] and query[2] then
Line 72: Line 69:
  
 
----------------
 
----------------
-- find first --
+
-- find_first --
 
----------------
 
----------------
search.meta = {}
+
function search.find_first(query, tbl, tbl_key)
function search.find(query, tbl, parentKey)
+
   local subtables = {}
   local children = {}
 
  
   for k,v in pairs(tbl) do -- search through children that are not tables
+
   for k,v in pairs(tbl) do
  
 
     local quad = {
 
     local quad = {
Line 84: Line 80:
 
       value = v,
 
       value = v,
 
       parent = {
 
       parent = {
         key = parentKey,
+
         key = tbl_key,
 
         table = tbl
 
         table = tbl
 
       }
 
       }
 
     }
 
     }
  
--~     -- needed to generate ancestry
+
     -- I do this to be able to generate ancestry for the searh
 +
    -- functionality disabled at the moment
 
--~    table.insert(search.state.queried, quad)
 
--~    table.insert(search.state.queried, quad)
  
 
     if search.search_condition(query, k, v) then
 
     if search.search_condition(query, k, v) then
       search.meta = quad
+
       return quad
      return v
 
 
     elseif type(v) == "table" then
 
     elseif type(v) == "table" then
       table.insert(children, k)
+
       table.insert(subtables, k)
 
     end
 
     end
  
 
   end
 
   end
  
   for _,childK in ipairs(children) do -- search through child tables
+
  -- By doing it like this it will first search through all of the children and after that
     local found = search.find(query, tbl[childK], childK)
+
  -- descend into grandchildren.
     if found then return found end
+
   for _,k in ipairs(subtables) do
 +
     local f = search.find_first(query, tbl[k], k)
 +
     if f then return f
 +
    end
 
   end
 
   end
 
end
 
end
  
return search -- return module
+
return search

Please note that all contributions to RimWorld Wiki are considered to be released under the CC BY-SA 3.0 (see RimWorld Wiki:Copyrights for details). If you do not want your writing to be edited mercilessly and redistributed at will, then do not submit it here.
You are also promising us that you wrote this yourself, or copied it from a public domain or similar free resource. Do not submit copyrighted work without permission!

Cancel Editing help (opens in new window)