memex/logic/lib/indental.js

function Indental(data)
{
  this.data = data;

  this.parse = function(type)
  {
    var lines = this.data.split("\n").map(liner)
    // Assoc lines
    var stack = {}
    var target = lines[0]
    for(id in lines){
      var line = lines[id]
      if(line.skip){ continue; }
      target = stack[line.indent-2];
      if(target){ target.children.push(line) }
      stack[line.indent] = line
    }

    // Format
    var h = {}
    for(id in lines){
      var line = lines[id];
      if(line.skip || line.indent > 0){ continue; }
      var key = line.content.toUpperCase()
      h[key] = type ? new type(key,format(line)) : format(line)
    }
    return h
  }

  function format(line)
  {
    var a = [];
    var h = {};
    for(id in line.children){
      var child = line.children[id];
      if(child.key){ h[child.key.toUpperCase()] = child.value }
      else if(child.children.length == 0 && child.content){ a.push(child.content) }
      else{ h[child.content.toUpperCase()] = format(child) }
    }
    return a.length > 0 ? a : h
  }

  function liner(line)
  {
    return {
      indent:line.search(/\S|$/),
      content:line.trim(),
      skip:line == "" || line.substr(0,1) == "~",
      key:line.indexOf(" : ") > -1 ? line.split(" : ")[0].trim() : null,
      value:line.indexOf(" : ") > -1 ? line.split(" : ")[1].trim() : null,
      children:[]
    }
  }
}