/src/ghostpdl/base/srld.c
Line | Count | Source |
1 | | /* Copyright (C) 2001-2023 Artifex Software, Inc. |
2 | | All Rights Reserved. |
3 | | |
4 | | This software is provided AS-IS with no warranty, either express or |
5 | | implied. |
6 | | |
7 | | This software is distributed under license and may not be copied, |
8 | | modified or distributed except as expressly authorized under the terms |
9 | | of the license contained in the file LICENSE in this distribution. |
10 | | |
11 | | Refer to licensing information at http://www.artifex.com or contact |
12 | | Artifex Software, Inc., 39 Mesa Street, Suite 108A, San Francisco, |
13 | | CA 94129, USA, for further information. |
14 | | */ |
15 | | |
16 | | |
17 | | /* RunLengthDecode filter */ |
18 | | #include "stdio_.h" /* includes std.h */ |
19 | | #include "memory_.h" |
20 | | #include "strimpl.h" |
21 | | #include "srlx.h" |
22 | | |
23 | | /* ------ RunLengthDecode ------ */ |
24 | | |
25 | | private_st_RLD_state(); |
26 | | |
27 | | /* Set defaults */ |
28 | | static void |
29 | | s_RLD_set_defaults(stream_state * st) |
30 | 12 | { |
31 | 12 | stream_RLD_state *const ss = (stream_RLD_state *) st; |
32 | | |
33 | 12 | s_RLD_set_defaults_inline(ss); |
34 | 12 | } |
35 | | |
36 | | /* Initialize */ |
37 | | static int |
38 | | s_RLD_init(stream_state * st) |
39 | 12 | { |
40 | 12 | stream_RLD_state *const ss = (stream_RLD_state *) st; |
41 | | |
42 | 12 | return s_RLD_init_inline(ss); |
43 | 12 | } |
44 | | |
45 | | /* Refill the buffer */ |
46 | | static int |
47 | | s_RLD_process(stream_state * st, stream_cursor_read * pr, |
48 | | stream_cursor_write * pw, bool last) |
49 | 64 | { |
50 | 64 | stream_RLD_state *const ss = (stream_RLD_state *) st; |
51 | 64 | register const byte *p = pr->ptr; |
52 | 64 | register byte *q = pw->ptr; |
53 | 64 | const byte *rlimit = pr->limit; |
54 | 64 | byte *wlimit = pw->limit; |
55 | 64 | int left; |
56 | 64 | int status = 0; |
57 | | |
58 | 99 | top: |
59 | 99 | if ((left = ss->copy_left) > 0) { |
60 | | /* |
61 | | * We suspended because the output buffer was full:; |
62 | | * try again now. |
63 | | */ |
64 | 67 | uint avail = wlimit - q; |
65 | 67 | int copy_status = 1; |
66 | | |
67 | 67 | if (left > avail) |
68 | 21 | left = avail; |
69 | 67 | if (ss->copy_data >= 0) |
70 | 9 | memset(q + 1, ss->copy_data, left); |
71 | 58 | else { |
72 | 58 | avail = rlimit - p; |
73 | 58 | if (left >= avail) { |
74 | 16 | copy_status = 0; |
75 | 16 | left = avail; |
76 | 16 | } |
77 | 58 | memcpy(q + 1, p + 1, left); |
78 | 58 | p += left; |
79 | 58 | } |
80 | 67 | q += left; |
81 | 67 | if ((ss->copy_left -= left) > 0) { |
82 | 37 | status = copy_status; |
83 | 37 | goto x; |
84 | 37 | } |
85 | 67 | } |
86 | 16.6k | while (p < rlimit) { |
87 | 16.5k | int b = *++p; |
88 | | |
89 | 16.5k | if (b < 128) { |
90 | 12.2k | if (++b > rlimit - p || b > wlimit - q) { |
91 | 30 | ss->copy_left = b; |
92 | 30 | ss->copy_data = -1; |
93 | 30 | goto top; |
94 | 30 | } |
95 | 12.1k | memcpy(q + 1, p + 1, b); |
96 | 12.1k | p += b; |
97 | 12.1k | q += b; |
98 | 12.1k | } else if (b == 128) { /* end of data */ |
99 | 7 | if (ss->EndOfData) { |
100 | 7 | status = EOFC; |
101 | 7 | break; |
102 | 7 | } |
103 | 4.38k | } else if (p == rlimit) { |
104 | 4 | p--; |
105 | 4 | break; |
106 | 4.37k | } else if ((b = 257 - b) > wlimit - q) { |
107 | 5 | ss->copy_left = b; |
108 | 5 | ss->copy_data = *++p; |
109 | 5 | goto top; |
110 | 4.37k | } else { |
111 | 4.37k | memset(q + 1, *++p, b); |
112 | 4.37k | q += b; |
113 | 4.37k | } |
114 | 16.5k | } |
115 | 64 | x: pr->ptr = p; |
116 | 64 | pw->ptr = q; |
117 | 64 | return status; |
118 | 62 | } |
119 | | |
120 | | /* Stream template */ |
121 | | const stream_template s_RLD_template = { |
122 | | &st_RLD_state, s_RLD_init, s_RLD_process, 1, 1, NULL, |
123 | | s_RLD_set_defaults |
124 | | }; |