playlist basic operations

[melted_gui] / src / playlist.c

/*
 * playlist.c -- GTK+ 2 omnplay
 * Copyright (C) 2011 Maksym Veremeyenko <verem@m1stereo.tv>
 *
 * 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 2 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, write to the Free Software Foundation,
 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */

#ifdef HAVE_CONFIG_H
#  include <config.h>
#endif

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <gtk/gtk.h>
#include <gdk/gdkkeysyms.h>
#include <pthread.h>

#include "playlist.h"
#include "ui.h"
#include "timecode.h"
#include "library.h"

extern GtkTargetEntry drag_targets[];

static void playlist_get_selected_items_idx_iter
(
    GtkTreeModel *model,
    GtkTreePath *path,
    GtkTreeIter *iter,
    gpointer data
)
{
    int idx, l;
    int **plist = (int**)data;
    int *list = *plist;

    gtk_tree_model_get(model, iter, 7, &idx, -1);

    if(!list)
    {
        list = (int*)malloc(sizeof(int));
        list[0] = -1;
    };

    /* find numbers of items in list */
    for(l = 0; -1 != list[l]; l++);
    g_warning("playlist_get_selected_items_idx_iter: l=%d", l);

    /* realloc items */
    list = (int*)realloc(list, (l + 2) * sizeof(int));

    /* clean last item */
    list[l + 1] = -1;

    /* setup items */
    list[l] = idx;

    *plist = list;
};

int* playlist_get_selected_items_idx(instance_t* app, int *count)
{
    int* list = NULL, l = 0;
    GtkTreeSelection *selection;

    selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(app->playlist_grid));
    if(selection)
    {
        gtk_tree_selection_selected_foreach(
            selection,
            playlist_get_selected_items_idx_iter,
            &list);

        if(list)
            for(l = 0; -1 != list[l]; l++);
    };

    *count = l;
    return list;
};


static void playlist_drag_data_get_cb(GtkWidget *widget, GdkDragContext *context,
    GtkSelectionData *selection_data, guint info, guint time, gpointer userdata)
{
    int *list, i, c;
    playlist_item_t* items;
    instance_t* app = (instance_t*)userdata;

    g_warning("playlist_drag_data_get_cb");

    list = playlist_get_selected_items_idx(app, &c);
    if(!list) return;

    /* clear delete flag */
    for(i = 0; i < app->playlist.count; i++)
        app->playlist.item[i].del = 0;

    items = (playlist_item_t*)malloc(sizeof(playlist_item_t) * c);
    for(i = 0; i < c; i++)
    {
        items[i] = app->playlist.item[list[i]];
        if(context->action == GDK_ACTION_MOVE)
            app->playlist.item[list[i]].del = 1;
    }
    gtk_selection_data_set(selection_data, selection_data->target, 8,
        (const guchar *)items, sizeof(playlist_item_t) * c);

    free(items);
    free(list);
};

static void playlist_drag_begin_cb(GtkWidget *widget, GdkDragContext *context, gpointer userdata)
{
    g_warning("playlist_drag_begin_cb");
    gtk_drag_source_set_icon_stock(widget, GTK_STOCK_DND);
};

