]> arthur.barton.de Git - netatalk.git/commitdiff
Move marshalling functions in own file
authorFrank Lahm <franklahm@googlemail.com>
Fri, 29 Jun 2012 09:19:11 +0000 (11:19 +0200)
committerFrank Lahm <franklahm@googlemail.com>
Wed, 15 Aug 2012 18:14:22 +0000 (20:14 +0200)
etc/afpd/Makefile.am
etc/afpd/spotlight.c
etc/afpd/spotlight.h
etc/afpd/spotlight_marshalling.c [new file with mode: 0644]

index e74157ea30c19f34d68ec8197567e91e574867e9..ca0d614d75658c2f4438afd59e4f22a31f6a0ec1 100644 (file)
@@ -37,6 +37,7 @@ afpd_SOURCES = \
        ofork.c \
        quota.c \
        spotlight.c \
+       spotlight_marshalling.c \
        status.c \
        switch.c \
        uam.c \
@@ -76,6 +77,6 @@ fce_SOURCES = fce_api.c fce_util.c
 fce_CFLAGS = -DFCE_TEST_MAIN -I$(top_srcdir)/include
 fce_LDADD = $(top_builddir)/libatalk/libatalk.la
 
-spot_SOURCES = spotlight.c
+spot_SOURCES = spotlight.c spotlight_marshalling.c
 spot_CFLAGS = -DSPOT_TEST_MAIN
 spot_LDADD = $(top_builddir)/libatalk/libatalk.la
index 176e6d6b93637e6ce254bcdac7125c23d20a6cba..e56aca63e9f983bb8c8391b94d76077e4fa7d0fe 100644 (file)
 
 #include "spotlight.h"
 
-/**************************************************************************************************
- * RPC data marshalling and unmarshalling
- **************************************************************************************************/
-
-/* FPSpotlightRPC subcommand codes */
-#define SPOTLIGHT_CMD_VOLPATH 1
-#define SPOTLIGHT_CMD_FLAGS   2
-#define SPOTLIGHT_CMD_RPC     3
-
-/* Spotlight epoch is UNIX epoch minus SPOTLIGHT_TIME_DELTA */
-#define SPOTLIGHT_TIME_DELTA INT64_C(280878921600U)
-
-#define SQ_TYPE_NULL    0x0000
-#define SQ_TYPE_COMPLEX 0x0200
-#define SQ_TYPE_INT64   0x8400
-#define SQ_TYPE_BOOL    0x0100
-#define SQ_TYPE_FLOAT   0x8500
-#define SQ_TYPE_DATA    0x0700
-#define SQ_TYPE_CNIDS   0x8700
-#define SQ_TYPE_UUID    0x0e00
-#define SQ_TYPE_DATE    0x8600
-#define SQ_TYPE_TOC     0x8800
-
-#define SQ_CPX_TYPE_ARRAY           0x0a00
-#define SQ_CPX_TYPE_STRING          0x0c00
-#define SQ_CPX_TYPE_UTF16_STRING    0x1c00
-#define SQ_CPX_TYPE_DICT            0x0d00
-#define SQ_CPX_TYPE_CNIDS           0x1a00
-#define SQ_CPX_TYPE_FILEMETA        0x1b00
-
-#define SUBQ_SAFETY_LIM 20
-
-/* Can be ored and used as flags */
-#define SL_ENC_LITTLE_ENDIAN 1
-#define SL_ENC_BIG_ENDIAN    2
-#define SL_ENC_UTF_16        4
-
-/* Forward declarations */
-static int dissect_spotlight(DALLOC_CTX *query, const char *buf);
-static int sl_pack_loop(DALLOC_CTX *query, char *buf, int offset, char *toc_buf, int *toc_idx);
 
 /* Helper functions and stuff */
 static const char *neststrings[] = {
@@ -134,602 +94,6 @@ static int dd_dump(DALLOC_CTX *dd, int nestinglevel)
     LOG(log_debug, logtype_sl, "%s}", neststrings[nestinglevel]);
 }
 
