xref: /dflybsd-src/contrib/xz/src/liblzma/common/vli_encoder.c (revision 86d7f5d305c6adaa56ff4582ece9859d73106103)
186d7f5d3SJohn Marino ///////////////////////////////////////////////////////////////////////////////
286d7f5d3SJohn Marino //
386d7f5d3SJohn Marino /// \file       vli_encoder.c
486d7f5d3SJohn Marino /// \brief      Encodes variable-length integers
586d7f5d3SJohn Marino //
686d7f5d3SJohn Marino //  Author:     Lasse Collin
786d7f5d3SJohn Marino //
886d7f5d3SJohn Marino //  This file has been put into the public domain.
986d7f5d3SJohn Marino //  You can do whatever you want with this file.
1086d7f5d3SJohn Marino //
1186d7f5d3SJohn Marino ///////////////////////////////////////////////////////////////////////////////
1286d7f5d3SJohn Marino 
1386d7f5d3SJohn Marino #include "common.h"
1486d7f5d3SJohn Marino 
1586d7f5d3SJohn Marino 
1686d7f5d3SJohn Marino extern LZMA_API(lzma_ret)
lzma_vli_encode(lzma_vli vli,size_t * vli_pos,uint8_t * restrict out,size_t * restrict out_pos,size_t out_size)1786d7f5d3SJohn Marino lzma_vli_encode(lzma_vli vli, size_t *vli_pos,
1886d7f5d3SJohn Marino 		uint8_t *restrict out, size_t *restrict out_pos,
1986d7f5d3SJohn Marino 		size_t out_size)
2086d7f5d3SJohn Marino {
2186d7f5d3SJohn Marino 	// If we haven't been given vli_pos, work in single-call mode.
2286d7f5d3SJohn Marino 	size_t vli_pos_internal = 0;
2386d7f5d3SJohn Marino 	if (vli_pos == NULL) {
2486d7f5d3SJohn Marino 		vli_pos = &vli_pos_internal;
2586d7f5d3SJohn Marino 
2686d7f5d3SJohn Marino 		// In single-call mode, we expect that the caller has
2786d7f5d3SJohn Marino 		// reserved enough output space.
2886d7f5d3SJohn Marino 		if (*out_pos >= out_size)
2986d7f5d3SJohn Marino 			return LZMA_PROG_ERROR;
3086d7f5d3SJohn Marino 	} else {
3186d7f5d3SJohn Marino 		// This never happens when we are called by liblzma, but
3286d7f5d3SJohn Marino 		// may happen if called directly from an application.
3386d7f5d3SJohn Marino 		if (*out_pos >= out_size)
3486d7f5d3SJohn Marino 			return LZMA_BUF_ERROR;
3586d7f5d3SJohn Marino 	}
3686d7f5d3SJohn Marino 
3786d7f5d3SJohn Marino 	// Validate the arguments.
3886d7f5d3SJohn Marino 	if (*vli_pos >= LZMA_VLI_BYTES_MAX || vli > LZMA_VLI_MAX)
3986d7f5d3SJohn Marino 		return LZMA_PROG_ERROR;
4086d7f5d3SJohn Marino 
4186d7f5d3SJohn Marino 	// Shift vli so that the next bits to encode are the lowest. In
4286d7f5d3SJohn Marino 	// single-call mode this never changes vli since *vli_pos is zero.
4386d7f5d3SJohn Marino 	vli >>= *vli_pos * 7;
4486d7f5d3SJohn Marino 
4586d7f5d3SJohn Marino 	// Write the non-last bytes in a loop.
4686d7f5d3SJohn Marino 	while (vli >= 0x80) {
4786d7f5d3SJohn Marino 		// We don't need *vli_pos during this function call anymore,
4886d7f5d3SJohn Marino 		// but update it here so that it is ready if we need to
4986d7f5d3SJohn Marino 		// return before the whole integer has been decoded.
5086d7f5d3SJohn Marino 		++*vli_pos;
5186d7f5d3SJohn Marino 		assert(*vli_pos < LZMA_VLI_BYTES_MAX);
5286d7f5d3SJohn Marino 
5386d7f5d3SJohn Marino 		// Write the next byte.
5486d7f5d3SJohn Marino 		out[*out_pos] = (uint8_t)(vli) | 0x80;
5586d7f5d3SJohn Marino 		vli >>= 7;
5686d7f5d3SJohn Marino 
5786d7f5d3SJohn Marino 		if (++*out_pos == out_size)
5886d7f5d3SJohn Marino 			return vli_pos == &vli_pos_internal
5986d7f5d3SJohn Marino 					? LZMA_PROG_ERROR : LZMA_OK;
6086d7f5d3SJohn Marino 	}
6186d7f5d3SJohn Marino 
6286d7f5d3SJohn Marino 	// Write the last byte.
6386d7f5d3SJohn Marino 	out[*out_pos] = (uint8_t)(vli);
6486d7f5d3SJohn Marino 	++*out_pos;
6586d7f5d3SJohn Marino 	++*vli_pos;
6686d7f5d3SJohn Marino 
6786d7f5d3SJohn Marino 	return vli_pos == &vli_pos_internal ? LZMA_OK : LZMA_STREAM_END;
6886d7f5d3SJohn Marino 
6986d7f5d3SJohn Marino }
70