All Downloads are FREE. Search and download functionalities are using the official Maven repository.

com.nitorcreations.willow.utils.MergeableProperties Maven / Gradle / Ivy

The newest version!
package com.nitorcreations.willow.utils;

import java.io.IOException;
import java.io.InputStream;
import java.io.UnsupportedEncodingException;
import java.net.MalformedURLException;
import java.net.URI;
import java.net.URISyntaxException;
import java.net.URL;
import java.net.URLDecoder;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.Collection;
import java.util.Collections;
import java.util.Enumeration;
import java.util.HashMap;
import java.util.LinkedHashMap;
import java.util.LinkedHashSet;
import java.util.LinkedList;
import java.util.List;
import java.util.Locale;
import java.util.Map;
import java.util.Map.Entry;
import java.util.Properties;
import java.util.Set;
import java.util.logging.Level;
import java.util.logging.Logger;
import java.util.regex.Matcher;
import java.util.regex.Pattern;

import javax.script.ScriptEngine;
import javax.script.ScriptEngineManager;
import javax.script.ScriptException;

import org.apache.commons.lang3.text.StrSubstitutor;

import com.nitorcreations.willow.protocols.Register;

import edu.umd.cs.findbugs.annotations.SuppressFBWarnings;

public class MergeableProperties extends Properties implements Cloneable {
  public static final Pattern ARRAY_PROPERTY_REGEX = Pattern.compile("(.*?)\\[(last|\\d*?)\\](\\}?)$");
  public static final Pattern ARRAY_REFERENCE_REGEX = Pattern.compile("(\\$\\{)?(.*?)\\[(last|\\d+?)\\](.*?)$");
  public static final Pattern SCRIPT_REGEX = Pattern.compile("(.*?)(\\(.*?)\\<\\/script\\>)", Pattern.DOTALL + Pattern.MULTILINE);
  public static final String URL_PREFIX_CLASSPATH = "classpath:";
  public static final String INCLUDE_PROPERTY = "include.properties";
  @SuppressFBWarnings(value={"SE_TRANSIENT_FIELD_NOT_RESTORED"}, justification="log always freshly initialized")
  private final transient Logger log = Logger.getLogger(getClass().getName());
  private final String[] prefixes;
  private static final long serialVersionUID = -2166886363149152785L;
  private LinkedHashMap table = new LinkedHashMap<>();
  private final HashMap arrayIndexes = new HashMap<>();
  @SuppressFBWarnings(value={"SE_TRANSIENT_FIELD_NOT_RESTORED"}, justification="engine always freshly initialized")
  private transient ScriptEngine engine = new ScriptEngineManager().getEngineByName("javascript");
  private final boolean allowScripts;
  private transient RequestCustomizer customizer = null;
  static {
    Register.doIt();
  }
  protected MergeableProperties(Properties defaults, LinkedHashMap values, boolean allowScripts, String... prefixes) {
    super(defaults);
    table.putAll(values);
    this.prefixes = prefixes;
    this.allowScripts = allowScripts;
  }

  protected MergeableProperties(Properties defaults, LinkedHashMap values, String... prefixes) {
    this(defaults, values, true, prefixes);
  }

  public MergeableProperties(boolean allowScripts) {
    super();
    defaults = new Properties();
    prefixes = new String[] { "classpath:" };
    this.allowScripts = allowScripts;
  }

  public MergeableProperties() {
    this(true);
  }

  public MergeableProperties(boolean allowScipts, String... prefixes) {
    super();
    defaults = new Properties();
    this.prefixes = prefixes;
    this.allowScripts = allowScipts;
  }
  public MergeableProperties(String... prefixes) {
    this(true, prefixes);
  }

  public MergeableProperties merge(String name) {
    if (pathEndsWith(name.toLowerCase(Locale.ENGLISH), ".yml")) {
      mergeYml(name);
    } else {
      mergeProperties(name);
    }
    postMerge();
    return this;
  }

  private boolean pathEndsWith(String name, String suffix) {
    try {
      URI uri = new URI(name);
      return uri.getPath().endsWith(suffix);
    } catch (URISyntaxException e) {
      return false;
    }
  }

