/* See LICENSE file for copyright and license details. */ #include "cg-base.h" #include #include #include #include #include #include /** * The default filter priority for the program */ const int64_t default_priority = (int64_t)3 << 61; /** * The default class for the program */ char default_class[] = PKGNAME "::cg-darkroom::standard"; /** * Class suffixes */ const char* const* class_suffixes = (const char* const[]){NULL}; /** * -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] " "(-x | [-p priority] [-d] [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; (void) arg; } /** * Parse a non-negative double encoded as a string * * @param out Output parameter for the value * @param str The string * @return 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 (!*str || !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 prio The argument associated with the "-p" option * @return Zero on success, -1 on error */ int handle_args(int argc, char* argv[], char* prio) { int q = xflag + dflag; 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 filter 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 < filters_n; i++) crtc_updates[i].filter.lifespan = LIBCOOPGAMMA_REMOVE; else if (dflag) for (i = 0; i < filters_n; i++) crtc_updates[i].filter.lifespan = LIBCOOPGAMMA_UNTIL_DEATH; else for (i = 0; i < filters_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 < filters_n; i++) { if (!(crtc_updates[i].master) || !(crtc_info[crtc_updates[i].crtc].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; }