static void playlist_drag_data_received(GtkWidget *widget, GdkDragContext *context,
    gint x, gint y,  GtkSelectionData *selection_data,  guint info, guint time, gpointer userdata)
{
    int c, i, idx;
    playlist_item_type_t t;
    playlist_item_t* items;
    GtkTreePath *path = NULL;
    instance_t* app = (instance_t*)userdata;

    g_warning("playlist_drag_data_received: context->action=%d", context->action);

    items = (playlist_item_t*)gtk_selection_data_get_data(selection_data);
    c = gtk_selection_data_get_length(selection_data);

    if(c % sizeof(playlist_item_t))
    {
        g_warning("playlist_drag_data_received: ODD ITEMS");
    }
    else
    {
        c /= sizeof(playlist_item_t);

        if(gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), x, y, &path, NULL, NULL, NULL))
        {
            idx = gtk_tree_path_get_indices(path)[0];
            gtk_tree_path_free(path);

            g_warning("playlist_drag_data_received: gtk_tree_path_get_indice[0]=%d", idx);

            /* normalize, FIX ME */
            idx--; if(idx < 0) idx = 0;
        }
        else
            idx = app->playlist.count;

        g_warning("playlist_drag_data_received: idx=%d", idx);

        if(playlist_insert_check(app, idx, &t))
        {
            for(i = 0; i < c; i++)
            {
                items[i].type = t;
                items[i].error = 0;
            };
            playlist_insert_items(app, idx, items, c);
        };
    };

    /* Finish the drag */
    gtk_drag_finish(context, TRUE, FALSE, time);
};

static void playlist_drag_data_delete(GtkWidget *widget, GdkDragContext *context, gpointer userdata)
{
    int c, i, *list;
    instance_t* app = (instance_t*)userdata;

    g_warning("playlist_drag_data_delete");

    list = (int*)malloc(sizeof(int) * MAX_PLAYLIST_ITEMS);

    for(i = 0, c = 0; i < app->playlist.count; i++)
        if(app->playlist.item[i].del)
            if(!playlist_idx_cued(app, i, NULL))
            {
                /* save index */
                list[c++] = i;
                g_warning("playlist_drag_data_delete: i=%d, c=%d", i, c);
            };

    if(c)
        playlist_delete_items(app, list, c, 0);

    free(list);
};

/*
 * http://www.mail-archive.com/mahogany-users@lists.sourceforge.net/msg00286.html
 */
static gboolean playlist_drag_motion(GtkWidget *widget, GdkDragContext *context,
    gint x, gint y, guint time, gpointer data)
{
    gboolean same;
    GtkWidget *source_widget;

    g_warning("playlist_grid_drag_motion");

    /* Get source widget and check if it is the same as the
     * destination widget.
     */
    source_widget = gtk_drag_get_source_widget(context);
    same = ((source_widget == widget) ? TRUE : FALSE);

    /* Put additional checks here, perhaps if same is FALSE then
     * set the default drag to GDK_ACTION_COPY.
     */

    /* Say we just want to allow GDK_ACTION_MOVE, first we check
     * if that is in the list of allowed actions on the dc. If
     * so then we set it to that. Note if the user holds down the
     * ctrl key then the only flag in dc->actions will be
     * GDK_ACTION_COPY. The constraint for dc->actions is that
     * specified from the given actions in gtk_drag_dest_set() and
     * gtk_drag_source_set().
     */
    if(same)
    {
        if(context->actions == GDK_ACTION_MOVE)
            gdk_drag_status(context, GDK_ACTION_COPY, time);
        else
            gdk_drag_status(context, GDK_ACTION_MOVE, time);
    }
    else
        gdk_drag_status(context, context->actions, time);

    return(TRUE);
}


int playlist_item_index(instance_t* app, int start, int int_idx)
{
    if(start < 0 || start >= app->playlist.count)
        return -1;

    while(1)
    {
        if(app->playlist.item[start].int_idx == int_idx)
            return start;

        if(app->playlist.item[start].type & PLAYLIST_BLOCK_END)
            break;

        start++;
    };

    return -1;
};


void playlist_init(instance_t* app)
{
    gtk_drag_source_set(app->playlist_grid, GDK_BUTTON1_MASK,
        drag_targets, 1, (GdkDragAction)(GDK_ACTION_COPY | GDK_ACTION_MOVE));

    gtk_drag_dest_set(app->playlist_grid, (GtkDestDefaults)(GTK_DEST_DEFAULT_HIGHLIGHT | GTK_DEST_DEFAULT_DROP),
        drag_targets, 1, (GdkDragAction)(GDK_ACTION_COPY | GDK_ACTION_MOVE));

    g_signal_connect (app->playlist_grid, "drag_data_get", G_CALLBACK(playlist_drag_data_get_cb), app);
    g_signal_connect (app->playlist_grid, "drag_begin", G_CALLBACK(playlist_drag_begin_cb), app);
    g_signal_connect (app->playlist_grid, "drag_data_received", G_CALLBACK (playlist_drag_data_received), app);
    g_signal_connect (app->playlist_grid, "drag_data_delete", G_CALLBACK (playlist_drag_data_delete), app);
    g_signal_connect (app->playlist_grid, "drag_motion", G_CALLBACK (playlist_drag_motion), app);
};

