/*
 *  Copyright (C) 2010 Vikram Ambrose <noel.ambrose@gmail.com>
 *
 *  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/>.
*/


/* Compile with:
 * gcc -Wall -g `pkg-config --cflags --libs gtk+-2.0 libxine`  gtkxine.c -o gtkxine */

#include <stdio.h>
#include <string.h>

#include <xine.h>
#include <xine/xineutils.h>

#include <gdk/gdkx.h>
#include <gtk/gtk.h>


/* Some default sizes for the initial window */
#define DEFAULT_WIDTH    320
#define DEFAULT_HEIGHT    240

/* Help message string */
#define HELP_MESSAGE    "Options:\n\
-ao <ao name>\tAudio output plugin name (default = alsa).\n\
-vo <vo name>\tVideo output plugin name (default = Xv).\n"
   
/* Xine Session data structure */
typedef struct{
    /* Basic xine stuff */
    xine_t              *handle;
    xine_stream_t       *stream;
    xine_video_port_t   *vo_port;
    xine_audio_port_t   *ao_port;
    xine_event_queue_t  *event_queue;

    /* Driver strings eg. "alsa", "Xv", etc.. */
    char *vo_driver;
    char *ao_driver;

    /* Song/Movie path */
    char *mrl;
   
    /* XLib XID integer */
    Window window;
    /* Basic data struct required for use with XINE_VISUAL_TYPE_X11  */
    x11_visual_t       vis;
   
    /* Geomtry available to xine and requested */
    int video_canhave_width;
    int video_canhave_height;
    int video_wants_width;
    int video_wants_height;
}XINE_SESSION;

/* Shuts down libxine */
int quit_xine(XINE_SESSION *s){
    printf("quit xine\n");
    xine_close(s->stream);
    xine_event_dispose_queue(s->event_queue);
    xine_dispose(s->stream);
    if(s->ao_port) xine_close_audio_driver(s->handle, s->ao_port); 

    /* The video belongs to gtk, not you, silly xine */
    //xine_close_video_driver(s->handle, s->vo_port); 

    xine_exit(s->handle);
    return 0;
}

/* GtkWindow Destroy callback */
void quit_program(GtkWidget *blah, gpointer data){
    quit_xine(data);
    printf("quit gtk\n");
    gtk_main_quit();
}

/* Just a typedef to reduce typing when passing */
typedef void (*FRAME_OUTPUT_CALLBACK)(void *data, int video_width, int video_height,
                double video_pixel_aspect, int *dest_x, int *dest_y,
                int    *dest_width,        int *dest_height,
                double *dest_pixel_aspect, int *win_x, int *win_y);

/* Used to resize the video area when the user resizes the window */
static void on_size_allocate_tadeboro_hack(GtkWidget *widget, GtkAllocation *alloc,gpointer data){
    XINE_SESSION *s = data;
    s->video_canhave_width = alloc->width;
    s->video_canhave_height = alloc->height;

    /* http://tadeboro.blogspot.com/2009/05/wrapping-adn-resizing-gtklabel.html */
    /* This is a little bit of a hack. See link above for details.
     * We are basically telling the parent window that we want
     * all the space its got for us, instead of how big we really are */
//    gtk_widget_set_size_request(widget,video_wants_width,video_wants_height );
        gtk_widget_set_size_request(widget,s->video_canhave_width-2,s->video_canhave_height-2 );
}

/* Standard frame_output_cb prototype as defined in xine.h */
static void frame_output_cb(void *data, int video_width, int video_height,
                double video_pixel_aspect, int *dest_x, int *dest_y,
                int    *dest_width,        int *dest_height,
                double *dest_pixel_aspect, int *win_x, int *win_y) {
    XINE_SESSION *s = data;
    *dest_x            = 0;
    *dest_y            = 0;
    *win_x             = 0;
    *win_y             = 0;
    s->video_wants_width = video_width;
    s->video_wants_height = video_height;

    /* Here we tell xine to draw the video to make best use of
     * the space given to it, */
    *dest_width = s->video_canhave_width;
    *dest_height = s->video_canhave_height;

    /* ... but force xine to maintaine the video's original aspect ratio
     * and not that of the actual GtkDrawingArea */
    //*dest_pixel_aspect = (float)video_canhave_height / (float) video_canhave_width;
    *dest_pixel_aspect = video_pixel_aspect;
}