-/*
-* Returns the UTF-16 string encoding, by checking the 2-byte byte order mark.
-* If there is no byte order mark, -1 is returned.
-*/
-static uint spotlight_get_utf16_string_encoding(const char *buf, int offset, int query_length, uint encoding) {
-    uint utf16_encoding;
-
-    /* check for byte order mark */
-    utf16_encoding = SL_ENC_BIG_ENDIAN;
-    if (query_length >= 2) {
-        uint16_t byte_order_mark;
-        if (encoding == SL_ENC_LITTLE_ENDIAN)
-            byte_order_mark = SVAL(buf, offset);
-        else
-            byte_order_mark = RSVAL(buf, offset);
-
-        if (byte_order_mark == 0xFFFE) {
-            utf16_encoding = SL_ENC_BIG_ENDIAN | SL_ENC_UTF_16;
-        }
-        else if (byte_order_mark == 0xFEFF) {
-            utf16_encoding = SL_ENC_LITTLE_ENDIAN | SL_ENC_UTF_16;
-        }
-    }
-
-    return utf16_encoding;
-}
-
-/**************************************************************************************************
- * marshalling functions
- **************************************************************************************************/
-
-#define SL_OFFSET_DELTA 16
-
-static uint64_t sl_pack_tag(uint16_t type, uint16_t size_or_count, uint32_t val)
-{
-    uint64_t tag = ((uint64_t)val << 32) | ((uint64_t)type << 16) | size_or_count;
-    return tag;
-}
-
-static int sl_pack_float(double d, char *buf, int offset)
-{
-    union {
-        double d;
-        uint64_t w;
-    } ieee_fp_union;
-
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_FLOAT, 2, 1));
-    SLVAL(buf, offset + 8, ieee_fp_union.w);
-
-    return offset + 2 * sizeof(uint64_t);
-}
-
-static int sl_pack_uint64(uint64_t u, char *buf, int offset)
-{
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_INT64, 2, 1));
-    SLVAL(buf, offset + 8, u);
-
-    return offset + 2 * sizeof(uint64_t);
-}
-
-static int sl_pack_bool(sl_bool_t bl, char *buf, int offset)
-{
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_BOOL, 1, bl ? 1 : 0));
-
-    return offset + sizeof(uint64_t);
-}
-
-static int sl_pack_nil(char *buf, int offset)
-{
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_NULL, 1, 1));
-
-    return offset + sizeof(uint64_t);
-}
-
-static int sl_pack_date(sl_time_t t, char *buf, int offset)
-{
-    uint64_t data = 0;
-
-    data = (t.tv_sec + SPOTLIGHT_TIME_DELTA) << 24;
-
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_DATE, 2, 1));
-    SLVAL(buf, offset + 8, data);
-
-    return offset + 2 * sizeof(uint64_t);
-}
-
-static int sl_pack_uuid(sl_uuid_t *uuid, char *buf, int offset)
-{
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_UUID, 3, 1));
-    memcpy(buf + offset + 8, uuid, 16);
-
-    return offset + sizeof(uint64_t) + 16;
-}
-
-static int sl_pack_CNID(sl_cnids_t *cnids, char *buf, int offset, char *toc_buf, int *toc_idx)
-{
-    int len = 0, off = 0;
-    int cnid_count = talloc_array_length(cnids->ca_cnids);
-
-    SLVAL(toc_buf, *toc_idx * 8, sl_pack_tag(SQ_CPX_TYPE_CNIDS, (offset + SL_OFFSET_DELTA) / 8, cnid_count));
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_COMPLEX, 1, *toc_idx + 1));
-    *toc_idx += 1;
-    offset += 8;
-
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_CNIDS, 2 + cnid_count, 8 /* unknown meaning, but always 8 */));
-    offset += 8;
-
-    if (cnid_count > 0) {
-        SLVAL(buf, offset, sl_pack_tag(0x0add, cnid_count, cnids->ca_context));
-        offset += 8;
-
-        for (int i = 0; i < cnid_count; i++) {
-            SLVAL(buf, offset, cnids->ca_cnids->dd_talloc_array[i]);
-            offset += 8;
-        }
-    }
-    
-    return offset;
-}
-
-static int sl_pack_array(sl_array_t *array, char *buf, int offset, char *toc_buf, int *toc_idx)
-{
-    int count = talloc_array_length(array->dd_talloc_array);
-    int octets = (offset + SL_OFFSET_DELTA) / 8;
-
-    LOG(log_maxdebug, logtype_sl, "sl_pack_array: count: %d, offset:%d, octets: %d", count, offset, octets);
-
-    SLVAL(toc_buf, *toc_idx * 8, sl_pack_tag(SQ_CPX_TYPE_ARRAY, octets, count));
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_COMPLEX, 1, *toc_idx + 1));
-    *toc_idx += 1;
-    offset += 8;
-
-    offset = sl_pack_loop(array, buf, offset, toc_buf, toc_idx);
-
-    return offset;
-}
-
-static int sl_pack_dict(sl_array_t *dict, char *buf, int offset, char *toc_buf, int *toc_idx)
-{
-    SLVAL(toc_buf, *toc_idx * 8, sl_pack_tag(SQ_CPX_TYPE_DICT, (offset + SL_OFFSET_DELTA) / 8, talloc_array_length(dict->dd_talloc_array)));
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_COMPLEX, 1, *toc_idx + 1));
-    *toc_idx += 1;
-    offset += 8;
-
-    offset = sl_pack_loop(dict, buf, offset, toc_buf, toc_idx);
-
-    return offset;
-}
-
-static int sl_pack_string(char **string, char *buf, int offset, char *toc_buf, int *toc_idx)
-{
-    int len, octets, used_in_last_octet;
-    char *s = *string;
-    len = strlen(s);
-    octets = (len / 8) + (len & 7 ? 1 : 0);
-    used_in_last_octet = 8 - (octets * 8 - len);
-
-    LOG(log_maxdebug, logtype_sl, "sl_pack_string(\"%s\"): len: %d, octets: %d, used_in_last_octet: %d",
-        s, len, octets, used_in_last_octet);
-
-    SLVAL(toc_buf, *toc_idx * 8, sl_pack_tag(SQ_CPX_TYPE_STRING, (offset + SL_OFFSET_DELTA) / 8, used_in_last_octet));
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_COMPLEX, 1, *toc_idx + 1));
-    *toc_idx += 1;
-    offset += 8;
-
-    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_DATA, octets + 1, used_in_last_octet));
-    offset += 8;
-
-    memset(buf + offset, 0, octets * 8);
-    strncpy(buf + offset, s, len);
-    offset += octets * 8;
-
-    return offset;
-}
-
-static int sl_pack_loop(DALLOC_CTX *query, char *buf, int offset, char *toc_buf, int *toc_idx)
-{
-    const char *type;
-
-    for (int n = 0; n < talloc_array_length(query->dd_talloc_array); n++) {
-
-        type = talloc_get_name(query->dd_talloc_array[n]);
-
-        if (STRCMP(type, ==, "sl_array_t")) {
-            offset = sl_pack_array(query->dd_talloc_array[n], buf, offset, toc_buf, toc_idx);
-        } else if (STRCMP(type, ==, "sl_dict_t")) {
-            offset = sl_pack_dict(query->dd_talloc_array[n], buf, offset, toc_buf, toc_idx);
-        } else if (STRCMP(type, ==, "uint64_t")) {
-            uint64_t i;
-            memcpy(&i, query->dd_talloc_array[n], sizeof(uint64_t));
-            offset = sl_pack_uint64(i, buf, offset);
-        } else if (STRCMP(type, ==, "char *")) {
-            offset = sl_pack_string(query->dd_talloc_array[n], buf, offset, toc_buf, toc_idx);
-        } else if (STRCMP(type, ==, "sl_bool_t")) {
-            sl_bool_t bl;
-            memcpy(&bl, query->dd_talloc_array[n], sizeof(sl_bool_t));
-            offset = sl_pack_bool(bl, buf, offset);
-        } else if (STRCMP(type, ==, "double")) {
-            double d;
-            memcpy(&d, query->dd_talloc_array[n], sizeof(double));
-            offset = sl_pack_float(d, buf, offset);
-        } else if (STRCMP(type, ==, "sl_nil_t")) {
-            offset = sl_pack_nil(buf, offset);
-        } else if (STRCMP(type, ==, "sl_time_t")) {
-            sl_time_t t;
-            memcpy(&t, query->dd_talloc_array[n], sizeof(sl_time_t));
-            offset = sl_pack_date(t, buf, offset);
-        } else if (STRCMP(type, ==, "sl_uuid_t")) {
-            offset = sl_pack_uuid(query->dd_talloc_array[n], buf, offset);
-        } else if (STRCMP(type, ==, "sl_cnids_t")) {
-            offset = sl_pack_CNID(query->dd_talloc_array[n], buf, offset, toc_buf, toc_idx);
-        }
-    }
-
-    return offset;
-}
-
-#define MAX_SLQ_DAT 65000
-#define MAX_SLQ_TOC 2048
-
-static int sl_pack(DALLOC_CTX *query, char *buf)
-{
-    EC_INIT;
-    char toc_buf[MAX_SLQ_TOC];
-    int toc_index = 0;
-    int len = 0;
-
-    memcpy(buf, "432130dm", 8);
-    EC_NEG1_LOG( len = sl_pack_loop(query, buf + 16, 0, toc_buf + 8, &toc_index) );
-    SIVAL(buf, 8, len / 8 + 1 + toc_index + 1);
-    SIVAL(buf, 12, len / 8 + 1);
-
-    SLVAL(toc_buf, 0, sl_pack_tag(SQ_TYPE_TOC, toc_index + 1, 0));
-    memcpy(buf + 16 + len, toc_buf, (toc_index + 1 ) * 8);
-
-    len += 16 + (toc_index + 1 ) * 8;
-
-EC_CLEANUP:
-    if (ret != 0)
-        len = -1;
-    return len;
-}
-
-/**************************************************************************************************
- * unmarshalling functions
- **************************************************************************************************/
-
-static uint64_t sl_unpack_uint64(const char *buf, int offset, uint encoding)
-{
-    if (encoding == SL_ENC_LITTLE_ENDIAN)
-            return LVAL(buf, offset);
-        else
-            return RLVAL(buf, offset);
-}
-
-static int sl_unpack_ints(DALLOC_CTX *query, const char *buf, int offset, uint encoding)
-{
-    int count, i;
-    uint64_t query_data64;
-
-    query_data64 = sl_unpack_uint64(buf, offset, encoding);
-    count = query_data64 >> 32;
-    offset += 8;
-
-    i = 0;
-    while (i++ < count) {
-        query_data64 = sl_unpack_uint64(buf, offset, encoding);
-        dalloc_add(query, &query_data64, uint64_t);
-        offset += 8;
-    }
-
-    return count;
-}
-
-static int sl_unpack_date(DALLOC_CTX *query, const char *buf, int offset, uint encoding)
-{
-    int count, i;
-    uint64_t query_data64;
-    sl_time_t t;
-
-    query_data64 = sl_unpack_uint64(buf, offset, encoding);
-    count = query_data64 >> 32;
-    offset += 8;
-
-    i = 0;
-    while (i++ < count) {
-        query_data64 = sl_unpack_uint64(buf, offset, encoding) >> 24;
-        t.tv_sec = query_data64 - SPOTLIGHT_TIME_DELTA;
-        t.tv_usec = 0;
-        dalloc_add(query, &t, sl_time_t);
-        offset += 8;
-    }
-
-    return count;
-}
-
-static int sl_unpack_uuid(DALLOC_CTX *query, const char *buf, int offset, uint encoding)
-{
-    int count, i;
-    uint64_t query_data64;
-    sl_uuid_t uuid;
-    query_data64 = sl_unpack_uint64(buf, offset, encoding);
-    count = query_data64 >> 32;
-    offset += 8;
-
-    i = 0;
-    while (i++ < count) {
-        memcpy(uuid.sl_uuid, buf + offset, 16);
-        dalloc_add(query, &uuid, sl_uuid_t);
-        offset += 16;
-    }
-
-    return count;
-}
-
-static int sl_unpack_floats(DALLOC_CTX *query, const char *buf, int offset, uint encoding)
-{
-    int count, i;
-    uint64_t query_data64;
-    double fval;
-    union {
-        double d;
-        uint32_t w[2];
-    } ieee_fp_union;
-
-    query_data64 = sl_unpack_uint64(buf, offset, encoding);
-    count = query_data64 >> 32;
-    offset += 8;
-
-    i = 0;
-    while (i++ < count) {
-        if (encoding == SL_ENC_LITTLE_ENDIAN) {
-#ifdef WORDS_BIGENDIAN
-            ieee_fp_union.w[0] = IVAL(buf, offset + 4);
-            ieee_fp_union.w[1] = IVAL(buf, offset);
-#else
-            ieee_fp_union.w[0] = IVAL(buf, offset);
-            ieee_fp_union.w[1] = IVAL(buf, offset + 4);
-#endif
-        } else {
-#ifdef WORDS_BIGENDIAN
-            ieee_fp_union.w[0] = RIVAL(buf, offset);
-            ieee_fp_union.w[1] = RIVAL(buf, offset + 4);
-#else
-            ieee_fp_union.w[0] = RIVAL(buf, offset + 4);
-            ieee_fp_union.w[1] = RIVAL(buf, offset);
-#endif
-        }
-        dalloc_add(query, &ieee_fp_union.d, double);
-        offset += 8;
-    }
-
-    return count;
-}
-
-static int sl_unpack_CNID(DALLOC_CTX *query, const char *buf, int offset, int length, uint encoding)
-{
-    EC_INIT;
-    int count;
-    uint64_t query_data64;
-    sl_cnids_t cnids;
-
-    EC_NULL( cnids.ca_cnids = talloc_zero(query, DALLOC_CTX) );
-
-    if (length <= 16)
-        /* that's permitted, it's an empty array */
-        goto EC_CLEANUP;
-    
-    query_data64 = sl_unpack_uint64(buf, offset, encoding);
-    count = query_data64 & 0xffff;
-
-    cnids.ca_unkn1 = (query_data64 & 0xffff0000) >> 16;
-    cnids.ca_context = query_data64 >> 32;
-
-    offset += 8;
-
-    while (count --) {
-        query_data64 = sl_unpack_uint64(buf, offset, encoding);
-        dalloc_add(cnids.ca_cnids, &query_data64, uint64_t);
-        offset += 8;
-    }
-
-    dalloc_add(query, &cnids, sl_cnids_t);
-
-EC_CLEANUP:
-    EC_EXIT;
-}
-
-static const char *spotlight_get_qtype_string(uint64_t query_type)
-{
-    switch (query_type) {
-    case SQ_TYPE_NULL:
-        return "null";
-    case SQ_TYPE_COMPLEX:
-        return "complex";
-    case SQ_TYPE_INT64:
-        return "int64";
-    case SQ_TYPE_BOOL:
-        return "bool";
-    case SQ_TYPE_FLOAT:
-        return "float";
-    case SQ_TYPE_DATA:
-        return "data";
-    case SQ_TYPE_CNIDS:
-        return "CNIDs";
-    default:
-        return "unknown";
-    }
-}
-
-static const char *spotlight_get_cpx_qtype_string(uint64_t cpx_query_type)
-{
-    switch (cpx_query_type) {
-    case SQ_CPX_TYPE_ARRAY:
-        return "array";
-    case SQ_CPX_TYPE_STRING:
-        return "string";
-    case SQ_CPX_TYPE_UTF16_STRING:
-        return "utf-16 string";
-    case SQ_CPX_TYPE_DICT:
-        return "dictionary";
-    case SQ_CPX_TYPE_CNIDS:
-        return "CNIDs";
-    case SQ_CPX_TYPE_FILEMETA:
-        return "FileMeta";
-    default:
-        return "unknown";
-    }
-}
-
-static int spotlight_dissect_loop(DALLOC_CTX *query,
-                                  const char *buf,
-                                  uint offset,
-                                  uint count,
-                                  const uint toc_offset,
-                                  const uint encoding)
-{
-    EC_INIT;
-    int i, toc_index, query_length;
-    uint subcount, cpx_query_type, cpx_query_count;
-    uint64_t query_data64, query_type;
-    uint unicode_encoding;
-    uint8_t mark_exists;
-    char *p;
-    int padding, slen;
-
-    while (count > 0 && (offset < toc_offset)) {
-        query_data64 = sl_unpack_uint64(buf, offset, encoding);
-        query_length = (query_data64 & 0xffff) * 8;
-        query_type = (query_data64 & 0xffff0000) >> 16;
-        if (query_length == 0)
-            EC_FAIL;
-
-        switch (query_type) {
-        case SQ_TYPE_COMPLEX:
-            toc_index = (query_data64 >> 32) - 1;
-            query_data64 = sl_unpack_uint64(buf, toc_offset + toc_index * 8, encoding);
-            cpx_query_type = (query_data64 & 0xffff0000) >> 16;
-            cpx_query_count = query_data64 >> 32;
-
-            switch (cpx_query_type) {
-            case SQ_CPX_TYPE_ARRAY: {
-                sl_array_t *sl_arrary = talloc_zero(query, sl_array_t);
-                EC_NEG1_LOG( offset = spotlight_dissect_loop(sl_arrary, buf, offset + 8, cpx_query_count, toc_offset, encoding) );
-                dalloc_add(query, sl_arrary, sl_array_t);
-                break;
-            }
-
-            case SQ_CPX_TYPE_DICT: {
-                sl_dict_t *sl_dict = talloc_zero(query, sl_dict_t);
-                EC_NEG1_LOG( offset = spotlight_dissect_loop(sl_dict, buf, offset + 8, cpx_query_count, toc_offset, encoding) );
-                dalloc_add(query, sl_dict, sl_dict_t);
-                break;
-            }
-            case SQ_CPX_TYPE_STRING:
-                query_data64 = sl_unpack_uint64(buf, offset + 8, encoding);
-                query_length += (query_data64 & 0xffff) * 8;
-                if ((padding = 8 - (query_data64 >> 32)) < 0)
-                    EC_FAIL;
-                if ((slen = query_length - 16 - padding) < 1)
-                    EC_FAIL;
-                p = talloc_strndup(query, buf + offset + 16, slen);
-                dalloc_add(query, &p, char *);
-                break;
-
-            case SQ_CPX_TYPE_UTF16_STRING:
-                query_data64 = sl_unpack_uint64(buf, offset + 8, encoding);
-                query_length += (query_data64 & 0xffff) * 8;
-                if ((padding = 8 - (query_data64 >> 32)) < 0)
-                    EC_FAIL;
-                if ((slen = query_length - 16 - padding) < 1)
-                    EC_FAIL;
-
-                unicode_encoding = spotlight_get_utf16_string_encoding(buf, offset + 16, slen, encoding);
-                mark_exists = (unicode_encoding & SL_ENC_UTF_16);
-                unicode_encoding &= ~SL_ENC_UTF_16;
-
-                EC_NEG1( convert_string_allocate(CH_UCS2, CH_UTF8, buf + offset + (mark_exists ? 18 : 16), slen, &p) );
-                dalloc_add(query, &p, char *);
-                break;
-
-            case SQ_CPX_TYPE_FILEMETA:
-                query_data64 = sl_unpack_uint64(buf, offset + 8, encoding);
-                query_length += (query_data64 & 0xffff) * 8;
-
-                if (query_length <= 8) {
-                    EC_FAIL_LOG("SQ_CPX_TYPE_FILEMETA: query_length <= 8%s", "");
-                } else {
-                    EC_NEG1_LOG( dissect_spotlight(query, buf + offset + 16) );
-                }
-                break;
-
-            case SQ_CPX_TYPE_CNIDS:
-                query_data64 = sl_unpack_uint64(buf, offset + 8, encoding);
-                query_length += (query_data64 & 0xffff) * 8;
-                EC_NEG1_LOG( sl_unpack_CNID(query, buf, offset + 16, query_length, encoding) );
-                break;
-            } /* switch (cpx_query_type) */
-
-            count--;
-            break;
-
-        case SQ_TYPE_NULL: {
-            subcount = query_data64 >> 32;
-            if (subcount > 64)
-                EC_FAIL;
-            sl_nil_t nil = 0;
-            for (i = 0; i < subcount; i++)
-                dalloc_add(query, &nil, sl_nil_t);
-            count -= subcount;
-            break;
-        }
-        case SQ_TYPE_BOOL: {
-            sl_bool_t b = query_data64 >> 32;
-            dalloc_add(query, &b, sl_bool_t);
-            count--;
-            break;
-        }
-        case SQ_TYPE_INT64:
-            EC_NEG1_LOG( subcount = sl_unpack_ints(query, buf, offset, encoding) );
-            count -= subcount;
-            break;
-        case SQ_TYPE_UUID:
-            EC_NEG1_LOG( subcount = sl_unpack_uuid(query, buf, offset, encoding) );
-            count -= subcount;
-            break;
-        case SQ_TYPE_FLOAT:
-            EC_NEG1_LOG( subcount = sl_unpack_floats(query, buf, offset, encoding) );
-            count -= subcount;
-            break;
-        case SQ_TYPE_DATE:
-            EC_NEG1_LOG( subcount = sl_unpack_date(query, buf, offset, encoding) );
-            count -= subcount;
-            break;
-        default:
-            EC_FAIL;
-        }
-
-        offset += query_length;
-    }
-
-EC_CLEANUP:
-    if (ret != 0) {
-        offset = -1;
-    }
-    return offset;
-}
-
-static int dissect_spotlight(DALLOC_CTX *query, const char *buf)
-{
-    EC_INIT;
-    int encoding, i, toc_entries;
-    uint64_t toc_offset, tquerylen, toc_entry;
-
-    if (strncmp(buf, "md031234", 8) == 0)
-        encoding = SL_ENC_BIG_ENDIAN;
-    else
-        encoding = SL_ENC_LITTLE_ENDIAN;
-
-    buf += 8;
-
-    toc_offset = ((sl_unpack_uint64(buf, 0, encoding) >> 32) - 1 ) * 8;
-    if (toc_offset < 0 || (toc_offset > 65000)) {
-        EC_FAIL;
-    }
-
-    buf += 8;
-
-    toc_entries = (int)(sl_unpack_uint64(buf, toc_offset, encoding) & 0xffff);
-
-    EC_NEG1( spotlight_dissect_loop(query, buf, 0, 1, toc_offset + 8, encoding) );
-
-EC_CLEANUP:
-    EC_EXIT;
-}
-
 /**************************************************************************************************
  * Spotlight RPC functions
  **************************************************************************************************/