void playlist_release(instance_t* app)
{
};

int playlist_idx_cued(instance_t* app, int idx, int* player_idx)
{
    int i;

    for(i = 0; i < app->players.count; i++)
    {
        int a, b;

        a = app->players.item[i].playlist_start;
        b = app->players.item[i].playlist_length;

        if(b <= 0)
            continue;

        b = a + b - 1;

        if(idx >= a && idx <= b)
        {
            if(player_idx)
                *player_idx = i;
            return 1;
        };
    };

    return 0;
};

int playlist_range_cued(instance_t* app, int start, int stop)
{
    int i;

    for(i = start; i <= stop; i++)
        if(playlist_idx_cued(app, i, NULL))
            return 1;

    return 0;
};

void playlist_block(instance_t* app, int loop)
{
    int start, stop, i, c;
    int* list = playlist_get_selected_items_idx(app, &c);

    if(!list)
        return;

    pthread_mutex_lock(&app->playlist.lock);
    pthread_mutex_lock(&app->players.lock);

    start = list[0];
    stop = list[c - 1];

    if(loop)
        loop = PLAYLIST_BLOCK_LOOP;

    if(!playlist_range_cued(app, start, stop))
    {
        /* update selected item */
        for(i = start; i <= stop; i++)
        {
            int t = PLAYLIST_BLOCK_BODY | loop;

            if(i == start)      t |= PLAYLIST_BLOCK_BEGIN;
            if(i == stop)       t |= PLAYLIST_BLOCK_END;

            app->playlist.item[i].type = (playlist_item_type_t)t;

            ui_playlist_draw_item(app, i);
        };

        /* update border items */
        if(start && !(app->playlist.item[start - 1].type & PLAYLIST_BLOCK_END))
        {
            app->playlist.item[start - 1].type = (playlist_item_type_t)(PLAYLIST_BLOCK_END
                | app->playlist.item[start - 1].type);
            ui_playlist_draw_item(app, start - 1);
        };
        if((stop + 1) < app->playlist.count && !(app->playlist.item[stop + 1].type & PLAYLIST_BLOCK_BEGIN))
        {
            app->playlist.item[stop + 1].type = (playlist_item_type_t)(PLAYLIST_BLOCK_BEGIN
                | app->playlist.item[stop + 1].type);
            ui_playlist_draw_item(app, stop + 1);
        };
    }
    else
        g_warning("omnplay_playlist_block: range [%d %d] do OVERLAP player\n",
            start, stop);

    pthread_mutex_unlock(&app->players.lock);
    pthread_mutex_unlock(&app->playlist.lock);

    free(list);
};

int playlist_get_first_selected_item_idx(instance_t* app)
{
    int idx, c;
    int* list = playlist_get_selected_items_idx(app, &c);
    if(!list)
        return -1;
    idx = list[0];
    free(list);
    return idx;
};

int playlist_get_block(instance_t* app, int idx, int* pstart, int* pstop)
{
    int start, stop;

    for(start = idx; start >= 0; start--)
        if(app->playlist.item[start].type & PLAYLIST_BLOCK_BEGIN)
            break;

    for(stop = idx; stop < app->playlist.count; stop++)
        if(app->playlist.item[stop].type & PLAYLIST_BLOCK_END)
            break;

    g_warning("playlist_get_block: range %d -> %d\n", start, stop);

    /* check block range */
    if(start >= 0 && stop < app->playlist.count)
    {
        *pstart = start;
        *pstop = stop;
        return (stop - start + 1);
    };

    return -1;
};