  public MergeableProperties merge(Properties prev, String name) {
    if (prev != null) {
      if (prev instanceof MergeableProperties) {
        putAll((MergeableProperties)prev);
      } else {
        putAll(prev);
      }
    }
    if (name.toLowerCase(Locale.ENGLISH).endsWith(".yml")) {
      mergeYml(name);
    } else {
      mergeProperties(name);
    }
    postMerge();
    return this;
  }

  private void postMerge() {
    boolean changed = true;
    while (changed) {
      changed = false;
      LinkedHashMap finalTable = new LinkedHashMap<>();
      StrSubstitutor sub = new StrSubstitutor(table, "${", "}", '\\');
      for (Entry next : table.entrySet()) {
        String origKey = next.getKey();
        String origValue = next.getValue();
        String key = sub.replace(origKey);
        String value = sub.replace(origValue);
        finalTable.put(key, value);
        changed = changed || !origKey.equals(key) || !origValue.equals(value);
      }
      table = finalTable;
    }
  }

  private String evaluate(String replace, boolean allowEval) {
    Matcher m = SCRIPT_REGEX.matcher(replace);
    StringBuffer ret = new StringBuffer();
    int end = 0;
    engine.put("self", this);
    while (m.find()) {
      ret.append(m.group(1));
      try {
        if (allowEval) {
          ret.append(engine.eval(m.group(3)));
        } else {
          ret.append(m.group(3));
        }
      } catch (ScriptException e) {
        ret.append(m.group(2));
        log.log(Level.INFO, "Failed to execute javascript", e);
      }
      end = m.end();
    }
    ret.append(replace.substring(end));
    return ret.toString();
  }

  public void deObfuscate(PropertySource source, String obfuscatedPrefix) {
    if (obfuscatedPrefix == null) {
      return;
    }
    LinkedHashMap finalTable = new LinkedHashMap<>();
    for (Entry next : table.entrySet()) {
      String value = next.getValue();
      if (value.startsWith(obfuscatedPrefix)) {
        value = source.getProperty(value.substring(obfuscatedPrefix.length()));
      }
      if (value == null) {
        value = next.getValue();
      }
      finalTable.put(next.getKey(), value);
    }
    table = finalTable;
  }
  public MergeableProperties getPrefixed(String prefix) {
    MergeableProperties ret = new MergeableProperties();
    for (Entry next : table.entrySet()) {
      if (next.getKey().startsWith(prefix)) {
        String key = next.getKey().substring(prefix.length());
        while (key.startsWith(".")) {
          key = key.substring(1);
        }
        ret.put(key, next.getValue());
      }
    }
    return ret;
  }
  public List getPrefixedList(String prefix) {
    List propsList = new LinkedList<>();
    MergeableProperties prefixed = getPrefixed(prefix);
    MergeableProperties listItem;
    int i = 0;
    while (!(listItem = prefixed.getPrefixed("[" + i++ + "]")).isEmpty()) {
      propsList.add(listItem);
    }
    return propsList;
  }
  public List getDelimitedAsList(String key, String delimiter) {
    String value = getProperty(key);
    if (value != null) {
      return Arrays.asList(value.split(delimiter));
    }
    return Collections.emptyList();
  }
  private boolean mergeProperties(String name) {
    boolean ret = false;
    try (InputStream in = getIncludeUriInputStream(name)) {
      if (in == null) {
        throw new IOException();
      }
      includeQueryParameters(name);
      load(in);
      ret = true;
    } catch (IOException | URISyntaxException e) {
      for (String nextPrefix : prefixes) {
        String url = nextPrefix + name;
        try (InputStream in1 = getIncludeUriInputStream(url)) {
          includeQueryParameters(url);
          load(in1);
          ret = true;
        } catch (IOException | URISyntaxException e1) {
          this.log.log(Level.INFO, "Failed to render url: " + url);
        }
      }
    }
    return ret;
  }
  private void includeQueryParameters(String name) throws MalformedURLException {
    URL uri = new URL(name);
    String query = uri.getQuery();
    if (query != null && !query.isEmpty()) {
      final String[] pairs = query.split("&");
      for (String pair : pairs) {
        final int idx = pair.indexOf("=");
        try {
          final String key = idx > 0 ? URLDecoder.decode(pair.substring(0, idx), "UTF-8") : pair;
          final String value = idx > 0 && pair.length() > idx + 1 ? URLDecoder.decode(pair.substring(idx + 1), "UTF-8") : "";
          put(key, value);
        } catch (UnsupportedEncodingException e) {
          assert false : "UTF-8 not available";
        }
      }
    }
  }

