#include "__until.h"
#include "Exception.h"
#include "Operand.h"
#include <iostream>

namespace jet {
   
   __until::__until(coreutils::ZString &in, coreutils::MString &parentOut, Global &global, Tag *parent) : Tag(in, parentOut, global, parent, this) {

      coreutils::MString result;
      bool booleanResult = false;
      bool exprMethod = false;
      coreutils::MString exprSaved;
      
      if(variableDefined("value1")) {
	 
	 if(variableDefined("expr"))
	   throw coreutils::Exception("either value1 or expr can be specified but not both.");
	 if(!variableDefined("value2")) 
	   throw coreutils::Exception("value2 required if value1 specified.");
	 if(!variableDefined("type")) 
	   throw coreutils::Exception("type expected if value1 and value2 specified.");
	 
	 int rc = variables["value1"].compare(variables["value2"]);
	 if(((variables["type"] == "eq") && (rc == 0)) ||
	    ((variables["type"] == "ne") && (rc != 0)) ||
	    ((variables["type"] == "lt") && (rc == -1)) ||
	    ((variables["type"] == "le") && (rc != 1)) ||
	    ((variables["type"] == "gt") && (rc == 1)) ||
	    ((variables["type"] == "ge") && (rc != -1)))
	   booleanResult = true;
	 else
	   throw coreutils::Exception("type value must be 'eq','ne','lt','le','gt','ge'.");
      }
      else if(variableDefined("expr")) {
	 if(variableDefined("value2"))
	   throw coreutils::Exception("value2 should not be specified with expr.");
	 if(variableDefined("type"))
	   throw coreutils::Exception("type should not be specified with expr.");
	 exprMethod = true;
	 exprSaved = variables["expr"];
      }
      do {
	 processContainer(container);
	 container.reset();
	 if(exprMethod) {
	    variables["expr"].reset();
	    variables["expr"] = exprSaved;
	    resolveKeyword("expr");
	    booleanResult = Operand(variables["expr"], global, parent->variables).boolean;
	 } else {
	    booleanResult = false;
	    int rc = variables["value1"].compare(variables["value2"]);
	    if(((variables["type"] == "eq") && (rc == 0)) ||
	       ((variables["type"] == "ne") && (rc != 0)) ||
	       ((variables["type"] == "lt") && (rc == -1)) ||
	       ((variables["type"] == "le") && (rc != 1)) ||
	       ((variables["type"] == "gt") && (rc == 1)) ||
	       ((variables["type"] == "ge") && (rc != -1)))
	      booleanResult = true;  
	 }	 
      } while(booleanResult);
      
   }
   
}