package data.stdforms.twotableformsheet;

import sale.*;

import data.*;
import data.stdforms.*;

import users.*;

/**
  * MoveStrategy for a DataBasket source and a Catalog destination.
  *
  * @author Steffen Zschaler
  * @version 2.0 20/08/1999
  * @since v2.0
  */
public class DBCStrategy extends MoveStrategy {

  /**
    * Get the sub-process that will move items from the destination to the source.
    *
    * @param p the process into which the sub-process wil be embedded.
    * @param sp the SalesPoint, if any, at which the FormSheet is being displayed.
    * @param dbSource the source DataBasket.
    * @param cDest the destination Catalog.
    * @param ci the CatalogItem that is selected in the destination.
    * @param ttfs the FormSheet that triggers the process.
    *
    * @override Never
    */
  public Transition getMoveToSourceProcess (SaleProcess p,
                                            SalesPoint sp,
                                            DataBasket dbSource,
                                            Catalog cDest,
                                            CatalogItem ci,
                                            TwoTableFormSheet ttfs) {
    return new GateChangeTransition (getCheckMoveToSourceGate (p, sp, dbSource, cDest, ci, ttfs));
  }

  /**
    * Get the first gate of the sub-process that will move items from the destination to the source.
    *
    * <p>This Gate will check whether the move is allowable, and if so, will trigger a Transition that
    * performs it.</p>
    *
    * @param p the process into which the sub-process wil be embedded.
    * @param sp the SalesPoint, if any, at which the FormSheet is being displayed.
    * @param dbSource the source DataBasket.
    * @param cDest the destination Catalog.
    * @param ci the CatalogItem that is selected in the destination.
    * @param ttfs the FormSheet that triggers the process.
    *
    * @override Never Instead, override {@link #checkMoveToSource} and/or {@link #moveToSource}.
    */
  protected Gate getCheckMoveToSourceGate (SaleProcess p,
                                           final SalesPoint sp,
                                           final DataBasket dbSource,
                                           final Catalog cDest,
                                           final CatalogItem ci,
                                           final TwoTableFormSheet ttfs) {
    return new Gate() {
      public Transition getNextTransition (SaleProcess p, User u)
        throws InterruptedException {
        int nCheckResult = checkMoveToSource (p, sp, dbSource, cDest, ci);

        if (nCheckResult == 0) {
          return new Transition() {
            public Gate perform (SaleProcess p, User u) {
              moveToSource (p, sp, dbSource, cDest, ci);

              return ttfs.getGate();
            }
          };
        }
        else {
          error (p, nCheckResult);

          return new GateChangeTransition (ttfs.getGate());
        }
      }
    };
  }

  /**
    * Check whether the indicated move is allowable. If so, return 0, otherwise return a non-zero error value
    * that can be passed on to {@link sale.stdforms.FormSheetStrategy#error}. You can assume that you are at a {@link Gate}.
    *
    * @param p the process into which the sub-process wil be embedded.
    * @param sp the SalesPoint, if any, at which the FormSheet is being displayed.
    * @param dbSource the source DataBasket.
    * @param cDest the destination Catalog.
    * @param ci the CatalogItem that is selected in the destination.
    *
    * @override Sometimes The default implementation returns 0.
    */
  protected int checkMoveToSource (SaleProcess p,
                                   SalesPoint sp,
                                   DataBasket dbSource,
                                   Catalog cDest,
                                   CatalogItem ci)
    throws InterruptedException {
    return 0;
  }

  /**
    * Move the indicated item from the destination Catalog. You can assume that you are in a
    * {@link Transition}.
    *
    * @param p the process into which the sub-process wil be embedded.
    * @param sp the SalesPoint, if any, at which the FormSheet is being displayed.
    * @param dbSource the source DataBasket.
    * @param cDest the destination Catalog.
    * @param ci the CatalogItem that is selected in the destination.
    *
    * @override Sometimes
    */
  protected void moveToSource (SaleProcess p,
                               SalesPoint sp,
                               DataBasket dbSource,
                               Catalog cDest,
                               CatalogItem ci) {
    try {
      cDest.remove (ci, dbSource);
    }
    catch (DataBasketConflictException dbce) {
      error (p, DATABASKET_CONFLICT_ERROR);
    }
    catch (data.events.VetoException ve) {
      error (p, REMOVE_VETO_EXCEPTION);
    }
  }