  private boolean mergeYml(String name) {
    boolean ret = false;
    try (InputStream in = getIncludeUriInputStream(name)) {
      if (in == null) {
        throw new IOException();
      }
      YamlProcessor p = new YamlProcessor();
      p.setResources(in);
      Properties props = p.createProperties();
      includeQueryParameters(name);
      this.putAll(props);
      ret = true;
    } catch (IOException | URISyntaxException e) {
      for (String nextPrefix : prefixes) {
        String url = nextPrefix + name;
        try (InputStream in1 = getIncludeUriInputStream(url)) {
          YamlProcessor p = new YamlProcessor();
          p.setResources(in1);
          Properties props = p.createProperties();
          includeQueryParameters(url);
          this.putAll(props);
          ret = true;
        } catch (IOException | URISyntaxException e1) {
          this.log.log(Level.INFO, "Failed to render url: " + url);
        }
      }
    }
    return ret;
  }
  private InputStream getIncludeUriInputStream(String url) throws IOException, URISyntaxException {
    return ProxyUtils.getUriInputStream(getProperty(INCLUDE_PROPERTY + ".proxyautoconf"),
        getProperty(INCLUDE_PROPERTY + ".proxy"), url, customizer);
  }
  @SuppressWarnings("unchecked")
  @Override
  public Set> entrySet() {
    @SuppressWarnings("rawtypes")
    Set ret = table.entrySet();
    return ret;
  }

  @Override
  public Object put(Object key, Object value) {
    return put(key, value, allowScripts);
  }
  @SuppressWarnings("PMD.UselessParentheses")
  public Object put(Object key, Object value, boolean allowEval) {
    if (key == null || value == null) {
      throw new NullPointerException("Null keys or values not allowed");
    }
    String k = resolveIndexes(key.toString());
    String v = resolveIndexes(value.toString());
    StrSubstitutor sub = new StrSubstitutor(table, "@", "@", '\\');
    k = sub.replace(k);
    v = evaluate(sub.replace(v), allowEval);
    String prev = table.get(k);
    if (prev != null && "true".equalsIgnoreCase(table.get(k + ".readonly"))) {
      return prev;
    }
    if (INCLUDE_PROPERTY.equals(k) || k.startsWith(INCLUDE_PROPERTY + "[")) {
      //Don't allow include if eval is disallowed
      if (allowEval && !((v.toLowerCase(Locale.ENGLISH).endsWith(".yml") && mergeYml(v)) || (mergeProperties(v)))) {
        return table.put(k, v);
      }
      return null;
    }
    if (prev != null && table.get(k + ".appendchar") != null) {
      return table.put(k, prev + table.get(k + ".appendchar") + v);
    } else {
      return table.put(k, v);
    }
  }

  @Override
  public Object setProperty(String key, String value) {
    return put(key, value);
  }
  public Object setProperty(String key, String value, boolean allowEval) {
    return put(key, value, allowEval);
  }

  protected String resolveIndexes(String original) {
    String ret = original;
    Matcher m = ARRAY_REFERENCE_REGEX.matcher(ret);
    StringBuilder subst = new StringBuilder();
    String rem = "";
    while (m.matches()) {
      String arrKey = subst.toString() + m.group(2);
      if (arrKey.startsWith("${")) {
        arrKey = arrKey.substring(2);
      }
      Integer lastIndex = arrayIndexes.get(arrKey);
      String prefix = "";
      if (m.group(1) != null) {
        prefix = m.group(1);
      }
      if (lastIndex != null) {
        subst.append(prefix).append(m.group(2)).append("[")
        .append(lastIndex).append("]");
        rem = m.group(4);
        m = ARRAY_REFERENCE_REGEX.matcher(rem);
      } else {
        subst.setLength(0);
        break;
      }
    }
    if (subst.length() > 0) {
      ret = subst.toString() + rem;
    }
    m = ARRAY_PROPERTY_REGEX.matcher(ret);
    if (m.matches()) {
      String arrKey = m.group(1);
      int i = 0;
      if (arrayIndexes.get(arrKey) != null) {
        i = arrayIndexes.get(arrKey).intValue() + 1;
      }
      while (table.containsKey(arrKey + "[" + i + "]")) {
        i++;
      }
      if (m.group(2).equals("last")) {
        i--;
      } else {
        arrayIndexes.put(arrKey, Integer.valueOf(i));
      }
      ret = arrKey + "[" + i + "]";
      if (m.group(3) != null) {
        ret = ret + m.group(3);
      }
    }
    return ret;
  }

