1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
|
/**
* coopgammad -- Cooperative gamma server
* Copyright (C) 2016 Mattias Andrée (maandree@kth.se)
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
#include "ramps.h"
#include <libclut.h>
#include <errno.h>
#include <stdlib.h>
#include <string.h>
/**
* The name of the process
*/
extern char* argv0;
/**
* Marshal a ramp trio
*
* @param this The ramps
* @param buf Output buffer for the marshalled ramps,
* `NULL` just measure how large the buffers
* needs to be
* @param ramps_size The byte-size of ramps
* @return The number of marshalled byte
*/
size_t gamma_ramps_marshal(const union gamma_ramps* this, void* buf, size_t ramps_size)
{
if (buf != NULL)
memcpy(buf, this->u8.red, ramps_size);
return ramps_size;
}
/**
* Unmarshal a ramp trio
*
* @param this Output for the ramps, `.red_size`, `.green_size`,
* and `.blue_size` must already be set
* @param buf Buffer with the marshalled ramps
* @param ramps_size The byte-size of ramps
* @return The number of unmarshalled bytes, 0 on error
*/
size_t gamma_ramps_unmarshal(union gamma_ramps* this, const void* buf, size_t ramps_size)
{
size_t depth = ramps_size / (this->u8.red_size + this->u8.green_size + this->u8.blue_size);
int r = 0;
switch (depth)
{
case 1:
r = libgamma_gamma_ramps8_initialise(&(this->u8));
break;
case 2:
r = libgamma_gamma_ramps16_initialise(&(this->u16));
break;
case 4:
r = libgamma_gamma_ramps32_initialise(&(this->u32));
break;
case 8:
r = libgamma_gamma_ramps64_initialise(&(this->u64));
break;
default:
if (depth == sizeof(float))
r = libgamma_gamma_rampsf_initialise(&(this->f));
else if (depth == sizeof(double))
r = libgamma_gamma_rampsd_initialise(&(this->d));
else
abort();
break;
}
if (r)
{
libgamma_perror(argv0, r);
errno = 0;
return 0;
}
memcpy(this->u8.red, buf, ramps_size);
return ramps_size;
}
/**
* Apply a ramp-trio on top of another ramp-trio
*
* @param dest The output for the resulting ramp-trio, must be initialised
* @param application The red, green and blue ramps, as one single raw array,
* of the filter that should be applied
* @param depth -1: `float` stops
* -2: `double` stops
* Other: the number of bits of each (integral) stop
* @param base The CLUT on top of which the new filter should be applied,
* this can be the same pointer as `dest`
*/
void apply(union gamma_ramps* dest, void* application, int depth, union gamma_ramps* base)
{
union gamma_ramps app;
size_t bytedepth;
size_t red_width, green_width, blue_width;
if (depth == -1)
bytedepth = sizeof(float);
else if (depth == -2)
bytedepth = sizeof(double);
else
bytedepth = (size_t)depth / 8;
red_width = (app.u8.red_size = base->u8.red_size) * bytedepth;
green_width = (app.u8.green_size = base->u8.green_size) * bytedepth;
blue_width = (app.u8.blue_size = base->u8.blue_size) * bytedepth;
app.u8.red = application;
app.u8.green = app.u8.red + red_width;
app.u8.blue = app.u8.green + green_width;
if (dest != base)
{
memcpy(dest->u8.red, base->u8.red, red_width);
memcpy(dest->u8.green, base->u8.green, green_width);
memcpy(dest->u8.blue, base->u8.blue, blue_width);
}
switch (depth)
{
case 8:
libclut_apply(&(dest->u8), UINT8_MAX, uint8_t, &(app.u8), UINT8_MAX, uint8_t, 1, 1, 1);
break;
case 16:
libclut_apply(&(dest->u16), UINT16_MAX, uint16_t, &(app.u16), UINT16_MAX, uint16_t, 1, 1, 1);
break;
case 32:
libclut_apply(&(dest->u32), UINT32_MAX, uint32_t, &(app.u32), UINT32_MAX, uint32_t, 1, 1, 1);
break;
case 64:
libclut_apply(&(dest->u64), UINT64_MAX, uint64_t, &(app.u64), UINT64_MAX, uint64_t, 1, 1, 1);
break;
case -1:
libclut_apply(&(dest->f), 1.0f, float, &(app.d), 1.0f, float, 1, 1, 1);
break;
case -2:
libclut_apply(&(dest->d), (double)1, double, &(app.f), (double)1, double, 1, 1, 1);
break;
default:
abort();
}
}
|
