/*
 * 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
 *
 *     http://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.hadoop.hbase.constraint;

import java.io.ByteArrayInputStream;
import java.io.ByteArrayOutputStream;
import java.io.DataOutputStream;
import java.io.IOException;
import java.lang.reflect.InvocationTargetException;
import java.util.ArrayList;
import java.util.Collections;
import java.util.Comparator;
import java.util.List;
import java.util.Map;
import java.util.Map.Entry;
import java.util.regex.Pattern;
import org.apache.hadoop.conf.Configuration;
import org.apache.hadoop.hbase.client.TableDescriptor;
import org.apache.hadoop.hbase.client.TableDescriptorBuilder;
import org.apache.hadoop.hbase.util.Bytes;
import org.apache.hadoop.hbase.util.Pair;
import org.apache.yetus.audience.InterfaceAudience;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;

/**
 * Utilities for adding/removing constraints from a table.
 * <p/>
 * Since {@link TableDescriptor} is immutable now, you should use {@link TableDescriptorBuilder}.
 * And when disabling or removing constraints, you could use
 * {@link TableDescriptorBuilder#newBuilder(TableDescriptor)} to clone the old
 * {@link TableDescriptor} and then pass it the below methods.
 */
@InterfaceAudience.Public
public final class Constraints {
  private static final int DEFAULT_PRIORITY = -1;

  private Constraints() {
  }

  private static final Logger LOG = LoggerFactory.getLogger(Constraints.class);
  private static final String CONSTRAINT_HTD_KEY_PREFIX = "constraint $";
  private static final Pattern CONSTRAINT_HTD_ATTR_KEY_PATTERN =
    Pattern.compile(CONSTRAINT_HTD_KEY_PREFIX, Pattern.LITERAL);

  // configuration key for if the constraint is enabled
  private static final String ENABLED_KEY = "_ENABLED";
  // configuration key for the priority
  private static final String PRIORITY_KEY = "_PRIORITY";

  // smallest priority a constraiNt can have
  private static final long MIN_PRIORITY = 0L;
  // ensure a priority less than the smallest we could intentionally set
  private static final long UNSET_PRIORITY = MIN_PRIORITY - 1;

  private static String COUNTER_KEY = "hbase.constraint.counter";

  /**
   * Enable constraints on a table.
   * <p/>
   * Currently, if you attempt to add a constraint to the table, then Constraints will automatically
   * be turned on.
   */
  public static TableDescriptorBuilder enable(TableDescriptorBuilder builder) throws IOException {
    if (!builder.hasCoprocessor(ConstraintProcessor.class.getName())) {
      builder.setCoprocessor(ConstraintProcessor.class.getName());
    }
    return builder;
  }

  /**
   * Turn off processing constraints for a given table, even if constraints have been turned on or
   * added.
   */
  public static TableDescriptorBuilder disable(TableDescriptorBuilder builder) throws IOException {
    try {
      return builder.removeCoprocessor(ConstraintProcessor.class.getName());
    } catch (IllegalArgumentException e) {
      LOG.warn("ConstraintProcessor was unset.", e);
      return builder;
    }
  }

  /**
   * Remove all {@link Constraint Constraints} that have been added to the table and turn off the
   * constraint processing.
   * <p/>
   * All {@link Configuration Configurations} and their associated {@link Constraint} are removed.
   */
  public static TableDescriptorBuilder remove(TableDescriptorBuilder builder) throws IOException {
    disable(builder);
    return builder
      .removeValue((k, v) -> CONSTRAINT_HTD_ATTR_KEY_PATTERN.split(k.toString()).length == 2);
  }

  /**
   * Check to see if the Constraint is currently set.
   * @param desc  {@link TableDescriptor} to check
   * @param clazz {@link Constraint} class to check for.
   * @return <tt>true</tt> if the {@link Constraint} is present, even if it is disabled.
   *         <tt>false</tt> otherwise.
   */
  public static boolean has(TableDescriptor desc, Class<? extends Constraint> clazz) {
    return getKeyValueForClass(desc, clazz) != null;
  }