  @Override
  public Enumeration keys() {
    return new ObjectIteratorEnumertion(table.keySet().iterator());
  }

  @Override
  public Object get(Object key) {
    return table.get(key);
  }

  @Override
  public String getProperty(String key) {
    String oval = table.get(key);
    return oval == null && defaults != null ? defaults.getProperty(key) : oval;
  }

  public List getArrayProperty(String key, String suffix) {
    int i = 0;
    if (suffix == null) {
      suffix = "";
    }
    ArrayList ret = new ArrayList<>();
    String next = getProperty(key + "[" + i + "]" + suffix);
    while (next != null) {
      ret.add(next);
      next = getProperty(key + "[" + ++i + "]" + suffix);
    }
    return ret;
  }

  public List getArrayProperty(String key) {
    return getArrayProperty(key, null);
  }

  public void putAll(MergeableProperties toMerge) {
    boolean doAllowScripts = this.allowScripts && toMerge.allowScripts;
    for (Entry next : toMerge.table.entrySet()) {
      put(next.getKey(), next.getValue(), doAllowScripts);
    }
  }

  public Set> backingEntrySet() {
    return table.entrySet();
  }

  public Map backingTable() {
    return table;
  }

  @Override
  public Object remove(Object key) {
    return table.remove(key);
  }

  @Override
  public String toString() {
    return table.toString();
  }

  @Override
  public Enumeration propertyNames() {
    return new ObjectIteratorEnumertion(table.keySet().iterator());
  }

  @Override
  public Set stringPropertyNames() {
    return table.keySet();
  }

  @Override
  public synchronized int size() {
    return table.size();
  }

  @Override
  public synchronized boolean isEmpty() {
    return table.isEmpty() && defaults.isEmpty();
  }

  @Override
  public synchronized Enumeration elements() {
    return null;
  }

  @Override
  public synchronized boolean contains(Object value) {
    return table.containsValue(value) || defaults.containsValue(value);
  }

  @Override
  public synchronized boolean containsKey(Object key) {
    return table.containsKey(key) || defaults.containsKey(key);
  }
  @Override
  public synchronized void clear() {
    table.clear();
  }

  @Override
  @SuppressFBWarnings(value={"CN_IDIOM_NO_SUPER_CALL"},
  justification="Don't actually want anything from parent class except for load and save functions" )
  public synchronized Object clone() {
    return new MergeableProperties(defaults, table, allowScripts, prefixes);
  }

  @Override
  public Set keySet() {
    return new LinkedHashSet(table.keySet());
  }

  @Override
  public Collection values() {
    return new LinkedHashSet(table.values());
  }

  public RequestCustomizer getRequestCustomizer() {
    return customizer;
  }

  public void setRequestCustomizer(RequestCustomizer customizer) {
    this.customizer = customizer;
  }
  @Override
  public int hashCode() {
    final int prime = 31;
    int result = super.hashCode();
    result = prime * result + ((table == null) ? 0 : table.hashCode());
    return result;
  }
  @Override
  public boolean equals(Object obj) {
    if (this == obj) {
      return true;
    }
    if (!super.equals(obj)) {
      return false;
    }
    if (getClass() != obj.getClass()) {
      return false;
    }
    MergeableProperties other = (MergeableProperties) obj;
    if (table == null) {
      if (other.table != null) {
        return false;
      }
    } else if (!table.equals(other.table)) {
      return false;
    }
    return true;
  }
}