diff options
Diffstat (limited to 'main.c')
| -rw-r--r-- | main.c | 1193 |
1 files changed, 0 insertions, 1193 deletions
@@ -1,1193 +0,0 @@ -#include <stdarg.h> -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <stdint.h> -#include <assert.h> -#include <math.h> - -#include <SDL.h> -#include <SDL_thread.h> -#include <SDL_image.h> -#include <SDL_framerate.h> -#include <SDL_rotozoom.h> -#include <SDL_gfxPrimitives.h> -#include <SDL_gfxBlitFunc.h> - -#include <vlc/vlc.h> -#include <vlc/libvlc_version.h> - -#include <lo/lo.h> - -/* - * Macros - */ -#define NARRAY(ARRAY) \ - (sizeof(ARRAY) / sizeof((ARRAY)[0])) - -#define SDL_MAYBE_LOCK(SURFACE) do { \ - if (SDL_MUSTLOCK(SURFACE)) \ - SDL_LockSurface(SURFACE); \ -} while (0) - -#define SDL_MAYBE_UNLOCK(SURFACE) do { \ - if (SDL_MUSTLOCK(SURFACE)) \ - SDL_UnlockSurface(SURFACE); \ -} while (0) - -#define SDL_FREESURFACE_SAFE(SURFACE) do { \ - if (SURFACE) { \ - SDL_FreeSurface(SURFACE); \ - SURFACE = NULL; \ - } \ -} while (0) - -#define SDL_ERROR(FMT, ...) do { \ - fprintf(stderr, "%s(%d): " FMT ": %s\n", \ - __FILE__, __LINE__, ##__VA_ARGS__, SDL_GetError()); \ -} while (0) - -#define SDL_IMAGE_ERROR(FMT, ...) do { \ - fprintf(stderr, "%s(%d): " FMT ": %s\n", \ - __FILE__, __LINE__, ##__VA_ARGS__, IMG_GetError()); \ -} while (0) - -#define GEO_TYPES "iiii" /* x, y, width, height */ -#define NEW_LAYER_TYPES "is" GEO_TYPES "f" /* position, name, GEO, alpha */ -#define COLOR_TYPES "iii" /* r, g, b */ - -/* - * Default values - */ -#define SCREEN_WIDTH 640 -#define SCREEN_HEIGHT 480 -#define FRAMERATE 20 /* Hz */ - -/* - * Declarations - */ -typedef void (*layer_frame_cb_t)(void *data, SDL_Surface *target); -typedef void (*layer_free_cb_t)(void *data); - -static int layer_insert(int pos, const char *name, void *data, - layer_frame_cb_t frame_cb, layer_free_cb_t free_cb); -static int layer_delete_by_name(const char *name); - -static struct layer_image *layer_image_new(SDL_Rect geo, float opacity, - const char *file); -static void layer_image_geo(struct layer_image *ctx, SDL_Rect geo); -static void layer_image_file(struct layer_image *ctx, const char *file); -static void layer_image_alpha(struct layer_image *ctx, float opacity); -static void layer_image_frame_cb(void *data, SDL_Surface *target); -static void layer_image_free_cb(void *data); - -static struct layer_video *layer_video_new(SDL_Rect geo, float opacity, - const char *url); -static void layer_video_geo(struct layer_video *ctx, SDL_Rect geo); -static void layer_video_url(struct layer_video *ctx, const char *url); -static void layer_video_alpha(struct layer_video *ctx, float opacity); -static void layer_video_rate(struct layer_video *ctx, float rate); -static void layer_video_position(struct layer_video *ctx, float position); -static void layer_video_paused(struct layer_video *ctx, int paused); -static void layer_video_frame_cb(void *data, SDL_Surface *target); -static void layer_video_free_cb(void *data); - -static struct layer_box *layer_box_new(SDL_Rect geo, float opacity, - SDL_Color color); -static void layer_box_geo(struct layer_box *ctx, SDL_Rect geo); -static void layer_box_color(struct layer_box *ctx, SDL_Color color); -static void layer_box_alpha(struct layer_box *ctx, float opacity); -static void layer_box_frame_cb(void *data, SDL_Surface *target); -static void layer_box_free_cb(void *data); - -static SDL_Surface *screen; -static SDL_mutex *render_mutex; -static int config_dump_osc = 0; - -static void -lo_server_thread_add_method_v(lo_server_thread server, const char *types, - lo_method_handler handler, void *data, - const char *fmt, ...) -{ - char buf[255]; - va_list ap; - - va_start(ap, fmt); - vsnprintf(buf, sizeof(buf), fmt, ap); - lo_server_thread_add_method(server, buf, types, handler, data); - va_end(ap); -} - -static void -lo_server_thread_del_method_v(lo_server_thread server, const char *types, const char *fmt, ...) -{ - char buf[255]; - va_list ap; - - va_start(ap, fmt); - vsnprintf(buf, sizeof(buf), fmt, ap); - lo_server_thread_del_method(server, buf, types); - va_end(ap); -} - -static void -osc_error(int num, const char *msg, const char *path) -{ - fprintf(stderr, "liblo server error %d in path %s: %s\n", num, path, msg); -} - -/* catch any incoming messages and display them. returning 1 means that the - * message has not been fully handled and the server should try other methods */ -static int -osc_generic_handler(const char *path, const char *types, lo_arg **argv, - int argc, void *data, - void *user_data __attribute__((unused))) -{ - if (!config_dump_osc) - return 1; - - printf("path: <%s>\n", path); - for (int i = 0; i < argc; i++) { - printf("arg %d '%c' ", i, types[i]); - lo_arg_pp(types[i], argv[i]); - printf("\n"); - } - printf("\n"); - - return 1; -} - -static inline char * -get_layer_name_from_path(const char *path) -{ - /* path is /layer/[name]/... */ - char *name = strdup(path + 7); - *strchr(name, '/') = '\0'; - - return name; -} - -static int -osc_layer_delete(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - lo_server_thread server = user_data; - char *name; - - name = get_layer_name_from_path(path); - layer_delete_by_name(name); - free(name); - - lo_server_thread_del_method(server, path, types); - - return 1; -} - -static inline void -osc_add_layer_delete(lo_server_thread server, const char *name, - lo_method_handler custom_delete) -{ - if (custom_delete) - lo_server_thread_add_method_v(server, "", custom_delete, server, - "/layer/%s/delete", name); - lo_server_thread_add_method_v(server, "", osc_layer_delete, server, - "/layer/%s/delete", name); -} - -static int -osc_image_geo(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_image *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_image_geo(ctx, (SDL_Rect){ - argv[0]->i, argv[1]->i, argv[2]->i, argv[3]->i - }); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_image_alpha(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_image *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_image_alpha(ctx, argv[0]->f); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_image_file(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_image *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_image_file(ctx, &argv[0]->s); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_image_delete(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - lo_server_thread server = user_data; - char *name; - - name = get_layer_name_from_path(path); - - lo_server_thread_del_method_v(server, GEO_TYPES, "/layer/%s/geo", name); - lo_server_thread_del_method_v(server, "f", "/layer/%s/alpha", name); - lo_server_thread_del_method_v(server, "s", "/layer/%s/file", name); - - free(name); - - lo_server_thread_del_method(server, path, types); - - return 1; -} - -static int -osc_image_new(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - lo_server_thread server = user_data; - SDL_Rect geo = { - (Sint16)argv[2]->i, (Sint16)argv[3]->i, - (Uint16)argv[4]->i, (Uint16)argv[5]->i - }; - - struct layer_image *ctx = layer_image_new(geo, argv[6]->f, &argv[7]->s); - - SDL_LockMutex(render_mutex); - if (layer_insert(argv[0]->i, &argv[1]->s, ctx, - layer_image_frame_cb, layer_image_free_cb)) - return 0; - SDL_UnlockMutex(render_mutex); - - lo_server_thread_add_method_v(server, GEO_TYPES, osc_image_geo, ctx, - "/layer/%s/geo", &argv[1]->s); - lo_server_thread_add_method_v(server, "f", osc_image_alpha, ctx, - "/layer/%s/alpha", &argv[1]->s); - lo_server_thread_add_method_v(server, "s", osc_image_file, ctx, - "/layer/%s/file", &argv[1]->s); - - osc_add_layer_delete(server, &argv[1]->s, osc_image_delete); - - return 0; -} - -static int -osc_video_geo(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_video *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_video_geo(ctx, (SDL_Rect){ - argv[0]->i, argv[1]->i, argv[2]->i, argv[3]->i - }); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_video_alpha(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_video *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_video_alpha(ctx, argv[0]->f); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_video_url(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_video *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_video_url(ctx, &argv[0]->s); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_video_rate(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_video *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_video_rate(ctx, argv[0]->f); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_video_position(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_video *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_video_position(ctx, argv[0]->f); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_video_paused(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_video *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_video_paused(ctx, argv[0]->i); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_video_delete(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - lo_server_thread server = user_data; - char *name; - - name = get_layer_name_from_path(path); - - lo_server_thread_del_method_v(server, GEO_TYPES, "/layer/%s/geo", name); - lo_server_thread_del_method_v(server, "f", "/layer/%s/alpha", name); - lo_server_thread_del_method_v(server, "s", "/layer/%s/url", name); - lo_server_thread_del_method_v(server, "f", "/layer/%s/rate", name); - lo_server_thread_del_method_v(server, "f", "/layer/%s/position", name); - lo_server_thread_del_method_v(server, "i", "/layer/%s/paused", name); - - free(name); - - lo_server_thread_del_method(server, path, types); - - return 1; -} - -static int -osc_video_new(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - lo_server_thread server = user_data; - SDL_Rect geo = { - (Sint16)argv[2]->i, (Sint16)argv[3]->i, - (Uint16)argv[4]->i, (Uint16)argv[5]->i - }; - - struct layer_video *ctx = layer_video_new(geo, argv[6]->f, &argv[7]->s); - - SDL_LockMutex(render_mutex); - if (layer_insert(argv[0]->i, &argv[1]->s, ctx, - layer_video_frame_cb, layer_video_free_cb)) - return 0; - SDL_UnlockMutex(render_mutex); - - lo_server_thread_add_method_v(server, GEO_TYPES, osc_video_geo, ctx, - "/layer/%s/geo", &argv[1]->s); - lo_server_thread_add_method_v(server, "f", osc_video_alpha, ctx, - "/layer/%s/alpha", &argv[1]->s); - lo_server_thread_add_method_v(server, "s", osc_video_url, ctx, - "/layer/%s/url", &argv[1]->s); - lo_server_thread_add_method_v(server, "f", osc_video_rate, ctx, - "/layer/%s/rate", &argv[1]->s); - lo_server_thread_add_method_v(server, "f", osc_video_position, ctx, - "/layer/%s/position", &argv[1]->s); - lo_server_thread_add_method_v(server, "i", osc_video_paused, ctx, - "/layer/%s/paused", &argv[1]->s); - osc_add_layer_delete(server, &argv[1]->s, osc_video_delete); - - return 0; -} - -static int -osc_box_geo(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_box *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_box_geo(ctx, (SDL_Rect){ - argv[0]->i, argv[1]->i, argv[2]->i, argv[3]->i - }); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_box_alpha(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_box *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_box_alpha(ctx, argv[0]->f); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_box_color(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - struct layer_box *ctx = user_data; - - SDL_LockMutex(render_mutex); - layer_box_color(ctx, (SDL_Color){argv[0]->i, argv[1]->i, argv[2]->i}); - SDL_UnlockMutex(render_mutex); - return 0; -} - -static int -osc_box_delete(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - lo_server_thread server = user_data; - char *name; - - name = get_layer_name_from_path(path); - - lo_server_thread_del_method_v(server, GEO_TYPES, "/layer/%s/geo", name); - lo_server_thread_del_method_v(server, "f", "/layer/%s/alpha", name); - lo_server_thread_del_method_v(server, COLOR_TYPES, "/layer/%s/color", name); - - free(name); - - lo_server_thread_del_method(server, path, types); - - return 1; -} - -static int -osc_box_new(const char *path, const char *types, lo_arg **argv, - int argc, void *data, void *user_data) -{ - lo_server_thread server = user_data; - SDL_Rect geo = { - (Sint16)argv[2]->i, (Sint16)argv[3]->i, - (Uint16)argv[4]->i, (Uint16)argv[5]->i - }; - SDL_Color color = { - (Uint8)argv[7]->i, (Uint8)argv[8]->i, (Uint8)argv[9]->i - }; - - struct layer_box *ctx = layer_box_new(geo, argv[6]->f, color); - - SDL_LockMutex(render_mutex); - if (layer_insert(argv[0]->i, &argv[1]->s, ctx, - layer_box_frame_cb, layer_box_free_cb)) - return 0; - SDL_UnlockMutex(render_mutex); - - lo_server_thread_add_method_v(server, GEO_TYPES, osc_box_geo, ctx, - "/layer/%s/geo", &argv[1]->s); - lo_server_thread_add_method_v(server, "f", osc_box_alpha, ctx, - "/layer/%s/alpha", &argv[1]->s); - lo_server_thread_add_method_v(server, COLOR_TYPES, osc_box_color, ctx, - "/layer/%s/color", &argv[1]->s); - - osc_add_layer_delete(server, &argv[1]->s, osc_box_delete); - - return 0; -} - -static inline lo_server_thread -osc_init(const char *port) -{ - lo_server_thread server = lo_server_thread_new(port, osc_error); - - lo_server_thread_add_method(server, NULL, NULL, osc_generic_handler, NULL); - - lo_server_thread_add_method(server, "/layer/new/image", NEW_LAYER_TYPES "s", - osc_image_new, server); - lo_server_thread_add_method(server, "/layer/new/video", NEW_LAYER_TYPES "s", - osc_video_new, server); - lo_server_thread_add_method(server, "/layer/new/box", NEW_LAYER_TYPES COLOR_TYPES, - osc_box_new, server); - - return server; -} - -/* - * Image layers - */ -struct layer_image { - SDL_Surface *surf_alpha; /* with per-surface alpha */ - SDL_Surface *surf_scaled; /* scaled image */ - SDL_Surface *surf; /* original image */ - - SDL_Rect geo; - float alpha; -}; - -static struct layer_image * -layer_image_new(SDL_Rect geo, float opacity, const char *file) -{ - struct layer_image *ctx = malloc(sizeof(struct layer_image)); - - if (!ctx) - return NULL; - - memset(ctx, 0, sizeof(*ctx)); - - layer_image_alpha(ctx, opacity); - layer_image_geo(ctx, geo); - layer_image_file(ctx, file); - - return ctx; -} - -static void -layer_image_geo(struct layer_image *ctx, SDL_Rect geo) -{ - if (!geo.x && !geo.y && !geo.w && !geo.h) - ctx->geo = (SDL_Rect){0, 0, screen->w, screen->h}; - else - ctx->geo = geo; - - if (!ctx->surf) - return; - - if (ctx->surf_scaled && - ctx->surf_scaled->w == ctx->geo.w && - ctx->surf_scaled->h == ctx->geo.h) - return; - - SDL_FREESURFACE_SAFE(ctx->surf_alpha); - SDL_FREESURFACE_SAFE(ctx->surf_scaled); - - if (ctx->surf->w != ctx->geo.w || ctx->surf->h != ctx->geo.h) { - ctx->surf_scaled = zoomSurface(ctx->surf, - (double)ctx->geo.w/ctx->surf->w, - (double)ctx->geo.h/ctx->surf->h, - SMOOTHING_ON); - } - - layer_image_alpha(ctx, ctx->alpha); -} - -static void -layer_image_file(struct layer_image *ctx, const char *file) -{ - SDL_FREESURFACE_SAFE(ctx->surf_alpha); - SDL_FREESURFACE_SAFE(ctx->surf_scaled); - SDL_FREESURFACE_SAFE(ctx->surf); - - if (!file || !*file) - return; - - ctx->surf = IMG_Load(file); - if (!ctx->surf) { - SDL_IMAGE_ERROR("IMG_Load"); - exit(EXIT_FAILURE); - } - - layer_image_geo(ctx, ctx->geo); -} - -#if 0 - -static inline void -rgba_blit_with_alpha(SDL_Surface *src_surf, SDL_Surface *dst_surf, Uint8 alpha) -{ - SDL_FillRect(dst_surf, NULL, - SDL_MapRGBA(dst_surf->format, - 0, 0, 0, SDL_ALPHA_TRANSPARENT)); - SDL_gfxBlitRGBA(src_surf, NULL, dst_surf, NULL); - SDL_gfxMultiplyAlpha(dst_surf, alpha); -} - -#else - -static inline void -rgba_blit_with_alpha(SDL_Surface *src_surf, SDL_Surface *dst_surf, Uint8 alpha) -{ - Uint8 *src = src_surf->pixels; - Uint8 *dst = dst_surf->pixels; - SDL_PixelFormat *fmt = src_surf->format; - - int inc = fmt->BytesPerPixel; - int len = src_surf->w * src_surf->h; - - SDL_MAYBE_LOCK(src_surf); - SDL_MAYBE_LOCK(dst_surf); - - GFX_DUFFS_LOOP4({ - register Uint32 pixel; - register int a; - - pixel = *(Uint32 *)src; - a = ((pixel & fmt->Amask) >> fmt->Ashift) << fmt->Aloss; - a = (a*alpha)/SDL_ALPHA_OPAQUE; - a = (a << fmt->Aloss) << fmt->Ashift; - pixel &= ~fmt->Amask; - pixel |= a; - *(Uint32 *)dst = pixel; - - src += inc; - dst += inc; - }, len) - - SDL_MAYBE_UNLOCK(dst_surf); - SDL_MAYBE_UNLOCK(src_surf); -} - -#endif - -static void -layer_image_alpha(struct layer_image *ctx, float opacity) -{ - SDL_Surface *surf = ctx->surf_scaled ? : ctx->surf; - Uint8 alpha = (Uint8)ceilf(opacity*SDL_ALPHA_OPAQUE); - - ctx->alpha = opacity; - - if (!surf) - return; - - if (!surf->format->Amask) { - if (alpha == SDL_ALPHA_OPAQUE) - SDL_SetAlpha(surf, 0, 0); - else - SDL_SetAlpha(surf, SDL_SRCALPHA | SDL_RLEACCEL, alpha); - - return; - } - - if (alpha == SDL_ALPHA_OPAQUE) { - SDL_FREESURFACE_SAFE(ctx->surf_alpha); - return; - } - - if (!ctx->surf_alpha) { - ctx->surf_alpha = SDL_CreateRGBSurface(surf->flags, - surf->w, surf->h, - surf->format->BitsPerPixel, - surf->format->Rmask, - surf->format->Gmask, - surf->format->Bmask, - surf->format->Amask); - } - - if (alpha == SDL_ALPHA_TRANSPARENT) { - SDL_FillRect(ctx->surf_alpha, NULL, - SDL_MapRGBA(ctx->surf_alpha->format, - 0, 0, 0, SDL_ALPHA_TRANSPARENT)); - } else { - rgba_blit_with_alpha(surf, ctx->surf_alpha, alpha); - } -} - -static void -layer_image_frame_cb(void *data, SDL_Surface *target) -{ - struct layer_image *ctx = data; - - if (!ctx->surf) - return; - - SDL_BlitSurface(ctx->surf_alpha ? : ctx->surf_scaled ? : ctx->surf, - NULL, target, &ctx->geo); -} - -static void -layer_image_free_cb(void *data) -{ - struct layer_image *ctx = data; - - SDL_FREESURFACE_SAFE(ctx->surf_alpha); - SDL_FREESURFACE_SAFE(ctx->surf_scaled); - SDL_FREESURFACE_SAFE(ctx->surf); - - free(ctx); -} - -/* - * Video layer - */ -struct layer_video { - libvlc_instance_t *vlcinst; - libvlc_media_player_t *mp; - - SDL_Surface *surf; - SDL_mutex *mutex; - - SDL_Rect geo; - float alpha; - - float rate; - int paused; -}; - -static void * -layer_video_lock_cb(void *data, void **p_pixels) -{ - struct layer_video *ctx = data; - - SDL_LockMutex(ctx->mutex); - SDL_MAYBE_LOCK(ctx->surf); - *p_pixels = ctx->surf->pixels; - - return NULL; /* picture identifier, not needed here */ -} - -static void -layer_video_unlock_cb(void *data, void *id, void *const *p_pixels) -{ - struct layer_video *ctx = data; - - assert(id == NULL); /* picture identifier, not needed here */ - - SDL_MAYBE_UNLOCK(ctx->surf); - SDL_UnlockMutex(ctx->mutex); -} - -static void -layer_video_display_cb(void *data __attribute__((unused)), void *id) -{ - /* VLC wants to display the video */ - assert(id == NULL); /* picture identifier, not needed here */ -} - -static struct layer_video * -layer_video_new(SDL_Rect geo, float opacity, const char *url) -{ - char const *vlc_argv[] = { - "--no-audio", /* skip any audio track */ - "--no-xlib" /* tell VLC to not use Xlib */ - }; - struct layer_video *ctx = malloc(sizeof(struct layer_video)); - - if (!ctx) - return NULL; - - memset(ctx, 0, sizeof(*ctx)); - - layer_video_geo(ctx, geo); - layer_video_alpha(ctx, opacity); - layer_video_rate(ctx, 1.); - layer_video_paused(ctx, 1); - - ctx->mutex = SDL_CreateMutex(); - ctx->vlcinst = libvlc_new(NARRAY(vlc_argv), vlc_argv); - ctx->mp = NULL; - - layer_video_url(ctx, url); - - return ctx; -} - -static void -layer_video_geo(struct layer_video *ctx, SDL_Rect geo) -{ - if (!geo.x && !geo.y && !geo.w && !geo.h) - ctx->geo = (SDL_Rect){0, 0, screen->w, screen->h}; - else - ctx->geo = geo; -} - -#if LIBVLC_VERSION_INT < LIBVLC_VERSION(2,0,0,0) - -/* - * libvlc_video_get_size() cannot be used before playback has started and - * libvlc_media_get_tracks_info() is broken in libVLC v1.x.x so we just - * use the screen size on those versions (results in unnecessary scaling). - */ -static inline void -media_get_video_size(libvlc_media_t *media, - unsigned int *width, unsigned int *height) -{ - *width = screen->w; - *height = screen->h; -} - -#else - -static inline void -media_get_video_size(libvlc_media_t *media, - unsigned int *width, unsigned int *height) -{ - libvlc_media_track_info_t *tracks = NULL; - int num_tracks; - - *width = *height = 0; - - libvlc_media_parse(media); - - num_tracks = libvlc_media_get_tracks_info(media, &tracks); - for (int i = 0; i < num_tracks; i++) { - if (tracks[i].i_type == libvlc_track_video) { - *width = tracks[i].u.video.i_width; - *height = tracks[i].u.video.i_height; - break; - } - } - - free(tracks); - - assert(*width && *height); -} - -#endif - -static void -layer_video_url(struct layer_video *ctx, const char *url) -{ - libvlc_media_t *m; - unsigned int width, height; - - SDL_FREESURFACE_SAFE(ctx->surf); - - if (ctx->mp) { - libvlc_media_player_release(ctx->mp); - ctx->mp = NULL; - } - - if (!url || !*url) - return; - - m = libvlc_media_new_location(ctx->vlcinst, url); - ctx->mp = libvlc_media_player_new_from_media(m); - media_get_video_size(m, &width, &height); - libvlc_media_release(m); - - /* - * Cannot change buffer dimensions on the fly, so we let - * libVLC render into a statically sized buffer and do the resizing - * on our own. - * We use the original video size so libVLC does not have to do - * unnecessary scaling. - */ - ctx->surf = SDL_CreateRGBSurface(SDL_HWSURFACE, width, height, - 16, 0x001f, 0x07e0, 0xf800, 0); - - libvlc_video_set_callbacks(ctx->mp, - layer_video_lock_cb, layer_video_unlock_cb, - layer_video_display_cb, - ctx); - libvlc_video_set_format(ctx->mp, "RV16", - ctx->surf->w, ctx->surf->h, - ctx->surf->pitch); - - layer_video_rate(ctx, ctx->rate); - layer_video_paused(ctx, ctx->paused); -} - -static void -layer_video_alpha(struct layer_video *ctx, float opacity) -{ - ctx->alpha = opacity; -} - -static void -layer_video_rate(struct layer_video *ctx, float rate) -{ - ctx->rate = rate; - - if (ctx->mp) - libvlc_media_player_set_rate(ctx->mp, rate); -} - -static void -layer_video_position(struct layer_video *ctx, float position) -{ - if (ctx->mp) - libvlc_media_player_set_position(ctx->mp, position); -} - -static void -layer_video_paused(struct layer_video *ctx, int paused) -{ - ctx->paused = paused; - - if (!ctx->mp) - return; - -#if 0 - libvlc_media_player_set_pause(ctx->mp, paused); -#else - int playing = libvlc_media_player_is_playing(ctx->mp); - if (playing && paused) - libvlc_media_player_pause(ctx->mp); - else if (!playing && !paused) - libvlc_media_player_play(ctx->mp); -#endif -} - -static void -layer_video_frame_cb(void *data, SDL_Surface *target) -{ - struct layer_video *ctx = data; - Uint8 alpha = (Uint8)ceilf(ctx->alpha*SDL_ALPHA_OPAQUE); - - if (!ctx->surf) - return; - - if (ctx->surf->w != ctx->geo.w || ctx->surf->h != ctx->geo.h) { - SDL_Surface *surf_scaled; - - SDL_LockMutex(ctx->mutex); - surf_scaled = zoomSurface(ctx->surf, - (double)ctx->geo.w/ctx->surf->w, - (double)ctx->geo.h/ctx->surf->h, - SMOOTHING_ON); - SDL_UnlockMutex(ctx->mutex); - - if (alpha < SDL_ALPHA_OPAQUE) - SDL_SetAlpha(surf_scaled, SDL_SRCALPHA | SDL_RLEACCEL, alpha); - - SDL_BlitSurface(surf_scaled, NULL, target, &ctx->geo); - SDL_FreeSurface(surf_scaled); - } else { - if (alpha == SDL_ALPHA_OPAQUE) - SDL_SetAlpha(ctx->surf, 0, 0); - else - SDL_SetAlpha(ctx->surf, SDL_SRCALPHA | SDL_RLEACCEL, alpha); - - SDL_LockMutex(ctx->mutex); - SDL_BlitSurface(ctx->surf, NULL, target, &ctx->geo); - SDL_UnlockMutex(ctx->mutex); - } -} - -static void -layer_video_free_cb(void *data) -{ - struct layer_video *ctx = data; - - if (ctx->mp) - libvlc_media_player_release(ctx->mp); - libvlc_release(ctx->vlcinst); - SDL_DestroyMutex(ctx->mutex); - if (ctx->surf) - SDL_FreeSurface(ctx->surf); - - free(ctx); -} - -/* - * Box layer - */ -struct layer_box { - Sint16 x1, y1, x2, y2; - Uint8 r, g, b, a; -}; - -static struct layer_box * -layer_box_new(SDL_Rect geo, float opacity, SDL_Color color) -{ - struct layer_box *ctx = malloc(sizeof(struct layer_box)); - - if (ctx) { - layer_box_geo(ctx, geo); - layer_box_color(ctx, color); - layer_box_alpha(ctx, opacity); - } - - return ctx; -} - -static void -layer_box_geo(struct layer_box *ctx, SDL_Rect geo) -{ - ctx->x1 = geo.x; - ctx->y1 = geo.y; - ctx->x2 = geo.x + geo.w; - ctx->y2 = geo.y + geo.h; -} - -static void -layer_box_color(struct layer_box *ctx, SDL_Color color) -{ - ctx->r = color.r; - ctx->g = color.g; - ctx->b = color.b; -} - -static void -layer_box_alpha(struct layer_box *ctx, float opacity) -{ - ctx->a = (Uint8)ceilf(opacity*SDL_ALPHA_OPAQUE); -} - -static void -layer_box_frame_cb(void *data, SDL_Surface *target) -{ - struct layer_box *ctx = data; - - boxRGBA(target, ctx->x1, ctx->y1, - ctx->x2 ? : target->w, ctx->y2 ? : target->h, - ctx->r, ctx->g, ctx->b, ctx->a); -} - -static void -layer_box_free_cb(void *data) -{ - struct layer_box *ctx = data; - - free(ctx); -} - -static inline void -sdl_process_events(void) -{ - SDL_Event event; - - while (SDL_PollEvent(&event)) { - switch (event.type) { - case SDL_KEYDOWN: - switch (event.key.keysym.sym) { - case SDLK_F11: - if (!SDL_WM_ToggleFullScreen(screen)) { - SDL_ERROR("SDL_WM_ToggleFullScreen"); - exit(EXIT_FAILURE); - } - break; - - case SDLK_F10: - SDL_ShowCursor(!SDL_ShowCursor(SDL_QUERY)); - break; - - case SDLK_F9: - config_dump_osc ^= 1; - break; - - case SDLK_ESCAPE: - exit(EXIT_SUCCESS); - - default: - break; - } - break; - - case SDL_QUIT: - exit(EXIT_SUCCESS); - - default: - break; - } - } -} - -struct layer { - struct layer *next; - - char *name; - - void *data; - layer_frame_cb_t frame_cb; - layer_free_cb_t free_cb; -}; -static struct layer layers_head = {NULL}; - -#define FOREACH_LAYER(VAR) \ - for (struct layer *VAR = layers_head.next; VAR; VAR = VAR->next) - -static int -layer_insert(int pos, const char *name, void *data, - layer_frame_cb_t frame_cb, layer_free_cb_t free_cb) -{ - struct layer *new, *cur; - - new = malloc(sizeof(struct layer)); - if (!new) - return -1; - - new->name = strdup(name); - if (!new->name) { - free(new); - return -1; - } - new->data = data; - new->frame_cb = frame_cb; - new->free_cb = free_cb; - - for (cur = &layers_head; cur->next && pos; cur = cur->next, pos--); - new->next = cur->next; - cur->next = new; - - return 0; -} - -static int -layer_delete_by_name(const char *name) -{ - for (struct layer *cur = &layers_head; cur->next; cur = cur->next) { - if (!strcmp(cur->next->name, name)) { - struct layer *l = cur->next; - - cur->next = l->next; - - l->free_cb(l->data); - free(l->name); - free(l); - - return 0; - } - } - - return -1; -} - -int -main(int argc, char **argv) -{ - lo_server_thread osc_server; - FPSmanager fpsm; - - osc_server = osc_init("7770"); - if (!osc_server) - return EXIT_FAILURE; - - if (SDL_Init(SDL_INIT_VIDEO)) { - SDL_ERROR("SDL_Init"); - return EXIT_FAILURE; - } - atexit(SDL_Quit); - - SDL_WM_SetCaption("OSC Graphics", NULL); - - screen = SDL_SetVideoMode(SCREEN_WIDTH, SCREEN_HEIGHT, 32, - SDL_HWSURFACE | SDL_DOUBLEBUF); - if (screen == NULL) { - SDL_ERROR("SDL_SetVideoMode"); - return EXIT_FAILURE; - } - - render_mutex = SDL_CreateMutex(); - lo_server_thread_start(osc_server); - - SDL_initFramerate(&fpsm); - SDL_setFramerate(&fpsm, FRAMERATE); - - for (;;) { - sdl_process_events(); - - SDL_FillRect(screen, NULL, SDL_MapRGB(screen->format, 0, 0, 0)); - - SDL_LockMutex(render_mutex); - FOREACH_LAYER(cur) - cur->frame_cb(cur->data, screen); - SDL_UnlockMutex(render_mutex); - - SDL_Flip(screen); - SDL_framerateDelay(&fpsm); - } - - /* never reached */ - return EXIT_FAILURE; -} |