package com.oracle.truffle.api.interop;
final class AssertUtils {
private AssertUtils() {
}
private static String formatArgs(Object[] args) {
if (args == null) {
return "null";
}
StringBuilder b = new StringBuilder("[");
String sep = "";
for (Object arg : args) {
b.append(sep);
b.append(formatValue(arg));
sep = ", ";
}
b.append("]");
return b.toString();
}
private static String formatValue(Object arg) {
if (arg == null) {
return "null";
} else if (arg instanceof TruffleObject) {
return arg.toString() + "(" + arg.getClass().getName() + ")";
} else if (arg instanceof String) {
return "\"" + arg.toString() + "\"";
} else if (arg instanceof Character) {
return "'" + arg.toString() + "'";
} else if (arg instanceof Boolean) {
return arg.toString();
} else {
return arg.toString() + "(" + arg.getClass().getSimpleName() + ")";
}
}
private static String violationPre(Object receiver) {
return String.format("Pre-condition contract violation for receiver %s.",
formatValue(receiver));
}
static String violationPost(Object receiver, Object returnValue) {
return String.format("Post-condition contract violation for receiver %s and return value %s.",
formatValue(receiver), formatValue(returnValue));
}
static String violationPost(Object receiver, Throwable t) {
return String.format("Post-condition contract violation for receiver %s. Thrown unexpected error %s.",
formatValue(receiver), t.getClass().getName());
}
static String violationInvariant(Object receiver) {
return String.format("Invariant contract violation for receiver %s.", formatValue(receiver));
}
static String violationInvariant(Object receiver, Object[] args) {
return String.format("Invariant contract violation for receiver %s and arguments %s.", formatValue(receiver), formatArgs(args));
}
static String violationInvariant(Object receiver, String arg) {
return String.format("Invariant contract violation for receiver %s and identifier %s.", formatValue(receiver), arg);
}
static String violationInvariant(Object receiver, long arg) {
return String.format("Invariant contract violation for receiver %s and index %s.", formatValue(receiver), arg);
}
private static String violationReturn(Object receiver, Object returnValue) {
return String.format("Post-condition contract violation for receiver %s and return value %s.",
formatValue(receiver), formatValue(returnValue));
}
private static String violationArgument(Object receiver, Object arg) {
return String.format("Pre-condition contract violation for receiver %s and argument %s. " +
"Valid arguments must be of type Boolean, Byte, Short, Integer, Long, Float, Double, Character, String or implement TruffleObject.",
formatValue(receiver), formatValue(arg));
}
static boolean validReturn(Object receiver, Object arg) {
assert isInteropValue(arg) : violationReturn(receiver, arg);
return true;
}
static boolean validArgument(Object receiver, Object arg) {
if (arg == null) {
throw new NullPointerException(violationArgument(receiver, arg));
}
if (!isInteropValue(arg)) {
throw new ClassCastException(violationArgument(receiver, arg));
}
return true;
}
static boolean assertString(Object receiver, Object string) {
InteropLibrary uncached = InteropLibrary.getUncached(string);
assert uncached.isString(string) : violationPost(receiver, string);
try {
assert uncached.asString(string) != null : violationPost(receiver, string);
} catch (UnsupportedMessageException e) {
assert false;
}
return true;
}
static boolean validNonInteropArgument(Object receiver, Object arg) {
if (arg == null) {
throw new NullPointerException(violationNonInteropArgument(receiver, arg));
}
return true;
}
private static String violationNonInteropArgument(Object receiver, Object arg) {
return String.format("Pre-condition contract violation for receiver %s and argument %s. " +
"Argument must not be null.",
formatValue(receiver), formatValue(arg));
}
@SuppressWarnings("deprecation")
static boolean isInteropValue(Object o) {
return o instanceof com.oracle.truffle.api.TruffleException || o instanceof TruffleObject || o instanceof Boolean || o instanceof Byte || o instanceof Short || o instanceof Integer ||
o instanceof Long || o instanceof Float || o instanceof Double || o instanceof Character || o instanceof String;
}
static boolean validArguments(Object receiver, Object[] args) {
assert args != null : violationPre(receiver);
for (Object arg : args) {
assert validArgument(receiver, arg);
}
return true;
}
static boolean validScope(Object o) {
if (!(o instanceof TruffleObject)) {
return false;
}
InteropLibrary uncached = InteropLibrary.getUncached(o);
assert uncached.isScope(o) : String.format("Invariant contract violation for receiver %s: is not a scope.", formatValue(o));
assert uncached.hasMembers(o) : String.format("Invariant contract violation for receiver %s: does not have members.", formatValue(o));
return true;
}
static String violationScopeMemberLengths(Object allMembers, Object parentMembers) {
return String.format("Scope members of %s do not contain all scope parent members of %s", allMembers, parentMembers);
}
static boolean validScopeMemberLengths(long allSize, long parentSize, Object allMembers, Object parentMembers) {
assert allSize >= parentSize : String.format("Scope members of %s (count = %d) do not contain all scope parent members of %s (count = %d)", allMembers, allSize, parentMembers, parentSize);
return allSize >= parentSize;
}
static boolean validScopeMemberNames(String allElementName, String parentElementName, Object allMembers, Object parentMembers, long allIndex, long parentIndex) {
assert allElementName.equals(parentElementName) : String.format(
"Member %s of scope %s at [%d] does not equal to member %s of parent scope %s at [%d]. Scope must contain all members from parent scopes.",
allElementName, allMembers, allIndex, parentElementName, parentMembers, parentIndex);
return allElementName.equals(parentElementName);
}
static boolean preCondition(Object receiver) {
if (receiver == null) {
throw new NullPointerException(violationPre(receiver));
}
return true;
}
}