diff options
| -rw-r--r-- | src/cg-darkroom.c | 323 |
1 files changed, 323 insertions, 0 deletions
diff --git a/src/cg-darkroom.c b/src/cg-darkroom.c new file mode 100644 index 0000000..064f21b --- /dev/null +++ b/src/cg-darkroom.c @@ -0,0 +1,323 @@ +/** + * cg-tools -- Cooperative gamma-enabled tools + * 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 "cg-base.h" + +#include <libclut.h> + +#include <errno.h> +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <unistd.h> + + + +/** + * The default filter priority for the program + */ +const int64_t default_priority = ((int64_t)3) << 61; + +/** + * The default class for the program + */ +char* const default_class = PKGNAME "::cg-darkroom::standard"; + + + +/** + * -d: keep process alive and remove filter on death + */ +static int dflag = 0; + +/** + * -x: remove filter rather than adding it + */ +static int xflag = 0; + +/** + * The brilliance of the red channel + */ +static double value = 0.25; + + + +/** + * Print usage information and exit + */ +void usage(void) +{ + fprintf(stderr, + "Usage: %s [-M method] [-S site] [-c crtc]... [-R rule] " + "(-d | [-p priority] [-x] [brightness])\n", + argv0); + exit(1); +} + + +/** + * Handle a command line option + * + * @param opt The option, it is a NUL-terminate two-character + * string starting with either '-' or '+', if the + * argument is not recognised, call `usage`. This + * string will not be "-M", "-S", "-c", "-p", or "-R". + * @param arg The argument associated with `opt`, + * `NULL` there is no next argument, if this + * parameter is `NULL` but needed, call `usage` + * @return 0 if `arg` was not used, + * 1 if `arg` was used, + * -1 on error + */ +int handle_opt(char* opt, char* arg) +{ + if (opt[0] == '-') + switch (opt[1]) + { + case 'd': + if (dflag || xflag) + usage(); + dflag = 1; + break; + case 'x': + if (xflag || dflag) + usage(); + xflag = 1; + break; + default: + usage(); + } + else + usage(); + return 0; +} + + +/** + * Parse a non-negative double encoded as a string + * + * @param out Output parameter for the value + * @param str The string + * @retunr Zero on success, -1 if the string is invalid + */ +static int parse_double(double* restrict out, const char* restrict str) +{ + char* end; + errno = 0; + *out = strtod(str, &end); + if (errno || (out < 0) || isinf(*out) || isnan(*out) || *end) + return -1; + if (!strchr("0123456789.", *str)) + return -1; + return 0; +} + + +/** + * This function is called after the last + * call to `handle_opt` + * + * @param argc The number of unparsed arguments + * @param argv `NULL` terminated list of unparsed arguments + * @param method The argument associated with the "-M" option + * @param site The argument associated with the "-S" option + * @param crtcs The arguments associated with the "-c" options, `NULL`-terminated + * @param prio The argument associated with the "-p" option + * @param rule The argument associated with the "-R" option + * @return Zero on success, -1 on error + */ +int handle_args(int argc, char* argv[], char* method, char* site, + char** crtcs, char* prio, char* rule) +{ + char* red; + char* green; + char* blue; + int q = xflag + dflag; + q += (method != NULL) && !strcmp(method, "?"); + q += (prio != NULL) && !strcmp(prio, "?"); + q += (rule != NULL) && (!strcmp(rule, "?") || !strcmp(rule, "??")); + for (; *crtcs; crtcs++) + q += !strcmp(*crtcs, "?"); + if ((q > 1) || (xflag && (prio != NULL || argc))) + usage(); + if (argc == 1) + { + if (parse_double(&value, argv[0]) < 0) + usage(); + } + else if (argc) + usage(); + return 0; +} + + +/** + * Fill a filter + * + * @param The filter to fill + * @return Zero on success, -1 on error + */ +static int fill_filter(libcoopgamma_filter_t* restrict filter) +{ + union libcoopgamma_ramps dramps; + size_t size; + + if ((0 <= value) && (value <= 1)) + { + switch (filter->depth) + { +#define X(CONST, MEMBER, MAX, TYPE)\ + case CONST:\ + libclut_negative(&(filter->ramps.MEMBER), MAX, TYPE, 1, 0, 0);\ + libclut_rgb_brightness(&(filter->ramps.MEMBER), MAX, TYPE, 1, 0, 0);\ + libclut_cie_brightness(&(filter->ramps.MEMBER), MAX, TYPE, value, value, value);\ + break; +LIST_DEPTHS +#undef X + default: + abort(); + } + return 0; + } + if (filter->depth == LIBCOOPGAMMA_DOUBLE) + { + libclut_negative(&(filter->ramps.d), (double)1, double, 1, 0, 0); + libclut_rgb_brightness(&(filter->ramps.d), (double)1, double, 1, 0, 0); + libclut_cie_brightness(&(filter->ramps.d), (double)1, double, value, value, value); + libclut_clip(&(filter->ramps.d), (double)1, double, 1, 0, 0); + return 0; + } + if (filter->depth == LIBCOOPGAMMA_FLOAT) + { + libclut_negative(&(filter->ramps.f), (float)1, float, 1, 0, 0); + libclut_rgb_brightness(&(filter->ramps.f), (float)1, float, 1, 0, 0); + libclut_cie_brightness(&(filter->ramps.f), (float)1, float, value, value, value); + libclut_clip(&(filter->ramps.f), (float)1, float, 1, 0, 0); + return 0; + } + + size = dramps.d.red_size = filter->ramps.d.red_size; + size += dramps.d.green_size = filter->ramps.d.green_size; + size += dramps.d.blue_size = filter->ramps.d.blue_size; + dramps.d.red = calloc(size, sizeof(double)); + if (dramps.d.red == NULL) + return -1; + dramps.d.green = dramps.d.red + dramps.d.red_size; + dramps.d.blue = dramps.d.green + dramps.d.green_size; + + libclut_start_over(&(dramps.d), (double)1, double, 1, 0, 0); + libclut_negative(&(dramps.d), (double)1, double, 1, 0, 0); + libclut_rgb_brightness(&(dramps.d), (double)1, double, 1, 0, 0); + libclut_cie_brightness(&(dramps.d), (double)1, double, value, value, value); + libclut_clip(&(dramps.d), (double)1, double, 1, 0, 0); + + switch (filter->depth) + { + case LIBCOOPGAMMA_UINT8: + libclut_translate(&(filter->ramps.u8), UINT8_MAX, uint8_t, &(dramps.d), (double)1, double); + break; + case LIBCOOPGAMMA_UINT16: + libclut_translate(&(filter->ramps.u16), UINT16_MAX, uint16_t, &(dramps.d), (double)1, double); + break; + case LIBCOOPGAMMA_UINT32: + libclut_translate(&(filter->ramps.u32), UINT32_MAX, uint32_t, &(dramps.d), (double)1, double); + break; + case LIBCOOPGAMMA_UINT64: + libclut_translate(&(filter->ramps.u64), UINT64_MAX, uint64_t, &(dramps.d), (double)1, double); + break; + default: + abort(); + } + + free(dramps.d.red); + return 0; +} + + +/** + * The main function for the program-specific code + * + * @return 0: Success + * -1: Error, `errno` set + * -2: Error, `cg.error` set + * -3: Error, message already printed + */ +int start(void) +{ + int r; + size_t i, j; + + if (xflag) + for (i = 0; i < crtcs_n; i++) + crtc_updates[i].filter.lifespan = LIBCOOPGAMMA_REMOVE; + else if (dflag) + for (i = 0; i < crtcs_n; i++) + crtc_updates[i].filter.lifespan = LIBCOOPGAMMA_UNTIL_DEATH; + else + for (i = 0; i < crtcs_n; i++) + crtc_updates[i].filter.lifespan = LIBCOOPGAMMA_UNTIL_REMOVAL; + + if (!xflag) + if ((r = make_slaves()) < 0) + return r; + + for (i = 0, r = 1; i < crtcs_n; i++) + { + if (!(crtc_updates[i].master) || !(crtc_info[i].supported)) + continue; + if (!xflag) + if ((r = fill_filter(&(crtc_updates[i].filter))) < 0) + return r; + r = update_filter(i, 0); + if ((r == -2) || ((r == -1) && (errno != EAGAIN))) + return r; + if (crtc_updates[i].slaves != NULL) + for (j = 0; crtc_updates[i].slaves[j] != 0; j++) + { + r = update_filter(crtc_updates[i].slaves[j], 0); + if ((r == -2) || ((r == -1) && (errno != EAGAIN))) + return r; + } + } + + while (r != 1) + if ((r = synchronise(-1)) < 0) + return r; + + if (!dflag) + return 0; + + if (libcoopgamma_set_nonblocking(&cg, 0) < 0) + return -1; + for (;;) + if (libcoopgamma_synchronise(&cg, NULL, 0, &j) < 0) + switch (errno) + { + case 0: + break; + case ENOTRECOVERABLE: + goto enotrecoverable; + default: + return -1; + } + + enotrecoverable: + for (;;) + if (pause() < 0) + return -1; +} + |