player_t *playlist_get_player_at_pos(instance_t* app, int pos)
{
    /* check player range */
    if(app->playlist.item[pos].player > -1 && app->playlist.item[pos].player < app->players.count)
        return &app->players.item[app->playlist.item[pos].player];

    return NULL;
};

void playlist_delete_items(instance_t* app, int* idxs, int count, int sel)
{
    int i, j, idx;

    pthread_mutex_lock(&app->playlist.lock);
    pthread_mutex_lock(&app->players.lock);

    for(j = 0; j < count; j++)
    {
        idx = idxs[j] - j;

        /* fix block types */
        if( app->playlist.item[idx].type != PLAYLIST_ITEM_BLOCK_BODY &&
            app->playlist.item[idx].type != PLAYLIST_ITEM_LOOP_BODY)
        {
            if(idx)
                app->playlist.item[idx - 1].type = (playlist_item_type_t)(app->playlist.item[idx - 1].type |
                    PLAYLIST_BLOCK_END);
            if(idx + 1 < app->playlist.count)
                app->playlist.item[idx + 1].type = (playlist_item_type_t)(app->playlist.item[idx + 1].type |
                    PLAYLIST_BLOCK_BEGIN);
        };

        /* shift playlist items */
        memmove
        (
            &app->playlist.item[idx],
            &app->playlist.item[idx + 1],
            (app->playlist.count - idx - 1) * sizeof(playlist_item_t)
        );

        /* decrement items count */
        app->playlist.count--;

        /* increment servers indexes */
        for(i = 0; i < app->players.count; i++)
            if(app->players.item[i].playlist_start >= idx)
                app->players.item[i].playlist_start--;
    };

    /* redraw playlist */
    ui_playlist_draw(app);

    /* select */
    if(sel)
        ui_playlist_select_item(app, idxs[0]);

    pthread_mutex_unlock(&app->players.lock);
    pthread_mutex_unlock(&app->playlist.lock);
};

void playlist_delete_selected_items(instance_t* app)
{
    int i, cnt1, cnt2;
    int *list1, *list2;

    list1 = playlist_get_selected_items_idx(app, &cnt1);
    if(!list1) return;

    list2 = (int*)malloc(sizeof(int) * cnt1);

    for(i = 0, cnt2 = 0; i < cnt1; i++)
    {
        /* check for playing block */
        if(playlist_idx_cued(app, list1[i], NULL))
            continue;

        /* save index */
        list2[cnt2++] = list1[i];
    };

    if(cnt2)
        playlist_delete_items(app, list2, cnt2, 1);

    free(list2);
    free(list1);
};

int playlist_insert_check(instance_t* app, int idx, playlist_item_type_t* t)
{
    *t = PLAYLIST_ITEM_BLOCK_SINGLE;

    /* before or after playlist */
    if(!idx || idx == app->playlist.count)
        return 1;

    /* check for block borders */
    if( app->playlist.item[idx - 1].type & PLAYLIST_BLOCK_END &&
        app->playlist.item[idx + 0].type & PLAYLIST_BLOCK_BEGIN)
        return 1;

    /* check for playing block */
    if(playlist_idx_cued(app, idx, NULL))
        return 0;

    if(app->playlist.item[idx].type & PLAYLIST_BLOCK_LOOP)
        *t = PLAYLIST_ITEM_LOOP_BODY;
    else
        *t = PLAYLIST_ITEM_BLOCK_BODY;

    return 1;
};

