2json

#!/usr/bin/env node
var eachline= require("eachline"),
  optimist= require("optimist")

//// UTIL

var intTest= /^\-?([0-9]+)$/,
  floatTest= /^\-?([0-9]+\.[0-9]*)$/

function printIt(v){
	if(!v)
		return "null"
	var floatExec= floatTest.exec(v)
	if(floatExec){
		return parseFloat(floatExec[1])
	}else{
		var intExec= intTest.exec(v)
		if(intExec)
			return parseInt(intExec[1])
	}
	v= v.replace(/"/g, '\"')
	return '"'+v+'"'
}

function trim(a){
	for(var i = a.length-1; i > 0; --i){
		if(!a[i])
			continue
		a= Array.prototype.splice.call(a,i+1)
		break
	}
	return a
}

//// ARG PROCESSING

var argv = optimist
  .usage("Usage: $0 [-w x,x,..,x] [-d '\s]'")
  .options("w", {alias: "words", default: "-1"})
  .options("d", {alias: "delim", default: "\\s"})
  .options("c", {alias: "callback"})
  .options("o", {alias: "object"})
  .options("n", {alias: "newline", default: "false"})
  .options("bare", {alias: "b"})
  .options("slots", {alias: "s"})
  .argv;

if(argv.bare && (argv.o || argv.c)){
	console.error("Bare mode precludes encasing options")
	process.exit(1)
}

var delim= argv.d,
  data= "[^"+delim+"]",
  newline= argv.n == true.toString() || argv.n == true

if(argv.w == "-1")
	argv.w = "1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1"

var wordMatches= []
wordMatches= argv.w.toString().split(",").map(function(c,w){
	if(!c)
		throw "Invalid word expression- empty"
	if(isNaN(c))
		throw "Invalid word expression- not a number"
	var expr= ["(?:",delim,"*("],
	  words= parseInt(c)
	if(words == -1)
		return
	if(words < 1)
		throw "Must have positive words"
	for(var i= 0; i< words; ++i){
		expr.push("(?:",i==0?"":(delim+"+"),data,"+)?")
	}
	expr.push("))?")
	return expr.join("")
})


if(argv.slots){
	argv.slots= argv.slots.split(",")
	argv.slots.forEach(function(v,k){
		argv.slots[k]= printIt(v)
	})
}
if(argv.c){
	if(argv.c === true || argv.c == "true"){
		process.stdout.write("callback(")
	}else{
		process.stdout.write(argv.c+"(")
	}
}

//// MAIN PROGRAM

if(argv.o){
	process.stdout.write('{"'+argv.o+'":')
}
if(!argv.bare){
	process.stdout.write("[")
}

var matcher= wordMatches.join(""),
  expr= new RegExp(matcher),
  started= false
process.stdin.pipe(eachline(function(line){
	if(line == "")
		return ""
	var buf= [","]
	if(!started){
		started= true
		buf.pop()
	}else if(newline){
		buf.push("\n")
	}
	var res= expr.exec(line)
	trim(res)
	if(!res){
		buf.push("null")
	}else if(res.length == 2){
		buf.push(printIt(res[1]))
	}else if(argv.slots){
		var i = 1
		buf.push("{", argv.slots[i-1], ":", printIt(res[i]))
		for(++i; i-1 < argv.slots.length; ++i){
			buf.push(",", argv.slots[i-1], ":", printIt(res[i]))
		}
		if(i < res.length){
			buf.push(',"_extra":[', printIt(res[i]))
			for(; ++i < res.length;){
				buf.push(",",printIt(res[i]))
			}
			buf.push("]")
		}
		buf.push("}");
	}else{
		buf.push("[",printIt(res[1]))
		for(var i= 2; i< res.length; ++i){
			var r= res[i]
			if(r)
				buf.push(",",printIt(res[i]))
		}
		buf.push("]")
	}
	return buf.join("")
})).pipe(process.stdout)
process.stdin.on("end",function(){
	if(!argv.bare){
		process.stdout.write("]")
	}
	if(argv.o){
		process.stdout.write("}")
	}
	if(argv.c){
		process.stdout.write(")")
	}
})