/*
    * Licensed to the Apache Software Foundation (ASF) under one or more
    * contributor license agreements.  See the NOTICE file distributed with
    * this work for additional information regarding copyright ownership.
    * The ASF licenses this file to You under the Apache License, Version 2.0
    * (the "License"); you may not use this file except in compliance with
    * the License.  You may obtain a copy of the License at
    *
    *     https://www.apache.org/licenses/LICENSE-2.0
   *
   * Unless required by applicable law or agreed to in writing, software
   * distributed under the License is distributed on an "AS IS" BASIS,
   * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
   * See the License for the specific language governing permissions and
   * limitations under the License.
   */
  package org.apache.commons.configuration2.beanutils;
  
  import java.beans.PropertyDescriptor;
  import java.lang.reflect.InvocationTargetException;
  import java.util.ArrayList;
  import java.util.Collection;
  import java.util.Collections;
  import java.util.HashMap;
  import java.util.List;
  import java.util.Map;
  import java.util.Set;
  import java.util.TreeSet;
  
  import org.apache.commons.beanutils.BeanUtilsBean;
  import org.apache.commons.beanutils.ConvertUtilsBean;
  import org.apache.commons.beanutils.DynaBean;
  import org.apache.commons.beanutils.FluentPropertyBeanIntrospector;
  import org.apache.commons.beanutils.PropertyUtilsBean;
  import org.apache.commons.beanutils.WrapDynaBean;
  import org.apache.commons.beanutils.WrapDynaClass;
  import org.apache.commons.configuration2.ex.ConfigurationRuntimeException;
  import org.apache.commons.lang3.ClassUtils;
  
  /**
   * <p>
   * A helper class for creating bean instances that are defined in configuration files.
   * </p>
   * <p>
   * This class provides utility methods related to bean creation operations. These methods simplify such operations
   * because a client need not deal with all involved interfaces. Usually, if a bean declaration has already been
   * obtained, a single method call is necessary to create a new bean instance.
   * </p>
   * <p>
   * This class also supports the registration of custom bean factories. Implementations of the {@link BeanFactory}
   * interface can be registered under a symbolic name using the {@code registerBeanFactory()} method. In the
   * configuration file the name of the bean factory can be specified in the bean declaration. Then this factory will be
   * used to create the bean.
   * </p>
   * <p>
   * In order to create beans using {@code BeanHelper}, create and instance of this class and initialize it accordingly -
   * a default {@link BeanFactory} can be passed to the constructor, and additional bean factories can be registered (see
   * above). Then this instance can be used to create beans from {@link BeanDeclaration} objects. {@code BeanHelper} is
   * thread-safe. So an instance can be passed around in an application and shared between multiple components.
   * </p>
   *
   * @since 1.3
   */
  public final class BeanHelper {
  
      /**
       * An implementation of the {@code BeanCreationContext} interface used by {@code BeanHelper} to communicate with a
       * {@code BeanFactory}. This class contains all information required for the creation of a bean. The methods for
       * creating and initializing bean instances are implemented by calling back to the provided {@code BeanHelper} instance
       * (which is the instance that created this object).
       */
      private static final class BeanCreationContextImpl implements BeanCreationContext {
          /** The association BeanHelper instance. */
          private final BeanHelper beanHelper;
  
          /** The class of the bean to be created. */
          private final Class<?> beanClass;
  
          /** The underlying bean declaration. */
          private final BeanDeclaration data;
  
          /** The parameter for the bean factory. */
          private final Object param;
  
          private BeanCreationContextImpl(final BeanHelper helper, final Class<?> beanClass, final BeanDeclaration data, final Object param) {
              beanHelper = helper;
              this.beanClass = beanClass;
              this.param = param;
              this.data = data;
          }
  
          @Override
          public Object createBean(final BeanDeclaration data) {
              return beanHelper.createBean(data);
          }
  
          @Override
          public Class<?> getBeanClass() {
              return beanClass;
         }
 
         @Override
         public BeanDeclaration getBeanDeclaration() {
             return data;
         }
 
         @Override
         public Object getParameter() {
             return param;
         }
 
         @Override
         public void initBean(final Object bean, final BeanDeclaration data) {
             beanHelper.initBean(bean, data);
         }
     }
 
     /**
      * A default instance of {@code BeanHelper} which can be shared between arbitrary components. If no special
      * configuration is needed, this instance can be used throughout an application. Otherwise, new instances can be created
      * with their own configuration.
      */
     public static final BeanHelper INSTANCE = new BeanHelper();
 
     /**
      * A special instance of {@code BeanUtilsBean} which is used for all property set and copy operations. This instance was
      * initialized with {@code BeanIntrospector} objects which support fluent interfaces. This is required for handling
      * builder parameter objects correctly.
      */
     private static final BeanUtilsBean BEAN_UTILS_BEAN = initBeanUtilsBean();
 
     /**
      * Copies matching properties from the source bean to the destination bean using a specially configured
      * {@code PropertyUtilsBean} instance. This method ensures that enhanced introspection is enabled when doing the copy
      * operation.
      *
      * @param dest the destination bean
      * @param orig the source bean
      * @throws NoSuchMethodException exception thrown by {@code PropertyUtilsBean}
      * @throws InvocationTargetException exception thrown by {@code PropertyUtilsBean}
      * @throws IllegalAccessException exception thrown by {@code PropertyUtilsBean}
      * @since 2.0
      */
     public static void copyProperties(final Object dest, final Object orig) throws IllegalAccessException, InvocationTargetException, NoSuchMethodException {
         BEAN_UTILS_BEAN.getPropertyUtils().copyProperties(dest, orig);
     }
 
     /**
      * Creates a concrete collection instance to populate a property of type collection. This method tries to guess an
      * appropriate collection type. Mostly the type of the property will be one of the collection interfaces rather than a
      * concrete class; so we have to create a concrete equivalent.
      *
      * @param propName the name of the collection property
      * @param propertyClass the type of the property
      * @return the newly created collection
      */
     private static Collection<Object> createPropertyCollection(final String propName, final Class<?> propertyClass) {
         final Collection<Object> beanCollection;
 
         if (List.class.isAssignableFrom(propertyClass)) {
             beanCollection = new ArrayList<>();
         } else if (Set.class.isAssignableFrom(propertyClass)) {
             beanCollection = new TreeSet<>();
         } else {
             throw new UnsupportedOperationException("Unable to handle collection of type : " + propertyClass.getName() + " for property " + propName);
         }
         return beanCollection;
     }
 
     /**
      * Creates a {@code DynaBean} instance which wraps the passed in bean.
      *
      * @param bean the bean to be wrapped (must not be <strong>null</strong>)
      * @return a {@code DynaBean} wrapping the passed in bean
      * @throws IllegalArgumentException if the bean is <strong>null</strong>
      * @since 2.0
      */
     public static DynaBean createWrapDynaBean(final Object bean) {
         if (bean == null) {
             throw new IllegalArgumentException("Bean must not be null!");
         }
         final WrapDynaClass dynaClass = WrapDynaClass.createDynaClass(bean.getClass(), BEAN_UTILS_BEAN.getPropertyUtils());
         return new WrapDynaBean(bean, dynaClass);
     }
 
     /**
      * Determines the class of the bean to be created. If the bean declaration contains a class name, this class is used.
      * Otherwise it is checked whether a default class is provided. If this is not the case, the factory's default class is
      * used. If this class is undefined, too, an exception is thrown.
      *
      * @param data the bean declaration
      * @param defaultClass the default class
      * @param factory the bean factory to use
      * @return the class of the bean to be created
      * @throws ConfigurationRuntimeException if the class cannot be determined
      */
     private static Class<?> fetchBeanClass(final BeanDeclaration data, final Class<?> defaultClass, final BeanFactory factory) {
         final String clsName = data.getBeanClassName();
         if (clsName != null) {
             try {
                 return loadClass(clsName);
             } catch (final ClassNotFoundException cex) {
                 throw new ConfigurationRuntimeException(cex);
             }
         }
 
         if (defaultClass != null) {
             return defaultClass;
         }
 
         final Class<?> clazz = factory.getDefaultBeanClass();
         if (clazz == null) {
             throw new ConfigurationRuntimeException("Bean class is not specified!");
         }
         return clazz;
     }
 
     /**
      * Gets the Class of the property if it can be determined.
      *
      * @param bean The bean containing the property.
      * @param propName The name of the property.
      * @return The class associated with the property or null.
      */
     private static Class<?> getDefaultClass(final Object bean, final String propName) {
         try {
             final PropertyDescriptor desc = BEAN_UTILS_BEAN.getPropertyUtils().getPropertyDescriptor(bean, propName);
             if (desc == null) {
                 return null;
             }
             return desc.getPropertyType();
         } catch (final Exception ex) {
             return null;
         }
     }
 
     /**
      * Initializes the beans properties.
      *
      * @param bean the bean to be initialized
      * @param data the bean declaration
      * @throws ConfigurationRuntimeException if a property cannot be set
      */
     public static void initBeanProperties(final Object bean, final BeanDeclaration data) {
         final Map<String, Object> properties = data.getBeanProperties();
         if (properties != null) {
             properties.forEach((k, v) -> initProperty(bean, k, v));
         }
     }
 
     /**
      * Initializes the shared {@code BeanUtilsBean} instance. This method sets up custom bean introspection in a way that
      * fluent parameter interfaces are supported.
      *
      * @return the {@code BeanUtilsBean} instance to be used for all property set operations
      */
     private static BeanUtilsBean initBeanUtilsBean() {
         final PropertyUtilsBean propUtilsBean = new PropertyUtilsBean();
         propUtilsBean.addBeanIntrospector(new FluentPropertyBeanIntrospector());
         return new BeanUtilsBean(new ConvertUtilsBean(), propUtilsBean);
     }
 
     /**
      * Sets a property on the given bean using Common Beanutils.
      *
      * @param bean the bean
      * @param propName the name of the property
      * @param value the property's value
      * @throws ConfigurationRuntimeException if the property is not writable or an error occurred
      */
     private static void initProperty(final Object bean, final String propName, final Object value) {
         if (!isPropertyWriteable(bean, propName)) {
             throw new ConfigurationRuntimeException("Property " + propName + " cannot be set on " + bean.getClass().getName());
         }
 
         try {
             BEAN_UTILS_BEAN.setProperty(bean, propName, value);
         } catch (final IllegalAccessException | InvocationTargetException itex) {
             throw new ConfigurationRuntimeException(itex);
         }
     }
 
     /**
      * Tests whether the specified property of the given bean instance supports write access.
      *
      * @param bean the bean instance
      * @param propName the name of the property in question
      * @return <strong>true</strong> if this property can be written, <strong>false</strong> otherwise
      */
     private static boolean isPropertyWriteable(final Object bean, final String propName) {
         return BEAN_UTILS_BEAN.getPropertyUtils().isWriteable(bean, propName);
     }
 
     /**
      * Loads a {@code Class} object for the specified name. Because class loading can be tricky in some
      * environments the code for retrieving a class by its name was extracted into this helper method. So if changes are
      * necessary, they can be made at a single place.
      *
      * @param name the name of the class to be loaded
      * @return the class object for the specified name
      * @throws ClassNotFoundException if the class cannot be loaded
      */
     static Class<?> loadClass(final String name) throws ClassNotFoundException {
         return ClassUtils.getClass(name);
     }
 
     /**
      * Sets a property on the bean only if the property exists
      *
      * @param bean the bean
      * @param propName the name of the property
      * @param value the property's value
      * @throws ConfigurationRuntimeException if the property is not writable or an error occurred
      */
     public static void setProperty(final Object bean, final String propName, final Object value) {
         if (isPropertyWriteable(bean, propName)) {
             initProperty(bean, propName, value);
         }
     }
 
     /** Stores a map with the registered bean factories. */
     private final Map<String, BeanFactory> beanFactories = Collections.synchronizedMap(new HashMap<>());
 
     /**
      * Stores the default bean factory, which is used if no other factory is provided in a bean declaration.
      */
     private final BeanFactory defaultBeanFactory;
 
     /**
      * Constructs a new instance of {@code BeanHelper} with the default instance of {@link DefaultBeanFactory} as default
      * {@link BeanFactory}.
      */
     public BeanHelper() {
         this(null);
     }
 
     /**
      * Constructs a new instance of {@code BeanHelper} and sets the specified default {@code BeanFactory}.
      *
      * @param defaultBeanFactory the default {@code BeanFactory} (can be <strong>null</strong>, then a default instance is used)
      */
     public BeanHelper(final BeanFactory defaultBeanFactory) {
         this.defaultBeanFactory = defaultBeanFactory != null ? defaultBeanFactory : DefaultBeanFactory.INSTANCE;
     }
 
     /**
      * Creates a bean instance for the specified declaration. This method is a short cut for
      * {@code createBean(data, null);}.
      *
      * @param data the bean declaration
      * @return the new bean
      * @throws ConfigurationRuntimeException if an error occurs
      */
     public Object createBean(final BeanDeclaration data) {
         return createBean(data, null);
     }
 
     /**
      * Creates a bean instance for the specified declaration. This method is a short cut for
      * {@code createBean(data, null, null);}.
      *
      * @param data the bean declaration
      * @param defaultClass the class to be used when in the declaration no class is specified
      * @return the new bean
      * @throws ConfigurationRuntimeException if an error occurs
      */
     public Object createBean(final BeanDeclaration data, final Class<?> defaultClass) {
         return createBean(data, defaultClass, null);
     }
 
     /**
      * The main method for creating and initializing beans from a configuration. This method will return an initialized
      * instance of the bean class specified in the passed in bean declaration. If this declaration does not contain the
      * class of the bean, the passed in default class will be used. From the bean declaration the factory to be used for
      * creating the bean is queried. The declaration may here return <strong>null</strong>, then a default factory is used. This
      * factory is then invoked to perform the create operation.
      *
      * @param data the bean declaration
      * @param defaultClass the default class to use
      * @param param an additional parameter that will be passed to the bean factory; some factories may support parameters
      *        and behave different depending on the value passed in here
      * @return the new bean
      * @throws ConfigurationRuntimeException if an error occurs
      */
     public Object createBean(final BeanDeclaration data, final Class<?> defaultClass, final Object param) {
         if (data == null) {
             throw new IllegalArgumentException("Bean declaration must not be null!");
         }
 
         final BeanFactory factory = fetchBeanFactory(data);
         final BeanCreationContext bcc = createBeanCreationContext(data, defaultClass, param, factory);
         try {
             return factory.createBean(bcc);
         } catch (final Exception ex) {
             throw new ConfigurationRuntimeException(ex);
         }
     }
 
     /**
      * Creates a {@code BeanCreationContext} object for the creation of the specified bean.
      *
      * @param data the bean declaration
      * @param defaultClass the default class to use
      * @param param an additional parameter that will be passed to the bean factory; some factories may support parameters
      *        and behave different depending on the value passed in here
      * @param factory the current bean factory
      * @return the {@code BeanCreationContext}
      * @throws ConfigurationRuntimeException if the bean class cannot be determined
      */
     private BeanCreationContext createBeanCreationContext(final BeanDeclaration data, final Class<?> defaultClass, final Object param,
         final BeanFactory factory) {
         final Class<?> beanClass = fetchBeanClass(data, defaultClass, factory);
         return new BeanCreationContextImpl(this, beanClass, data, param);
     }
 
     /**
      * Deregisters the bean factory with the given name. After that this factory cannot be used any longer.
      *
      * @param name the name of the factory to be deregistered
      * @return the factory that was registered under this name; <strong>null</strong> if there was no such factory
      */
     public BeanFactory deregisterBeanFactory(final String name) {
         return beanFactories.remove(name);
     }
 
     /**
      * Obtains the bean factory to use for creating the specified bean. This method will check whether a factory is
      * specified in the bean declaration. If this is not the case, the default bean factory will be used.
      *
      * @param data the bean declaration
      * @return the bean factory to use
      * @throws ConfigurationRuntimeException if the factory cannot be determined
      */
     private BeanFactory fetchBeanFactory(final BeanDeclaration data) {
         final String factoryName = data.getBeanFactoryName();
         if (factoryName != null) {
             final BeanFactory factory = beanFactories.get(factoryName);
             if (factory == null) {
                 throw new ConfigurationRuntimeException("Unknown bean factory: " + factoryName);
             }
             return factory;
         }
         return getDefaultBeanFactory();
     }
 
     /**
      * Gets the default bean factory.
      *
      * @return the default bean factory
      */
     public BeanFactory getDefaultBeanFactory() {
         return defaultBeanFactory;
     }
 
     /**
      * Initializes the passed in bean. This method will obtain all the bean's properties that are defined in the passed in
      * bean declaration. These properties will be set on the bean. If necessary, further beans will be created recursively.
      *
      * @param bean the bean to be initialized
      * @param data the bean declaration
      * @throws ConfigurationRuntimeException if a property cannot be set
      */
     public void initBean(final Object bean, final BeanDeclaration data) {
         initBeanProperties(bean, data);
 
         final Map<String, Object> nestedBeans = data.getNestedBeanDeclarations();
         if (nestedBeans != null) {
             if (bean instanceof Collection) {
                 // This is safe because the collection stores the values of the
                 // nested beans.
                 @SuppressWarnings("unchecked")
                 final Collection<Object> coll = (Collection<Object>) bean;
                 if (nestedBeans.size() == 1) {
                     final Map.Entry<String, Object> e = nestedBeans.entrySet().iterator().next();
                     final String propName = e.getKey();
                     final Class<?> defaultClass = getDefaultClass(bean, propName);
                     if (e.getValue() instanceof List) {
                         // This is safe, provided that the bean declaration is implemented
                         // correctly.
                         @SuppressWarnings("unchecked")
                         final List<BeanDeclaration> decls = (List<BeanDeclaration>) e.getValue();
                         decls.forEach(decl -> coll.add(createBean(decl, defaultClass)));
                     } else {
                         coll.add(createBean((BeanDeclaration) e.getValue(), defaultClass));
                     }
                 }
             } else {
                 nestedBeans.forEach((propName, prop) -> {
                     final Class<?> defaultClass = getDefaultClass(bean, propName);
                     if (prop instanceof Collection) {
                         final Collection<Object> beanCollection = createPropertyCollection(propName, defaultClass);
                         ((Collection<BeanDeclaration>) prop).forEach(elemDef -> beanCollection.add(createBean(elemDef)));
                         initProperty(bean, propName, beanCollection);
                     } else {
                         initProperty(bean, propName, createBean((BeanDeclaration) prop, defaultClass));
                     }
                 });
             }
         }
     }
 
     /**
      * Registers a bean factory under a symbolic name. This factory object can then be specified in bean declarations with
      * the effect that this factory will be used to obtain an instance for the corresponding bean declaration.
      *
      * @param name the name of the factory
      * @param factory the factory to be registered
      */
     public void registerBeanFactory(final String name, final BeanFactory factory) {
         if (name == null) {
             throw new IllegalArgumentException("Name for bean factory must not be null!");
         }
         if (factory == null) {
             throw new IllegalArgumentException("Bean factory must not be null!");
         }
 
         beanFactories.put(name, factory);
     }
 
     /**
      * Gets a set with the names of all currently registered bean factories.
      *
      * @return a set with the names of the registered bean factories
      */
     public Set<String> registeredFactoryNames() {
         return beanFactories.keySet();
     }
 }