  /**
   * Get the kv {@link Entry} in the descriptor for the specified class
   * @param desc  {@link TableDescriptor} to read
   * @param clazz To search for
   * @return The {@link Pair} of {@literal <key, value>} in the table, if that class is present.
   *         {@code null} otherwise.
   */
  private static Pair<String, String> getKeyValueForClass(TableDescriptor desc,
    Class<? extends Constraint> clazz) {
    // get the serialized version of the constraint
    String key = serializeConstraintClass(clazz);
    String value = desc.getValue(key);

    return value == null ? null : new Pair<>(key, value);
  }

  /**
   * Get the kv {@link Entry} in the descriptor builder for the specified class
   * @param builder {@link TableDescriptorBuilder} to read
   * @param clazz   To search for
   * @return The {@link Pair} of {@literal <key, value>} in the table, if that class is present.
   *         {@code null} otherwise.
   */
  private static Pair<String, String> getKeyValueForClass(TableDescriptorBuilder builder,
    Class<? extends Constraint> clazz) {
    // get the serialized version of the constraint
    String key = serializeConstraintClass(clazz);
    String value = builder.getValue(key);

    return value == null ? null : new Pair<>(key, value);
  }

  /**
   * Add configuration-less constraints to the table.
   * <p/>
   * This will overwrite any configuration associated with the previous constraint of the same
   * class.
   * <p/>
   * Each constraint, when added to the table, will have a specific priority, dictating the order in
   * which the {@link Constraint} will be run. A {@link Constraint} earlier in the list will be run
   * before those later in the list. The same logic applies between two Constraints over time
   * (earlier added is run first on the regionserver).
   * @param builder     {@link TableDescriptorBuilder} to add a {@link Constraint}
   * @param constraints {@link Constraint Constraints} to add. All constraints are considered
   *                    automatically enabled on add
   * @throws IOException If constraint could not be serialized/added to table
   */
  @SafeVarargs
  public static TableDescriptorBuilder add(TableDescriptorBuilder builder,
    Class<? extends Constraint>... constraints) throws IOException {
    // make sure constraints are enabled
    enable(builder);
    long priority = getNextPriority(builder);

    // store each constraint
    for (Class<? extends Constraint> clazz : constraints) {
      addConstraint(builder, clazz, null, priority++);
    }
    return updateLatestPriority(builder, priority);
  }

  /**
   * Add constraints and their associated configurations to the table.
   * <p>
   * Adding the same constraint class twice will overwrite the first constraint's configuration
   * <p>
   * Each constraint, when added to the table, will have a specific priority, dictating the order in
   * which the {@link Constraint} will be run. A {@link Constraint} earlier in the list will be run
   * before those later in the list. The same logic applies between two Constraints over time
   * (earlier added is run first on the regionserver).
   * @param builder     {@link TableDescriptorBuilder} to add a {@link Constraint}
   * @param constraints {@link Pair} of a {@link Constraint} and its associated
   *                    {@link Configuration}. The Constraint will be configured on load with the
   *                    specified configuration.All constraints are considered automatically enabled
   *                    on add
   * @throws IOException if any constraint could not be deserialized. Assumes if 1 constraint is not
   *                     loaded properly, something has gone terribly wrong and that all constraints
   *                     need to be enforced.
   */
  @SafeVarargs
  public static TableDescriptorBuilder add(TableDescriptorBuilder builder,
    Pair<Class<? extends Constraint>, Configuration>... constraints) throws IOException {
    enable(builder);
    long priority = getNextPriority(builder);
    for (Pair<Class<? extends Constraint>, Configuration> pair : constraints) {
      addConstraint(builder, pair.getFirst(), pair.getSecond(), priority++);
    }
    return updateLatestPriority(builder, priority);
  }