  /**
    * Get the sub-process that will move items from the source to the destination.
    *
    * @param p the process into which the sub-process wil be embedded.
    * @param sp the SalesPoint, if any, at which the FormSheet is being displayed.
    * @param dbSource the source DataBasket.
    * @param cDest the destination Catalog.
    * @param ci the CatalogItem that is selected in the source.
    * @param ttfs the FormSheet that triggers the process.
    *
    * @override Never
    */
  public Transition getMoveToDestProcess (SaleProcess p,
                                          SalesPoint sp,
                                          DataBasket dbSource,
                                          Catalog cDest,
                                          CatalogItem ci,
                                          TwoTableFormSheet ttfs) {
    return new GateChangeTransition (getCheckMoveToDestGate (p, sp, dbSource, cDest, ci, ttfs));
  }

  /**
    * Get the first gate of the sub-process that will move items from the source to the destination.
    *
    * <p>This Gate will check whether the move is allowable, and if so, will trigger a Transition that
    * performs it.</p>
    *
    * @param p the process into which the sub-process wil be embedded.
    * @param sp the SalesPoint, if any, at which the FormSheet is being displayed.
    * @param dbSource the source DataBasket.
    * @param cDest the destination Catalog.
    * @param ci the CatalogItem that is selected in the source.
    * @param ttfs the FormSheet that triggers the process.
    *
    * @override Never Instead, override {@link #checkMoveToDest} and/or {@link #moveToDest}.
    */
  protected Gate getCheckMoveToDestGate (SaleProcess p,
                                         final SalesPoint sp,
                                         final DataBasket dbSource,
                                         final Catalog cDest,
                                         final CatalogItem ci,
                                         final TwoTableFormSheet ttfs) {
    return new Gate() {
      public Transition getNextTransition (SaleProcess p, User u)
        throws InterruptedException {
          int nCheckResult = checkMoveToDest (p, sp, dbSource, cDest, ci);

          if (nCheckResult == 0) {
            return new Transition() {
              public Gate perform (SaleProcess p, User u) {
                moveToDest (p, sp, dbSource, cDest, ci);

                return ttfs.getGate();
              }
            };
          }
          else {
            error (p, nCheckResult);

            return new GateChangeTransition (ttfs.getGate());
          }
      }
    };
  }

  /**
    * Check whether the indicated move is allowable. If so, return 0, otherwise return a non-zero error value
    * that can be passed on to {@link sale.stdforms.FormSheetStrategy#error}. You can assume that you are at a {@link Gate}.
    *
    * @param p the process into which the sub-process wil be embedded.
    * @param sp the SalesPoint, if any, at which the FormSheet is being displayed.
    * @param dbSource the source DataBasket.
    * @param cDest the destination Catalog.
    * @param ci the CatalogItem that is selected in the source.
    *
    * @override Sometimes The default implementation returns
    * {@link ProcessErrorCodes#NOT_ENOUGH_ELEMENTS_ERROR} if the DataBasket contains no entry describing the
    * CatalogItem.
    */
  protected int checkMoveToDest (SaleProcess p,
                                 SalesPoint sp,
                                 DataBasket dbSource,
                                 Catalog cDest,
                                 CatalogItem ci)
    throws InterruptedException {
    if (!dbSource.contains (DataBasketConditionImpl.specificCatalogItem (ci))) {
      return NOT_ENOUGH_ELEMENTS_ERROR;
    }
    else {
      return 0;
    }
  }

  /**
    * Move the item into the destination Catalog. You can assume that you are in a {@link Transition}.
    *
    * @param p the process into which the sub-process wil be embedded.
    * @param sp the SalesPoint, if any, at which the FormSheet is being displayed.
    * @param dbSource the source DataBasket.
    * @param cDest the destination Catalog.
    * @param ci the CatalogItem that is selected in the source.
    *
    * @override Sometimes
    */
  protected void moveToDest (SaleProcess p,
                             SalesPoint sp,
                             DataBasket dbSource,
                             Catalog cDest,
                             CatalogItem ci) {
    try {
      cDest.add (ci, dbSource);
    }
    catch (DuplicateKeyException dke) {
      error (p, DUPLICATE_KEY_EXCEPTION);
    }
    catch (DataBasketConflictException dbce) {
      error (p, DATABASKET_CONFLICT_ERROR);
    }
  }
}