1207753Smm///////////////////////////////////////////////////////////////////////////////
2207753Smm//
3207753Smm/// \file       sparc.c
4207753Smm/// \brief      Filter for SPARC binaries
5207753Smm///
6207753Smm//  Authors:    Igor Pavlov
7207753Smm//              Lasse Collin
8207753Smm//
9207753Smm//  This file has been put into the public domain.
10207753Smm//  You can do whatever you want with this file.
11207753Smm//
12207753Smm///////////////////////////////////////////////////////////////////////////////
13207753Smm
14207753Smm#include "simple_private.h"
15207753Smm
16207753Smm
17207753Smmstatic size_t
18312518Sdelphijsparc_code(void *simple lzma_attribute((__unused__)),
19207753Smm		uint32_t now_pos, bool is_encoder,
20207753Smm		uint8_t *buffer, size_t size)
21207753Smm{
22207753Smm	size_t i;
23207753Smm	for (i = 0; i + 4 <= size; i += 4) {
24207753Smm
25207753Smm		if ((buffer[i] == 0x40 && (buffer[i + 1] & 0xC0) == 0x00)
26207753Smm				|| (buffer[i] == 0x7F
27207753Smm				&& (buffer[i + 1] & 0xC0) == 0xC0)) {
28207753Smm
29207753Smm			uint32_t src = ((uint32_t)buffer[i + 0] << 24)
30207753Smm					| ((uint32_t)buffer[i + 1] << 16)
31207753Smm					| ((uint32_t)buffer[i + 2] << 8)
32207753Smm					| ((uint32_t)buffer[i + 3]);
33207753Smm
34207753Smm			src <<= 2;
35207753Smm
36207753Smm			uint32_t dest;
37207753Smm			if (is_encoder)
38207753Smm				dest = now_pos + (uint32_t)(i) + src;
39207753Smm			else
40207753Smm				dest = src - (now_pos + (uint32_t)(i));
41207753Smm
42207753Smm			dest >>= 2;
43207753Smm
44207753Smm			dest = (((0 - ((dest >> 22) & 1)) << 22) & 0x3FFFFFFF)
45207753Smm					| (dest & 0x3FFFFF)
46207753Smm					| 0x40000000;
47207753Smm
48207753Smm			buffer[i + 0] = (uint8_t)(dest >> 24);
49207753Smm			buffer[i + 1] = (uint8_t)(dest >> 16);
50207753Smm			buffer[i + 2] = (uint8_t)(dest >> 8);
51207753Smm			buffer[i + 3] = (uint8_t)(dest);
52207753Smm		}
53207753Smm	}
54207753Smm
55207753Smm	return i;
56207753Smm}
57207753Smm
58207753Smm
59207753Smmstatic lzma_ret
60292588Sdelphijsparc_coder_init(lzma_next_coder *next, const lzma_allocator *allocator,
61207753Smm		const lzma_filter_info *filters, bool is_encoder)
62207753Smm{
63207753Smm	return lzma_simple_coder_init(next, allocator, filters,
64207753Smm			&sparc_code, 0, 4, 4, is_encoder);
65207753Smm}
66207753Smm
67207753Smm
68207753Smmextern lzma_ret
69207753Smmlzma_simple_sparc_encoder_init(lzma_next_coder *next,
70292588Sdelphij		const lzma_allocator *allocator,
71292588Sdelphij		const lzma_filter_info *filters)
72207753Smm{
73207753Smm	return sparc_coder_init(next, allocator, filters, true);
74207753Smm}
75207753Smm
76207753Smm
77207753Smmextern lzma_ret
78207753Smmlzma_simple_sparc_decoder_init(lzma_next_coder *next,
79292588Sdelphij		const lzma_allocator *allocator,
80292588Sdelphij		const lzma_filter_info *filters)
81207753Smm{
82207753Smm	return sparc_coder_init(next, allocator, filters, false);
83207753Smm}
84