int dom_string(JSAXContextRef ctxt, const char *string, size_t stringLen)
{
DomInfo *data = getDOMContext(ctxt);
CHECK_CONDITION_RETURN_VALUE(data == NULL, 0, "string encountered without any context");
CHECK_CONDITION_RETURN_VALUE(data->m_prev == NULL, 0, "unexpected state - how is this possible?");
jvalue_ref jstr = createOptimalString(data->m_optInformation, string, stringLen);
if (data->m_value == NULL) {
if (UNLIKELY(!jis_array(data->m_prev->m_value))) {
PJ_LOG_ERR("PBNJSON_ARR_MISPLACED_STR", 1, PMLOGKS("STRING", string), "Improper place for string");
j_release(&jstr);
return 0;
}
jarray_append(data->m_prev->m_value, jstr);
} else if (jis_string(data->m_value)) {
if (UNLIKELY(!jis_object(data->m_prev->m_value))) {
PJ_LOG_ERR("PBNJSON_OBJ_MISPLACED_STR", 1, PMLOGKS("STRING", string), "Improper place for string");
j_release(&jstr);
return 0;
}
jobject_put(data->m_prev->m_value, data->m_value, jstr);
data->m_value = NULL;
} else {
PJ_LOG_ERR("PBNJSON_STR_VALUE_WO_KEY", 1, PMLOGKS("STRING", string), "value portion of key-value pair without a key");
return 0;
}
return 1;
}
int dom_number(JSAXContextRef ctxt, const char *number, size_t numberLen)
{
DomInfo *data = getDOMContext(ctxt);
jvalue_ref jnum;
CHECK_CONDITION_RETURN_VALUE(data == NULL, 0, "number encountered without any context");
CHECK_CONDITION_RETURN_VALUE(data->m_prev == NULL, 0, "unexpected state - how is this possible?");
CHECK_POINTER_RETURN_VALUE(number, 0);
CHECK_CONDITION_RETURN_VALUE(numberLen == 0, 0, "unexpected - numeric string doesn't actually contain a number");
jnum = createOptimalNumber(data->m_optInformation, number, numberLen);
if (data->m_value == NULL) {
if (UNLIKELY(!jis_array(data->m_prev->m_value))) {
PJ_LOG_ERR("PBNJSON_ARR_MISPLACED_NUM", 1, PMLOGKS("NUM", number), "Improper place for number");
j_release(&jnum);
return 0;
}
jarray_append(data->m_prev->m_value, jnum);
} else if (jis_string(data->m_value)) {
if (UNLIKELY(!jis_object(data->m_prev->m_value))) {
PJ_LOG_ERR("PBNJSON_OBJ_MISPLACED_NUM", 1, PMLOGKS("NUM", number), "Improper place for number");
j_release(&jnum);
return 0;
}
jobject_put(data->m_prev->m_value, data->m_value, jnum);
data->m_value = NULL;
} else {
PJ_LOG_ERR("PBNJSON_NUM_VALUE_WO_KEY", 1, PMLOGKS("NUM", number), "value portion of key-value pair without a key");
return 0;
}
return 1;
}
static int dom_null(JSAXContextRef ctxt)
{
DomInfo *data = getDOMContext(ctxt);
// no handle to the context
CHECK_CONDITION_RETURN_VALUE(data == NULL, 0, "null encountered without any context");
// no parent node
CHECK_CONDITION_RETURN_VALUE(data->m_prev == NULL, 0, "unexpected state - how is this possible?");
SANITY_CHECK_POINTER(ctxt);
SANITY_CHECK_POINTER(data->m_prev);
if (data->m_value == NULL) {
CHECK_CONDITION_RETURN_VALUE(!jis_array(data->m_prev->m_value), 0, "Improper place for null");
jarray_append(data->m_prev->m_value, jnull());
} else if (jis_string(data->m_value)) {
CHECK_CONDITION_RETURN_VALUE(!jis_object(data->m_prev->m_value), 0, "Improper place for null");
jobject_put(data->m_prev->m_value, data->m_value, jnull());
data->m_value = NULL;
} else {
PJ_LOG_ERR("value portion of key-value pair but not a key");
return 0;
}
return 1;
}
static int dom_object_start(JSAXContextRef ctxt)
{
DomInfo *data = getDOMContext(ctxt);
jvalue_ref newParent;
DomInfo *newChild;
CHECK_CONDITION_RETURN_VALUE(data == NULL, 0, "object encountered without any context");
newParent = jobject_create();
newChild = calloc(1, sizeof(DomInfo));
if (UNLIKELY(newChild == NULL || jis_null(newParent))) {
PJ_LOG_ERR("Failed to allocate space for new object");
j_release(&newParent);
free(newChild);
return 0;
}
newChild->m_prev = data;
newChild->m_optInformation = data->m_optInformation;
changeDOMContext(ctxt, newChild);
if (data->m_prev != NULL) {
if (jis_array(data->m_prev->m_value)) {
assert(data->m_value == NULL);
jarray_append(data->m_prev->m_value, newParent);
} else {
assert(jis_object(data->m_prev->m_value));
CHECK_CONDITION_RETURN_VALUE(!jis_string(data->m_value), 0, "improper place for a child object");
jobject_put(data->m_prev->m_value, data->m_value, newParent);
}
}
// not using reference counting here on purpose
data->m_value = newParent;
return 1;
}
static bool has_array_duplicates(ValidationState *s, void *ctxt)
{
assert(ctxt);
DomInfo *data = getDOMContext((JSAXContextRef) ctxt);
assert(data && data->m_prev && data->m_prev->m_value && jis_array(data->m_prev->m_value));
return jarray_has_duplicates(data->m_prev->m_value);
}
static int dom_array_end(JSAXContextRef ctxt)
{
DomInfo *data = getDOMContext(ctxt);
CHECK_CONDITION_RETURN_VALUE(data == NULL, 0, "array end encountered without any context");
CHECK_CONDITION_RETURN_VALUE(data->m_value != NULL, 0, "key/value for array");
CHECK_CONDITION_RETURN_VALUE(!jis_array(data->m_prev->m_value), 0, "array end encountered, but not in an array");
assert(data->m_prev != NULL);
changeDOMContext(ctxt, data->m_prev);
if (data->m_prev->m_prev != NULL)
data->m_prev->m_value = NULL;
free(data);
return 1;
}
int dom_boolean(JSAXContextRef ctxt, bool value)
{
DomInfo *data = getDOMContext(ctxt);
CHECK_CONDITION_RETURN_VALUE(data == NULL, 0, "boolean encountered without any context");
CHECK_CONDITION_RETURN_VALUE(data->m_prev == NULL, 0, "unexpected state - how is this possible?");
if (data->m_value == NULL) {
CHECK_CONDITION_RETURN_VALUE(!jis_array(data->m_prev->m_value), 0, "Improper place for boolean");
jarray_append(data->m_prev->m_value, jboolean_create(value));
} else if (jis_string(data->m_value)) {
CHECK_CONDITION_RETURN_VALUE(!jis_object(data->m_prev->m_value), 0, "Improper place for boolean");
jobject_put(data->m_prev->m_value, data->m_value, jboolean_create(value));
data->m_value = NULL;
} else {
PJ_LOG_ERR("PBNJSON_BOOL_VALUE_WO_KEY", 0, "value portion of key-value pair without a key");
return 0;
}
return 1;
}
int dom_object_start(JSAXContextRef ctxt)
{
DomInfo *data = getDOMContext(ctxt);
jvalue_ref newParent;
DomInfo *newChild;
CHECK_CONDITION_RETURN_VALUE(data == NULL, 0, "object encountered without any context");
newParent = jobject_create();
newChild = calloc(1, sizeof(DomInfo));
if (UNLIKELY(newChild == NULL || !jis_valid(newParent))) {
PJ_LOG_ERR("PBNJSON_OBJ_CALLOC_ERR", 0, "Failed to allocate space for new object");
j_release(&newParent);
free(newChild);
return 0;
}
newChild->m_prev = data;
newChild->m_optInformation = data->m_optInformation;
changeDOMContext(ctxt, newChild);
if (data->m_prev != NULL) {
if (jis_array(data->m_prev->m_value)) {
assert(data->m_value == NULL);
jarray_append(data->m_prev->m_value, jvalue_copy(newParent));
} else {
assert(jis_object(data->m_prev->m_value));
if (UNLIKELY(!jis_string(data->m_value)))
{
PJ_LOG_ERR("PBNJSON_OBJ_MISPLACED_CHILD", 0, "improper place for a child object");
j_release(&newParent);
return 0;
}
jobject_put(data->m_prev->m_value, data->m_value, jvalue_copy(newParent));
}
}
data->m_value = newParent;
return 1;
}
bool JValue::isArray() const
{
return jis_array(m_jval);
}
bool get_property_cb(LSHandle *handle, LSMessage *message, void *user_data)
{
jvalue_ref parsed_obj = NULL;
jvalue_ref keys_obj = NULL;
jvalue_ref reply_obj = NULL;
jvalue_ref props_obj = NULL;
jvalue_ref prop_obj = NULL;
char *payload, value[PROP_VALUE_MAX];
int n;
raw_buffer key_buf;
payload = LSMessageGetPayload(message);
parsed_obj = luna_service_message_parse_and_validate(payload);
if (jis_null(parsed_obj)) {
luna_service_message_reply_error_bad_json(handle, message);
goto cleanup;
}
if (!jobject_get_exists(parsed_obj, J_CSTR_TO_BUF("keys"), &keys_obj) ||
!jis_array(keys_obj)) {
luna_service_message_reply_error_bad_json(handle, message);
goto cleanup;
}
reply_obj = jobject_create();
props_obj = jarray_create(NULL);
for (n = 0; n < jarray_size(keys_obj); n++) {
jvalue_ref key_obj = jarray_get(keys_obj, n);
if (!jis_string(key_obj))
continue;
key_buf = jstring_get(key_obj);
if (strlen(key_buf.m_str) == 0)
continue;
property_get(key_buf.m_str, value, "");
prop_obj = jobject_create();
jobject_put(prop_obj, jstring_create(key_buf.m_str), jstring_create(value));
jarray_append(props_obj, prop_obj);
}
jobject_put(reply_obj, J_CSTR_TO_JVAL("properties"), props_obj);
jobject_put(reply_obj, J_CSTR_TO_JVAL("returnValue"), jboolean_create(true));
if (!luna_service_message_validate_and_send(handle, message, reply_obj))
goto cleanup;
cleanup:
if (!jis_null(parsed_obj))
j_release(&parsed_obj);
if (!jis_null(reply_obj))
j_release(&reply_obj);
return true;
}
