tb_bool_t tb_object_data_writ_to_url(tb_object_ref_t object, tb_char_t const* url)
{
// check
tb_object_data_t* data = tb_object_data_cast(object);
tb_assert_and_check_return_val(data && tb_object_data_getp((tb_object_ref_t)data) && url, tb_false);
// make stream
tb_stream_ref_t stream = tb_stream_init_from_url(url);
tb_assert_and_check_return_val(stream, tb_false);
// ctrl
if (tb_stream_type(stream) == TB_STREAM_TYPE_FILE)
tb_stream_ctrl(stream, TB_STREAM_CTRL_FILE_SET_MODE, TB_FILE_MODE_WO | TB_FILE_MODE_CREAT | TB_FILE_MODE_TRUNC);
// open stream
tb_bool_t ok = tb_false;
if (tb_stream_open(stream))
{
// writ stream
if (tb_stream_bwrit(stream, (tb_byte_t const*)tb_object_data_getp((tb_object_ref_t)data), tb_object_data_size((tb_object_ref_t)data))) ok = tb_true;
}
// exit stream
tb_stream_exit(stream);
// ok?
return ok;
}
static tb_bool_t tb_oc_bplist_writer_func_array(tb_oc_bplist_writer_t* writer, tb_object_ref_t object, tb_size_t item_size)
{
// check
tb_assert_and_check_return_val(writer && writer->stream && object, tb_false);
// index tables
tb_byte_t* index_tables = (tb_byte_t*)tb_object_getp(object);
// size
tb_size_t size = tb_oc_array_size(object);
tb_assert_and_check_return_val(!size == !index_tables, tb_false);
// writ flag
tb_uint8_t flag = TB_OBJECT_BPLIST_TYPE_ARRAY | (size < 15 ? (tb_uint8_t)size : 0xf);
if (!tb_stream_bwrit_u8(writer->stream, flag)) return tb_false;
// writ size
if (size >= 15)
{
// init osize
tb_object_ref_t osize = tb_oc_bplist_writer_init_number(size);
tb_assert_and_check_return_val(osize, tb_false);
// writ it
if (!tb_oc_bplist_writer_func_number(writer, osize, item_size))
{
tb_object_exit(osize);
return tb_false;
}
// exit osize
tb_object_exit(osize);
}
// writ index tables
if (index_tables)
{
if (!tb_stream_bwrit(writer->stream, index_tables, size * item_size)) return tb_false;
}
// ok
return tb_true;
}
static tb_bool_t tb_oc_bplist_writer_func_rdata(tb_oc_bplist_writer_t* writer, tb_uint8_t bype, tb_byte_t const* data, tb_size_t size, tb_size_t item_size)
{
// check
tb_assert_and_check_return_val(writer && writer->stream && !data == !size, tb_false);
// writ flag
tb_uint8_t flag = bype | (tb_uint8_t)(size < 15 ? size : 0xf);
if (!tb_stream_bwrit_u8(writer->stream, flag)) return tb_false;
// writ size
if (size >= 15)
{
// init object
tb_object_ref_t object = tb_oc_bplist_writer_init_number(size);
tb_assert_and_check_return_val(object, tb_false);
// writ it
if (!tb_oc_bplist_writer_func_number(writer, object, item_size))
{
tb_object_exit(object);
return tb_false;
}
// exit object
tb_object_exit(object);
}
// unicode? adjust size
if (bype == TB_OBJECT_BPLIST_TYPE_UNICODE) size <<= 1;
// writ data
if (data) if (!tb_stream_bwrit(writer->stream, data, size)) return tb_false;
// ok
return tb_true;
}