void playlist_insert_items(instance_t* app, int idx, playlist_item_t* items, int count)
{
    int i;

    pthread_mutex_lock(&app->playlist.lock);
    pthread_mutex_lock(&app->players.lock);

    /* shift playlist items */
    memmove
    (
        &app->playlist.item[idx + count],
        &app->playlist.item[idx],
        (app->playlist.count - idx) * sizeof(playlist_item_t)
    );

    /* copy new items */
    memcpy
    (
        &app->playlist.item[idx],
        items,
        count * sizeof(playlist_item_t)
    );

    /* increment servers indexes */
    for(i = 0; i < app->players.count; i++)
        if(app->players.item[i].playlist_start >= idx)
            app->players.item[i].playlist_start += idx;

    /* increment items count */
    app->playlist.count += count;

    /* redraw playlist */
    ui_playlist_draw(app);

    /* select */
    ui_playlist_select_item(app, idx);

    pthread_mutex_unlock(&app->players.lock);
    pthread_mutex_unlock(&app->playlist.lock);
};

void playlist_item_copy(instance_t* app)
{
    int *list, i, c;

    list = playlist_get_selected_items_idx(app, &c);
    if(!list) return;

    for(i = 0; i < c; i++)
        app->clipboard.item[i] = app->playlist.item[list[i]];
    app->clipboard.count = c;

    free(list);
};

void playlist_item_paste(instance_t* app, int after)
{
    int idx, i;
    playlist_item_type_t t;

    /* find insert position */
    idx = playlist_get_first_selected_item_idx(app);
    if(idx < 0)
        idx = 0;
    else
        idx += (after)?1:0;

    if(!playlist_insert_check(app, idx, &t))
        return;

    /* clear item */
    if(app->clipboard.count)
    {
        for(i = 0; i < app->clipboard.count; i++)
        {
            app->clipboard.item[i].type = t;
            app->clipboard.item[i].error = 0;
        };
        playlist_insert_items(app, idx, app->clipboard.item, app->clipboard.count);
    };
};

void playlist_item_swap(instance_t* app, int dir)
{
    int sel, a, b, e = 1;
    playlist_item_t item;

    /* find insert position */
    sel = playlist_get_first_selected_item_idx(app);
    if(sel < 0)
        return;

    if(dir < 0)
    {
        a = sel - 1;
        b = sel;
        sel = a;
    }
    else
    {
        a = sel;
        b = sel + 1;
        sel = b;
    };

    /* check for playing block */
    if(playlist_idx_cued(app, a, NULL) || playlist_idx_cued(app, b, NULL))
        return;

    pthread_mutex_lock(&app->playlist.lock);
    pthread_mutex_lock(&app->players.lock);

    /* swap */
    item = app->playlist.item[a];
    app->playlist.item[a] = app->playlist.item[b];
    app->playlist.item[b] = item;

    /* rewite type */
    if(app->playlist.item[a].type != app->playlist.item[b].type)
    {
        e = 0;
        app->playlist.item[a].type = PLAYLIST_ITEM_BLOCK_SINGLE;
        app->playlist.item[b].type = PLAYLIST_ITEM_BLOCK_SINGLE;
    };

    /* redraw main items */
    ui_playlist_draw_item(app, a);
    ui_playlist_draw_item(app, b);

    /* fix block types */
    if(a && !e)
    {
        app->playlist.item[a - 1].type = (playlist_item_type_t)(app->playlist.item[a - 1].type |
            PLAYLIST_BLOCK_END);
        ui_playlist_draw_item(app, a - 1);
    };
    if(b + 1 < app->playlist.count && !e)
    {
        app->playlist.item[b + 1].type = (playlist_item_type_t)(app->playlist.item[b + 1].type |
            PLAYLIST_BLOCK_BEGIN);
        ui_playlist_draw_item(app, b + 1);
    };

    /* select */
    ui_playlist_select_item(app, sel);

    pthread_mutex_unlock(&app->players.lock);
    pthread_mutex_unlock(&app->playlist.lock);
};


