summaryrefslogtreecommitdiff
path: root/util/cairo-fdr/fdr.c
diff options
context:
space:
mode:
Diffstat (limited to 'util/cairo-fdr/fdr.c')
-rw-r--r--util/cairo-fdr/fdr.c331
1 files changed, 0 insertions, 331 deletions
diff --git a/util/cairo-fdr/fdr.c b/util/cairo-fdr/fdr.c
deleted file mode 100644
index 08d9c0113..000000000
--- a/util/cairo-fdr/fdr.c
+++ /dev/null
@@ -1,331 +0,0 @@
-/* cairo-fdr - a 'flight data recorder', a black box, for cairo
- *
- * Copyright © 2009 Chris Wilson
- *
- * 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/>.
- */
-
-#define _GNU_SOURCE
-
-#ifdef HAVE_CONFIG_H
-#include "config.h"
-#endif
-
-#include <cairo.h>
-#include <cairo-script.h>
-#include <cairo-tee.h>
-#include <stdlib.h>
-#include <assert.h>
-#include <signal.h>
-
-#include <dlfcn.h>
-
-static void *_dlhandle = RTLD_NEXT;
-#define DLCALL(name, args...) ({ \
- static typeof (&name) name##_real; \
- if (name##_real == NULL) { \
- name##_real = dlsym (_dlhandle, #name); \
- if (name##_real == NULL && _dlhandle == RTLD_NEXT) { \
- _dlhandle = dlopen ("libcairo.so", RTLD_LAZY); \
- name##_real = dlsym (_dlhandle, #name); \
- assert (name##_real != NULL); \
- } \
- } \
- (*name##_real) (args); \
-})
-
-#define RINGBUFFER_SIZE 16
-static cairo_surface_t *fdr_ringbuffer[RINGBUFFER_SIZE];
-static int fdr_position;
-static int fdr_dump;
-
-static const cairo_user_data_key_t fdr_key;
-
-static void
-fdr_replay_to_script (cairo_surface_t *recording, cairo_device_t *ctx)
-{
- if (recording != NULL) {
- DLCALL (cairo_script_write_comment, ctx, "--- fdr ---", -1);
- DLCALL (cairo_script_from_recording_surface, ctx, recording);
- }
-}
-
-static void
-fdr_dump_ringbuffer (void)
-{
- cairo_device_t *ctx;
- int n;
-
- ctx = DLCALL (cairo_script_create, "/tmp/fdr.trace");
-
- for (n = fdr_position; n < RINGBUFFER_SIZE; n++)
- fdr_replay_to_script (fdr_ringbuffer[n], ctx);
-
- for (n = 0; n < fdr_position; n++)
- fdr_replay_to_script (fdr_ringbuffer[n], ctx);
-
- DLCALL (cairo_device_destroy, ctx);
-}
-
-static void
-fdr_sighandler (int sig)
-{
- fdr_dump = 1;
-}
-
-static void
-fdr_urgent_sighandler (int sig)
-{
- fdr_dump_ringbuffer ();
-}
-
-static void
-fdr_atexit (void)
-{
- if (fdr_dump)
- fdr_dump_ringbuffer ();
-}
-
-static void
-fdr_pending_signals (void)
-{
- static int initialized;
-
- if (! initialized) {
- initialized = 1;
-
- signal (SIGUSR1, fdr_sighandler);
-
- signal (SIGSEGV, fdr_urgent_sighandler);
- signal (SIGABRT, fdr_urgent_sighandler);
- atexit (fdr_atexit);
- }
-
- if (fdr_dump) {
- fdr_dump_ringbuffer ();
- fdr_dump = 0;
- }
-}
-
-static void
-fdr_get_extents (cairo_surface_t *surface,
- cairo_rectangle_t *extents)
-{
- cairo_t *cr;
-
- cr = DLCALL (cairo_create, surface);
- DLCALL (cairo_clip_extents, cr,
- &extents->x, &extents->y, &extents->width, &extents->height);
- DLCALL (cairo_destroy, cr);
-
- extents->width -= extents->x;
- extents->height -= extents->y;
-}
-
-static void
-fdr_surface_destroy (void *surface)
-{
- DLCALL (cairo_surface_destroy, surface);
-}
-
-static void
-fdr_surface_reference (void *surface)
-{
- DLCALL (cairo_surface_reference, surface);
-}
-
-static cairo_surface_t *
-fdr_surface_get_tee (cairo_surface_t *surface)
-{
- return DLCALL (cairo_surface_get_user_data, surface, &fdr_key);
-}
-
-static cairo_surface_t *
-fdr_tee_surface_index (cairo_surface_t *surface, int index)
-{
- return DLCALL (cairo_tee_surface_index, surface, index);
-}
-
-cairo_t *
-cairo_create (cairo_surface_t *surface)
-{
- cairo_surface_t *record, *tee;
-
- fdr_pending_signals ();
-
- tee = fdr_surface_get_tee (surface);
- if (tee == NULL) {
- cairo_rectangle_t extents;
- cairo_content_t content;
-
- fdr_get_extents (surface, &extents);
- content = DLCALL (cairo_surface_get_content, surface);
-
- tee = DLCALL (cairo_tee_surface_create, surface);
- record = DLCALL (cairo_recording_surface_create, content, &extents);
- DLCALL (cairo_tee_surface_add, tee, record);
-
- DLCALL (cairo_surface_set_user_data, surface,
- &fdr_key, tee, fdr_surface_destroy);
- } else {
- int n;
-
- record = fdr_tee_surface_index (tee, 1);
-
- /* update the position of the recording surface in the ringbuffer */
- for (n = 0; n < RINGBUFFER_SIZE; n++) {
- if (record == fdr_ringbuffer[n]) {
- fdr_ringbuffer[n] = NULL;
- break;
- }
- }
- }
-
- fdr_surface_destroy (fdr_ringbuffer[fdr_position]);
- fdr_ringbuffer[fdr_position] = record;
- fdr_position = (fdr_position + 1) % RINGBUFFER_SIZE;
-
- return DLCALL (cairo_create, tee);
-}
-
-static void
-fdr_remove_tee (cairo_surface_t *surface)
-{
- fdr_surface_reference (surface);
- DLCALL (cairo_surface_set_user_data, surface, &fdr_key, NULL, NULL);
- fdr_surface_destroy (surface);
-}
-
-void
-cairo_destroy (cairo_t *cr)
-{
- cairo_surface_t *tee;
-
- tee = DLCALL (cairo_get_target, cr);
- DLCALL (cairo_destroy, cr);
-
- if (DLCALL (cairo_surface_get_reference_count, tee) == 1)
- fdr_remove_tee (fdr_tee_surface_index (tee, 0));
-}
-
-void
-cairo_pattern_destroy (cairo_pattern_t *pattern)
-{
- if (DLCALL (cairo_pattern_get_type, pattern) == CAIRO_PATTERN_TYPE_SURFACE) {
- cairo_surface_t *surface;
-
- if (DLCALL (cairo_pattern_get_surface, pattern, &surface) == CAIRO_STATUS_SUCCESS &&
- DLCALL (cairo_surface_get_type, surface) == CAIRO_SURFACE_TYPE_TEE &&
- DLCALL (cairo_surface_get_reference_count, surface) == 2)
- {
- fdr_remove_tee (fdr_tee_surface_index (surface, 0));
- }
- }
-
- DLCALL (cairo_pattern_destroy, pattern);
-}
-
-cairo_surface_t *
-cairo_get_target (cairo_t *cr)
-{
- cairo_surface_t *tee;
-
- tee = DLCALL (cairo_get_target, cr);
- return fdr_tee_surface_index (tee, 0);
-}
-
-cairo_surface_t *
-cairo_get_group_target (cairo_t *cr)
-{
- cairo_surface_t *tee;
-
- tee = DLCALL (cairo_get_group_target, cr);
- return fdr_tee_surface_index (tee, 0);
-}
-
-cairo_pattern_t *
-cairo_pattern_create_for_surface (cairo_surface_t *surface)
-{
- cairo_surface_t *tee;
-
- tee = fdr_surface_get_tee (surface);
- if (tee != NULL)
- surface = tee;
-
- return DLCALL (cairo_pattern_create_for_surface, surface);
-}
-
-cairo_status_t
-cairo_pattern_get_surface (cairo_pattern_t *pattern,
- cairo_surface_t **surface)
-{
- cairo_status_t status;
- cairo_surface_t *tee;
-
- status = DLCALL (cairo_pattern_get_surface, pattern, surface);
- if (status != CAIRO_STATUS_SUCCESS)
- return status;
-
- tee = fdr_surface_get_tee (*surface);
- if (tee != NULL)
- *surface = tee;
-
- return CAIRO_STATUS_SUCCESS;
-}
-
-void
-cairo_set_source_surface (cairo_t *cr,
- cairo_surface_t *surface,
- double x, double y)
-{
- cairo_surface_t *tee;
-
- tee = fdr_surface_get_tee (surface);
- if (tee != NULL)
- surface = tee;
-
- DLCALL (cairo_set_source_surface, cr, surface, x, y);
-}
-
-cairo_surface_t *
-cairo_surface_create_similar (cairo_surface_t *surface,
- cairo_content_t content,
- int width, int height)
-{
- cairo_surface_t *tee;
-
- tee = fdr_surface_get_tee (surface);
- if (tee != NULL)
- surface = tee;
-
- return DLCALL (cairo_surface_create_similar,
- surface, content, width, height);
-}
-
-cairo_surface_t *
-cairo_surface_create_for_rectangle (cairo_surface_t *surface,
- double x,
- double y,
- double width,
- double height)
-{
- cairo_surface_t *tee;
-
- tee = fdr_surface_get_tee (surface);
- if (tee != NULL)
- surface = tee;
-
- return DLCALL (cairo_surface_create_for_rectangle,
- surface, x, y, width, height);
-}
generated by cgit v1.2.3 (git 2.25.1) at 2024-05-28 19:15:31 +0000