js_error.c

#include "js.h"

char *strstatus(Status s) {
	switch (s) {
	case OK:						return "OK";
	case ERROR_outofmemory:			return "out of memory";
	case ERROR_script_internal:		return "script internal error";
	case ERROR_script_unrecognized_function:	return "script unrecognized function";
	case ERROR_tcperror:			return "tcperror";
	case ERROR_bsonformat:			return "bsonformat";
	case ERROR_notobject_or_array:	return "not object or array";
	case ERROR_mathdomain:			return "outside math domain";
	case ERROR_endoffile:			return "end of file";
	case ERROR_doesnot_exist:		return "does not exist";
	case ERROR_script_parse:		return "script parse";
	case ERROR_json_parse:			return "json parse";
	case ERROR_not_document:		return "not document";
	case ERROR_not_found:			return "not found";
	case ERROR_toomany_local_docstores:	return "too many docStores";
	case ERROR_txn_being_committed:		return "txn being committed";
	case ERROR_no_visible_version:		return "no visible version";
	case ERROR_write_conflict:			return "write conflict";
	case ERROR_key_constraint_violation:return "key constraint violation";
	case ERROR_not_operator_int:	return "Invalid iterator seek operation";
	case ERROR_not_key:			return "not key value";
	default:;
	}
	return NULL;
}

void errorText(Status s) {
char *status = strstatus(s);

	if (!s)
		printf("Status: OK\n"); 
	else if (status)
		printf("Error: %s\n", status);
	else
		printf("Unrecognized error: %d", s);
}

value_t makeError(Node *node, environment_t *env, char *msg) {
value_t v;

	fprintf (stderr, "js error %s line = %d, node id = %d type = %d: %s\n", env->first->script, (int)node->lineNo, (int)(node - env->table), (int)node->type, msg);

	v.bits = vt_control;
	return v;
}