static int playlist_load_file_ply(instance_t* app, char* filename)
{
    FILE* f;
    char *ID, *CH, *B, *IN, *OUT, *DUR, *REST, *l;
    int count = 0, i;
    playlist_item_t* items;

    /* allocate space for strings and items */
    items = malloc(sizeof(playlist_item_t) * MAX_PLAYLIST_ITEMS);
    memset(items, 0, sizeof(playlist_item_t) * MAX_PLAYLIST_ITEMS);
    ID = malloc(PATH_MAX);
    CH = malloc(PATH_MAX);
    B = malloc(PATH_MAX);
    IN = malloc(PATH_MAX);
    OUT = malloc(PATH_MAX);
    DUR = malloc(PATH_MAX);
    REST = malloc(PATH_MAX);
    l = malloc(PATH_MAX);

    /* open and process file */
    f = fopen(filename, "rt");
    if(f)
    {
        while( !feof(f) )
        {
            char* s;

            /* load string */
            memset(l, 0, PATH_MAX);
            fgets(l, PATH_MAX, f);

            /* remove newlines */
            if( (s = strchr(l, '\n')) ) *s = 0;
            if( (s = strchr(l, '\r')) ) *s = 0;
            if( (s = strchr(l, '\t')) ) *s = 0;

            /* check for empty line */
            if(l[0] && l[0] != '#')
            {
                if (6 != sscanf(l, "%128[^,],%128[^,],%128[^,],%128[^,],%128[^,],%128[^,],%s",
                    ID, CH, B, IN, OUT, DUR, REST))
                {
                    int b = atol(B);
                    /* setup item */
                    tc2frames(IN, 25.0, &items[count].in);
                    tc2frames(DUR, 25.0, &items[count].dur);
                    strncpy(items[count].id, ID, PATH_MAX);
                    items[count].player = atol(CH) - 1;
                    switch(b)
                    {
                        case 1: items[count].type = PLAYLIST_ITEM_BLOCK_SINGLE; break;
                        case 2: items[count].type = PLAYLIST_ITEM_LOOP_BEGIN; break;
                        case 3: items[count].type = PLAYLIST_ITEM_LOOP_BODY; break;
                        case 4: items[count].type = PLAYLIST_ITEM_LOOP_END; break;
                        case 6: items[count].type = PLAYLIST_ITEM_BLOCK_END; break;
                        case 0:
                            if(!count)
                                items[count].type = PLAYLIST_ITEM_BLOCK_BEGIN;
                            else if(items[count - 1].type == PLAYLIST_ITEM_BLOCK_BEGIN ||
                                    items[count - 1].type == PLAYLIST_ITEM_BLOCK_BODY)
                                items[count].type = PLAYLIST_ITEM_BLOCK_BODY;
                            else
                                items[count].type = PLAYLIST_ITEM_BLOCK_BEGIN;
                            break;
                        default:
                            if(b >= 1024)
                                items[count].type = b - 1024;
                    };
#if 0
                    {
                        char* n;
                        switch(items[count].type)
                        {
                            case PLAYLIST_ITEM_BLOCK_BEGIN:       n = "BLOCK_BEGIN"; break;
                            case PLAYLIST_ITEM_BLOCK_BODY:        n = "BLOCK_BODY"; break;
                            case PLAYLIST_ITEM_BLOCK_END:         n = "BLOCK_END"; break;
                            case PLAYLIST_ITEM_BLOCK_SINGLE:      n = "BLOCK_SINGLE"; break;
                            case PLAYLIST_ITEM_LOOP_BEGIN:        n = "LOOP_BEGIN"; break;
                            case PLAYLIST_ITEM_LOOP_BODY:         n = "LOOP_BODY"; break;
                            case PLAYLIST_ITEM_LOOP_END:          n = "LOOP_END"; break;
                            case PLAYLIST_ITEM_LOOP_SINGLE:       n = "LOOP_SINGLE"; break;
                        };
                        fprintf(stderr, "src=[%s]\ndst=[idx=%d,block=%s,block_id=%d,in=%d,out=%d]\n",
                            l, count, n, items[count].type, items[count].in, items[count].dur);
                    };
#endif

                    count++;
                }
            };
        }

        fclose(f);
    }

    /* add loaded items to playlist */
    if(count)
    {
        pthread_mutex_lock(&app->playlist.lock);
        for(i = 0; i < count && app->playlist.count + 1 < MAX_PLAYLIST_ITEMS; i++)
        {
//            omnplay_library_normalize_item(app, &items[i]);
            app->playlist.item[app->playlist.count++] = items[i];
        };
        app->playlist.ver_curr++;
        pthread_mutex_unlock(&app->playlist.lock);
    }

    /* free data */
    free(items);
    free(ID);
    free(CH);
    free(IN);
    free(OUT);
    free(DUR);
    free(REST);
    free(l);

    return count;
};

