package org.paneris.jammyjoes.controller;

 import java.util.Enumeration;

 import java.util.List;

 import java.util.Vector;

 import org.melati.poem.Persistent;

 import org.melati.template.ServletTemplateContext;

 import org.melati.poem.util.EnumUtils;

 import org.melati.util.StringUtils;

 import org.paneris.jammyjoes.model.Age;

 import org.paneris.jammyjoes.model.JammyjoesDatabase;

 public class TemplateContextSearchCriteria implements SearchCriteria {

   private ParameterProvider provider; 

   private JammyjoesDatabase db;

   Logger logger;

   private String andOr;

   public TemplateContextSearchCriteria(ServletTemplateContext tc, String[] pathInfo, JammyjoesDatabase db, Logger logger, String andOr) {

     provider = new ParameterProvider(tc, pathInfo);

     this.db = db;

     this.logger = logger;

     this.andOr = andOr;

   }

   public void constrain(List constraints) {

     if (!constrainTroid(constraints)) {

       constrainOutOfStock(constraints);

       constrainDescription(constraints);

       constrainType(constraints);

       constrainSupplier(constraints);

       constrainManufacturer(constraints);

       constrainPrice(constraints);

       constrainAge(constraints);

       constrainSale(constraints);

     }

   }

   private void constrainSale(List constraints) {

     String sale = provider.getParam("field_sale", 7);

     if (sale != null) {

       constraints.add(q("saleprice") + " IS NOT NULL");

     }

   }

   public void constrainDicontinued(List constraints) {

     constraints.add(q("status") + " != " + db.getProductStatusTable().getDiscontinued().getTroid());

   }

   public String order() {

     return null;

   }

   public boolean constrainTroid(List constraints) {

     String troidString = provider.getParam("troid", 0);

     Integer troid =  null;

     try {

       troid = getInt(troidString);

     } catch (NumberFormatException e) {

       Enumeration en = db.getProductTable().getNameColumn().selectionWhereEq(troidString);

       if (en.hasMoreElements()) {

         troid = ((Persistent) en.nextElement()).getTroid();

       }

     }

     if (troid != null) {

       constraints.add(q("id") + " = " + troid);

       logger.logTroid(troid);

       return true;

     }

     return false;

   }

   public void constrainPrice(List constraints) {

     String price = provider.getParam("field_price", 3);

     if (price != null) {

       String[] prices = StringUtils.split(price, '_');

       constraints.add(q("retailpriceincvat") + " >= " + prices[0]);

       constraints.add(q("retailpriceincvat") + " <= " + prices[1]);

       logger.logPrice(price);

     }

   }

   public void constrainOutOfStock(List constraints) {

     String outofstock = provider.getParam("field_outofstock", 6);

     if (outofstock == null) {

       constraints.add(q("stocklevel") + " > 0");

     }

   }

   public void constrainDescription(List constraints) {

     String description = provider.getParam("field_description", 4);

     if (description != null) {

       description = description.trim();

       logger.logDescription(description);

       String[] parts = StringUtils.split(description, ' ');

       Vector subwhere = new Vector();

       String descClause = makeClause(db, "description", parts);

       String nameClause = makeClause(db, "name", parts);

       String typeClause = makeClause(db, "type", parts);

       if (descClause != null)

         subwhere.add(descClause);

       if (nameClause != null)

         subwhere.add(nameClause);

       if (typeClause != null)

       subwhere.add(

         q("type")

           + " IN (SELECT "

           + q("id")

           + " FROM "

           + q("type")

           + " WHERE "

           + typeClause

           + ")");

       subwhere.add(

         q("type2")

           + " IN (SELECT "

           + q("id")

           + " FROM "

           + q("type")

           + " WHERE "

           + typeClause

           + ")");

        if (!subwhere.isEmpty()) {

         constraints.add("(" + EnumUtils.concatenated(" OR ", subwhere.elements()) + ")");

       }

     }

   }

   public void constrainType(List constraints) {

     String typeString = provider.getParam("field_type", 1);

     Integer type = null;

     try {

       type = getInt(typeString);

     } catch (NumberFormatException e) {

       Enumeration en = db.getTypeTable().getTypeColumn().selectionWhereEq(typeString);

       if (en.hasMoreElements())

         type = ((Persistent) en.nextElement()).getTroid();

     }

     if (type != null)

       constraints.add("(" + q("type") + " = " + type + " OR " + q("type2") + " = " + type + ")");

   }

   public String q(String name) {

     StringBuffer b = new StringBuffer();

     StringUtils.appendQuoted(b, name, '"');

     return b.toString();

   }

   public String e(String value) {

     StringBuffer b = new StringBuffer();

     StringUtils.appendQuoted(b, value, '\'');

     return b.toString();

   }

   private Integer getInt(String in) {

     return in == null ? null : new Integer(in);

   }

   private String makeClause(JammyjoesDatabase db, String field, String[] parts) {

     Vector clause = new Vector();

     for (int i = 0; i < parts.length; i++) {

       String part = parts[i];

       if (!part.equals("")) {

         clause.add(db.getDbms().caseInsensitiveRegExpSQL(q(field), e(part)));

       }

     }

     if (clause.isEmpty())

       return null;

     return "(" + EnumUtils.concatenated(" " + andOr + " ", clause.elements()) + ")";

   }

   public void constrainSupplier(List constraints) {

     String supplierString = provider.getParam("field_supplier", 9);

     Integer supplier = null;

     try {

       supplier = getInt(supplierString);

     } catch (NumberFormatException e) {

       Enumeration en = db.getSupplierTable().getNameColumn().selectionWhereEq(supplierString);

       if (en.hasMoreElements())

         supplier = ((Persistent) en.nextElement()).getTroid();

     }

     if (supplier != null)

       constraints.add(q("supplier") + " = " + supplier);

   }

   public void constrainManufacturer(List constraints) {

     String manufacturerString = provider.getParam("field_manufacturer", 8);

     Integer manufacturer = null;

     try {

       manufacturer = getInt(manufacturerString);

     } catch (NumberFormatException e) {

       Enumeration en =

         db.getManufacturerTable().getNameColumn().selectionWhereEq(manufacturerString);

       if (en.hasMoreElements())

         manufacturer = ((Persistent) en.nextElement()).getTroid();

     }

     if (manufacturer != null)

       constraints.add(q("manufacturer") + " = " + manufacturer);

   }

   public void constrainAge(List constraints) {

     String ageString = provider.getParam("field_age", 2);

     Integer minAge = null;

     Integer maxAge = null;

     if (ageString != null) {

       int hyphen = ageString.indexOf('_');

       if (hyphen > 0) {

         String[] ages = StringUtils.split(ageString, '_');

         minAge = new Integer(ages[0]);

         maxAge = new Integer(ages[1]);

       } else {

         Enumeration en = db.getAgeTable().getNameColumn().selectionWhereEq(ageString);

         if (en.hasMoreElements()) {

           Age theAge = (Age)en.nextElement();

           minAge = theAge.getMinage();

           maxAge = theAge.getMaxage();

         }

       }

     }

     if (minAge != null && maxAge != null) {

       constraints .add(

         "(("

           + minAge

           + " >= "

           + q("minage")

           + " AND "

           + minAge

           + " <= "

           + q("maxage")

           + " ) OR ("

           + maxAge

           + " >= "

           + q("minage")

           + " AND "

           + maxAge

           + " <= "

           + q("maxage")

           + "))");

           logger.logAge(ageString);

     }

   }

 }