2012-12-14 04:34:42 +00:00
|
|
|
/*
|
2014-01-19 01:09:44 +00:00
|
|
|
* This file Copyright (C) 2008-2014 Mnemosyne LLC
|
2012-12-14 04:34:42 +00:00
|
|
|
*
|
2014-01-21 03:10:30 +00:00
|
|
|
* It may be used under the GNU GPL versions 2 or 3
|
2014-01-19 01:09:44 +00:00
|
|
|
* or any future license endorsed by Mnemosyne LLC.
|
2012-12-14 04:34:42 +00:00
|
|
|
*
|
|
|
|
* $Id$
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <assert.h>
|
2012-12-24 22:38:41 +00:00
|
|
|
#include <ctype.h> /* isdigit() */
|
2012-12-14 04:34:42 +00:00
|
|
|
#include <errno.h>
|
2013-02-04 21:07:24 +00:00
|
|
|
#include <stdlib.h> /* strtoul() */
|
2012-12-24 22:38:41 +00:00
|
|
|
#include <string.h> /* strlen(), memchr() */
|
2012-12-14 04:34:42 +00:00
|
|
|
|
|
|
|
#include <event2/buffer.h>
|
|
|
|
|
|
|
|
#include "ConvertUTF.h"
|
|
|
|
|
|
|
|
#define __LIBTRANSMISSION_VARIANT_MODULE___
|
|
|
|
#include "transmission.h"
|
|
|
|
#include "ptrarray.h"
|
2012-12-24 22:38:41 +00:00
|
|
|
#include "utils.h" /* tr_snprintf() */
|
2012-12-14 04:34:42 +00:00
|
|
|
#include "variant.h"
|
|
|
|
#include "variant-common.h"
|
|
|
|
|
|
|
|
/***
|
2012-12-24 22:38:41 +00:00
|
|
|
**** tr_variantParse()
|
|
|
|
**** tr_variantLoad()
|
2012-12-14 04:34:42 +00:00
|
|
|
***/
|
|
|
|
|
|
|
|
/**
|
|
|
|
* The initial i and trailing e are beginning and ending delimiters.
|
|
|
|
* You can have negative numbers such as i-3e. You cannot prefix the
|
|
|
|
* number with a zero such as i04e. However, i0e is valid.
|
|
|
|
* Example: i3e represents the integer "3"
|
|
|
|
* NOTE: The maximum number of bit of this integer is unspecified,
|
|
|
|
* but to handle it as a signed 64bit integer is mandatory to handle
|
|
|
|
* "large files" aka .torrent for more that 4Gbyte
|
|
|
|
*/
|
|
|
|
int
|
|
|
|
tr_bencParseInt (const uint8_t * buf,
|
|
|
|
const uint8_t * bufend,
|
|
|
|
const uint8_t ** setme_end,
|
|
|
|
int64_t * setme_val)
|
|
|
|
{
|
2012-12-14 16:04:44 +00:00
|
|
|
char * endptr;
|
|
|
|
const void * begin;
|
|
|
|
const void * end;
|
|
|
|
int64_t val;
|
|
|
|
|
|
|
|
if (buf >= bufend)
|
|
|
|
return EILSEQ;
|
|
|
|
if (*buf != 'i')
|
|
|
|
return EILSEQ;
|
|
|
|
|
|
|
|
begin = buf + 1;
|
|
|
|
end = memchr (begin, 'e', (bufend - buf) - 1);
|
|
|
|
if (end == NULL)
|
|
|
|
return EILSEQ;
|
|
|
|
|
|
|
|
errno = 0;
|
|
|
|
val = evutil_strtoll (begin, &endptr, 10);
|
|
|
|
if (errno || (endptr != end)) /* incomplete parse */
|
|
|
|
return EILSEQ;
|
|
|
|
if (val && * (const char*)begin == '0') /* no leading zeroes! */
|
|
|
|
return EILSEQ;
|
|
|
|
|
|
|
|
*setme_end = (const uint8_t*)end + 1;
|
|
|
|
*setme_val = val;
|
|
|
|
return 0;
|
2012-12-14 04:34:42 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Byte strings are encoded as follows:
|
|
|
|
* <string length encoded in base ten ASCII>:<string data>
|
|
|
|
* Note that there is no constant beginning delimiter, and no ending delimiter.
|
|
|
|
* Example: 4:spam represents the string "spam"
|
|
|
|
*/
|
|
|
|
int
|
|
|
|
tr_bencParseStr (const uint8_t * buf,
|
|
|
|
const uint8_t * bufend,
|
|
|
|
const uint8_t ** setme_end,
|
|
|
|
const uint8_t ** setme_str,
|
|
|
|
size_t * setme_strlen)
|
|
|
|
{
|
2012-12-14 16:04:44 +00:00
|
|
|
size_t len;
|
|
|
|
const void * end;
|
|
|
|
char * endptr;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
if (buf >= bufend)
|
|
|
|
return EILSEQ;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
if (!isdigit (*buf))
|
|
|
|
return EILSEQ;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
end = memchr (buf, ':', bufend - buf);
|
|
|
|
if (end == NULL)
|
|
|
|
return EILSEQ;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
errno = 0;
|
|
|
|
len = strtoul ((const char*)buf, &endptr, 10);
|
|
|
|
if (errno || endptr != end)
|
|
|
|
return EILSEQ;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
if ((const uint8_t*)end + 1 + len > bufend)
|
|
|
|
return EILSEQ;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
*setme_end = (const uint8_t*)end + 1 + len;
|
|
|
|
*setme_str = (const uint8_t*)end + 1;
|
|
|
|
*setme_strlen = len;
|
|
|
|
return 0;
|
2012-12-14 04:34:42 +00:00
|
|
|
}
|
|
|
|
|
2012-12-24 22:38:41 +00:00
|
|
|
static tr_variant*
|
|
|
|
get_node (tr_ptrArray * stack, tr_quark * key, tr_variant * top, int * err)
|
2012-12-14 04:34:42 +00:00
|
|
|
{
|
2012-12-24 22:38:41 +00:00
|
|
|
tr_variant * node = NULL;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-24 22:38:41 +00:00
|
|
|
if (tr_ptrArrayEmpty (stack))
|
2012-12-14 04:34:42 +00:00
|
|
|
{
|
2012-12-24 22:38:41 +00:00
|
|
|
node = top;
|
2012-12-14 04:34:42 +00:00
|
|
|
}
|
2012-12-24 22:38:41 +00:00
|
|
|
else
|
|
|
|
{
|
|
|
|
tr_variant * parent = tr_ptrArrayBack (stack);
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-24 22:38:41 +00:00
|
|
|
if (tr_variantIsList (parent))
|
|
|
|
{
|
|
|
|
node = tr_variantListAdd (parent);
|
|
|
|
}
|
|
|
|
else if (*key && tr_variantIsDict (parent))
|
|
|
|
{
|
|
|
|
node = tr_variantDictAdd (parent, *key);
|
|
|
|
*key = 0;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
*err = EILSEQ;
|
|
|
|
}
|
|
|
|
}
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-24 22:38:41 +00:00
|
|
|
return node;
|
2012-12-14 04:34:42 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* This function's previous recursive implementation was
|
|
|
|
* easier to read, but was vulnerable to a smash-stacking
|
|
|
|
* attack via maliciously-crafted bencoded data. (#667)
|
|
|
|
*/
|
2012-12-24 22:38:41 +00:00
|
|
|
int
|
|
|
|
tr_variantParseBenc (const void * buf_in,
|
2012-12-14 04:34:42 +00:00
|
|
|
const void * bufend_in,
|
|
|
|
tr_variant * top,
|
|
|
|
const char ** setme_end)
|
|
|
|
{
|
2012-12-24 22:38:41 +00:00
|
|
|
int err = 0;
|
2012-12-14 16:04:44 +00:00
|
|
|
const uint8_t * buf = buf_in;
|
|
|
|
const uint8_t * bufend = bufend_in;
|
2012-12-24 22:38:41 +00:00
|
|
|
tr_ptrArray stack = TR_PTR_ARRAY_INIT;
|
|
|
|
tr_quark key = 0;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
tr_variantInit (top, 0);
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
while (buf != bufend)
|
2012-12-14 04:34:42 +00:00
|
|
|
{
|
2012-12-14 16:04:44 +00:00
|
|
|
if (buf > bufend) /* no more text to parse... */
|
2012-12-24 22:38:41 +00:00
|
|
|
err = EILSEQ;
|
|
|
|
|
|
|
|
if (err)
|
|
|
|
break;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
if (*buf == 'i') /* int */
|
2012-12-14 04:34:42 +00:00
|
|
|
{
|
2012-12-14 16:04:44 +00:00
|
|
|
int64_t val;
|
|
|
|
const uint8_t * end;
|
2012-12-24 22:38:41 +00:00
|
|
|
tr_variant * v;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
if ((err = tr_bencParseInt (buf, bufend, &end, &val)))
|
2012-12-24 22:38:41 +00:00
|
|
|
break;
|
2012-12-14 16:04:44 +00:00
|
|
|
buf = end;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-24 22:38:41 +00:00
|
|
|
if ((v = get_node (&stack, &key, top, &err)))
|
|
|
|
tr_variantInitInt (v, val);
|
2012-12-14 04:34:42 +00:00
|
|
|
}
|
2012-12-14 16:04:44 +00:00
|
|
|
else if (*buf == 'l') /* list */
|
2012-12-14 04:34:42 +00:00
|
|
|
{
|
2012-12-24 22:38:41 +00:00
|
|
|
tr_variant * v;
|
2012-12-14 16:04:44 +00:00
|
|
|
|
|
|
|
++buf;
|
2012-12-24 22:38:41 +00:00
|
|
|
|
|
|
|
if ((v = get_node (&stack, &key, top, &err)))
|
|
|
|
{
|
|
|
|
tr_variantInitList (v, 0);
|
|
|
|
tr_ptrArrayAppend (&stack, v);
|
|
|
|
}
|
2012-12-14 04:34:42 +00:00
|
|
|
}
|
2012-12-14 16:04:44 +00:00
|
|
|
else if (*buf == 'd') /* dict */
|
2012-12-14 04:34:42 +00:00
|
|
|
{
|
2012-12-24 22:38:41 +00:00
|
|
|
tr_variant * v;
|
2012-12-14 16:04:44 +00:00
|
|
|
|
|
|
|
++buf;
|
2012-12-24 22:38:41 +00:00
|
|
|
|
|
|
|
if ((v = get_node (&stack, &key, top, &err)))
|
|
|
|
{
|
|
|
|
tr_variantInitDict (v, 0);
|
|
|
|
tr_ptrArrayAppend (&stack, v);
|
|
|
|
}
|
2012-12-14 04:34:42 +00:00
|
|
|
}
|
2012-12-14 16:04:44 +00:00
|
|
|
else if (*buf == 'e') /* end of list or dict */
|
2012-12-14 04:34:42 +00:00
|
|
|
{
|
2012-12-14 16:04:44 +00:00
|
|
|
++buf;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-24 22:38:41 +00:00
|
|
|
if (tr_ptrArrayEmpty (&stack) || (key != 0))
|
2012-12-14 04:34:42 +00:00
|
|
|
{
|
2012-12-24 22:38:41 +00:00
|
|
|
err = EILSEQ;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
tr_ptrArrayPop (&stack);
|
|
|
|
if (tr_ptrArrayEmpty (&stack))
|
|
|
|
break;
|
2012-12-14 04:34:42 +00:00
|
|
|
}
|
|
|
|
}
|
2012-12-14 16:04:44 +00:00
|
|
|
else if (isdigit (*buf)) /* string? */
|
2012-12-14 04:34:42 +00:00
|
|
|
{
|
2012-12-24 22:38:41 +00:00
|
|
|
tr_variant * v;
|
2012-12-14 16:04:44 +00:00
|
|
|
const uint8_t * end;
|
|
|
|
const uint8_t * str;
|
|
|
|
size_t str_len;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
if ((err = tr_bencParseStr (buf, bufend, &end, &str, &str_len)))
|
2012-12-24 22:38:41 +00:00
|
|
|
break;
|
2012-12-14 16:04:44 +00:00
|
|
|
buf = end;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-24 22:38:41 +00:00
|
|
|
if (!key && !tr_ptrArrayEmpty(&stack) && tr_variantIsDict(tr_ptrArrayBack(&stack)))
|
|
|
|
key = tr_quark_new (str, str_len);
|
|
|
|
else if ((v = get_node (&stack, &key, top, &err)))
|
|
|
|
tr_variantInitStr (v, str, str_len);
|
2012-12-14 04:34:42 +00:00
|
|
|
}
|
2012-12-14 16:04:44 +00:00
|
|
|
else /* invalid bencoded text... march past it */
|
2012-12-14 04:34:42 +00:00
|
|
|
{
|
2012-12-14 16:04:44 +00:00
|
|
|
++buf;
|
2012-12-14 04:34:42 +00:00
|
|
|
}
|
2012-12-24 22:38:41 +00:00
|
|
|
|
|
|
|
if (tr_ptrArrayEmpty (&stack))
|
|
|
|
break;
|
2012-12-14 04:34:42 +00:00
|
|
|
}
|
|
|
|
|
2012-12-24 22:38:41 +00:00
|
|
|
if (!err)
|
|
|
|
err = !top->type || !tr_ptrArrayEmpty(&stack);
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-14 16:04:44 +00:00
|
|
|
if (!err && setme_end)
|
|
|
|
*setme_end = (const char*) buf;
|
2012-12-14 04:34:42 +00:00
|
|
|
|
2012-12-24 22:38:41 +00:00
|
|
|
tr_ptrArrayDestruct (&stack, NULL);
|
2012-12-14 04:34:42 +00:00
|
|
|
return err;
|
|
|
|
}
|
|
|
|
|
|
|
|
/****
|
|
|
|
*****
|
|
|
|
****/
|
|
|
|
|
|
|
|
static void
|
|
|
|
saveIntFunc (const tr_variant * val, void * evbuf)
|
|
|
|
{
|
|
|
|
evbuffer_add_printf (evbuf, "i%" PRId64 "e", val->val.i);
|
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
|
|
|
saveBoolFunc (const tr_variant * val, void * evbuf)
|
|
|
|
{
|
|
|
|
if (val->val.b)
|
|
|
|
evbuffer_add (evbuf, "i1e", 3);
|
|
|
|
else
|
|
|
|
evbuffer_add (evbuf, "i0e", 3);
|
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
|
|
|
saveRealFunc (const tr_variant * val, void * evbuf)
|
|
|
|
{
|
2012-12-24 22:38:41 +00:00
|
|
|
int len;
|
2012-12-14 04:34:42 +00:00
|
|
|
char buf[128];
|
|
|
|
|
2012-12-24 22:38:41 +00:00
|
|
|
len = tr_snprintf (buf, sizeof (buf), "%f", val->val.d);
|
|
|
|
evbuffer_add_printf (evbuf, "%d:", len);
|
2012-12-14 04:34:42 +00:00
|
|
|
evbuffer_add (evbuf, buf, len);
|
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
|
|
|
saveStringFunc (const tr_variant * v, void * evbuf)
|
|
|
|
{
|
|
|
|
size_t len;
|
|
|
|
const char * str;
|
|
|
|
tr_variantGetStr (v, &str, &len);
|
2013-09-08 17:32:09 +00:00
|
|
|
evbuffer_add_printf (evbuf, "%"TR_PRIuSIZE":", len);
|
2012-12-14 04:34:42 +00:00
|
|
|
evbuffer_add (evbuf, str, len);
|
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
|
|
|
saveDictBeginFunc (const tr_variant * val UNUSED, void * evbuf)
|
|
|
|
{
|
|
|
|
evbuffer_add (evbuf, "d", 1);
|
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
|
|
|
saveListBeginFunc (const tr_variant * val UNUSED, void * evbuf)
|
|
|
|
{
|
|
|
|
evbuffer_add (evbuf, "l", 1);
|
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
|
|
|
saveContainerEndFunc (const tr_variant * val UNUSED, void * evbuf)
|
|
|
|
{
|
|
|
|
evbuffer_add (evbuf, "e", 1);
|
|
|
|
}
|
|
|
|
|
|
|
|
static const struct VariantWalkFuncs walk_funcs = { saveIntFunc,
|
|
|
|
saveBoolFunc,
|
|
|
|
saveRealFunc,
|
|
|
|
saveStringFunc,
|
|
|
|
saveDictBeginFunc,
|
|
|
|
saveListBeginFunc,
|
|
|
|
saveContainerEndFunc };
|
|
|
|
|
|
|
|
void
|
|
|
|
tr_variantToBufBenc (const tr_variant * top, struct evbuffer * buf)
|
|
|
|
{
|
|
|
|
tr_variantWalk (top, &walk_funcs, buf, true);
|
|
|
|
}
|
|
|
|
|