  /**
   * Add a {@link Constraint} to the table with the given configuration
   * <p/>
   * Each constraint, when added to the table, will have a specific priority, dictating the order in
   * which the {@link Constraint} will be run. A {@link Constraint} added will run on the
   * regionserver before those added to the {@link TableDescriptorBuilder} later.
   * @param builder    {@link TableDescriptorBuilder} to add a {@link Constraint}
   * @param constraint to be added
   * @param conf       configuration associated with the constraint
   * @throws IOException if any constraint could not be deserialized. Assumes if 1 constraint is not
   *                     loaded properly, something has gone terribly wrong and that all constraints
   *                     need to be enforced.
   */
  public static TableDescriptorBuilder add(TableDescriptorBuilder builder,
    Class<? extends Constraint> constraint, Configuration conf) throws IOException {
    enable(builder);
    long priority = getNextPriority(builder);
    addConstraint(builder, constraint, conf, priority++);

    return updateLatestPriority(builder, priority);
  }

  /**
   * Write the raw constraint and configuration to the descriptor.
   * <p/>
   * This method takes care of creating a new configuration based on the passed in configuration and
   * then updating that with enabled and priority of the constraint.
   * <p/>
   * When a constraint is added, it is automatically enabled.
   */
  private static TableDescriptorBuilder addConstraint(TableDescriptorBuilder builder,
    Class<? extends Constraint> clazz, Configuration conf, long priority) throws IOException {
    return writeConstraint(builder, serializeConstraintClass(clazz),
      configure(conf, true, priority));
  }

  /**
   * Setup the configuration for a constraint as to whether it is enabled and its priority
   * @param conf     on which to base the new configuration
   * @param enabled  <tt>true</tt> if it should be run
   * @param priority relative to other constraints
   * @return a new configuration, storable in the {@link TableDescriptor}
   */
  private static Configuration configure(Configuration conf, boolean enabled, long priority) {
    // create the configuration to actually be stored
    // clone if possible, but otherwise just create an empty configuration
    Configuration toWrite = conf == null ? new Configuration() : new Configuration(conf);

    // update internal properties
    toWrite.setBooleanIfUnset(ENABLED_KEY, enabled);

    // set if unset long
    if (toWrite.getLong(PRIORITY_KEY, UNSET_PRIORITY) == UNSET_PRIORITY) {
      toWrite.setLong(PRIORITY_KEY, priority);
    }

    return toWrite;
  }

  /**
   * Just write the class to a String representation of the class as a key for the
   * {@link TableDescriptor}
   * @param clazz Constraint class to convert to a {@link TableDescriptor} key
   * @return key to store in the {@link TableDescriptor}
   */
  private static String serializeConstraintClass(Class<? extends Constraint> clazz) {
    String constraintClazz = clazz.getName();
    return CONSTRAINT_HTD_KEY_PREFIX + constraintClazz;
  }

  /**
   * Write the given key and associated configuration to the {@link TableDescriptorBuilder}.
   */
  private static TableDescriptorBuilder writeConstraint(TableDescriptorBuilder builder, String key,
    Configuration conf) throws IOException {
    // store the key and conf in the descriptor
    return builder.setValue(key, serializeConfiguration(conf));
  }

  /**
   * Write the configuration to a String
   * @param conf to write
   * @return String representation of that configuration
   */
  private static String serializeConfiguration(Configuration conf) throws IOException {
    // write the configuration out to the data stream
    ByteArrayOutputStream bos = new ByteArrayOutputStream();
    DataOutputStream dos = new DataOutputStream(bos);
    conf.writeXml(dos);
    dos.flush();
    byte[] data = bos.toByteArray();
    return Bytes.toString(data);
  }

  /**
   * Read the {@link Configuration} stored in the byte stream.
   * @param bytes to read from
   * @return A valid configuration
   */
  private static Configuration readConfiguration(byte[] bytes) throws IOException {
    ByteArrayInputStream is = new ByteArrayInputStream(bytes);
    Configuration conf = new Configuration(false);
    conf.addResource(is);
    return conf;
  }

