com.neuronrobotics.bowlerstudio.scripting.ClojureHelper Maven / Gradle / Ivy

Go to download
package com.neuronrobotics.bowlerstudio.scripting;


import java.io.File;
import java.io.IOException;
import java.nio.file.Files;
import java.util.ArrayList;

import clojure.lang.RT;
import clojure.lang.Symbol;
import clojure.lang.Var;

/**
 * Class containing static utility methods for Java to Clojure interop
 * 
 * @author Mike https://github.com/mikera/clojure-utils/blob/master/src/main/java/mikera/cljutils/Clojure.java
 *
 */
public class ClojureHelper implements IScriptingLanguage{
	public static Var REQUIRE=var("clojure.core", "require");
	public static Var META=var("clojure.core", "meta");
	public static Var EVAL=var("clojure.core", "eval");
	public static Var READ_STRING=var("clojure.core", "load-string");
	
	/**
	 * Require a namespace by name, loading it if necessary.
	 * 
	 * Calls clojure.core/require
	 * 
	 * @param nsName
	 * @return
	 */
	public static Object require(String nsName) {
		return REQUIRE.invoke(Symbol.intern(nsName));
	}
	
	public static Object readString(String s) {
		return READ_STRING.invoke(s);
	}
	
	/**
	 * Looks up a var by name in the clojure.core namespace.
	 * 
	 * The var can subsequently be invoked if it is a function.
	 * 
	 * @param varName
	 * @return
	 */
	public static Var var(String varName) {
		return var("clojure.core",varName);
	}
	
	/**
	 * Looks up a var by name in the given namespace.
	 * 
	 * The var can subsequently be invoked if it is a function.
	 * @param nsName
	 * @param varName
	 * @return
	 */
	public static Var var(String nsName, String varName) {
		return RT.var(nsName,varName);
	}

	/**
	 * Evaluates a String, which should contain valid Clojure code.
	 * 
	 * @param string
	 * @return
	 */
	public static Object eval(String string) {
		return EVAL.invoke(readString(string));
	}

	@Override
	public Object inlineScriptRun(File code, ArrayList