/* Standard event listener prototype as defined in xine.h */
static void event_listener(void *user_data, const xine_event_t *event) {
    switch(event->type) {
    case XINE_EVENT_UI_PLAYBACK_FINISHED:
        printf("playback finished\nQuiting...");   
        quit_program(NULL,user_data);
        break;
    }
}
 
/* Creates a xine session */
void initialise_xine(XINE_SESSION *s){
    char configfile[128];
    printf("initialise_xine\n");
    s->handle = xine_new();
    sprintf(configfile, "%s/%s", xine_get_homedir(), ".xine/config");
    xine_config_load(s->handle, configfile);
    xine_init(s->handle);
    s->video_canhave_width=DEFAULT_WIDTH;
    s->video_canhave_height=DEFAULT_HEIGHT;
    s->video_wants_width=50;
    s->video_wants_height=40;
}

/* Attaches the GtkDrawingArea to the xine video output */
int connect_xine_to_gtk(XINE_SESSION *s, GtkDrawingArea *drawing_area,
                    FRAME_OUTPUT_CALLBACK cb,
                    void *cb_user_data){
    printf("connect_xine_to_gtk\n");

    s->vis.display = GDK_WINDOW_XDISPLAY(GTK_WIDGET(drawing_area)->window);
    s->vis.screen  = GDK_SCREEN_XNUMBER(gtk_widget_get_screen(GTK_WIDGET(drawing_area)));
    s->vis.d       = GDK_WINDOW_XID(GTK_WIDGET(drawing_area)->window);
    s->window      = GDK_WINDOW_XID(GTK_WIDGET(drawing_area)->window);
    s->vis.frame_output_cb   = cb;
    s->vis.user_data         = cb_user_data;

    /* The magic one liner 
     * Hopefully some of the boiler plate above can be accpeted into
     * libxine one day as part of XINE_VISUAL_TYPE_GTK */
    s->vo_port = xine_open_video_driver(s->handle,
            s->vo_driver,
            XINE_VISUAL_TYPE_X11,
            (void *) &s->vis);

    if(s->vo_port== NULL){
        printf("I'm unable to initialize '%s' video driver. Giving up.\n", s->vo_driver);
        return 1;
    }
    xine_port_send_gui_data (s->vo_port,XINE_GUI_SEND_DRAWABLE_CHANGED,( void *) s->window);
    xine_port_send_gui_data (s->vo_port,XINE_GUI_SEND_VIDEOWIN_VISIBLE,(void *)1);
    return 0;
}

/* Opens up an audio port */
int connect_xine_to_audio(XINE_SESSION *s){
    printf("connect_xine_to_audio\n");
    s->ao_port = xine_open_audio_driver(s->handle , s->ao_driver, NULL);
    return (s->ao_port) ? 0 : 1;
}

/* Opens up a file stream and sets up the event handler */
int connect_xine_to_file(XINE_SESSION *s){
    printf("connect_xine_to_file\n");
    s->stream = xine_stream_new(s->handle, s->ao_port, s->vo_port);
    s->event_queue = xine_event_new_queue(s->stream);
    xine_event_create_listener_thread(s->event_queue, event_listener, s);
    xine_open(s->stream,s->mrl);
    return 0;
}

/* Starts stream playback */
int start_xine_playback(XINE_SESSION *s){
    printf("start_xine_playback\n");
    xine_play(s->stream, 0, 0);
    return 0;
}

/* GtkButton clicked callback function to start playback */
void on_play_clicked(GtkWidget *widget, gpointer data){
    start_xine_playback((XINE_SESSION*)data);
}

