uint32_t
geojson_asval_wire_size(const as_val *val)
{
as_geojson *pg = as_geojson_fromval(val);
size_t jsz = as_geojson_len(pg);
// We won't be writing any cellids ...
return geojson_size(0, jsz);
}
uint32_t
geojson_size_from_asval(const as_val *val)
{
as_geojson *pg = as_geojson_fromval(val);
size_t jsz = as_geojson_len(pg);
// Compute the size; we won't be writing any cellids ...
return geojson_size(0, jsz);
}
void as_geojson_val_destroy(as_val * v)
{
as_geojson * string = as_geojson_fromval(v);
if ( !string ) return;
if ( string->value && string->free ) {
cf_free(string->value);
}
string->value = NULL;
string->free = false;
}
uint32_t as_geojson_val_hashcode(const as_val * v)
{
as_geojson * string = as_geojson_fromval(v);
if ( string == NULL || string->value == NULL) return 0;
uint32_t hash = 0;
int c;
char * str = string->value;
while ( (c = *str++) ) {
hash = c + (hash << 6) + (hash << 16) - hash;
}
return hash;
}
void
geojson_from_asval(const as_val *val, as_particle **pp)
{
geojson_mem *p_geojson_mem = (geojson_mem *)*pp;
as_geojson *pg = as_geojson_fromval(val);
size_t jsz = as_geojson_len(pg);
p_geojson_mem->type = AS_PARTICLE_TYPE_GEOJSON;
p_geojson_mem->sz = geojson_size(0, jsz);
p_geojson_mem->flags = 0;
p_geojson_mem->ncells = 0;
uint8_t *p8 = (uint8_t *)p_geojson_mem->data;
memcpy(p8, as_geojson_get(pg), jsz);
}
uint32_t
geojson_asval_to_wire(const as_val *val, uint8_t *wire)
{
as_geojson *pg = as_geojson_fromval(val);
size_t jsz = as_geojson_len(pg);
uint8_t *p8 = wire;
*p8++ = 0; // flags
uint16_t *p16 = (uint16_t *)p8;
*p16++ = cf_swap_to_be16(0); // no cells on output to client
p8 = (uint8_t *)p16;
memcpy(p8, as_geojson_get(pg), jsz);
return geojson_size(0, jsz);
}
size_t
as_command_value_size(as_val* val, as_buffer* buffer)
{
switch (val->type) {
case AS_NIL: {
return 0;
}
case AS_INTEGER: {
return 8;
}
case AS_DOUBLE: {
return 8;
}
case AS_STRING: {
as_string* v = as_string_fromval(val);
return as_string_len(v);
}
case AS_GEOJSON: {
as_geojson* v = as_geojson_fromval(val);
return
1 + // as_particle_geojson_mem::flags
2 + // as_particle_geojson_mem::ncells
(0 * 8) + // <placeholder-cellids> EMPTY!
as_geojson_len(v);
}
case AS_BYTES: {
as_bytes* v = as_bytes_fromval(val);
return v->size;
}
case AS_LIST:
case AS_MAP: {
as_serializer ser;
as_msgpack_init(&ser);
as_serializer_serialize(&ser, val, buffer);
as_serializer_destroy(&ser);
return buffer->size;
}
default: {
return 0;
}
}
}
uint8_t*
as_command_write_bin(uint8_t* begin, uint8_t operation_type, const as_bin* bin, as_buffer* buffer)
{
uint8_t* p = begin + AS_OPERATION_HEADER_SIZE;
const char* name = bin->name;
// Copy string, but do not transfer null byte.
while (*name) {
*p++ = *name++;
}
uint8_t name_len = p - begin - AS_OPERATION_HEADER_SIZE;
as_val* val = (as_val*)bin->valuep;
uint32_t val_len;
uint8_t val_type;
switch (val->type) {
default:
case AS_NIL: {
val_len = 0;
val_type = AS_BYTES_UNDEF;
break;
}
case AS_INTEGER: {
as_integer* v = as_integer_fromval(val);
*(uint64_t*)p = cf_swap_to_be64(v->value);
p += 8;
val_len = 8;
val_type = AS_BYTES_INTEGER;
break;
}
case AS_DOUBLE: {
as_double* v = as_double_fromval(val);
*(double*)p = cf_swap_to_big_float64(v->value);
p += 8;
val_len = 8;
val_type = AS_BYTES_DOUBLE;
break;
}
case AS_STRING: {
as_string* v = as_string_fromval(val);
// v->len should have been already set by as_command_value_size().
memcpy(p, v->value, v->len);
p += v->len;
val_len = (uint32_t)v->len;
val_type = AS_BYTES_STRING;
break;
}
case AS_GEOJSON: {
// We send a cellid placeholder so we can fill in points
// in place on the server w/o changing object size.
as_geojson* v = as_geojson_fromval(val);
// v->len should have been already set by as_command_value_size().
// as_particle_geojson_mem::flags
*p++ = 0;
// as_particle_geojson_mem::ncells
*(uint16_t *) p = cf_swap_to_be16(0);
p += sizeof(uint16_t);
// placeholder cellid
// THIS LOOP EXECUTES 0 TIMES (still, it belongs here ...)
for (int ii = 0; ii < 0; ++ii) {
*(uint64_t *) p = cf_swap_to_be64(0);
p += sizeof(uint64_t);
}
// json data itself
memcpy(p, v->value, v->len);
p += v->len;
val_len = (uint32_t)(1 + 2 + (0 * 8) + v->len);
val_type = AS_BYTES_GEOJSON;
break;
}
case AS_BYTES: {
as_bytes* v = as_bytes_fromval(val);
memcpy(p, v->value, v->size);
p += v->size;
val_len = v->size;
// Note: v->type must be a blob type (AS_BYTES_BLOB, AS_BYTES_JAVA, AS_BYTES_PYTHON ...).
// Otherwise, the particle type will be reassigned to a non-blob which causes a
// mismatch between type and value.
val_type = v->type;
break;
}
case AS_LIST: {
memcpy(p, buffer->data, buffer->size);
p += buffer->size;
val_len = buffer->size;
val_type = AS_BYTES_LIST;
cf_free(buffer->data);
break;
}
case AS_MAP: {
memcpy(p, buffer->data, buffer->size);
p += buffer->size;
val_len = buffer->size;
val_type = AS_BYTES_MAP;
cf_free(buffer->data);
break;
}
}
*(uint32_t*)begin = cf_swap_to_be32(name_len + val_len + 4);
begin += 4;
*begin++ = operation_type;
*begin++ = val_type;
*begin++ = 0;
*begin++ = name_len;
return p;
}