  /**
   * Read in the configuration from the String encoded configuration
   * @param bytes to read from
   * @return A valid configuration
   * @throws IOException if the configuration could not be read
   */
  private static Configuration readConfiguration(String bytes) throws IOException {
    return readConfiguration(Bytes.toBytes(bytes));
  }

  private static long getNextPriority(TableDescriptorBuilder builder) {
    String value = builder.getValue(COUNTER_KEY);

    long priority;
    // get the current priority
    if (value == null) {
      priority = MIN_PRIORITY;
    } else {
      priority = Long.parseLong(value) + 1;
    }

    return priority;
  }

  private static TableDescriptorBuilder updateLatestPriority(TableDescriptorBuilder builder,
    long priority) {
    // update the max priority
    return builder.setValue(COUNTER_KEY, Long.toString(priority));
  }

  /**
   * Update the configuration for the {@link Constraint}; does not change the order in which the
   * constraint is run.
   * @param builder       {@link TableDescriptorBuilder} to update
   * @param clazz         {@link Constraint} to update
   * @param configuration to update the {@link Constraint} with.
   * @throws IOException              if the Constraint was not stored correctly
   * @throws IllegalArgumentException if the Constraint was not present on this table.
   */
  public static TableDescriptorBuilder setConfiguration(TableDescriptorBuilder builder,
    Class<? extends Constraint> clazz, Configuration configuration)
    throws IOException, IllegalArgumentException {
    // get the entry for this class
    Pair<String, String> e = getKeyValueForClass(builder, clazz);

    if (e == null) {
      throw new IllegalArgumentException(
        "Constraint: " + clazz.getName() + " is not associated with this table.");
    }

    // clone over the configuration elements
    Configuration conf = new Configuration(configuration);

    // read in the previous info about the constraint
    Configuration internal = readConfiguration(e.getSecond());

    // update the fields based on the previous settings
    conf.setIfUnset(ENABLED_KEY, internal.get(ENABLED_KEY));
    conf.setIfUnset(PRIORITY_KEY, internal.get(PRIORITY_KEY));

    // update the current value
    return writeConstraint(builder, e.getFirst(), conf);
  }

  /**
   * Remove the constraint (and associated information) for the table descriptor.
   * @param builder {@link TableDescriptorBuilder} to modify
   * @param clazz   {@link Constraint} class to remove
   */
  public static TableDescriptorBuilder remove(TableDescriptorBuilder builder,
    Class<? extends Constraint> clazz) {
    String key = serializeConstraintClass(clazz);
    return builder.removeValue(key);
  }

  /**
   * Enable the given {@link Constraint}. Retains all the information (e.g. Configuration) for the
   * {@link Constraint}, but makes sure that it gets loaded on the table.
   * @param builder {@link TableDescriptorBuilder} to modify
   * @param clazz   {@link Constraint} to enable
   * @throws IOException If the constraint cannot be properly deserialized
   */
  public static void enableConstraint(TableDescriptorBuilder builder,
    Class<? extends Constraint> clazz) throws IOException {
    changeConstraintEnabled(builder, clazz, true);
  }

  /**
   * Disable the given {@link Constraint}. Retains all the information (e.g. Configuration) for the
   * {@link Constraint}, but it just doesn't load the {@link Constraint} on the table.
   * @param builder {@link TableDescriptorBuilder} to modify
   * @param clazz   {@link Constraint} to disable.
   * @throws IOException if the constraint cannot be found
   */
  public static void disableConstraint(TableDescriptorBuilder builder,
    Class<? extends Constraint> clazz) throws IOException {
    changeConstraintEnabled(builder, clazz, false);
  }

