/** * libcoopgamma -- Library for interfacing with cooperative gamma servers * Copyright (C) 2016 Mattias Andrée (maandree@kth.se) * * This library 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 library 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 library. If not, see . */ #include "libcoopgamma.h" #include #include #include #include #include #include #include #include #include #include #if defined(__clang__) # pragma GCC diagnostic ignored "-Wdocumentation" # pragma GCC diagnostic ignored "-Wcovered-switch-default" # pragma GCC diagnostic ignored "-Wcast-align" #endif #if defined(__GNUC__) # define NAME_OF_THE_PROCESS (argv0) extern const char* argv0; const char* argv0 __attribute__((weak)) = "libcoopgamma"; #else # define NAME_OF_THE_PROCESS ("libcoopgamma") #endif #define SUBBUF \ (buf ? buf + off : NULL) #define NNSUBBUF \ (buf + off) #define MARSHAL_PROLOGUE \ char* restrict buf = vbuf; \ size_t off = 0; #define UNMARSHAL_PROLOGUE \ const char* restrict buf = vbuf; \ size_t off = 0; #define MARSHAL_EPILOGUE \ return off #define UNMARSHAL_EPILOGUE \ return *np = off, LIBCOOPGAMMA_SUCCESS #define marshal_prim(datum, type) \ ((buf != NULL ? *(type*)(buf + off) = (datum) : 0), off += sizeof(type)) #define unmarshal_prim(datum, type) \ ((datum) = *(const type*)(buf + off), off += sizeof(type)) #define marshal_version(version) \ marshal_prim(version, int) #define unmarshal_version(version) \ do \ { \ int version__; \ unmarshal_prim(version__, int); \ if (version__ < version) \ return LIBCOOPGAMMA_INCOMPATIBLE_DOWNGRADE; \ if (version__ > version) \ return LIBCOOPGAMMA_INCOMPATIBLE_UPGRADE; \ } \ while (0) #define marshal_buffer(data, n) \ ((buf != NULL ? (memcpy(buf + off, (data), (n)), 0) : 0), off += (n)) #define unmarshal_buffer(data, n) \ do \ { \ (data) = malloc(n); \ if ((data) == NULL) \ return LIBCOOPGAMMA_ERRNO_SET; \ memcpy((data), buf + off, (n)); \ off += (n); \ } \ while (0) #define marshal_string(datum) \ ((datum) == NULL ? marshal_prim(1, char) : \ (marshal_prim(0, char), marshal_buffer(datum, strlen(datum) + 1))) #define unmarshal_string(datum) \ do \ { \ char nonnull__; \ unmarshal_prim(nonnull__, char); \ if (nonnull__) \ unmarshal_buffer((datum), strlen(buf + off) + 1); \ else \ (datum) = NULL; \ } \ while (0) #define copy_errno(ctx) \ ((errno == 0) ? NULL : \ ((ctx)->error.number = (uint64_t)errno, \ (ctx)->error.custom = 0, \ (ctx)->error.server_side = 0, \ free((ctx)->error.description), \ (ctx)->error.description = NULL)) #define SYNC_CALL(send_call, recv_call, fail_return) \ libcoopgamma_async_context_t async; \ size_t _selected; \ if (send_call < 0) \ { \ reflush: \ if (errno != EINTR) \ return fail_return; \ if (libcoopgamma_flush(ctx) < 0) \ goto reflush; \ } \ resync: \ if (libcoopgamma_synchronise(ctx, &async, (size_t)1, &_selected) < 0) \ { \ if ((errno != EINTR) && (errno != 0)) \ return fail_return; \ goto resync; \ } \ return recv_call #define INTEGRAL_DEPTHS \ case LIBCOOPGAMMA_UINT8: \ case LIBCOOPGAMMA_UINT16: \ case LIBCOOPGAMMA_UINT32: \ case LIBCOOPGAMMA_UINT64: /** * Initialise a `libcoopgamma_ramps8_t`, `libcoopgamma_ramps16_t`, `libcoopgamma_ramps32_t`, * `libcoopgamma_ramps64_t`, `libcoopgamma_rampsf_t`, or `libcoopgamma_rampsd_t` * * `this->red_size`, `this->green_size`, and `this->blue_size` must already be set * * @param this The record to initialise * @param width The `sizeof(*(this->red))` * @return Zero on success, -1 on error */ int libcoopgamma_ramps_initialise_(void* restrict this, size_t width) { libcoopgamma_ramps8_t* restrict this8 = (libcoopgamma_ramps8_t* restrict)this; this8->red = this8->green = this8->blue = NULL; this8->red = malloc((this8->red_size + this8->green_size + this8->blue_size) * width); if (this8->red == NULL) return -1; this8->green = this8->red + this8->red_size * width; this8->blue = this8->green + this8->green_size * width; return 0; } /** * Release all resources allocated to a `libcoopgamma_ramps8_t`, `libcoopgamma_ramps16_t`, * `libcoopgamma_ramps32_t`, `libcoopgamma_ramps64_t`, `libcoopgamma_rampsf_t`, * `libcoopgamma_rampsd_t`, or `libcoopgamma_ramps_t`, the allocation of the record * itself is not freed * * Always call this function after failed call to `libcoopgamma_ramps_initialise` * or failed call to `libcoopgamma_ramps_unmarshal` * * @param this The record to destroy */ void libcoopgamma_ramps_destroy(void* restrict this) { libcoopgamma_ramps8_t* restrict this8 = (libcoopgamma_ramps8_t* restrict)this; free(this8->red); this8->red = this8->green = this8->blue = NULL; } /** * Marshal a `libcoopgamma_ramps8_t`, `libcoopgamma_ramps16_t`, `libcoopgamma_ramps32_t`, * `libcoopgamma_ramps64_t`, `libcoopgamma_rampsf_t`, or `libcoopgamma_rampsd_t` into a buffer * * @param this The record to marshal * @param vbuf The output buffer, `NULL` to only measure * how large this buffer has to be * @param width The `sizeof(*(this->red))` * @return The number of marshalled bytes, or if `buf == NULL`, * how many bytes would be marshalled if `buf != NULL` */ size_t libcoopgamma_ramps_marshal_(const void* restrict this, void* restrict vbuf, size_t width) { const libcoopgamma_ramps8_t* restrict this8 = (const libcoopgamma_ramps8_t* restrict)this; MARSHAL_PROLOGUE; marshal_version(LIBCOOPGAMMA_RAMPS_VERSION); marshal_prim(this8->red_size, size_t); marshal_prim(this8->green_size, size_t); marshal_prim(this8->blue_size, size_t); marshal_buffer(this8->red, (this8->red_size + this8->green_size + this8->blue_size) * width); MARSHAL_EPILOGUE; } /** * Unmarshal a `libcoopgamma_ramps8_t`, `libcoopgamma_ramps16_t`, `libcoopgamma_ramps32_t`, * `libcoopgamma_ramps64_t`, `libcoopgamma_rampsf_t`, or `libcoopgamma_rampsd_t` from a buffer * * @param this The output parameter for unmarshalled record * @param vbuf The buffer with the marshalled record * @param np Output parameter for the number of unmarshalled bytes, undefined on failure * @param width The `sizeof(*(this->red))` * @return `LIBCOOPGAMMA_SUCCESS` (0), `LIBCOOPGAMMA_INCOMPATIBLE_DOWNGRADE`, * `LIBCOOPGAMMA_INCOMPATIBLE_UPGRADE`, or `LIBCOOPGAMMA_ERRNO_SET` */ int libcoopgamma_ramps_unmarshal_(void* restrict this, const void* restrict vbuf, size_t* restrict np, size_t width) { libcoopgamma_ramps8_t* restrict this8 = (libcoopgamma_ramps8_t* restrict)this; UNMARSHAL_PROLOGUE; unmarshal_version(LIBCOOPGAMMA_RAMPS_VERSION); unmarshal_prim(this8->red_size, size_t); unmarshal_prim(this8->green_size, size_t); unmarshal_prim(this8->blue_size, size_t); unmarshal_buffer(this8->red, (this8->red_size + this8->green_size + this8->blue_size) * width); UNMARSHAL_EPILOGUE; } /** * Initialise a `libcoopgamma_filter_t` * * @param this The record to initialise * @return Zero on success, -1 on error */ int libcoopgamma_filter_initialise(libcoopgamma_filter_t* restrict this) { memset(this, 0, sizeof(*this)); return 0; } /** * Release all resources allocated to a `libcoopgamma_filter_t`, * the allocation of the record itself is not freed * * Always call this function after failed call to `libcoopgamma_filter_initialise` * or failed call to `libcoopgamma_filter_unmarshal` * * @param this The record to destroy */ void libcoopgamma_filter_destroy(libcoopgamma_filter_t* restrict this) { free(this->crtc); free(this->class); free(this->ramps.u8.red); memset(this, 0, sizeof(*this)); } /** * Marshal a `libcoopgamma_filter_t` into a buffer * * @param this The record to marshal * @param vbuf The output buffer, `NULL` to only measure * how large this buffer has to be * @return The number of marshalled bytes, or if `buf == NULL`, * how many bytes would be marshalled if `buf != NULL` */ size_t libcoopgamma_filter_marshal(const libcoopgamma_filter_t* restrict this, void* restrict vbuf) { MARSHAL_PROLOGUE; marshal_version(LIBCOOPGAMMA_FILTER_VERSION); marshal_version(LIBCOOPGAMMA_DEPTH_VERSION); marshal_version(LIBCOOPGAMMA_LIFESPAN_VERSION); marshal_prim(this->depth, libcoopgamma_depth_t); marshal_prim(this->priority, int64_t); marshal_string(this->crtc); marshal_string(this->class); marshal_prim(this->lifespan, libcoopgamma_lifespan_t); switch (this->depth) { case LIBCOOPGAMMA_UINT8: off += libcoopgamma_ramps_marshal(&(this->ramps.u8), SUBBUF); break; case LIBCOOPGAMMA_UINT16: off += libcoopgamma_ramps_marshal(&(this->ramps.u16), SUBBUF); break; case LIBCOOPGAMMA_UINT32: off += libcoopgamma_ramps_marshal(&(this->ramps.u32), SUBBUF); break; case LIBCOOPGAMMA_UINT64: off += libcoopgamma_ramps_marshal(&(this->ramps.u64), SUBBUF); break; case LIBCOOPGAMMA_FLOAT: off += libcoopgamma_ramps_marshal(&(this->ramps.f), SUBBUF); break; case LIBCOOPGAMMA_DOUBLE: off += libcoopgamma_ramps_marshal(&(this->ramps.d), SUBBUF); break; default: break; } MARSHAL_EPILOGUE; } /** * Unmarshal a `libcoopgamma_filter_t` from a buffer * * @param this The output parameter for unmarshalled record * @param vbuf The buffer with the marshalled record * @param np Output parameter for the number of unmarshalled bytes, undefined on failure * @return `LIBCOOPGAMMA_SUCCESS` (0), `LIBCOOPGAMMA_INCOMPATIBLE_DOWNGRADE`, * `LIBCOOPGAMMA_INCOMPATIBLE_UPGRADE`, or `LIBCOOPGAMMA_ERRNO_SET` */ int libcoopgamma_filter_unmarshal(libcoopgamma_filter_t* restrict this, const void* restrict vbuf, size_t* restrict np) { int r = LIBCOOPGAMMA_SUCCESS; size_t n = 0; UNMARSHAL_PROLOGUE; memset(this, 0, sizeof(*this)); unmarshal_version(LIBCOOPGAMMA_FILTER_VERSION); unmarshal_version(LIBCOOPGAMMA_DEPTH_VERSION); unmarshal_version(LIBCOOPGAMMA_LIFESPAN_VERSION); unmarshal_prim(this->depth, libcoopgamma_depth_t); unmarshal_prim(this->priority, int64_t); unmarshal_string(this->crtc); unmarshal_string(this->class); unmarshal_prim(this->lifespan, libcoopgamma_lifespan_t); switch (this->depth) { case LIBCOOPGAMMA_UINT8: r = libcoopgamma_ramps_unmarshal(&(this->ramps.u8), NNSUBBUF, &n); break; case LIBCOOPGAMMA_UINT16: r = libcoopgamma_ramps_unmarshal(&(this->ramps.u16), NNSUBBUF, &n); break; case LIBCOOPGAMMA_UINT32: r = libcoopgamma_ramps_unmarshal(&(this->ramps.u32), NNSUBBUF, &n); break; case LIBCOOPGAMMA_UINT64: r = libcoopgamma_ramps_unmarshal(&(this->ramps.u64), NNSUBBUF, &n); break; case LIBCOOPGAMMA_FLOAT: r = libcoopgamma_ramps_unmarshal(&(this->ramps.f), NNSUBBUF, &n); break; case LIBCOOPGAMMA_DOUBLE: r = libcoopgamma_ramps_unmarshal(&(this->ramps.d), NNSUBBUF, &n); break; default: break; } if (r != LIBCOOPGAMMA_SUCCESS) return r; off += n; UNMARSHAL_EPILOGUE; } /** * Initialise a `libcoopgamma_crtc_info_t` * * @param this The record to initialise * @return Zero on success, -1 on error */ int libcoopgamma_crtc_info_initialise(libcoopgamma_crtc_info_t* restrict this) { memset(this, 0, sizeof(*this)); return 0; } /** * Release all resources allocated to a `libcoopgamma_crtc_info_t`, * the allocation of the record itself is not freed * * Always call this function after failed call to `libcoopgamma_crtc_info_initialise` * or failed call to `libcoopgamma_crtc_info_unmarshal` * * @param this The record to destroy */ #if defined(__GNUC__) __attribute__((__const__)) #endif void libcoopgamma_crtc_info_destroy(libcoopgamma_crtc_info_t* restrict this) { (void) this; } /** * Marshal a `libcoopgamma_crtc_info_t` into a buffer * * @param this The record to marshal * @param vbuf The output buffer, `NULL` to only measure * how large this buffer has to be * @return The number of marshalled bytes, or if `buf == NULL`, * how many bytes would be marshalled if `buf != NULL` */ size_t libcoopgamma_crtc_info_marshal(const libcoopgamma_crtc_info_t* restrict this, void* restrict vbuf) { MARSHAL_PROLOGUE; marshal_version(LIBCOOPGAMMA_CRTC_INFO_VERSION); marshal_version(LIBCOOPGAMMA_DEPTH_VERSION); marshal_version(LIBCOOPGAMMA_SUPPORT_VERSION); marshal_prim(this->cooperative, int); marshal_prim(this->depth, libcoopgamma_depth_t); marshal_prim(this->red_size, size_t); marshal_prim(this->green_size, size_t); marshal_prim(this->blue_size, size_t); marshal_prim(this->supported, libcoopgamma_support_t); MARSHAL_EPILOGUE; } /** * Unmarshal a `libcoopgamma_crtc_info_t` from a buffer * * @param this The output parameter for unmarshalled record * @param vbuf The buffer with the marshalled record * @param np Output parameter for the number of unmarshalled bytes, undefined on failure * @return `LIBCOOPGAMMA_SUCCESS` (0), `LIBCOOPGAMMA_INCOMPATIBLE_DOWNGRADE`, * `LIBCOOPGAMMA_INCOMPATIBLE_UPGRADE`, or `LIBCOOPGAMMA_ERRNO_SET` */ int libcoopgamma_crtc_info_unmarshal(libcoopgamma_crtc_info_t* restrict this, const void* restrict vbuf, size_t* restrict np) { UNMARSHAL_PROLOGUE; unmarshal_version(LIBCOOPGAMMA_CRTC_INFO_VERSION); unmarshal_version(LIBCOOPGAMMA_DEPTH_VERSION); unmarshal_version(LIBCOOPGAMMA_SUPPORT_VERSION); unmarshal_prim(this->cooperative, int); unmarshal_prim(this->depth, libcoopgamma_depth_t); unmarshal_prim(this->red_size, size_t); unmarshal_prim(this->green_size, size_t); unmarshal_prim(this->blue_size, size_t); unmarshal_prim(this->supported, libcoopgamma_support_t); UNMARSHAL_EPILOGUE; } /** * Initialise a `libcoopgamma_filter_query_t` * * @param this The record to initialise * @return Zero on success, -1 on error */ int libcoopgamma_filter_query_initialise(libcoopgamma_filter_query_t* restrict this) { this->crtc = NULL; this->coalesce = 0; this->high_priority = INT64_MAX; this->low_priority = INT64_MIN; return 0; } /** * Release all resources allocated to a `libcoopgamma_filter_query_t`, * the allocation of the record itself is not freed * * Always call this function after failed call to `libcoopgamma_filter_query_initialise` * or failed call to `libcoopgamma_filter_query_unmarshal` * * @param this The record to destroy */ void libcoopgamma_filter_query_destroy(libcoopgamma_filter_query_t* restrict this) { free(this->crtc), this->crtc = NULL; } /** * Marshal a `libcoopgamma_filter_query_t` into a buffer * * @param this The record to marshal * @param vbuf The output buffer, `NULL` to only measure * how large this buffer has to be * @return The number of marshalled bytes, or if `buf == NULL`, * how many bytes would be marshalled if `buf != NULL` */ size_t libcoopgamma_filter_query_marshal(const libcoopgamma_filter_query_t* restrict this, void* restrict vbuf) { MARSHAL_PROLOGUE; marshal_version(LIBCOOPGAMMA_FILTER_QUERY_VERSION); marshal_string(this->crtc); marshal_prim(this->coalesce, int); marshal_prim(this->high_priority, int64_t); marshal_prim(this->low_priority, int64_t); MARSHAL_EPILOGUE; } /** * Unmarshal a `libcoopgamma_filter_query_t` from a buffer * * @param this The output parameter for unmarshalled record * @param vbuf The buffer with the marshalled record * @param np Output parameter for the number of unmarshalled bytes, undefined on failure * @return `LIBCOOPGAMMA_SUCCESS` (0), `LIBCOOPGAMMA_INCOMPATIBLE_DOWNGRADE`, * `LIBCOOPGAMMA_INCOMPATIBLE_UPGRADE`, or `LIBCOOPGAMMA_ERRNO_SET` */ int libcoopgamma_filter_query_unmarshal(libcoopgamma_filter_query_t* restrict this, const void* restrict vbuf, size_t* restrict np) { UNMARSHAL_PROLOGUE; this->crtc = NULL; unmarshal_version(LIBCOOPGAMMA_FILTER_QUERY_VERSION); unmarshal_string(this->crtc); unmarshal_prim(this->coalesce, int); unmarshal_prim(this->high_priority, int64_t); unmarshal_prim(this->low_priority, int64_t); UNMARSHAL_EPILOGUE; } /** * Initialise a `libcoopgamma_queried_filter_t` * * @param this The record to initialise * @return Zero on success, -1 on error */ int libcoopgamma_queried_filter_initialise(libcoopgamma_queried_filter_t* restrict this) { memset(this, 0, sizeof(*this)); return 0; } /** * Release all resources allocated to a `libcoopgamma_queried_filter_t`, * the allocation of the record itself is not freed * * Always call this function after failed call to `libcoopgamma_queried_filter_initialise` * or failed call to `libcoopgamma_queried_filter_unmarshal` * * @param this The record to destroy */ void libcoopgamma_queried_filter_destroy(libcoopgamma_queried_filter_t* restrict this) { free(this->class), this->class = NULL; libcoopgamma_ramps_destroy(&(this->ramps.u8)); } /** * Marshal a `libcoopgamma_queried_filter_t` into a buffer * * @param this The record to marshal * @param vbuf The output buffer, `NULL` to only measure * how large this buffer has to be * @param depth The type used of ramp stops * @return The number of marshalled bytes, or if `buf == NULL`, * how many bytes would be marshalled if `buf != NULL` */ size_t libcoopgamma_queried_filter_marshal(const libcoopgamma_queried_filter_t* restrict this, void* restrict vbuf, libcoopgamma_depth_t depth) { MARSHAL_PROLOGUE; marshal_version(LIBCOOPGAMMA_QUERIED_FILTER_VERSION); marshal_prim(this->priority, int64_t); marshal_string(this->class); switch (depth) { case LIBCOOPGAMMA_UINT8: off += libcoopgamma_ramps_marshal(&(this->ramps.u8), SUBBUF); break; case LIBCOOPGAMMA_UINT16: off += libcoopgamma_ramps_marshal(&(this->ramps.u16), SUBBUF); break; case LIBCOOPGAMMA_UINT32: off += libcoopgamma_ramps_marshal(&(this->ramps.u32), SUBBUF); break; case LIBCOOPGAMMA_UINT64: off += libcoopgamma_ramps_marshal(&(this->ramps.u64), SUBBUF); break; case LIBCOOPGAMMA_FLOAT: off += libcoopgamma_ramps_marshal(&(this->ramps.f), SUBBUF); break; case LIBCOOPGAMMA_DOUBLE: off += libcoopgamma_ramps_marshal(&(this->ramps.d), SUBBUF); break; default: break; } MARSHAL_EPILOGUE; } /** * Unmarshal a `libcoopgamma_queried_filter_t` from a buffer * * @param this The output parameter for unmarshalled record * @param vbuf The buffer with the marshalled record * @param np Output parameter for the number of unmarshalled bytes, undefined on failure * @param depth The type used of ramp stops * @return `LIBCOOPGAMMA_SUCCESS` (0), `LIBCOOPGAMMA_INCOMPATIBLE_DOWNGRADE`, * `LIBCOOPGAMMA_INCOMPATIBLE_UPGRADE`, or `LIBCOOPGAMMA_ERRNO_SET` */ int libcoopgamma_queried_filter_unmarshal(libcoopgamma_queried_filter_t* restrict this, const void* restrict vbuf, size_t* restrict np, libcoopgamma_depth_t depth) { int r = LIBCOOPGAMMA_SUCCESS; size_t n = 0; UNMARSHAL_PROLOGUE; memset(this, 0, sizeof(*this)); unmarshal_version(LIBCOOPGAMMA_QUERIED_FILTER_VERSION); unmarshal_prim(this->priority, int64_t); unmarshal_string(this->class); switch (depth) { case LIBCOOPGAMMA_UINT8: r = libcoopgamma_ramps_unmarshal(&(this->ramps.u8), NNSUBBUF, &n); break; case LIBCOOPGAMMA_UINT16: r = libcoopgamma_ramps_unmarshal(&(this->ramps.u16), NNSUBBUF, &n); break; case LIBCOOPGAMMA_UINT32: r = libcoopgamma_ramps_unmarshal(&(this->ramps.u32), NNSUBBUF, &n); break; case LIBCOOPGAMMA_UINT64: r = libcoopgamma_ramps_unmarshal(&(this->ramps.u64), NNSUBBUF, &n); break; case LIBCOOPGAMMA_FLOAT: r = libcoopgamma_ramps_unmarshal(&(this->ramps.f), NNSUBBUF, &n); break; case LIBCOOPGAMMA_DOUBLE: r = libcoopgamma_ramps_unmarshal(&(this->ramps.d), NNSUBBUF, &n); break; default: break; } if (r != LIBCOOPGAMMA_SUCCESS) return r; off += n; UNMARSHAL_EPILOGUE; } /** * Initialise a `libcoopgamma_filter_table_t` * * @param this The record to initialise * @return Zero on success, -1 on error */ int libcoopgamma_filter_table_initialise(libcoopgamma_filter_table_t* restrict this) { memset(this, 0, sizeof(*this)); return 0; } /** * Release all resources allocated to a `libcoopgamma_filter_table_t`, * the allocation of the record itself is not freed * * Always call this function after failed call to `libcoopgamma_filter_table_initialise` * or failed call to `libcoopgamma_filter_table_unmarshal` * * @param this The record to destroy */ void libcoopgamma_filter_table_destroy(libcoopgamma_filter_table_t* restrict this) { while (this->filter_count) libcoopgamma_queried_filter_destroy(this->filters + --(this->filter_count)); free(this->filters), this->filters = NULL; } /** * Marshal a `libcoopgamma_filter_table_t` into a buffer * * @param this The record to marshal * @param vbuf The output buffer, `NULL` to only measure * how large this buffer has to be * @return The number of marshalled bytes, or if `buf == NULL`, * how many bytes would be marshalled if `buf != NULL` */ size_t libcoopgamma_filter_table_marshal(const libcoopgamma_filter_table_t* restrict this, void* restrict vbuf) { size_t i; MARSHAL_PROLOGUE; marshal_version(LIBCOOPGAMMA_FILTER_TABLE_VERSION); marshal_version(LIBCOOPGAMMA_DEPTH_VERSION); marshal_prim(this->depth, libcoopgamma_depth_t); marshal_prim(this->red_size, size_t); marshal_prim(this->green_size, size_t); marshal_prim(this->blue_size, size_t); marshal_prim(this->filter_count, size_t); for (i = 0; i < this->filter_count; i++) off += libcoopgamma_queried_filter_marshal(this->filters + i, SUBBUF, this->depth); MARSHAL_EPILOGUE; } /** * Unmarshal a `libcoopgamma_filter_table_t` from a buffer * * @param this The output parameter for unmarshalled record * @param vbuf The buffer with the marshalled record * @param np Output parameter for the number of unmarshalled bytes, undefined on failure * @return `LIBCOOPGAMMA_SUCCESS` (0), `LIBCOOPGAMMA_INCOMPATIBLE_DOWNGRADE`, * `LIBCOOPGAMMA_INCOMPATIBLE_UPGRADE`, or `LIBCOOPGAMMA_ERRNO_SET` */ int libcoopgamma_filter_table_unmarshal(libcoopgamma_filter_table_t* restrict this, const void* restrict vbuf, size_t* restrict np) { size_t i, n, fn; int r; UNMARSHAL_PROLOGUE; this->filter_count = 0; this->filters = NULL; unmarshal_version(LIBCOOPGAMMA_FILTER_TABLE_VERSION); unmarshal_version(LIBCOOPGAMMA_DEPTH_VERSION); unmarshal_prim(this->depth, libcoopgamma_depth_t); unmarshal_prim(this->red_size, size_t); unmarshal_prim(this->green_size, size_t); unmarshal_prim(this->blue_size, size_t); unmarshal_prim(fn, size_t); this->filters = malloc(fn * sizeof(*(this->filters))); if (this->filters == NULL) return LIBCOOPGAMMA_ERRNO_SET; for (i = 0; i < fn; i++) { r = libcoopgamma_queried_filter_unmarshal(this->filters + i, NNSUBBUF, &n, this->depth); if (r != LIBCOOPGAMMA_SUCCESS) return r; off += n; this->filter_count += 1; } UNMARSHAL_EPILOGUE; } /** * Initialise a `libcoopgamma_error_t` * * @param this The record to initialise * @return Zero on success, -1 on error */ int libcoopgamma_error_initialise(libcoopgamma_error_t* restrict this) { this->number = 0; this->custom = 0; this->description = NULL; return 0; } /** * Release all resources allocated to a `libcoopgamma_error_t`, * the allocation of the record itself is not freed * * Always call this function after failed call to `libcoopgamma_error_initialise` * or failed call to `libcoopgamma_error_unmarshal` * * @param this The record to destroy */ void libcoopgamma_error_destroy(libcoopgamma_error_t* restrict this) { free(this->description), this->description = NULL; } /** * Marshal a `libcoopgamma_error_t` into a buffer * * @param this The record to marshal * @param vbuf The output buffer, `NULL` to only measure * how large this buffer has to be * @return The number of marshalled bytes, or if `buf == NULL`, * how many bytes would be marshalled if `buf != NULL` */ size_t libcoopgamma_error_marshal(const libcoopgamma_error_t* restrict this, void* restrict vbuf) { MARSHAL_PROLOGUE; marshal_version(LIBCOOPGAMMA_ERROR_VERSION); marshal_prim(this->number, uint64_t); marshal_prim(this->custom, int); marshal_prim(this->server_side, int); marshal_string(this->description); MARSHAL_EPILOGUE; } /** * Unmarshal a `libcoopgamma_error_t` from a buffer * * @param this The output parameter for unmarshalled record * @param vbuf The buffer with the marshalled record * @param np Output parameter for the number of unmarshalled bytes, undefined on failure * @return `LIBCOOPGAMMA_SUCCESS` (0), `LIBCOOPGAMMA_INCOMPATIBLE_DOWNGRADE`, * `LIBCOOPGAMMA_INCOMPATIBLE_UPGRADE`, or `LIBCOOPGAMMA_ERRNO_SET` */ int libcoopgamma_error_unmarshal(libcoopgamma_error_t* restrict this, const void* restrict vbuf, size_t* restrict np) { UNMARSHAL_PROLOGUE; this->description = NULL; unmarshal_version(LIBCOOPGAMMA_ERROR_VERSION); unmarshal_prim(this->number, uint64_t); unmarshal_prim(this->custom, int); unmarshal_string(this->description); UNMARSHAL_EPILOGUE; } /** * Initialise a `libcoopgamma_context_t` * * @param this The record to initialise * @return Zero on success, -1 on error */ int libcoopgamma_context_initialise(libcoopgamma_context_t* restrict this) { memset(this, 0, sizeof(*this)); this->fd = -1; return 0; } /** * Release all resources allocated to a `libcoopgamma_context_t`, * the allocation of the record itself is not freed * * Always call this function after failed call to `libcoopgamma_context_initialise` * or failed call to `libcoopgamma_context_unmarshal` * * @param this The record to destroy * @param disconnect Disconnect from the server? */ void libcoopgamma_context_destroy(libcoopgamma_context_t* restrict this, int disconnect) { if (disconnect && (this->fd >= 0)) { shutdown(this->fd, SHUT_RDWR); close(this->fd); } this->fd = -1; libcoopgamma_error_destroy(&(this->error)); free(this->outbound), this->outbound = NULL; free(this->inbound), this->inbound = NULL; } /** * Marshal a `libcoopgamma_context_t` into a buffer * * @param this The record to marshal * @param vbuf The output buffer, `NULL` to only measure * how large this buffer has to be * @return The number of marshalled bytes, or if `buf == NULL`, * how many bytes would be marshalled if `buf != NULL` */ size_t libcoopgamma_context_marshal(const libcoopgamma_context_t* restrict this, void* restrict vbuf) { MARSHAL_PROLOGUE; marshal_version(LIBCOOPGAMMA_CONTEXT_VERSION); marshal_prim(this->fd, int); off += libcoopgamma_error_marshal(&(this->error), SUBBUF); marshal_prim(this->message_id, uint32_t); marshal_prim(this->outbound_head - this->outbound_tail, size_t); marshal_buffer(this->outbound + this->outbound_head, this->outbound_head - this->outbound_tail); marshal_prim(this->inbound_head - this->inbound_tail, size_t); marshal_buffer(this->inbound + this->inbound_head, this->inbound_head - this->inbound_tail); marshal_prim(this->length, size_t); marshal_prim(this->curline, size_t); marshal_prim(this->in_response_to, uint32_t); marshal_prim(this->have_all_headers, int); marshal_prim(this->bad_message, int); MARSHAL_EPILOGUE; } /** * Unmarshal a `libcoopgamma_context_t` from a buffer * * @param this The output parameter for unmarshalled record * @param vbuf The buffer with the marshalled record * @param np Output parameter for the number of unmarshalled bytes, undefined on failure * @return `LIBCOOPGAMMA_SUCCESS` (0), `LIBCOOPGAMMA_INCOMPATIBLE_DOWNGRADE`, * `LIBCOOPGAMMA_INCOMPATIBLE_UPGRADE`, or `LIBCOOPGAMMA_ERRNO_SET` */ int libcoopgamma_context_unmarshal(libcoopgamma_context_t* restrict this, const void* restrict vbuf, size_t* restrict np) { size_t n; int r; UNMARSHAL_PROLOGUE; memset(this, 0, sizeof(*this)); unmarshal_version(LIBCOOPGAMMA_CONTEXT_VERSION); unmarshal_prim(this->fd, int); r = libcoopgamma_error_unmarshal(&(this->error), NNSUBBUF, &n); if (r != LIBCOOPGAMMA_SUCCESS) return r; off += n; unmarshal_prim(this->message_id, uint32_t); unmarshal_prim(this->inbound_head, size_t); this->outbound_size = this->outbound_head; unmarshal_buffer(this->outbound, this->outbound_head); this->inbound_size = this->inbound_head; unmarshal_buffer(this->inbound, this->inbound_head); unmarshal_prim(this->length, size_t); unmarshal_prim(this->curline, size_t); unmarshal_prim(this->in_response_to, uint32_t); unmarshal_prim(this->have_all_headers, int); unmarshal_prim(this->bad_message, int); UNMARSHAL_EPILOGUE; } /** * Initialise a `libcoopgamma_async_context_t` * * @param this The record to initialise * @return Zero on success, -1 on error */ int libcoopgamma_async_context_initialise(libcoopgamma_async_context_t* restrict this) { this->message_id = 0; this->coalesce = 0; return 0; } /** * Release all resources allocated to a `libcoopgamma_async_context_t`, * the allocation of the record itself is not freed * * Always call this function after failed call to `libcoopgamma_async_context_initialise` * or failed call to `libcoopgamma_async_context_unmarshal` * * @param this The record to destroy */ #if defined(__GNUC__) __attribute__((__const__)) #endif void libcoopgamma_async_context_destroy(libcoopgamma_async_context_t* restrict this) { (void) this; } /** * Marshal a `libcoopgamma_async_context_t` into a buffer * * @param this The record to marshal * @param vbuf The output buffer, `NULL` to only measure * how large this buffer has to be * @return The number of marshalled bytes, or if `buf == NULL`, * how many bytes would be marshalled if `buf != NULL` */ size_t libcoopgamma_async_context_marshal(const libcoopgamma_async_context_t* restrict this, void* restrict vbuf) { MARSHAL_PROLOGUE; marshal_version(LIBCOOPGAMMA_ASYNC_CONTEXT_VERSION); marshal_prim(this->message_id, uint32_t); marshal_prim(this->coalesce, int); MARSHAL_EPILOGUE; } /** * Unmarshal a `libcoopgamma_async_context_t` from a buffer * * @param this The output parameter for unmarshalled record * @param vbuf The buffer with the marshalled record * @param np Output parameter for the number of unmarshalled bytes, undefined on failure * @return `LIBCOOPGAMMA_SUCCESS` (0), `LIBCOOPGAMMA_INCOMPATIBLE_DOWNGRADE`, * `LIBCOOPGAMMA_INCOMPATIBLE_UPGRADE`, or `LIBCOOPGAMMA_ERRNO_SET` */ int libcoopgamma_async_context_unmarshal(libcoopgamma_async_context_t* restrict this, const void* restrict vbuf, size_t* restrict np) { UNMARSHAL_PROLOGUE; unmarshal_version(LIBCOOPGAMMA_ASYNC_CONTEXT_VERSION); unmarshal_prim(this->message_id, uint32_t); unmarshal_prim(this->coalesce, int); UNMARSHAL_EPILOGUE; } /** * List all recognised adjustment method * * SIGCHLD must not be ignored or blocked * * @return A `NULL`-terminated list of names. You should only free * the outer pointer, inner pointers are subpointers of the * outer pointer and cannot be freed. `NULL` on error. */ char** libcoopgamma_get_methods(void) { char num[5]; /* The size is base on the fact that we have limited `n` in the loop below */ char** methods = NULL; char** rc; char* buffer; int n = 0, saved_errno; size_t size = 0; methods = malloc(4 * sizeof(*methods)); if (methods == NULL) goto fail; for (n = 0; n < 10000 /* just to be safe */; n++) { char* method; if ((n >= 4) && ((n & -n) == n)) { void* new = realloc(methods, (size_t)(n << 1) * sizeof(*methods)); if (new == NULL) goto fail; methods = new; } sprintf(num, "%i", n); if (libcoopgamma_get_method_and_site(num, NULL, &method, NULL)) goto fail; if (!strcmp(method, num)) { free(method); break; } methods[n] = method; size += strlen(method) + 1; } rc = malloc((size_t)(n + 1) * sizeof(char*) + size); if (rc == NULL) goto fail; buffer = ((char*)rc) + (size_t)(n + 1) * sizeof(char*); rc[n] = NULL; while (n--) { buffer = stpcpy(buffer, methods[n]) + 1; free(methods[n]); } free(methods); return rc; fail: saved_errno = errno; while (n--) free(methods[n]); free(methods); errno = saved_errno; return NULL; } /** * Run coopgammad with -q or -qq and return the response * * SIGCHLD must not be ignored or blocked * * @param method The adjustment method, `NULL` for automatic * @param site The site, `NULL` for automatic * @param arg "-q" or "-qq", which shall be passed to coopgammad? * @return The output of coopgammad, `NULL` on error. This * will be NUL-terminated and will not contain any * other `NUL` bytes. */ static char* libcoopgamma_query(const char* restrict method, const char* restrict site, const char* restrict arg) { const char* (args[7]) = {"coopgammad", arg}; size_t i = 2, n = 0, size = 0; int pipe_rw[2] = { -1, -1 }; pid_t pid; int saved_errno, status; char* msg = NULL; ssize_t got; if (method != NULL) args[i++] = "-m", args[i++] = method; if (site != NULL) args[i++] = "-s", args[i++] = site; args[i] = NULL; if (pipe(pipe_rw) < 0) goto fail; switch ((pid = fork())) { case -1: goto fail; case 0: /* Child */ close(pipe_rw[0]); if (pipe_rw[1] != STDOUT_FILENO) { close(STDOUT_FILENO); if (dup2(pipe_rw[1], STDOUT_FILENO) < 0) goto fail_child; close(pipe_rw[1]); } #if defined(__GNUC__) # pragma GCC diagnostic push # pragma GCC diagnostic ignored "-Wcast-qual" #endif execvp("coopgammad", (char* const*)(args)); #if defined(__GNUC__) # pragma GCC diagnostic pop #endif fail_child: saved_errno = errno; perror(NAME_OF_THE_PROCESS); if (write(STDOUT_FILENO, &saved_errno, sizeof(int)) != sizeof(int)) perror(NAME_OF_THE_PROCESS); exit(1); default: /* Parent */ close(pipe_rw[1]), pipe_rw[1] = -1; for (;;) { if (n == size) { void* new = realloc(msg, size = (n ? (n << 1) : 256)); if (new == NULL) goto fail; msg = new; } got = read(pipe_rw[0], msg + n, size - n); if (got < 0) { if (errno == EINTR) continue; goto fail; } else if (got == 0) break; n += (size_t)got; } close(pipe_rw[0]), pipe_rw[0] = -1; if (waitpid(pid, &status, 0) < 0) goto fail; if (status) { errno = EINVAL; if ((n == sizeof(int)) && (*(int*)msg != 0)) errno = *(int*)msg; } break; } if (n == size) { void* new = realloc(msg, n + 1); if (new == NULL) goto fail; msg = new; } msg[n] = '\0'; if (strchr(msg, '\0') != msg + n) { errno = EBADMSG; goto fail; } return msg; fail: saved_errno = errno; if (pipe_rw[0] >= 0) close(pipe_rw[0]); if (pipe_rw[1] >= 0) close(pipe_rw[1]); free(msg); errno = saved_errno; return NULL; } /** * Get the adjustment method and site * * SIGCHLD must not be ignored or blocked * * @param method The adjustment method, `NULL` for automatic * @param site The site, `NULL` for automatic * @param methodp Output pointer for the selected adjustment method, * which cannot be `NULL`. It is safe to call * this function with this parameter set to `NULL`. * @param sitep Output pointer for the selected site, which will * be `NULL` the method only supports one site or if * `site == NULL` and no site can be selected * automatically. It is safe to call this function * with this parameter set to `NULL`. * @return Zero on success, -1 on error */ int libcoopgamma_get_method_and_site(const char* restrict method, const char* restrict site, char** restrict methodp, char** restrict sitep) { int saved_errno; char* raw; char* p; char* q; raw = libcoopgamma_query(method, site, "-q"); if (raw == NULL) return -1; if (methodp != NULL) *methodp = NULL; if (sitep != NULL) *sitep = NULL; p = strchr(raw, '\n'); if (p == NULL) { errno = EBADMSG; goto fail; } *p++ = '\0'; if (methodp != NULL) { *methodp = malloc(strlen(raw) + 1); if (*methodp == NULL) goto fail; strcpy(*methodp, raw); } if ((site != NULL) && *(q = strchr(p, '\0') - 1)) { if (*q != '\n') { errno = EBADMSG; goto fail; } *q = '\0'; *sitep = malloc(strlen(p) + 1); if (*sitep == NULL) goto fail; strcpy(*sitep, p); } free(raw); return 0; fail: saved_errno = errno; if (methodp != NULL) free(*methodp), *methodp = NULL; free(raw); errno = saved_errno; return -1; } /** * Get the PID file of the coopgamma server * * SIGCHLD must not be ignored or blocked * * @param method The adjustment method, `NULL` for automatic * @param site The site, `NULL` for automatic * @return The pathname of the server's PID file, `NULL` on error * or if there server does not use PID files. The later * case is detected by checking that `errno` is set to 0. */ char* libcoopgamma_get_pid_file(const char* restrict method, const char* restrict site) { char* path; size_t n; path = libcoopgamma_get_socket_file(method, site); if (path == NULL) return NULL; n = strlen(path); if (n < 7 || strcmp(path + n - 7, ".socket")) { free(path); errno = EBADMSG; return NULL; } strcpy(path + n - 7, ".pid"); return path; } /** * Get the socket file of the coopgamma server * * SIGCHLD must not be ignored or blocked * * @param method The adjustment method, `NULL` for automatic * @param site The site, `NULL` for automatic * @return The pathname of the server's socket, `NULL` on error * or if there server does have its own socket. The later * case is detected by checking that `errno` is set to 0, * and is the case when communicating with a server in a * multi-server display server like mds. */ char* libcoopgamma_get_socket_file(const char* restrict method, const char* restrict site) { int saved_errno; char* raw; char* p; raw = libcoopgamma_query(method, site, "-qq"); if (raw == NULL) return NULL; p = strchr(raw, '\0') - 1; if (*p != '\n') { errno = EBADMSG; goto fail; } *p = '\0'; if (*raw == '\0') { errno = EBADMSG; goto fail; } return raw; fail: saved_errno = errno; free(raw); errno = saved_errno; return NULL; } /** * Connect to a coopgamma server, and start it if necessary * * Use `libcoopgamma_context_destroy` to disconnect * * SIGCHLD must not be ignored or blocked * * @param method The adjustment method, `NULL` for automatic * @param site The site, `NULL` for automatic * @param ctx The state of the library, must be initialised * @return Zero on success, -1 on error. On error, `errno` is set * to 0 if the server could not be initialised. */ int libcoopgamma_connect(const char* restrict method, const char* restrict site, libcoopgamma_context_t* restrict ctx) { const char* (args[6]) = {"coopgammad"}; struct sockaddr_un address; char* path; int saved_errno; int tries = 0, status; pid_t pid; size_t i = 1; if (method != NULL) args[i++] = "-m", args[i++] = method; if (site != NULL) args[i++] = "-s", args[i++] = site; args[i] = NULL; path = libcoopgamma_get_socket_file(method, site); if (path == NULL) return -1; if (strlen(path) <= sizeof(address.sun_path)) { free(path); errno = ENAMETOOLONG; return -1; } address.sun_family = AF_UNIX; strcpy(address.sun_path, path); free(path); if ((ctx->fd = socket(PF_UNIX, SOCK_STREAM, 0)) < 0) return -1; retry: if (connect(ctx->fd, (struct sockaddr*)(&address), (socklen_t)sizeof(address)) < 0) { if (((errno == ECONNREFUSED) || (errno == ENOENT) || (errno == ENOTDIR)) && !tries++) { switch ((pid = fork())) { case -1: goto fail; case 0: /* Child */ close(ctx->fd); #if defined(__GNUC__) # pragma GCC diagnostic push # pragma GCC diagnostic ignored "-Wcast-qual" #endif execvp("coopgammad", (char* const*)(args)); #if defined(__GNUC__) # pragma GCC diagnostic pop #endif perror(NAME_OF_THE_PROCESS); exit(1); default: /* Parent */ if (waitpid(pid, &status, 0) < 0) goto fail; if (status) { errno = 0; goto fail; } break; } goto retry; } goto fail; } return 0; fail: saved_errno = errno; close(ctx->fd), ctx->fd = -1; errno = saved_errno; return -1; } /** * By default communication is blocking, this function * can be used to switch between blocking and nonblocking * * After setting the communication to nonblocking, * `libcoopgamma_flush`, `libcoopgamma_synchronise` and * and request-sending functions can fail with EAGAIN and * EWOULDBLOCK. It is safe to continue with `libcoopgamma_flush` * (for `libcoopgamma_flush` it selfand equest-sending functions) * or `libcoopgamma_synchronise` just like EINTR failure. * * @param ctx The state of the library, must be connected * @param nonblocking Nonblocking mode? * @return Zero on success, -1 on error */ int libcoopgamma_set_nonblocking(libcoopgamma_context_t* restrict ctx, int nonblocking) { int flags = fcntl(ctx->fd, F_GETFL); if (flags == -1) return -1; if (nonblocking) flags |= O_NONBLOCK; else flags &= ~O_NONBLOCK; return -(fcntl(ctx->fd, F_SETFL, flags) == -1); } /** * Send all pending outbound data * * If this function or another function that sends a request * to the server fails with EINTR, call this function to * complete the transfer. The `async` parameter will always * be in a properly configured state if a function fails * with EINTR. * * @param ctx The state of the library, must be connected * @return Zero on success, -1 on error */ int libcoopgamma_flush(libcoopgamma_context_t* restrict ctx) { ssize_t sent; size_t chunksize = ctx->outbound_head - ctx->outbound_tail; size_t sendsize; while (ctx->outbound_tail < ctx->outbound_head) { sendsize = ctx->outbound_head - ctx->outbound_tail; sendsize = sendsize < chunksize ? sendsize : chunksize; sent = send(ctx->fd, ctx->outbound + ctx->outbound_tail, sendsize, 0); if (sent < 0) { if (errno != EMSGSIZE) return -1; if ((chunksize >>= 1) == 0) return -1; continue; } ctx->outbound_tail += (size_t)sent; } return 0; } /** * Wait for the next message to be received * * @param ctx The state of the library, must be connected * @param pending Information for each pending request * @param n The number of elements in `pending` * @param selected The index of the element in `pending` which corresponds * to the first inbound message, note that this only means * that the message is not for any of the other request, * if the message is corrupt any of the listed requests can * be selected even if it is not for any of the requests. * Functions that parse the message will detect such corruption. * @return Zero on success, -1 on error. If the the message is ignored, * which happens if corresponding `libcoopgamma_async_context_t` * is not listed, -1 is returned and `errno` is set to 0. If -1 * is returned, `errno` is set to `ENOTRECOVERABLE` you have * received a corrupt message and the context has been tainted * beyond recover. */ int libcoopgamma_synchronise(libcoopgamma_context_t* restrict ctx, libcoopgamma_async_context_t* restrict pending, size_t n, size_t* restrict selected) { char temp[3 * sizeof(size_t) + 1]; ssize_t got; size_t i; char* p; char* line; char* value; if (ctx->inbound_head == ctx->inbound_tail) ctx->inbound_head = ctx->inbound_tail = 0; if (ctx->inbound_tail > 0) { memmove(ctx->inbound, ctx->inbound + ctx->inbound_tail, ctx->inbound_head -= ctx->inbound_tail); ctx->inbound_tail = 0; } for (;;) { if (ctx->inbound_head == ctx->inbound_size) { size_t new_size = ctx->inbound_size ? (ctx->inbound_size << 1) : 1024; void* new = realloc(ctx->inbound, new_size); if (new == NULL) return -1; ctx->inbound = new; ctx->inbound_size = new_size; } got = recv(ctx->fd, ctx->inbound + ctx->inbound_head, ctx->inbound_size - ctx->inbound_head, 0); if (got <= 0) { if (got == 0) errno = ECONNRESET; return -1; } ctx->inbound_head += (size_t)got; while (ctx->have_all_headers == 0) { line = ctx->inbound + ctx->curline; p = memchr(line, '\n', ctx->inbound_head - ctx->curline); if (p == NULL) break; if (memchr(line, '\0', ctx->inbound_head - ctx->curline) != NULL) ctx->bad_message = 1; *p++ = '\0'; ctx->curline += (size_t)(p - ctx->inbound); if (!*line) { ctx->have_all_headers = 1; } else if (strstr(line, "In response to: ") == line) { value = line + (sizeof("In response to: ") - 1); ctx->in_response_to = (uint32_t)atol(value); } else if (strstr(line, "Length: ") == line) { value = line + (sizeof("Length: ") - 1); ctx->length = (size_t)atol(value); sprintf(temp, "%zu", ctx->length); if (strcmp(value, temp)) goto fatal; } } if (ctx->have_all_headers && (ctx->inbound_head >= ctx->curline + ctx->length)) { ctx->curline += ctx->length; if (ctx->bad_message) { ctx->bad_message = 0; ctx->have_all_headers = 0; ctx->length = 0; ctx->inbound_tail = ctx->curline; errno = EBADMSG; return -1; } for (i = 0; i < n; i++) if (pending[i].message_id == ctx->in_response_to) { *selected = i; return 0; } *selected = 0; ctx->bad_message = 0; ctx->have_all_headers = 0; ctx->length = 0; ctx->inbound_tail = ctx->curline; errno = 0; return -1; } } fatal: errno = ENOTRECOVERABLE; return -1; } /** * Send a message to the server and wait for response * * @param resp:char** Output parameter for the response, * will be NUL-terminated * @param ctx:libcoopgamma_context_t* The state of the library * @param payload:void* Data to append to the end of the message * @param payload_size:size_t Byte-size of `payload` * @param format:string-literal Message formatting string * @param ... Message formatting arguments * * On error, the macro goes to `fail`. */ #define SEND_MESSAGE(ctx, payload, payload_size, format, ...) \ do \ { \ ssize_t n__; \ char* msg__; \ snprintf(NULL, (size_t)0, format "%zn", __VA_ARGS__, &n__); \ msg__ = malloc((size_t)n__ + (payload_size)); \ if (msg__ == NULL) \ goto fail; \ sprintf(msg__, format, __VA_ARGS__); \ if ((payload) != NULL) \ memcpy(msg__ + n__, (payload), (payload_size)); \ if (send_message((ctx), msg__, (size_t)n__ + (payload_size)) < 0) \ goto fail; \ free(msg__); \ } \ while (0) /** * Send a message to the server and wait for response * * @param ctx The state of the library * @param msg The message to send * @param n The length of `msg` * @return Zero on success, -1 on error */ static int send_message(libcoopgamma_context_t* restrict ctx, char* msg, size_t n) { if (ctx->outbound_head == ctx->outbound_tail) { free(ctx->outbound); ctx->outbound = msg; ctx->outbound_tail = 0; ctx->outbound_head = n; ctx->outbound_size = n; } else { if (ctx->outbound_head + n > ctx->outbound_size) { memmove(ctx->outbound, ctx->outbound + ctx->outbound_tail, ctx->outbound_head -= ctx->outbound_tail); ctx->outbound_tail = 0; } if (ctx->outbound_head + n > ctx->outbound_size) { void* new = realloc(ctx->outbound, ctx->outbound_head + n); if (new == NULL) { int saved_errno = errno; free(msg); errno = saved_errno; return -1; } ctx->outbound = new; ctx->outbound_size = ctx->outbound_head + n; } memcpy(ctx->outbound + ctx->outbound_head, msg, n); ctx->outbound_head += n; ctx->message_id += 1; free(msg); } return libcoopgamma_flush(ctx); } /** * Get the next header of the inbound message * * All headers must be read before the payload is read * * @param ctx The state of the library, must be connected * @return The next header line, can never be `NULL`, * the empty string marks the end of the headers. * This memory segment must not be freed. */ static char* next_header(libcoopgamma_context_t* restrict ctx) { char* rc = ctx->inbound + ctx->inbound_tail; ctx->inbound_tail += strlen(ctx->inbound) + 1; return rc; } /** * Get the payload of the inbound message * * Calling this function marks that the inbound message * has been fully ready. You must call this function * even if you do not expect a payload * * @param ctx The state of the library, must be connected * @param n Output parameter for the size of the payload * @return The payload (not NUL-terminated), `NULL` if * there is no payload. Failure is impossible. * This memory segment must not be freed. */ static char* next_payload(libcoopgamma_context_t* restrict ctx, size_t* n) { ctx->have_all_headers = 0; if ((*n = ctx->length)) { char* rc = ctx->inbound + ctx->inbound_tail; ctx->inbound_tail += *n; ctx->length = 0; return rc; } else return NULL; } /** * Check whether the server sent an error, if so copy it to `ctx` * * This function will also reports EBADMSG if the message ID * that the message is a response to does not match the request * information, or if it is missing * * @param ctx The state of the library, must be connected * @param async Information about the request * @return 1 if the server sent an error (even indicating success), * 0 on success, -1 on failure. Information about failure * is copied `ctx`. */ static int check_error(libcoopgamma_context_t* restrict ctx, libcoopgamma_async_context_t* restrict async) { char temp[3 * sizeof(uint64_t) + 1]; size_t old_tail = ctx->inbound_tail; char* line; char* value; int command_ok = 0; int have_in_response_to = 0; int have_error = 0; int bad = 0; for (;;) { line = next_header(ctx); value = strchr(line, ':') + 2; if (!*line) break; else if (!strcmp(line, "Command: error")) command_ok = 1; else if (strstr(line, "In response to: ") == line) { uint32_t id = (uint32_t)atol(value); have_in_response_to = 1 + !!have_in_response_to; if (id != async->message_id) bad = 1; else { sprintf(temp, "%" PRIu32, id); if (strcmp(value, temp)) bad = 1; } } else if (strstr(line, "Error: ") == line) { have_error = 1 + !!have_error; ctx->error.server_side = 1; ctx->error.custom = (strstr(value, "custom") == value); if (ctx->error.custom) { if (value[6] == '\0') { ctx->error.number = 0; continue; } else if (value[6] != ' ') { bad = 1; continue; } } ctx->error.number = (uint64_t)atoll(value); sprintf(temp, "%" PRIu64, ctx->error.number); if (strcmp(value, temp)) bad = 1; } } if (command_ok == 0) { ctx->inbound_tail = old_tail; return 0; } if (bad || (have_in_response_to != 1) || (have_error != 1)) { errno = EBADMSG; copy_errno(ctx); return -1; } return 1; } #if defined(__GNUC__) # pragma GCC diagnostic push # pragma GCC diagnostic ignored "-Wnonnull" #endif /** * List all available CRTC:s, send request part * * Cannot be used before connecting to the server * * @param ctx The state of the library, must be connected * @param async Information about the request, that is needed to * identify and parse the response, is stored here * @return Zero on success, -1 on error */ int libcoopgamma_get_crtcs_send(libcoopgamma_context_t* restrict ctx, libcoopgamma_async_context_t* restrict async) { async->message_id = ctx->message_id; SEND_MESSAGE(ctx, NULL, (size_t)0, "Command: enumerate-crtcs\n" "Message ID: %" PRIu32 "\n" "\n", ctx->message_id); return 0; fail: copy_errno(ctx); return -1; } /** * List all available CRTC:s, receive response part * * @param ctx The state of the library, must be connected * @param async Information about the request * @return A `NULL`-terminated list of names. You should only free * the outer pointer, inner pointers are subpointers of the * outer pointer and cannot be freed. `NULL` on error, in * which case `ctx->error` (rather than `errno`) is read * for information about the error. */ char** libcoopgamma_get_crtcs_recv(libcoopgamma_context_t* restrict ctx, libcoopgamma_async_context_t* restrict async) { char* line; char* payload; char* end; int command_ok = 0; size_t i, n, lines, len, length; char** rc; if (check_error(ctx, async)) return NULL; for (;;) { line = next_header(ctx); if (!*line) break; else if (!strcmp(line, "Command: crtc-enumeration")) command_ok = 1; } payload = next_payload(ctx, &n); if (!command_ok || ((n > 0) && (payload[n - 1] != '\n'))) { errno = EBADMSG; copy_errno(ctx); return NULL; } line = payload; end = payload + n; lines = length = 0; while (line != end) { lines += 1; length += len = (size_t)(strchr(line, '\n') + 1 - line); line += len; line[-1] = '\0'; } rc = malloc((lines + 1) * sizeof(char*) + length); if (rc == NULL) { copy_errno(ctx); return NULL; } line = ((char*)rc) + (lines + 1) * sizeof(char*); memcpy(line, payload, length); rc[lines] = NULL; for (i = 0; i < lines; i++) { rc[i] = line; line = strchr(line, '\0') + 1; } return rc; } /** * List all available CRTC:s, synchronous version * * This is a synchronous request function, as such, * you have to ensure that communication is blocking * (default), and that there are not asynchronous * requests waiting, it also means that EINTR:s are * silently ignored and there no wait to cancel the * operation without disconnection from the server * * @param ctx The state of the library, must be connected * @return A `NULL`-terminated list of names. You should only free * the outer pointer, inner pointers are subpointers of the * outer pointer and cannot be freed. `NULL` on error, in * which case `ctx->error` (rather than `errno`) is read * for information about the error. */ char** libcoopgamma_get_crtcs_sync(libcoopgamma_context_t* restrict ctx) { SYNC_CALL(libcoopgamma_get_crtcs_send(ctx, &async), libcoopgamma_get_crtcs_recv(ctx, &async), NULL); } /** * Retrieve information about a CRTC:s gamma ramps, send request part * * Cannot be used before connecting to the server * * @param crtc The name of the CRTC * @param ctx The state of the library, must be connected * @param async Information about the request, that is needed to * identify and parse the response, is stored here * @return Zero on success, -1 on error */ int libcoopgamma_get_gamma_info_send(const char* restrict crtc, libcoopgamma_context_t* restrict ctx, libcoopgamma_async_context_t* restrict async) { #if defined(__GNUC__) && !defined(__clang__) # pragma GCC diagnostic push # pragma GCC diagnostic ignored "-Wnonnull-compare" #endif if ((crtc == NULL) || strchr(crtc, '\n')) { errno = EINVAL; goto fail; } #if defined(__GNUC__) && !defined(__clang__) # pragma GCC diagnostic pop #endif async->message_id = ctx->message_id; SEND_MESSAGE(ctx, NULL, (size_t)0, "Command: get-gamma-info\n" "Message ID: %" PRIu32 "\n" "CRTC: %s\n" "\n", ctx->message_id, crtc); return 0; fail: copy_errno(ctx); return 0; } /** * Retrieve information about a CRTC:s gamma ramps, receive response part * * @param info Output parameter for the information, must be initialised * @param ctx The state of the library, must be connected * @param async Information about the request * @return Zero on success, -1 on error, in which case `ctx->error` * (rather than `errno`) is read for information about the error */ int libcoopgamma_get_gamma_info_recv(libcoopgamma_crtc_info_t* restrict info, libcoopgamma_context_t* restrict ctx, libcoopgamma_async_context_t* restrict async) { char temp[3 * sizeof(size_t) + 1]; char* line; char* value; size_t _n; int have_cooperative = 0; int have_depth = 0; int have_red_size = 0; int have_green_size = 0; int have_blue_size = 0; int have_gamma_support = 0; int bad = 0, r = 0, g = 0; if (check_error(ctx, async)) return -1; info->cooperative = 0; /* Should be in the response, but ... */ for (;;) { line = next_header(ctx); value = strchr(line, ':') + 2; if (!*line) break; else if (strstr(line, "Cooperative: ") == line) { have_cooperative = 1 + !!have_cooperative; if (!strcmp(value, "yes")) info->cooperative = 1; else if (!strcmp(value, "no")) info->cooperative = 0; else bad = 1; } else if (strstr(line, "Depth: ") == line) { have_depth = 1 + !!have_depth; if (!strcmp(value, "8")) info->depth = LIBCOOPGAMMA_UINT8; else if (!strcmp(value, "16")) info->depth = LIBCOOPGAMMA_UINT16; else if (!strcmp(value, "32")) info->depth = LIBCOOPGAMMA_UINT32; else if (!strcmp(value, "64")) info->depth = LIBCOOPGAMMA_UINT64; else if (!strcmp(value, "f")) info->depth = LIBCOOPGAMMA_FLOAT; else if (!strcmp(value, "d")) info->depth = LIBCOOPGAMMA_DOUBLE; else bad = 1; } else if (strstr(line, "Gamma support: ") == line) { have_gamma_support = 1 + !!have_gamma_support; if (!strcmp(value, "yes")) info->supported = LIBCOOPGAMMA_YES; else if (!strcmp(value, "no")) info->supported = LIBCOOPGAMMA_NO; else if (!strcmp(value, "maybe")) info->supported = LIBCOOPGAMMA_MAYBE; else bad = 1; } else if (((r = (strstr(line, "Red size: ") == line))) || ((g = (strstr(line, "Green size: ") == line))) || (strstr(line, "Blue size: ") == line)) { size_t* out; if (r) have_red_size = 1 + !!have_red_size, out = &(info->red_size); else if (g) have_green_size = 1 + !!have_green_size, out = &(info->green_size); else have_blue_size = 1 + !!have_blue_size, out = &(info->blue_size); *out = (size_t)atol(value); sprintf(temp, "%zu", *out); if (strcmp(value, temp)) bad = 1; } } (void) next_payload(ctx, &_n); if (bad || (have_gamma_support != 1)) { errno = EBADMSG; copy_errno(ctx); return -1; } if (info->supported != LIBCOOPGAMMA_NO) if ((have_cooperative > 1) || (have_depth != 1) || (have_gamma_support != 1) || (have_red_size != 1) || (have_green_size != 1) || (have_blue_size != 1)) { errno = EBADMSG; copy_errno(ctx); return -1; } return 0; } /** * Retrieve information about a CRTC:s gamma ramps, synchronous version * * This is a synchronous request function, as such, * you have to ensure that communication is blocking * (default), and that there are not asynchronous * requests waiting, it also means that EINTR:s are * silently ignored and there no wait to cancel the * operation without disconnection from the server * * @param crtc The name of the CRTC * @param info Output parameter for the information, must be initialised * @param ctx The state of the library, must be connected * @return Zero on success, -1 on error, in which case `ctx->error` * (rather than `errno`) is read for information about the error */ int libcoopgamma_get_gamma_info_sync(const char* restrict ctrc, libcoopgamma_crtc_info_t* restrict info, libcoopgamma_context_t* restrict ctx) { SYNC_CALL(libcoopgamma_get_gamma_info_send(ctrc, ctx, &async), libcoopgamma_get_gamma_info_recv(info, ctx, &async), -1); } /** * Retrieve the current gamma ramp adjustments, send request part * * Cannot be used before connecting to the server * * @param query The query to send * @param ctx The state of the library, must be connected * @param async Information about the request, that is needed to * identify and parse the response, is stored here * @return Zero on success, -1 on error */ int libcoopgamma_get_gamma_send(const libcoopgamma_filter_query_t* restrict query, libcoopgamma_context_t* restrict ctx, libcoopgamma_async_context_t* restrict async) { #if defined(__GNUC__) && !defined(__clang__) # pragma GCC diagnostic push # pragma GCC diagnostic ignored "-Wnonnull-compare" #endif if ((query == NULL) || (query->crtc == NULL) || strchr(query->crtc, '\n')) { errno = EINVAL; goto fail; } #if defined(__GNUC__) && !defined(__clang__) # pragma GCC diagnostic pop #endif async->message_id = ctx->message_id; async->coalesce = query->coalesce; SEND_MESSAGE(ctx, NULL, (size_t)0, "Command: get-gamma\n" "Message ID: %" PRIu32 "\n" "CRTC: %s\n" "Coalesce: %s\n" "High priority: %" PRIi64 "\n" "Low priority: %" PRIi64 "\n" "\n", ctx->message_id, query->crtc, query->coalesce ? "yes" : "no", query->high_priority, query->low_priority); return 0; fail: copy_errno(ctx); return -1; } /** * Retrieve the current gamma ramp adjustments, receive response part * * @param table Output for the response, must be initialised * @param ctx The state of the library, must be connected * @param async Information about the request * @return Zero on success, -1 on error, in which case `ctx->error` * (rather than `errno`) is read for information about the error */ int libcoopgamma_get_gamma_recv(libcoopgamma_filter_table_t* restrict table, libcoopgamma_context_t* restrict ctx, libcoopgamma_async_context_t* restrict async) { char temp[3 * sizeof(size_t) + 1]; char* line; char* value; char* payload; size_t i, n, width, clutsize; int have_depth = 0; int have_red_size = 0; int have_green_size = 0; int have_blue_size = 0; int have_tables = 0; int bad = 0, r = 0, g = 0; if (check_error(ctx, async)) return -1; libcoopgamma_filter_table_destroy(table); for (;;) { line = next_header(ctx); value = strchr(line, ':') + 2; if (!*line) break; else if (strstr(line, "Depth: ") == line) { have_depth = 1 + !!have_depth; if (!strcmp(value, "8")) table->depth = LIBCOOPGAMMA_UINT8; else if (!strcmp(value, "16")) table->depth = LIBCOOPGAMMA_UINT16; else if (!strcmp(value, "32")) table->depth = LIBCOOPGAMMA_UINT32; else if (!strcmp(value, "64")) table->depth = LIBCOOPGAMMA_UINT64; else if (!strcmp(value, "f")) table->depth = LIBCOOPGAMMA_FLOAT; else if (!strcmp(value, "d")) table->depth = LIBCOOPGAMMA_DOUBLE; else bad = 1; } else if (((r = (strstr(line, "Red size: ") == line))) || ((g = (strstr(line, "Green size: ") == line))) || (strstr(line, "Blue size: ") == line)) { size_t* out; if (r) have_red_size = 1 + !!have_red_size, out = &(table->red_size); else if (g) have_green_size = 1 + !!have_green_size, out = &(table->green_size); else have_blue_size = 1 + !!have_blue_size, out = &(table->blue_size); *out = (size_t)atol(value); sprintf(temp, "%zu", *out); if (strcmp(value, temp)) bad = 1; } else if (strstr(line, "Tables: ") == line) { have_tables = 1 + have_tables; table->filter_count = (size_t)atol(value); sprintf(temp, "%zu", table->filter_count); if (strcmp(value, temp)) bad = 1; } } payload = next_payload(ctx, &n); if (bad || (have_depth != 1) || (have_red_size != 1) || (have_green_size != 1) || (have_blue_size != 1) || (async->coalesce ? (have_tables > 1) : (have_tables == 0)) || (payload == NULL)) goto bad; switch (table->depth) { case LIBCOOPGAMMA_FLOAT: width = sizeof(float); break; case LIBCOOPGAMMA_DOUBLE: width = sizeof(double); break; default: INTEGRAL_DEPTHS if ((table->depth <= 0) || ((table->depth & 7) != 0)) goto bad; width = (size_t)(table->depth / 8); break; } clutsize = table->red_size + table->green_size + table->blue_size; clutsize *= width; if (async->coalesce) { if (n != clutsize) goto bad; table->filters = malloc(sizeof(*(table->filters))); if (table->filters == NULL) goto fail; table->filters->priority = 0; table->filters->class = NULL; if (libcoopgamma_ramps_initialise_(&(table->filters->ramps), width) < 0) goto fail; memcpy(table->filters->ramps.u8.red, payload, clutsize); } else { size_t off = 0, len; table->filters = calloc(table->filter_count, sizeof(*(table->filters))); if (table->filters == NULL) goto fail; for (i = 0; i < table->filter_count; i++) { if (off + sizeof(int64_t) > n) goto bad; table->filters[i].priority = *(int64_t*)payload; off += sizeof(int64_t); if (memchr(payload + off, '\0', n - off) == NULL) goto bad; len = strlen(payload + off) + 1; table->filters[i].class = malloc(len); if (table->filters[i].class == NULL) goto fail; memcpy(table->filters[i].class, payload + off, len); off += len; if (off + clutsize > n) goto bad; if (libcoopgamma_ramps_initialise_(&(table->filters[i].ramps), width) < 0) goto fail; memcpy(table->filters->ramps.u8.red, payload + off, clutsize); off += clutsize; } if (off != n) goto bad; } return 0; bad: errno = EBADMSG; fail: copy_errno(ctx); return -1; } /** * Retrieve the current gamma ramp adjustments, synchronous version * * This is a synchronous request function, as such, * you have to ensure that communication is blocking * (default), and that there are not asynchronous * requests waiting, it also means that EINTR:s are * silently ignored and there no wait to cancel the * operation without disconnection from the server * * @param query The query to send * @param table Output for the response, must be initialised * @param ctx The state of the library, must be connected * @return Zero on success, -1 on error, in which case `ctx->error` * (rather than `errno`) is read for information about the error */ int libcoopgamma_get_gamma_sync(const libcoopgamma_filter_query_t* restrict query, libcoopgamma_filter_table_t* restrict table, libcoopgamma_context_t* restrict ctx) { SYNC_CALL(libcoopgamma_get_gamma_send(query, ctx, &async), libcoopgamma_get_gamma_recv(table, ctx, &async), -1); } /** * Apply, update, or remove a gamma ramp adjustment, send request part * * Cannot be used before connecting to the server * * @param filter The filter to apply, update, or remove, gamma ramp meta-data must match the CRTC's * @param depth The datatype for the stops in the gamma ramps, must match the CRTC's * @param ctx The state of the library, must be connected * @param async Information about the request, that is needed to * identify and parse the response, is stored here * @return Zero on success, -1 on error */ int libcoopgamma_set_gamma_send(const libcoopgamma_filter_t* restrict filter, libcoopgamma_depth_t depth, libcoopgamma_context_t* restrict ctx, libcoopgamma_async_context_t* restrict async) { const void* payload = NULL; const char* lifespan; char priority[sizeof("Priority: \n") + 3 * sizeof(int64_t)] = {'\0'}; char length [sizeof("Length: \n") + 3 * sizeof(size_t) ] = {'\0'}; size_t payload_size = 0, stopwidth = 0; #if defined(__GNUC__) && !defined(__clang__) # pragma GCC diagnostic push # pragma GCC diagnostic ignored "-Wnonnull-compare" #endif if ((filter == NULL) || (filter->crtc == NULL) || strchr(filter->crtc, '\n') || (filter->class == NULL) || strchr(filter->class, '\n')) { errno = EINVAL; goto fail; } #if defined(__GNUC__) && !defined(__clang__) # pragma GCC diagnostic pop #endif switch (filter->lifespan) { case LIBCOOPGAMMA_REMOVE: lifespan = "remove"; break; case LIBCOOPGAMMA_UNTIL_DEATH: lifespan = "until-death"; break; case LIBCOOPGAMMA_UNTIL_REMOVAL: lifespan = "until-removal"; break; default: errno = EINVAL; goto fail; } switch (depth) { case LIBCOOPGAMMA_FLOAT: stopwidth = sizeof(float); break; case LIBCOOPGAMMA_DOUBLE: stopwidth = sizeof(double); break; default: INTEGRAL_DEPTHS if ((depth <= 0) || ((depth & 7) != 0)) { errno = EINVAL; goto fail; } stopwidth = (size_t)(depth / 8); break; } if (filter->lifespan != LIBCOOPGAMMA_REMOVE) { payload_size = filter->ramps.u8.red_size; payload_size += filter->ramps.u8.green_size; payload_size += filter->ramps.u8.blue_size; payload_size *= stopwidth; payload = filter->ramps.u8.red; sprintf(priority, "Priority: %" PRIi64 "\n", filter->priority); sprintf(length, "Length: %zu\n", payload_size); } async->message_id = ctx->message_id; SEND_MESSAGE(ctx, payload, payload_size, "Command: set-gamma\n" "Message ID: %" PRIu32 "\n" "CRTC: %s\n" "Class: %s\n" "Lifespan: %s\n" "%s" "%s" "\n", ctx->message_id, filter->crtc, filter->class, lifespan, priority, length); return 0; fail: copy_errno(ctx); return -1; } /** * Apply, update, or remove a gamma ramp adjustment, receive response part * * @param ctx The state of the library, must be connected * @param async Information about the request * @return Zero on success, -1 on error, in which case `ctx->error` * (rather than `errno`) is read for information about the error */ int libcoopgamma_set_gamma_recv(libcoopgamma_context_t* restrict ctx, libcoopgamma_async_context_t* restrict async) { size_t _n = 0; if (check_error(ctx, async)) return -(ctx->error.custom || ctx->error.number); while (*next_header(ctx)); (void) next_payload(ctx, &_n); errno = EBADMSG; copy_errno(ctx); return -1; } /** * Apply, update, or remove a gamma ramp adjustment, synchronous version * * This is a synchronous request function, as such, * you have to ensure that communication is blocking * (default), and that there are not asynchronous * requests waiting, it also means that EINTR:s are * silently ignored and there no wait to cancel the * operation without disconnection from the server * * @param filter The filter to apply, update, or remove, gamma ramp meta-data must match the CRTC's * @param depth The datatype for the stops in the gamma ramps, must match the CRTC's * @param ctx The state of the library, must be connected * @return Zero on success, -1 on error, in which case `ctx->error` * (rather than `errno`) is read for information about the error */ int libcoopgamma_set_gamma_sync(const libcoopgamma_filter_t* restrict filter, libcoopgamma_depth_t depth, libcoopgamma_context_t* restrict ctx) { SYNC_CALL(libcoopgamma_set_gamma_send(filter, depth, ctx, &async), libcoopgamma_set_gamma_recv(ctx, &async), -1); } #if defined(__GNUC__) # pragma GCC diagnostic pop #endif