/**
 * Redistribution and use of this software and associated documentation ("Software"), with or
 * without modification, are permitted provided that the following conditions are met:
 *
 * 1. Redistributions of source code must retain copyright statements and notices. Redistributions
 * must also contain a copy of this document.
 *
 * 2. Redistributions in binary form must reproduce the above copyright notice, this list of
 * conditions and the following disclaimer in the documentation and/or other materials provided with
 * the distribution.
 *
 * 3. The name "Exolab" must not be used to endorse or promote products derived from this Software
 * without prior written permission of Intalio, Inc. For written permission, please contact
 * info@exolab.org.
 *
 * 4. Products derived from this Software may not be called "Exolab" nor may "Exolab" appear in
 * their names without prior written permission of Intalio, Inc. Exolab is a registered trademark of
 * Intalio, Inc.
 *
 * 5. Due credit should be given to the Exolab Project (http://www.exolab.org/).
 *
 * THIS SOFTWARE IS PROVIDED BY INTALIO, INC. AND CONTRIBUTORS ``AS IS'' AND ANY EXPRESSED OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
 * FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL INTALIO, INC. OR ITS
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY
 * WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 * Copyright 1999 (C) Intalio, Inc. All Rights Reserved.
 *
 * $Id$
 */

package org.exolab.castor.dsml.jndi;

import java.util.ArrayList;
import java.util.Enumeration;
import java.util.List;
import javax.naming.NamingException;
import javax.naming.NameNotFoundException;
import javax.naming.NamingEnumeration;
import javax.naming.directory.Attribute;
import javax.naming.directory.Attributes;
import javax.naming.directory.ModificationItem;
import javax.naming.directory.DirContext;
import javax.naming.directory.SearchResult;
import org.exolab.castor.dsml.Consumer;
import org.exolab.castor.dsml.ImportEventListener;
import org.exolab.castor.dsml.Importer;
import org.exolab.castor.dsml.ImportDescriptor;
import org.exolab.castor.dsml.ImportExportException;

/**
 * @author <a href="mailto:arkin@intalio.com">Assaf Arkin</a>
 * @version $Revision$ $Date: 2006-04-13 06:47:36 -0600 (Thu, 13 Apr 2006) $
 */
public class JNDIImporter extends Importer {
  private DirContext _ctx;

  public JNDIImporter(final DirContext ctx) {
    _ctx = ctx;
  }

  protected Consumer createConsumer() {
    return new JNDIConsumer();
  }

  public void importEntry(final SearchResult result, final int policy) throws NamingException {
    Attributes existing;
    Attributes attrSet;
    Attribute attr;
    NamingEnumeration<? extends Attribute> enumeration;

    if (result.getAttributes().size() == 0) {
      if ((policy & ImportDescriptor.Policy.DELETE_EMPTY) != 0) {
        try {
          _ctx.lookup(result.getName());
          _ctx.unbind(result.getName());
          notify(result.getName(), ImportEventListener.DELETED);
        } catch (NameNotFoundException except) {
          // Object does not exist, was not removed, ignore.
          notify(result.getName(), ImportEventListener.IGNORED);
        }
      } else {
        notify(result.getName(), ImportEventListener.IGNORED);
      }
    } else {
      try {
        existing = _ctx.getAttributes(result.getName());

        List<ModificationItem> modifs = new ArrayList<ModificationItem>();
        attrSet = result.getAttributes();
        enumeration = attrSet.getAll();
        while (enumeration.hasMore()) {
          attr = enumeration.next();
          if (existing.get(attr.getID()) != null) {
            if ((policy & ImportDescriptor.Policy.NEW_ATTRIBUTE_ONLY) == 0) {
              if (attr.size() > 0) {
                modifs.add(new ModificationItem(DirContext.REPLACE_ATTRIBUTE, attr));
              } else {
                modifs.add(new ModificationItem(DirContext.REMOVE_ATTRIBUTE, attr));
              }
            }
          } else {
            if ((policy & ImportDescriptor.Policy.UPDATE_ONLY) == 0) {
              if (attr.size() > 0) {
                modifs.add(new ModificationItem(DirContext.ADD_ATTRIBUTE, attr));
              }
            }
          }
        }
        if ((policy & ImportDescriptor.Policy.REPLACE_ATTRIBUTE) != 0) {
          enumeration = existing.getAll();
          while (enumeration.hasMore()) {
            attr = enumeration.next();
            if (attrSet.get(attr.getID()) == null) {
              modifs.add(new ModificationItem(DirContext.REMOVE_ATTRIBUTE, attr));
            }
          }
        }
        if (!modifs.isEmpty()) {
          ModificationItem[] array = modifs.toArray(new ModificationItem[modifs.size()]);
          _ctx.modifyAttributes(result.getName(), array);
          notify(result.getName(), ImportEventListener.REFRESHED);
        } else {
          notify(result.getName(), ImportEventListener.IGNORED);
        }
      } catch (NameNotFoundException except) {
        // Object does not exist, we create a new one.
        if ((policy & ImportDescriptor.Policy.REFRESH_ONLY) == 0) {
          _ctx.bind(result.getName(), null, result.getAttributes());
          notify(result.getName(), ImportEventListener.CREATED);
        } else {
          notify(result.getName(), ImportEventListener.IGNORED);
        }
      }
    }
  }

  public void importEntries(final NamingEnumeration<SearchResult> results) throws NamingException {
    if (getImportDescriptor() == null) {
      setImportDescriptor(new ImportDescriptor());
    }
    while (results.hasMore()) {
      SearchResult result = results.next();
      importEntry(result, getImportDescriptor().getPolicy(result.getName()));
    }
  }

  public void importEntries(final Enumeration<SearchResult> results) throws ImportExportException {
    if (getImportDescriptor() == null) {
      setImportDescriptor(new ImportDescriptor());
    }
    try {
      while (results.hasMoreElements()) {
        SearchResult result = results.nextElement();
        importEntry(result, getImportDescriptor().getPolicy(result.getName()));
      }
    } catch (NamingException except) {
      throw new ImportExportException(except);
    }
  }
}