@@ -821,7 +185,8 @@ int afp_spotlight_rpc(AFPObj *obj, char *ibuf, size_t ibuflen, char *rbuf, size_
 
     switch (cmd) {
 
-    case SPOTLIGHT_CMD_VOLPATH: {
+    case SPOTLIGHT_CMD_OPEN:
+    case SPOTLIGHT_CMD_OPEN2: {
         RSIVAL(rbuf, 0, ntohs(vid));
         RSIVAL(rbuf, 4, 0);
         int len = strlen(vol->v_path) + 1;
@@ -830,7 +195,7 @@ int afp_spotlight_rpc(AFPObj *obj, char *ibuf, size_t ibuflen, char *rbuf, size_
         break;
     }
     case SPOTLIGHT_CMD_FLAGS:
-        RSIVAL(rbuf, 0, 0x0100006b); /* Whatever this value means... flags? */
+        RSIVAL(rbuf, 0, 0x0100006b); /* Whatever this value means... flags? Helios uses 0x1eefface */
         *rbuflen += 4;
         break;
 
@@ -840,7 +205,7 @@ int afp_spotlight_rpc(AFPObj *obj, char *ibuf, size_t ibuflen, char *rbuf, size_
         DALLOC_CTX *reply;
         EC_NULL( reply = talloc_zero(tmp_ctx, DALLOC_CTX) );
 
-        EC_ZERO( dissect_spotlight(query, ibuf + 22) );
+        EC_ZERO( sl_unpack(query, ibuf + 22) );
         dd_dump(query, 0);
 
         char **cmd;
@@ -866,6 +231,9 @@ int afp_spotlight_rpc(AFPObj *obj, char *ibuf, size_t ibuflen, char *rbuf, size_
         int len;
         EC_NEG1_LOG( len = sl_pack(reply, rbuf + 4) );
         *rbuflen += len;
+
+        dd_dump(reply, 0);
+
         break;
     }
     }
index 6168ba56778e7714d71a8ada9598227fc7527ee4..241de83b351aa1bf5191d6d76a86f7e823d6551e 100644 (file)
 #include <atalk/dalloc.h>
 #include <atalk/globals.h>
 
+/* FPSpotlightRPC subcommand codes */
+#define SPOTLIGHT_CMD_OPEN    1
+#define SPOTLIGHT_CMD_FLAGS   2
+#define SPOTLIGHT_CMD_RPC     3
+#define SPOTLIGHT_CMD_OPEN2   4
+
+/* Can be ored and used as flags */
+#define SL_ENC_LITTLE_ENDIAN 1
+#define SL_ENC_BIG_ENDIAN    2
+#define SL_ENC_UTF_16        4
+
 typedef DALLOC_CTX     sl_array_t;    /* an array of elements                                           */
 typedef DALLOC_CTX     sl_dict_t;     /* an array of key/value elements                                 */
 typedef DALLOC_CTX     sl_filemeta_t; /* contains one sl_array_t                                        */
@@ -40,5 +51,7 @@ typedef struct {
 }                      sl_cnids_t;    /* an array of CNID                                               */
 
 extern int afp_spotlight_rpc(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf, size_t *rbuflen);
+extern int sl_pack(DALLOC_CTX *query, char *buf);
+extern int sl_unpack(DALLOC_CTX *query, const char *buf);
 
 #endif /* SPOTLIGHT_H */
diff --git a/etc/afpd/spotlight_marshalling.c b/etc/afpd/spotlight_marshalling.c
new file mode 100644 (file)
index 0000000..47586a5
--- /dev/null
@@ -0,0 +1,666 @@
+/*
+  Copyright (c) 2012 Frank Lahm <franklahm@gmail.com>
+
+  This program is free software; you can redistribute it and/or modify
+  it under the terms of the GNU General Public License as published by
+  the Free Software Foundation; either version 2 of the License, or
+  (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+  GNU General Public License for more details.
+*/
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif /* HAVE_CONFIG_H */
+
+#include <string.h>
+#include <strings.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <errno.h>
+#include <stdbool.h>
+#include <inttypes.h>
+
+#include <atalk/errchk.h>
+#include <atalk/util.h>
+#include <atalk/logger.h>
+#include <atalk/talloc.h>
+#include <atalk/dalloc.h>
+#include <atalk/byteorder.h>
+#include <atalk/netatalk_conf.h>
+#include <atalk/volume.h>
+
+#include "spotlight.h"
+
+/**************************************************************************************************
+ * RPC data marshalling and unmarshalling
+ **************************************************************************************************/
+
+/* Spotlight epoch is UNIX epoch minus SPOTLIGHT_TIME_DELTA */
+#define SPOTLIGHT_TIME_DELTA INT64_C(280878921600U)
+
+#define SQ_TYPE_NULL    0x0000
+#define SQ_TYPE_COMPLEX 0x0200
+#define SQ_TYPE_INT64   0x8400
+#define SQ_TYPE_BOOL    0x0100
+#define SQ_TYPE_FLOAT   0x8500
+#define SQ_TYPE_DATA    0x0700
+#define SQ_TYPE_CNIDS   0x8700
+#define SQ_TYPE_UUID    0x0e00
+#define SQ_TYPE_DATE    0x8600
+#define SQ_TYPE_TOC     0x8800
+
+#define SQ_CPX_TYPE_ARRAY           0x0a00
+#define SQ_CPX_TYPE_STRING          0x0c00
+#define SQ_CPX_TYPE_UTF16_STRING    0x1c00
+#define SQ_CPX_TYPE_DICT            0x0d00
+#define SQ_CPX_TYPE_CNIDS           0x1a00
+#define SQ_CPX_TYPE_FILEMETA        0x1b00
+
+#define SUBQ_SAFETY_LIM 20
+
+/* Forward declarations */
+static int sl_pack_loop(DALLOC_CTX *query, char *buf, int offset, char *toc_buf, int *toc_idx);
+
+/*
+* Returns the UTF-16 string encoding, by checking the 2-byte byte order mark.
+* If there is no byte order mark, -1 is returned.
+*/
+static uint spotlight_get_utf16_string_encoding(const char *buf, int offset, int query_length, uint encoding) {
+    uint utf16_encoding;
+
+    /* check for byte order mark */
+    utf16_encoding = SL_ENC_BIG_ENDIAN;
+    if (query_length >= 2) {
+        uint16_t byte_order_mark;
+        if (encoding == SL_ENC_LITTLE_ENDIAN)
+            byte_order_mark = SVAL(buf, offset);
+        else
+            byte_order_mark = RSVAL(buf, offset);
+
+        if (byte_order_mark == 0xFFFE) {
+            utf16_encoding = SL_ENC_BIG_ENDIAN | SL_ENC_UTF_16;
+        }
+        else if (byte_order_mark == 0xFEFF) {
+            utf16_encoding = SL_ENC_LITTLE_ENDIAN | SL_ENC_UTF_16;
+        }
+    }
+
+    return utf16_encoding;
+}
+
+/**************************************************************************************************
+ * marshalling functions
+ **************************************************************************************************/
+
+#define SL_OFFSET_DELTA 16
+
+static uint64_t sl_pack_tag(uint16_t type, uint16_t size_or_count, uint32_t val)
+{
+    uint64_t tag = ((uint64_t)val << 32) | ((uint64_t)type << 16) | size_or_count;
+    return tag;
+}
+
+static int sl_pack_float(double d, char *buf, int offset)
+{
+    union {
+        double d;
+        uint64_t w;
+    } ieee_fp_union;
+
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_FLOAT, 2, 1));
+    SLVAL(buf, offset + 8, ieee_fp_union.w);
+
+    return offset + 2 * sizeof(uint64_t);
+}
+
+static int sl_pack_uint64(uint64_t u, char *buf, int offset)
+{
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_INT64, 2, 1));
+    SLVAL(buf, offset + 8, u);
+
+    return offset + 2 * sizeof(uint64_t);
+}
+
+static int sl_pack_bool(sl_bool_t bl, char *buf, int offset)
+{
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_BOOL, 1, bl ? 1 : 0));
+
+    return offset + sizeof(uint64_t);
+}
+
+static int sl_pack_nil(char *buf, int offset)
+{
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_NULL, 1, 1));
+
+    return offset + sizeof(uint64_t);
+}
+
+static int sl_pack_date(sl_time_t t, char *buf, int offset)
+{
+    uint64_t data = 0;
+
+    data = (t.tv_sec + SPOTLIGHT_TIME_DELTA) << 24;
+
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_DATE, 2, 1));
+    SLVAL(buf, offset + 8, data);
+
+    return offset + 2 * sizeof(uint64_t);
+}
+
+static int sl_pack_uuid(sl_uuid_t *uuid, char *buf, int offset)
+{
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_UUID, 3, 1));
+    memcpy(buf + offset + 8, uuid, 16);
+
+    return offset + sizeof(uint64_t) + 16;
+}
+
+static int sl_pack_CNID(sl_cnids_t *cnids, char *buf, int offset, char *toc_buf, int *toc_idx)
+{
+    int len = 0, off = 0;
+    int cnid_count = talloc_array_length(cnids->ca_cnids);
+
+    SLVAL(toc_buf, *toc_idx * 8, sl_pack_tag(SQ_CPX_TYPE_CNIDS, (offset + SL_OFFSET_DELTA) / 8, cnid_count));
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_COMPLEX, 1, *toc_idx + 1));
+    *toc_idx += 1;
+    offset += 8;
+
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_CNIDS, 2 + cnid_count, 8 /* unknown meaning, but always 8 */));
+    offset += 8;
+
+    if (cnid_count > 0) {
+        SLVAL(buf, offset, sl_pack_tag(0x0add, cnid_count, cnids->ca_context));
+        offset += 8;
+
+        for (int i = 0; i < cnid_count; i++) {
+            SLVAL(buf, offset, cnids->ca_cnids->dd_talloc_array[i]);
+            offset += 8;
+        }
+    }
+    
+    return offset;
+}
+
+static int sl_pack_array(sl_array_t *array, char *buf, int offset, char *toc_buf, int *toc_idx)
+{
+    int count = talloc_array_length(array->dd_talloc_array);
+    int octets = (offset + SL_OFFSET_DELTA) / 8;
+
+    LOG(log_maxdebug, logtype_sl, "sl_pack_array: count: %d, offset:%d, octets: %d", count, offset, octets);
+
+    SLVAL(toc_buf, *toc_idx * 8, sl_pack_tag(SQ_CPX_TYPE_ARRAY, octets, count));
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_COMPLEX, 1, *toc_idx + 1));
+    *toc_idx += 1;
+    offset += 8;
+
+    offset = sl_pack_loop(array, buf, offset, toc_buf, toc_idx);
+
+    return offset;
+}
+
+static int sl_pack_dict(sl_array_t *dict, char *buf, int offset, char *toc_buf, int *toc_idx)
+{
+    SLVAL(toc_buf, *toc_idx * 8, sl_pack_tag(SQ_CPX_TYPE_DICT, (offset + SL_OFFSET_DELTA) / 8, talloc_array_length(dict->dd_talloc_array)));
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_COMPLEX, 1, *toc_idx + 1));
+    *toc_idx += 1;
+    offset += 8;
+
+    offset = sl_pack_loop(dict, buf, offset, toc_buf, toc_idx);
+
+    return offset;
+}
+
+static int sl_pack_string(char **string, char *buf, int offset, char *toc_buf, int *toc_idx)
+{
+    int len, octets, used_in_last_octet;
+    char *s = *string;
+    len = strlen(s);
+    octets = (len / 8) + (len & 7 ? 1 : 0);
+    used_in_last_octet = 8 - (octets * 8 - len);
+
+    LOG(log_maxdebug, logtype_sl, "sl_pack_string(\"%s\"): len: %d, octets: %d, used_in_last_octet: %d",
+        s, len, octets, used_in_last_octet);
+
+    SLVAL(toc_buf, *toc_idx * 8, sl_pack_tag(SQ_CPX_TYPE_STRING, (offset + SL_OFFSET_DELTA) / 8, used_in_last_octet));
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_COMPLEX, 1, *toc_idx + 1));
+    *toc_idx += 1;
+    offset += 8;
+
+    SLVAL(buf, offset, sl_pack_tag(SQ_TYPE_DATA, octets + 1, used_in_last_octet));
+    offset += 8;
+
+    memset(buf + offset, 0, octets * 8);
+    strncpy(buf + offset, s, len);
+    offset += octets * 8;
+
+    return offset;
+}
+
+static int sl_pack_loop(DALLOC_CTX *query, char *buf, int offset, char *toc_buf, int *toc_idx)
+{
+    const char *type;
+
+    for (int n = 0; n < talloc_array_length(query->dd_talloc_array); n++) {
+
+        type = talloc_get_name(query->dd_talloc_array[n]);
+
+        if (STRCMP(type, ==, "sl_array_t")) {
+            offset = sl_pack_array(query->dd_talloc_array[n], buf, offset, toc_buf, toc_idx);
+        } else if (STRCMP(type, ==, "sl_dict_t")) {
+            offset = sl_pack_dict(query->dd_talloc_array[n], buf, offset, toc_buf, toc_idx);
+        } else if (STRCMP(type, ==, "uint64_t")) {
+            uint64_t i;
+            memcpy(&i, query->dd_talloc_array[n], sizeof(uint64_t));
+            offset = sl_pack_uint64(i, buf, offset);
+        } else if (STRCMP(type, ==, "char *")) {
+            offset = sl_pack_string(query->dd_talloc_array[n], buf, offset, toc_buf, toc_idx);
+        } else if (STRCMP(type, ==, "sl_bool_t")) {
+            sl_bool_t bl;
+            memcpy(&bl, query->dd_talloc_array[n], sizeof(sl_bool_t));
+            offset = sl_pack_bool(bl, buf, offset);
+        } else if (STRCMP(type, ==, "double")) {
+            double d;
+            memcpy(&d, query->dd_talloc_array[n], sizeof(double));
+            offset = sl_pack_float(d, buf, offset);
+        } else if (STRCMP(type, ==, "sl_nil_t")) {
+            offset = sl_pack_nil(buf, offset);
+        } else if (STRCMP(type, ==, "sl_time_t")) {
+            sl_time_t t;
+            memcpy(&t, query->dd_talloc_array[n], sizeof(sl_time_t));
+            offset = sl_pack_date(t, buf, offset);
+        } else if (STRCMP(type, ==, "sl_uuid_t")) {
+            offset = sl_pack_uuid(query->dd_talloc_array[n], buf, offset);
+        } else if (STRCMP(type, ==, "sl_cnids_t")) {
+            offset = sl_pack_CNID(query->dd_talloc_array[n], buf, offset, toc_buf, toc_idx);
+        }
+    }
+
+    return offset;
+}
+
+/**************************************************************************************************
+ * unmarshalling functions
+ **************************************************************************************************/
+
+static uint64_t sl_unpack_uint64(const char *buf, int offset, uint encoding)
+{
+    if (encoding == SL_ENC_LITTLE_ENDIAN)
+            return LVAL(buf, offset);
+        else
+            return RLVAL(buf, offset);
+}
+
+static int sl_unpack_ints(DALLOC_CTX *query, const char *buf, int offset, uint encoding)
+{
+    int count, i;
+    uint64_t query_data64;
+
+    query_data64 = sl_unpack_uint64(buf, offset, encoding);
+    count = query_data64 >> 32;
+    offset += 8;
+
+    i = 0;
+    while (i++ < count) {
+        query_data64 = sl_unpack_uint64(buf, offset, encoding);
+        dalloc_add(query, &query_data64, uint64_t);
+        offset += 8;
+    }
+
+    return count;
+}
+
+static int sl_unpack_date(DALLOC_CTX *query, const char *buf, int offset, uint encoding)
+{
+    int count, i;
+    uint64_t query_data64;
+    sl_time_t t;
+
+    query_data64 = sl_unpack_uint64(buf, offset, encoding);
+    count = query_data64 >> 32;
+    offset += 8;
+
+    i = 0;
+    while (i++ < count) {
+        query_data64 = sl_unpack_uint64(buf, offset, encoding) >> 24;
+        t.tv_sec = query_data64 - SPOTLIGHT_TIME_DELTA;
+        t.tv_usec = 0;
+        dalloc_add(query, &t, sl_time_t);
+        offset += 8;
+    }
+
+    return count;
+}
+
+static int sl_unpack_uuid(DALLOC_CTX *query, const char *buf, int offset, uint encoding)
+{
+    int count, i;
+    uint64_t query_data64;
+    sl_uuid_t uuid;
+    query_data64 = sl_unpack_uint64(buf, offset, encoding);
+    count = query_data64 >> 32;
+    offset += 8;
+
+    i = 0;
+    while (i++ < count) {
+        memcpy(uuid.sl_uuid, buf + offset, 16);
+        dalloc_add(query, &uuid, sl_uuid_t);
+        offset += 16;
+    }
+
+    return count;
+}
+
+static int sl_unpack_floats(DALLOC_CTX *query, const char *buf, int offset, uint encoding)
+{
+    int count, i;
+    uint64_t query_data64;
+    double fval;
+    union {
+        double d;
+        uint32_t w[2];
+    } ieee_fp_union;
+
+    query_data64 = sl_unpack_uint64(buf, offset, encoding);
+    count = query_data64 >> 32;
+    offset += 8;
+
+    i = 0;
+    while (i++ < count) {
+        if (encoding == SL_ENC_LITTLE_ENDIAN) {
+#ifdef WORDS_BIGENDIAN
+            ieee_fp_union.w[0] = IVAL(buf, offset + 4);
+            ieee_fp_union.w[1] = IVAL(buf, offset);
+#else
+            ieee_fp_union.w[0] = IVAL(buf, offset);
+            ieee_fp_union.w[1] = IVAL(buf, offset + 4);
+#endif
+        } else {
+#ifdef WORDS_BIGENDIAN
+            ieee_fp_union.w[0] = RIVAL(buf, offset);
+            ieee_fp_union.w[1] = RIVAL(buf, offset + 4);
+#else
+            ieee_fp_union.w[0] = RIVAL(buf, offset + 4);
+            ieee_fp_union.w[1] = RIVAL(buf, offset);
+#endif
+        }
+        dalloc_add(query, &ieee_fp_union.d, double);
+        offset += 8;
+    }
+
+    return count;
+}
+
+static int sl_unpack_CNID(DALLOC_CTX *query, const char *buf, int offset, int length, uint encoding)
+{
+    EC_INIT;
+    int count;
+    uint64_t query_data64;
+    sl_cnids_t cnids;
+
+    EC_NULL( cnids.ca_cnids = talloc_zero(query, DALLOC_CTX) );
+
+    if (length <= 16)
+        /* that's permitted, it's an empty array */
+        goto EC_CLEANUP;
+    
+    query_data64 = sl_unpack_uint64(buf, offset, encoding);
+    count = query_data64 & 0xffff;
+
+    cnids.ca_unkn1 = (query_data64 & 0xffff0000) >> 16;
+    cnids.ca_context = query_data64 >> 32;
+
+    offset += 8;
+
+    while (count --) {
+        query_data64 = sl_unpack_uint64(buf, offset, encoding);
+        dalloc_add(cnids.ca_cnids, &query_data64, uint64_t);
+        offset += 8;
+    }
+
+    dalloc_add(query, &cnids, sl_cnids_t);
+
+EC_CLEANUP:
+    EC_EXIT;
+}
+
+static const char *spotlight_get_qtype_string(uint64_t query_type)
+{
+    switch (query_type) {
+    case SQ_TYPE_NULL:
+        return "null";
+    case SQ_TYPE_COMPLEX:
+        return "complex";
+    case SQ_TYPE_INT64:
+        return "int64";
+    case SQ_TYPE_BOOL:
+        return "bool";
+    case SQ_TYPE_FLOAT:
+        return "float";
+    case SQ_TYPE_DATA:
+        return "data";
+    case SQ_TYPE_CNIDS:
+        return "CNIDs";
+    default:
+        return "unknown";
+    }
+}
+
+static const char *spotlight_get_cpx_qtype_string(uint64_t cpx_query_type)
+{
+    switch (cpx_query_type) {
+    case SQ_CPX_TYPE_ARRAY:
+        return "array";
+    case SQ_CPX_TYPE_STRING:
+        return "string";
+    case SQ_CPX_TYPE_UTF16_STRING:
+        return "utf-16 string";
+    case SQ_CPX_TYPE_DICT:
+        return "dictionary";
+    case SQ_CPX_TYPE_CNIDS:
+        return "CNIDs";
+    case SQ_CPX_TYPE_FILEMETA:
+        return "FileMeta";
+    default:
+        return "unknown";
+    }
+}
+
+static int spotlight_dissect_loop(DALLOC_CTX *query,
+                                  const char *buf,
+                                  uint offset,
+                                  uint count,
+                                  const uint toc_offset,
+                                  const uint encoding)
+{
+    EC_INIT;
+    int i, toc_index, query_length;
+    uint subcount, cpx_query_type, cpx_query_count;
+    uint64_t query_data64, query_type;
+    uint unicode_encoding;
+    uint8_t mark_exists;
+    char *p;
+    int padding, slen;
+
+    while (count > 0 && (offset < toc_offset)) {
+        query_data64 = sl_unpack_uint64(buf, offset, encoding);
+        query_length = (query_data64 & 0xffff) * 8;
+        query_type = (query_data64 & 0xffff0000) >> 16;
+        if (query_length == 0)
+            EC_FAIL;
+
+        switch (query_type) {
+        case SQ_TYPE_COMPLEX:
+            toc_index = (query_data64 >> 32) - 1;
+            query_data64 = sl_unpack_uint64(buf, toc_offset + toc_index * 8, encoding);
+            cpx_query_type = (query_data64 & 0xffff0000) >> 16;
+            cpx_query_count = query_data64 >> 32;
+
+            switch (cpx_query_type) {
+            case SQ_CPX_TYPE_ARRAY: {
+                sl_array_t *sl_arrary = talloc_zero(query, sl_array_t);
+                EC_NEG1_LOG( offset = spotlight_dissect_loop(sl_arrary, buf, offset + 8, cpx_query_count, toc_offset, encoding) );
+                dalloc_add(query, sl_arrary, sl_array_t);
+                break;
+            }
+
+            case SQ_CPX_TYPE_DICT: {
+                sl_dict_t *sl_dict = talloc_zero(query, sl_dict_t);
+                EC_NEG1_LOG( offset = spotlight_dissect_loop(sl_dict, buf, offset + 8, cpx_query_count, toc_offset, encoding) );
+                dalloc_add(query, sl_dict, sl_dict_t);
+                break;
+            }
+            case SQ_CPX_TYPE_STRING:
+                query_data64 = sl_unpack_uint64(buf, offset + 8, encoding);
+                query_length += (query_data64 & 0xffff) * 8;
+                if ((padding = 8 - (query_data64 >> 32)) < 0)
+                    EC_FAIL;
+                if ((slen = query_length - 16 - padding) < 1)
+                    EC_FAIL;
+                p = talloc_strndup(query, buf + offset + 16, slen);
+                dalloc_add(query, &p, char *);
+                break;
+
+            case SQ_CPX_TYPE_UTF16_STRING:
+                query_data64 = sl_unpack_uint64(buf, offset + 8, encoding);
+                query_length += (query_data64 & 0xffff) * 8;
+                if ((padding = 8 - (query_data64 >> 32)) < 0)
+                    EC_FAIL;
+                if ((slen = query_length - 16 - padding) < 1)
+                    EC_FAIL;
+
+                unicode_encoding = spotlight_get_utf16_string_encoding(buf, offset + 16, slen, encoding);
+                mark_exists = (unicode_encoding & SL_ENC_UTF_16);
+                unicode_encoding &= ~SL_ENC_UTF_16;
+
+                EC_NEG1( convert_string_allocate(CH_UCS2, CH_UTF8, buf + offset + (mark_exists ? 18 : 16), slen, &p) );
+                dalloc_add(query, &p, char *);
+                break;
+
+            case SQ_CPX_TYPE_FILEMETA:
+                query_data64 = sl_unpack_uint64(buf, offset + 8, encoding);
+                query_length += (query_data64 & 0xffff) * 8;
+
+                if (query_length <= 8) {
+                    EC_FAIL_LOG("SQ_CPX_TYPE_FILEMETA: query_length <= 8%s", "");
+                } else {
+                    EC_NEG1_LOG( sl_unpack(query, buf + offset + 16) );
+                }
+                break;
+
+            case SQ_CPX_TYPE_CNIDS:
+                query_data64 = sl_unpack_uint64(buf, offset + 8, encoding);
+                query_length += (query_data64 & 0xffff) * 8;
+                EC_NEG1_LOG( sl_unpack_CNID(query, buf, offset + 16, query_length, encoding) );
+                break;
+            } /* switch (cpx_query_type) */
+
+            count--;
+            break;
+
+        case SQ_TYPE_NULL: {
+            subcount = query_data64 >> 32;
+            if (subcount > 64)
+                EC_FAIL;
+            sl_nil_t nil = 0;
+            for (i = 0; i < subcount; i++)
+                dalloc_add(query, &nil, sl_nil_t);
+            count -= subcount;
+            break;
+        }
+        case SQ_TYPE_BOOL: {
+            sl_bool_t b = query_data64 >> 32;
+            dalloc_add(query, &b, sl_bool_t);
+            count--;
+            break;
+        }
+        case SQ_TYPE_INT64:
+            EC_NEG1_LOG( subcount = sl_unpack_ints(query, buf, offset, encoding) );
+            count -= subcount;
+            break;
+        case SQ_TYPE_UUID:
+            EC_NEG1_LOG( subcount = sl_unpack_uuid(query, buf, offset, encoding) );
+            count -= subcount;
+            break;
+        case SQ_TYPE_FLOAT:
+            EC_NEG1_LOG( subcount = sl_unpack_floats(query, buf, offset, encoding) );
+            count -= subcount;
+            break;
+        case SQ_TYPE_DATE:
+            EC_NEG1_LOG( subcount = sl_unpack_date(query, buf, offset, encoding) );
+            count -= subcount;
+            break;
+        default:
+            EC_FAIL;
+        }
+
+        offset += query_length;
+    }
+
+EC_CLEANUP:
+    if (ret != 0) {
+        offset = -1;
+    }
+    return offset;
+}
+
+/**************************************************************************************************
+ * Global functions for packing und unpacking
+ **************************************************************************************************/
+
+#define MAX_SLQ_DAT 65000
+#define MAX_SLQ_TOC 2048
+
+int sl_pack(DALLOC_CTX *query, char *buf)
+{
+    EC_INIT;
+    char toc_buf[MAX_SLQ_TOC];
+    int toc_index = 0;
+    int len = 0;
+
+    memcpy(buf, "432130dm", 8);
+    EC_NEG1_LOG( len = sl_pack_loop(query, buf + 16, 0, toc_buf + 8, &toc_index) );
+    SIVAL(buf, 8, len / 8 + 1 + toc_index + 1);
+    SIVAL(buf, 12, len / 8 + 1);
+
+    SLVAL(toc_buf, 0, sl_pack_tag(SQ_TYPE_TOC, toc_index + 1, 0));
+    memcpy(buf + 16 + len, toc_buf, (toc_index + 1 ) * 8);
+
+    len += 16 + (toc_index + 1 ) * 8;
+
+EC_CLEANUP:
+    if (ret != 0)
+        len = -1;
+    return len;
+}
+
+int sl_unpack(DALLOC_CTX *query, const char *buf)
+{
+    EC_INIT;
+    int encoding, i, toc_entries;
+    uint64_t toc_offset, tquerylen, toc_entry;
+
+    if (strncmp(buf, "md031234", 8) == 0)
+        encoding = SL_ENC_BIG_ENDIAN;
+    else
+        encoding = SL_ENC_LITTLE_ENDIAN;
+
+    buf += 8;
+
+    toc_offset = ((sl_unpack_uint64(buf, 0, encoding) >> 32) - 1 ) * 8;
+    if (toc_offset < 0 || (toc_offset > 65000)) {
+        EC_FAIL;
+    }
+
+    buf += 8;
+
+    toc_entries = (int)(sl_unpack_uint64(buf, toc_offset, encoding) & 0xffff);
+
+    EC_NEG1( spotlight_dissect_loop(query, buf, 0, 1, toc_offset + 8, encoding) );
+
+EC_CLEANUP:
+    EC_EXIT;
+}