void playlist_load(instance_t* app)
{
    int r;
    GtkWidget *dialog;
    GtkFileFilter *filter;

    dialog = gtk_file_chooser_dialog_new("Open File",
        GTK_WINDOW (app->window),
        GTK_FILE_CHOOSER_ACTION_OPEN,
        GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
        GTK_STOCK_OPEN, GTK_RESPONSE_ACCEPT,
        NULL);

    gtk_file_chooser_set_current_folder(GTK_FILE_CHOOSER(dialog),
        (app->playlist.path)?app->playlist.path:getenv("HOME"));

    filter = gtk_file_filter_new();
    gtk_file_filter_set_name(filter, "Playlist formatted (*.ply)");
    gtk_file_filter_add_pattern(filter, "*.ply");
    gtk_file_chooser_add_filter(GTK_FILE_CHOOSER (dialog), filter);
    filter = gtk_file_filter_new();
    gtk_file_filter_set_name(filter, "All types (*.*)");
    gtk_file_filter_add_pattern(filter, "*.*");
    gtk_file_chooser_add_filter(GTK_FILE_CHOOSER (dialog), filter);

    r = gtk_dialog_run(GTK_DIALOG(dialog));

    if(r == GTK_RESPONSE_ACCEPT)
    {
        char *filename;

        filename = gtk_file_chooser_get_filename(GTK_FILE_CHOOSER(dialog));

        r = playlist_load_file_ply(app, filename);

        if(r)
            ui_playlist_draw(app);

        if(app->playlist.path)
            g_free(app->playlist.path);
        if((app->playlist.path = filename))
        {
            char* e = strrchr(app->playlist.path, '/');
            if(e) *e = 0;
        }
    }

    gtk_widget_destroy (dialog);
};

static int playlist_save_file_ply(instance_t* app, char* filename)
{
    int i;
    FILE* f;
    char tc1[12], tc2[12], tc3[12];
    char* fname = filename;

    filename = (char*)malloc(PATH_MAX);
    strncpy(filename, fname, PATH_MAX);
    i = strlen(filename);
    if(i < 4 || strcasecmp(filename + i - 4, ".ply"))
        strcat(filename, ".ply");

    if((f = fopen(filename, "wt")))
    {
        for(i = 0; i < app->playlist.count; i++)
            fprintf(f, "%s,%d,%d,%s,%s,%s,,,,,,,,\n",
                app->playlist.item[i].id,
                app->playlist.item[i].player + 1,
                app->playlist.item[i].type + 1024,
                frames2tc(app->playlist.item[i].in, 25.0, tc1),
                frames2tc(app->playlist.item[i].in + app->playlist.item[i].dur, 25.0, tc2),
                frames2tc(app->playlist.item[i].dur, 25.0, tc3));

        fclose(f);
    };

    free(filename);

    return 0;
};