int main(int argc, char **argv) {
    int i;
    int rv;
    GtkWidget *win;
    GtkWidget *vid_win;
    GtkWidget *vbox;
    GtkWidget *play_button;
    XINE_SESSION xine;

    /* Initialise to some sane defaults */
    xine.vo_driver = "auto";
    xine.ao_driver = "auto";
    xine.mrl = NULL;

printf("==== GTK Xine Example ==== (Jan-2010)\n\
by Vikram Ambrose <noel.ambrose%cgmail.com>\n",'@');

    if(argc <= 1) {
        printf("Specify a file to play\n");
        return 1;
    }
 
    if(argc > 1) {
        for(i = 1; i < argc; i++) {
            if(!strcmp(argv[i], "-vo")) {
                xine.vo_driver = argv[++i];
            }else if(!strcmp(argv[i], "-ao")) {
                xine.ao_driver = argv[++i];
            }else if((!strcmp(argv[i], "-h")) || (!strcmp(argv[i], "--help"))) {
                printf(HELP_MESSAGE);
            return 0;
            }else {
                xine.mrl = argv[i];
            }
        }
    }else xine.mrl = argv[1];

    /* This is important.
     * Could be replaced with Gtk stuff if necessary changes are made
     * in libxine */
    if(!XInitThreads()) {
        printf("XInitThreads() failed\n");
        return 1;
    }

    /*** GTK INIT ***//*
 *  Copyright (C) 2010 Vikram Ambrose <noel.ambrose@gmail.com>
 *
 *  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/>.
*/


/* Compile with:
 * gcc -Wall -g `pkg-config --cflags --libs gtk+-2.0 libxine`  gtkxine.c -o gtkxine */

#include <stdio.h>
#include <string.h>

#include <xine.h>
#include <xine/xineutils.h>

#include <gdk/gdkx.h>
#include <gtk/gtk.h>


/* Some default sizes for the initial window */
#define DEFAULT_WIDTH    320
#define DEFAULT_HEIGHT    240

/* Help message string */
#define HELP_MESSAGE    "Options:\n\
-ao <ao name>\tAudio output plugin name (default = alsa).\n\
-vo <vo name>\tVideo output plugin name (default = Xv).\n"
   
/* Xine Session data structure */
typedef struct{
    /* Basic xine stuff */
    xine_t              *handle;
    xine_stream_t       *stream;
    xine_video_port_t   *vo_port;
    xine_audio_port_t   *ao_port;
    xine_event_queue_t  *event_queue;

    /* Driver strings eg. "alsa", "Xv", etc.. */
    char *vo_driver;
    char *ao_driver;

    /* Song/Movie path */
    char *mrl;
   
    /* XLib XID integer */
    Window window;
    /* Basic data struct required for use with XINE_VISUAL_TYPE_X11  */
    x11_visual_t       vis;
   
    /* Geomtry available to xine and requested */
    int video_canhave_width;
    int video_canhave_height;
    int video_wants_width;
    int video_wants_height;
}XINE_SESSION;

/* Shuts down libxine */
int quit_xine(XINE_SESSION *s){
    printf("quit xine\n");
    xine_close(s->stream);
    xine_event_dispose_queue(s->event_queue);
    xine_dispose(s->stream);
    if(s->ao_port) xine_close_audio_driver(s->handle, s->ao_port); 

    /* The video belongs to gtk, not you, silly xine */
    //xine_close_video_driver(s->handle, s->vo_port); 

    xine_exit(s->handle);
    return 0;
}

/* GtkWindow Destroy callback */
void quit_program(GtkWidget *blah, gpointer data){
    quit_xine(data);
    printf("quit gtk\n");
    gtk_main_quit();
}

/* Just a typedef to reduce typing when passing */
typedef void (*FRAME_OUTPUT_CALLBACK)(void *data, int video_width, int video_height,
                double video_pixel_aspect, int *dest_x, int *dest_y,
                int    *dest_width,        int *dest_height,
                double *dest_pixel_aspect, int *win_x, int *win_y);

/* Used to resize the video area when the user resizes the window */
static void on_size_allocate_tadeboro_hack(GtkWidget *widget, GtkAllocation *alloc,gpointer data){
    XINE_SESSION *s = data;
    s->video_canhave_width = alloc->width;
    s->video_canhave_height = alloc->height;

    /* http://tadeboro.blogspot.com/2009/05/wrapping-adn-resizing-gtklabel.html */
    /* This is a little bit of a hack. See link above for details.
     * We are basically telling the parent window that we want
     * all the space its got for us, instead of how big we really are */
//    gtk_widget_set_size_request(widget,video_wants_width,video_wants_height );
        gtk_widget_set_size_request(widget,s->video_canhave_width-2,s->video_canhave_height-2 );
}

/* Standard frame_output_cb prototype as defined in xine.h */
static void frame_output_cb(void *data, int video_width, int video_height,
                double video_pixel_aspect, int *dest_x, int *dest_y,
                int    *dest_width,        int *dest_height,
                double *dest_pixel_aspect, int *win_x, int *win_y) {
    XINE_SESSION *s = data;
    *dest_x            = 0;
    *dest_y            = 0;
    *win_x             = 0;
    *win_y             = 0;
    s->video_wants_width = video_width;
    s->video_wants_height = video_height;

    /* Here we tell xine to draw the video to make best use of
     * the space given to it, */
    *dest_width = s->video_canhave_width;
    *dest_height = s->video_canhave_height;

    /* ... but force xine to maintaine the video's original aspect ratio
     * and not that of the actual GtkDrawingArea */
    //*dest_pixel_aspect = (float)video_canhave_height / (float) video_canhave_width;
    *dest_pixel_aspect = video_pixel_aspect;
}

/* Standard event listener prototype as defined in xine.h */
static void event_listener(void *user_data, const xine_event_t *event) {
    switch(event->type) {
    case XINE_EVENT_UI_PLAYBACK_FINISHED:
        printf("playback finished\nQuiting...");   
        quit_program(NULL,user_data);
        break;
    }
}
 
/* Creates a xine session */
void initialise_xine(XINE_SESSION *s){
    char configfile[128];
    printf("initialise_xine\n");
    s->handle = xine_new();
    sprintf(configfile, "%s/%s", xine_get_homedir(), ".xine/config");
    xine_config_load(s->handle, configfile);
    xine_init(s->handle);
    s->video_canhave_width=DEFAULT_WIDTH;
    s->video_canhave_height=DEFAULT_HEIGHT;
    s->video_wants_width=50;
    s->video_wants_height=40;
}

/* Attaches the GtkDrawingArea to the xine video output */
int connect_xine_to_gtk(XINE_SESSION *s, GtkDrawingArea *drawing_area,
                    FRAME_OUTPUT_CALLBACK cb,
                    void *cb_user_data){
    printf("connect_xine_to_gtk\n");

    s->vis.display = GDK_WINDOW_XDISPLAY(GTK_WIDGET(drawing_area)->window);
    s->vis.screen  = GDK_SCREEN_XNUMBER(gtk_widget_get_screen(GTK_WIDGET(drawing_area)));
    s->vis.d       = GDK_WINDOW_XID(GTK_WIDGET(drawing_area)->window);
    s->window      = GDK_WINDOW_XID(GTK_WIDGET(drawing_area)->window);
    s->vis.frame_output_cb   = cb;
    s->vis.user_data         = cb_user_data;

    /* The magic one liner 
     * Hopefully some of the boiler plate above can be accpeted into
     * libxine one day as part of XINE_VISUAL_TYPE_GTK */
    s->vo_port = xine_open_video_driver(s->handle,
            s->vo_driver,
            XINE_VISUAL_TYPE_X11,
            (void *) &s->vis);

    if(s->vo_port== NULL){
        printf("I'm unable to initialize '%s' video driver. Giving up.\n", s->vo_driver);
        return 1;
    }
    xine_port_send_gui_data (s->vo_port,XINE_GUI_SEND_DRAWABLE_CHANGED,( void *) s->window);
    xine_port_send_gui_data (s->vo_port,XINE_GUI_SEND_VIDEOWIN_VISIBLE,(void *)1);
    return 0;
}

/* Opens up an audio port */
int connect_xine_to_audio(XINE_SESSION *s){
    printf("connect_xine_to_audio\n");
    s->ao_port = xine_open_audio_driver(s->handle , s->ao_driver, NULL);
    return (s->ao_port) ? 0 : 1;
}

/* Opens up a file stream and sets up the event handler */
int connect_xine_to_file(XINE_SESSION *s){
    printf("connect_xine_to_file\n");
    s->stream = xine_stream_new(s->handle, s->ao_port, s->vo_port);
    s->event_queue = xine_event_new_queue(s->stream);
    xine_event_create_listener_thread(s->event_queue, event_listener, s);
    xine_open(s->stream,s->mrl);
    return 0;
}

/* Starts stream playback */
int start_xine_playback(XINE_SESSION *s){
    printf("start_xine_playback\n");
    xine_play(s->stream, 0, 0);
    return 0;
}

/* GtkButton clicked callback function to start playback */
void on_play_clicked(GtkWidget *widget, gpointer data){
    start_xine_playback((XINE_SESSION*)data);
}

int main(int argc, char **argv) {
    int i;
    int rv;
    GtkWidget *win;
    GtkWidget *vid_win;
    GtkWidget *vbox;/*
 *  Copyright (C) 2010 Vikram Ambrose <noel.ambrose@gmail.com>
 *
 *  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/>.
*/


/* Compile with:
 * gcc -Wall -g `pkg-config --cflags --libs gtk+-2.0 libxine`  gtkxine.c -o gtkxine */

#include <stdio.h>
#include <string.h>

#include <xine.h>
#include <xine/xineutils.h>

#include <gdk/gdkx.h>
#include <gtk/gtk.h>


/* Some default sizes for the initial window */
#define DEFAULT_WIDTH    320
#define DEFAULT_HEIGHT    240

/* Help message string */
#define HELP_MESSAGE    "Options:\n\
-ao <ao name>\tAudio output plugin name (default = alsa).\n\
-vo <vo name>\tVideo output plugin name (default = Xv).\n"
   
/* Xine Session data structure */
typedef struct{
    /* Basic xine stuff */
    xine_t              *handle;
    xine_stream_t       *stream;
    xine_video_port_t   *vo_port;
    xine_audio_port_t   *ao_port;
    xine_event_queue_t  *event_queue;

    /* Driver strings eg. "alsa", "Xv", etc.. */
    char *vo_driver;
    char *ao_driver;

    /* Song/Movie path */
    char *mrl;
   
    /* XLib XID integer */
    Window window;
    /* Basic data struct required for use with XINE_VISUAL_TYPE_X11  */
    x11_visual_t       vis;
   
    /* Geomtry available to xine and requested */
    int video_canhave_width;
    int video_canhave_height;
    int video_wants_width;
    int video_wants_height;
}XINE_SESSION;

/* Shuts down libxine */
int quit_xine(XINE_SESSION *s){
    printf("quit xine\n");
    xine_close(s->stream);
    xine_event_dispose_queue(s->event_queue);
    xine_dispose(s->stream);
    if(s->ao_port) xine_close_audio_driver(s->handle, s->ao_port); 

    /* The video belongs to gtk, not you, silly xine */
    //xine_close_video_driver(s->handle, s->vo_port); 

    xine_exit(s->handle);
    return 0;
}

/* GtkWindow Destroy callback */
void quit_program(GtkWidget *blah, gpointer data){
    quit_xine(data);
    printf("quit gtk\n");
    gtk_main_quit();
}

/* Just a typedef to reduce typing when passing */
typedef void (*FRAME_OUTPUT_CALLBACK)(void *data, int video_width, int video_height,
                double video_pixel_aspect, int *dest_x, int *dest_y,
                int    *dest_width,        int *dest_height,
                double *dest_pixel_aspect, int *win_x, int *win_y);

/* Used to resize the video area when the user resizes the window */
static void on_size_allocate_tadeboro_hack(GtkWidget *widget, GtkAllocation *alloc,gpointer data){
    XINE_SESSION *s = data;
    s->video_canhave_width = alloc->width;
    s->video_canhave_height = alloc->height;

    /* http://tadeboro.blogspot.com/2009/05/wrapping-adn-resizing-gtklabel.html */
    /* This is a little bit of a hack. See link above for details.
     *
[cut at 20 KB]