  /**
   * Change the whether the constraint (if it is already present) is enabled or disabled.
   */
  private static TableDescriptorBuilder changeConstraintEnabled(TableDescriptorBuilder builder,
    Class<? extends Constraint> clazz, boolean enabled) throws IOException {
    // get the original constraint
    Pair<String, String> entry = getKeyValueForClass(builder, clazz);
    if (entry == null) {
      throw new IllegalArgumentException("Constraint: " + clazz.getName()
        + " is not associated with this table. You can't enable it!");
    }

    // create a new configuration from that conf
    Configuration conf = readConfiguration(entry.getSecond());

    // set that it is enabled
    conf.setBoolean(ENABLED_KEY, enabled);

    // write it back out
    return writeConstraint(builder, entry.getFirst(), conf);
  }

  /**
   * Check to see if the given constraint is enabled.
   * @param desc  {@link TableDescriptor} to check.
   * @param clazz {@link Constraint} to check for
   * @return <tt>true</tt> if the {@link Constraint} is present and enabled. <tt>false</tt>
   *         otherwise.
   * @throws IOException If the constraint has improperly stored in the table
   */
  public static boolean enabled(TableDescriptor desc, Class<? extends Constraint> clazz)
    throws IOException {
    // get the kv
    Pair<String, String> entry = getKeyValueForClass(desc, clazz);
    // its not enabled so just return false. In fact, its not even present!
    if (entry == null) {
      return false;
    }

    // get the info about the constraint
    Configuration conf = readConfiguration(entry.getSecond());

    return conf.getBoolean(ENABLED_KEY, false);
  }

  /**
   * Get the constraints stored in the table descriptor
   * @param desc        To read from
   * @param classloader To use when loading classes. If a special classloader is used on a region,
   *                    for instance, then that should be the classloader used to load the
   *                    constraints. This could also apply to unit-testing situation, where want to
   *                    ensure that class is reloaded or not.
   * @return List of configured {@link Constraint Constraints}
   * @throws IOException if any part of reading/arguments fails
   */
  static List<? extends Constraint> getConstraints(TableDescriptor desc, ClassLoader classloader)
    throws IOException {
    List<Constraint> constraints = new ArrayList<>();
    // loop through all the key, values looking for constraints
    for (Map.Entry<Bytes, Bytes> e : desc.getValues().entrySet()) {
      // read out the constraint
      String key = Bytes.toString(e.getKey().get()).trim();
      String[] className = CONSTRAINT_HTD_ATTR_KEY_PATTERN.split(key);
      if (className.length == 2) {
        key = className[1];
        if (LOG.isDebugEnabled()) {
          LOG.debug("Loading constraint:" + key);
        }

        // read in the rest of the constraint
        Configuration conf;
        try {
          conf = readConfiguration(e.getValue().get());
        } catch (IOException e1) {
          // long that we don't have a valid configuration stored, and move on.
          LOG.warn("Corrupted configuration found for key:" + key + ",  skipping it.");
          continue;
        }
        // if it is not enabled, skip it
        if (!conf.getBoolean(ENABLED_KEY, false)) {
          LOG.debug("Constraint: {} is DISABLED - skipping it", key);
          // go to the next constraint
          continue;
        }

        try {
          // add the constraint, now that we expect it to be valid.
          Class<? extends Constraint> clazz =
            classloader.loadClass(key).asSubclass(Constraint.class);
          Constraint constraint = clazz.getDeclaredConstructor().newInstance();
          constraint.setConf(conf);
          constraints.add(constraint);
        } catch (InvocationTargetException | NoSuchMethodException | ClassNotFoundException
          | InstantiationException | IllegalAccessException e1) {
          throw new IOException(e1);
        }
      }
    }
    // sort them, based on the priorities
    Collections.sort(constraints, constraintComparator);
    return constraints;
  }

  private static final Comparator<Constraint> constraintComparator = new Comparator<Constraint>() {
    @Override
    public int compare(Constraint c1, Constraint c2) {
      // compare the priorities of the constraints stored in their configuration
      return Long.compare(c1.getConf().getLong(PRIORITY_KEY, DEFAULT_PRIORITY),
        c2.getConf().getLong(PRIORITY_KEY, DEFAULT_PRIORITY));
    }
  };

}