void playlist_save(instance_t* app)
{
    int r;
    GtkWidget *dialog;
    GtkFileFilter *filter;

    dialog = gtk_file_chooser_dialog_new("Save File",
        GTK_WINDOW (app->window),
        GTK_FILE_CHOOSER_ACTION_SAVE,
        GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
        GTK_STOCK_SAVE, GTK_RESPONSE_ACCEPT,
        NULL);

    gtk_file_chooser_set_do_overwrite_confirmation(GTK_FILE_CHOOSER(dialog), TRUE);

    gtk_file_chooser_set_current_folder(GTK_FILE_CHOOSER(dialog),
        (app->playlist.path)?app->playlist.path:getenv("HOME"));

    filter = gtk_file_filter_new();
    gtk_file_filter_set_name(filter, "Playlist formatted (*.ply)");
    gtk_file_filter_add_pattern(filter, "*.ply");
    gtk_file_chooser_add_filter(GTK_FILE_CHOOSER (dialog), filter);
    g_object_set_data(G_OBJECT(filter), "id", GINT_TO_POINTER(0));
    filter = gtk_file_filter_new();
    gtk_file_filter_set_name(filter, "Text (*.txt)");
    gtk_file_filter_add_pattern(filter, "*.*");
    gtk_file_chooser_add_filter(GTK_FILE_CHOOSER (dialog), filter);
    g_object_set_data(G_OBJECT(filter), "id", GINT_TO_POINTER(1));

    r = gtk_dialog_run(GTK_DIALOG(dialog));

    if(r == GTK_RESPONSE_ACCEPT)
    {
        char *filename;

        filename = gtk_file_chooser_get_filename(GTK_FILE_CHOOSER(dialog));

        r = GPOINTER_TO_INT(g_object_get_data(G_OBJECT(gtk_file_chooser_get_filter(GTK_FILE_CHOOSER(dialog))), "id"));

        r = playlist_save_file_ply(app, filename);

        if(app->playlist.path)
            g_free(app->playlist.path);
        if((app->playlist.path = filename))
        {
            char* e = strrchr(app->playlist.path, '/');
            if(e) *e = 0;
        }
    }

    gtk_widget_destroy (dialog);
};


void playlist_relink(instance_t* app)
{
    int i, cnt;
    int *list;

    pthread_mutex_lock(&app->playlist.lock);
    list = playlist_get_selected_items_idx(app, &cnt);
    if(list)
    {
        for(i = 0; i < cnt; i++)
        {
            /* check for playing block */
            if(playlist_idx_cued(app, list[i], NULL))
                continue;

            /* relink item */
            library_relink_item(app, &app->playlist.item[list[i]]);
        };

        free(list);
    };
    pthread_mutex_unlock(&app->playlist.lock);

    /* redraw playlist */
    ui_playlist_draw(app);
};

void playlist_item_add(instance_t* app, int after)
{
    int idx;
    playlist_item_t item;
    playlist_item_type_t t;

    /* find insert position */
    idx = playlist_get_first_selected_item_idx(app);
    if(idx < 0)
        idx = 0;
    else
        idx += (after)?1:0;

    if(!playlist_insert_check(app, idx, &t))
        return;

    g_warning("allowed insert into idx=%d\n", idx);

    /* clear item */
    memset(&item, 0, sizeof(playlist_item_t));
    if(ui_playlist_item_dialog(app, &item))
    {
        library_normalize_item(app, &item);
        item.type = t;
        playlist_insert_items(app, idx, &item, 1);
    };
};

void playlist_item_edit(instance_t* app)
{
    int idx;
    playlist_item_t item;

    /* find insert position */
    idx = playlist_get_first_selected_item_idx(app);

    if(idx < 0)
        return;

    /* check for playing block */
    if(playlist_idx_cued(app, idx, NULL))
        return;

    item = app->playlist.item[idx];

    if(ui_playlist_item_dialog(app, &item))
    {
        library_normalize_item(app, &item);
        app->playlist.item[idx] = item;
        ui_playlist_draw_item(app, idx);
    };
};

void playlist_item_add_from_library(instance_t* app, int after)
{
};

void playlist_normalize(instance_t* app)
{
    int i;

    /* normalize playlist */
    for(i = 0; i < app->playlist.count; i++)
        if(library_normalize_item(app, &app->playlist.item[i]))
            ui_playlist_draw_item(app, i);
};