package org.paneris.jammyjoes.controller;

 import java.util.Enumeration;

 import java.util.Vector;

 import javax.servlet.ServletConfig;

 import javax.servlet.ServletException;

 import org.melati.Melati;

 import org.melati.poem.Field;

 import org.melati.poem.Persistent;

 import org.melati.poem.util.DumbPagedEnumeration;

 import org.melati.poem.util.PagedEnumeration;

 import org.melati.servlet.Form;

 import org.melati.template.ServletTemplateContext;

 import org.melati.util.MelatiException;

 import org.melati.util.UTF8URLEncoder;

 import org.paneris.jammyjoes.model.JammyjoesDatabase;

 import org.paneris.jammyjoes.model.Product;

 import org.paneris.jammyjoes.model.Supplier;

 import org.paneris.jammyjoes.servlet.JammyJoesMelatiServlet;

 import org.paneris.jammyjoes.shopping.MelatiShoppingConfig;

 import org.paneris.jammyjoes.shopping.ShoppingTrolley;

 import org.paneris.jammyjoes.util.JammyJoesUtil;

 public class Search extends JammyJoesMelatiServlet {

   private static final long serialVersionUID = 1L;

   public MelatiShoppingConfig config;

   private JammyjoesDatabase db;

   public void init(ServletConfig conf) throws ServletException {

     super.init(conf);

     try {

       config = new MelatiShoppingConfig();

     } catch (MelatiException e) {

       throw new ServletException(e.toString());

     }

   }

   protected String jammyjoesRequest(Melati melati, ServletTemplateContext context) throws Exception {

     db = (JammyjoesDatabase) melati.getDatabase();

     ServletTemplateContext tc = melati.getServletTemplateContext();

     String debug = "";

     String print = Form.getFormNulled(tc, "print");

     String inframe = Form.getFormNulled(tc, "inframe");

     String template = JammyJoesUtil.shoppingTemplate(melati, "Results.wm");

     if (print != null)

       template = "view/PrintResults.wm";

     String[] pathInfo = melati.getPathInfoParts();

     Logger logger = new Logger(db.getSettingTable().get("UploadDir") + "/../");

     SearchCriteria andSearchCriteria = new TemplateContextSearchCriteria(tc,pathInfo,db,logger, "AND");

     ParameterProvider provider = new ParameterProvider(tc, pathInfo);

     SearchType type = db.getTypeTable().fromParameter(provider);

     SearchAge age = db.getAgeTable().fromParameter(provider);

     SearchMaufacturer manufacturer = db.getManufacturerTable().fromParameter(provider);

     String sale = getParam(tc, "field_sale", pathInfo, 7);

     String supplierString = getParam(tc, "field_supplier", pathInfo, 9);

     Integer supplier = null;

     try {

       supplier = getInt(supplierString);

       if (supplier != null)

         supplierString = ((Supplier) db.getSupplierTable().getObject(supplier)).getName();

     } catch (NumberFormatException e) {

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

       if (en.hasMoreElements())

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

     }

     String troidString = getParam(tc, "troid", pathInfo, 0);

     Integer troid = null;

     try {

       troid = getInt(troidString);

       if (troid != null)

         troidString = ((Product) db.getProductTable().getObject(troid)).getName();

     } catch (NumberFormatException e) {}

     String price = getParam(tc, "field_price", pathInfo, 3);

     String description = getParam(tc, "field_description", pathInfo, 4);

     String outofstock = getParam(tc, "field_outofstock", pathInfo, 6);

     Integer hitsPerPage = getInt(getParam(tc, "hits", pathInfo, 10));

     String startString = getParam(tc, "start", pathInfo, 11);

     String go = Form.getFormNulled(tc, "go");

     logger.logType(type);

     String path =

       pathise(troidString)

         + type.pathise()

         + age.pathise()

         + pathise(price)

         + pathise(description)

         + pathise("_")

         + pathise(outofstock)

         + pathise(sale)

         + manufacturer.pathise()

         + pathise(supplierString)

         + pathise(hitsPerPage);

     if (hitsPerPage == null)

       hitsPerPage = new Integer(100);

     context.put("path", path);

     context.put("type", new Field(type, db.getProductTable().getTypeColumn()));

     context.put("ages", makeVector(db.getAgeTable().selection()));

     context.put("trolley", ShoppingTrolley.getInstance(melati, config));

     context.put("metaData", new TitleGenerator(type, age, manufacturer, troidString, description));

     context.put("metaRange", "");

     context.put("metaSupplier", notNull(supplierString));

     context.put("metaName", notNull(troidString));

     context.put("metaDescription", notNull(description));

     boolean run = false;

     if (go != null

       || troidString != null

       || !type.isNull()

       || !age.isNull()

       || price != null

       || description != null

       || outofstock != null

       || !manufacturer.isNull()

       || sale != null

       || supplier != null

       || startString != null)

       run = true;

     if (pathInfo.length < 1 && !run) {

       template = JammyJoesUtil.shoppingTemplate(melati, "Shopping.wm");

       if (print != null)

         template = "view/PrintSearch.wm";

     } else {

       logger.logUsersIp(melati.getRequest().getRemoteAddr());

       PagedEnumeration r = null;

       if (run) {

         r = new ProductSearch(db, 200, logger).doSearch(andSearchCriteria);

       }

       int start = 0;

       if (startString != null) {

         try {

           start = new Integer(startString).intValue();

         } catch (NumberFormatException e) {

         }

       }

       if (r != null){

         logger.writeLog();

         if (r.getTotalCount() == 0) {

           SearchCriteria orSearchCriteria = new TemplateContextSearchCriteria(tc,pathInfo,db,logger, "OR");

           r = new ProductSearch(db, 200, logger).doSearch(orSearchCriteria);

         }

         if (r.getTotalCount() == 1) {

           Product similarToMe = (Product)r.nextElement();

           Vector oneResult = new Vector();

           oneResult.add(similarToMe);

           context.put("results", new DumbPagedEnumeration(oneResult.elements(), start, hitsPerPage.intValue(), 200));

           context.put("similarResults", new DumbPagedEnumeration(new ProductSearch(db, 10, new Logger(null)).doSearch(new SimilarSearchCriteria(similarToMe)), 0, 10, 10));

         } else {

           melati.getSession().setAttribute("path", path + pathise(startString));

           context.put("results", new DumbPagedEnumeration(r, start, hitsPerPage.intValue(), 200));

         }

       }

       context.put("debug", debug);

     }

     return template;

   }

   private Vector makeVector(Enumeration enumeration) {

     Vector result = new Vector();

     while (enumeration.hasMoreElements()) {

       result.add(enumeration.nextElement());

     }

     return result;

   }

   private String pathise(Object in) {

     if (in == null)

       return "/_";

     return "/" + UTF8URLEncoder.encode(in.toString());

   }

   private String getParam(ServletTemplateContext tc, String name, String[] pathInfo, int pos) {

     String value = Form.getFormNulled(tc, name);

     if (value == null && pos > -1 && pos < pathInfo.length) {

       value = pathInfo[pos];

       if (value != null) {

         if (value.equals("") || value.equals("_")) {

           value = null;

         } else {

           try {

             value = UTF8URLEncoder.decode(value);

           } catch (Exception e) {

           }

         }

       }

     }

     return value;

   }

   private Integer getInt(String in) {

     if (in != null)

       return new Integer(in);

     return null;

   }

   private String notNull(String in) {

     if (in != null)

       return in;

     return "";

   }

 }