All pastes #822159 Raw Edit

pictureflow.c

public c v1 · immutable
·published 2007-12-18 15:47 UTC
rendered paste body
/****************************************************************************             __________               __   ___.*   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___*   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /*   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <*   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \*                     \/            \/     \/    \/            \/* $Id: pictureflow.c 15941 2007-12-16 02:18:54Z nicolasp $** Copyright (C) 2007 Jonas Hurrelmann (j@outpo.st)* Copyright (C) 2007 Nicolas Pennequin* Copyright (C) 2007 Ariya Hidayat (ariya@kde.org) (original Qt Version)** Original code: http://code.google.com/p/pictureflow/** All files in this archive are subject to the GNU General Public License.* See the file COPYING in the source tree root for full license agreement.** This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY* KIND, either express or implied.*****************************************************************************/#include "plugin.h"#include "pluginlib_actions.h"#include "helper.h"#include "bmp.h"#include "picture.h"#include "pictureflow_logo.h"#include "pictureflow_emptyslide.h"PLUGIN_HEADER/******************************* Globals ***********************************/static struct plugin_api *rb;   /* global api struct pointer */const struct button_mapping *plugin_contexts[]= {generic_actions, generic_directions};#define NB_ACTION_CONTEXTS sizeof(plugin_contexts)/sizeof(plugin_contexts[0])/* Key assignement */#if (CONFIG_KEYPAD == IPOD_1G2G_PAD) \ || (CONFIG_KEYPAD == IPOD_3G_PAD) \ || (CONFIG_KEYPAD == IPOD_4G_PAD) \ || (CONFIG_KEYPAD == SANSA_E200_PAD)#define SCROLLWHEEL#endif#ifdef SCROLLWHEEL#define PICTUREFLOW_NEXT_ALBUM          PLA_UP#define PICTUREFLOW_NEXT_ALBUM_REPEAT   PLA_UP_REPEAT#define PICTUREFLOW_PREV_ALBUM          PLA_DOWN#define PICTUREFLOW_PREV_ALBUM_REPEAT   PLA_DOWN_REPEAT#else#define PICTUREFLOW_NEXT_ALBUM          PLA_RIGHT#define PICTUREFLOW_NEXT_ALBUM_REPEAT   PLA_RIGHT_REPEAT#define PICTUREFLOW_PREV_ALBUM          PLA_LEFT#define PICTUREFLOW_PREV_ALBUM_REPEAT   PLA_LEFT_REPEAT#define PICTUREFLOW_NEXT_TRACK          PLA_DOWN#define PICTUREFLOW_NEXT_TRACK_REPEAT   PLA_DOWN_REPEAT#define PICTUREFLOW_PREV_TRACK          PLA_UP#define PICTUREFLOW_PREV_TRACK_REPEAT   PLA_UP_REPEAT#endif#define PICTUREFLOW_MENU                PLA_MENU#define PICTUREFLOW_QUIT                PLA_QUIT#define PICTUREFLOW_SELECT_ALBUM        PLA_FIRE/* for fixed-point arithmetic, we need minimum 32-bit long   long long (64-bit) might be useful for multiplication and division */#define PFreal long#define PFREAL_SHIFT 10#define PFREAL_FACTOR (1 << PFREAL_SHIFT)#define PFREAL_ONE (1 << PFREAL_SHIFT)#define PFREAL_HALF (PFREAL_ONE >> 1)#define IANGLE_MAX 1024#define IANGLE_MASK 1023/* maximum size of an slide */#define MAX_IMG_WIDTH LCD_WIDTH#define MAX_IMG_HEIGHT LCD_HEIGHT#if (LCD_HEIGHT < 100)#define PREFERRED_IMG_WIDTH 50#define PREFERRED_IMG_HEIGHT 50#else#define PREFERRED_IMG_WIDTH 100#define PREFERRED_IMG_HEIGHT 100#endif#define BUFFER_WIDTH LCD_WIDTH#define BUFFER_HEIGHT LCD_HEIGHT#define SLIDE_CACHE_SIZE 100#define MAX_SLIDES_COUNT 10#define SPACING_BETWEEN_SLIDE 40#define EXTRA_SPACING_FOR_CENTER_SLIDE 0#define THREAD_STACK_SIZE DEFAULT_STACK_SIZE + 0x200#define CACHE_PREFIX PLUGIN_DEMOS_DIR "/pictureflow"#define EV_EXIT 9999#define EV_WAKEUP 1337/* maximum number of albums */#define MAX_ALBUMS 1024#define AVG_ALBUM_NAME_LENGTH 20#define MAX_TRACKS 50#define AVG_TRACK_NAME_LENGTH 20#define UNIQBUF_SIZE (64*1024)#define EMPTY_SLIDE CACHE_PREFIX "/emptyslide.pfraw"#define CONFIG_FILE CACHE_PREFIX "/pictureflow.config"/* Error return values */#define ERROR_NO_ALBUMS     -1#define ERROR_BUFFER_FULL   -2/** structs we use */struct slide_data {    int slide_index;    int angle;    PFreal cx;    PFreal cy;    PFreal distance;};struct slide_cache {    int index;      /* index of the cached slide */    int hid;        /* handle ID of the cached slide */    long touched;   /* last time the slide was touched */};struct album_data {    int name_idx;    long seek;};struct track_data {    int name_idx;    long seek;};struct rect {    int left;    int right;    int top;    int bottom;};struct load_slide_event_data {    int slide_index;    int cache_index;};struct pfraw_header {    int32_t width;          /* bmap width in pixels */    int32_t height;         /* bmap height in pixels */};const struct picture logos[]={    {pictureflow_logo, BMPWIDTH_pictureflow_logo, BMPHEIGHT_pictureflow_logo},};struct config_data {    long avg_album_width;    int spacing_between_slides;    int extra_spacing_for_center_slide;    int show_slides;    int zoom;    int show_album_name; /* { album_name_hide = 0, album_name_bottom , album_name_top };  0 = hide, 1 = top, 2 = bottom */};enum show_album_name { album_name_hide = 0, album_name_bottom , album_name_top };const int track_list_offset = ((LCD_HEIGHT > 100) ? 30 : 15); /* make the moving of the tracklist due to the album name moving more usable on small LCDs *//** below we allocate the memory we want to use **/static fb_data *buffer; /* for now it always points to the lcd framebuffer */static PFreal rays[BUFFER_WIDTH];static struct slide_data center_slide;static struct slide_data left_slides[MAX_SLIDES_COUNT];static struct slide_data right_slides[MAX_SLIDES_COUNT];static int slide_frame;static int step;static int target;static int fade;static int center_index; /* index of the slide that is in the center */static int itilt;static PFreal offsetX;static PFreal offsetY;static bool show_fps; /* show fps in the main screen */static int number_of_slides;static struct slide_cache cache[SLIDE_CACHE_SIZE];static int  slide_cache_in_use;/* use long for aligning */unsigned long thread_stack[THREAD_STACK_SIZE / sizeof(long)];static int slide_cache_stack[SLIDE_CACHE_SIZE]; /* queue (as array) for scheduling load_surface */static int slide_cache_stack_index;struct mutex slide_cache_stack_lock;static int empty_slide_hid;struct thread_entry *thread_id;struct event_queue thread_q;static char tmp_path_name[MAX_PATH];static long uniqbuf[UNIQBUF_SIZE];static struct tagcache_search tcs;static struct album_data album[MAX_ALBUMS];static char album_names[MAX_ALBUMS*AVG_ALBUM_NAME_LENGTH];static int album_count;static char track_names[MAX_TRACKS * AVG_TRACK_NAME_LENGTH];static struct track_data tracks[MAX_TRACKS];static int track_count;static int track_index;static int selected_track;static int selected_track_pulse;static fb_data *input_bmp_buffer;static fb_data *output_bmp_buffer;static int input_hid;static int output_hid;static struct config_data config;static int old_drawmode;static bool thread_is_running;static int cover_animation_keyframe;static int extra_fade;static int albumtxt_x = 0;static int albumtxt_dir = -1;static int prev_center_index = -1;static int start_index_track_list = 0;static int track_list_visible_entries = 0;static int track_scroll_index = 0;static int track_scroll_dir = 1;/*    Proposals for transitions:    pf_idle -> pf_scrolling : NEXT_ALBUM/PREV_ALBUM pressed            -> pf_cover_in -> pf_show_tracks : SELECT_ALBUM clicked    pf_scrolling -> pf_idle : NEXT_ALBUM/PREV_ALBUM released    pf_show_tracks -> pf_cover_out -> pf_idle : SELECT_ALBUM pressed    TODO:    pf_show_tracks -> pf_cover_out -> pf_idle : MENU_PRESSED pressed    pf_show_tracks -> play_track() -> exit() : SELECT_ALBUM pressed    pf_idle, pf_scrolling -> show_menu(): MENU_PRESSED*/enum pf_states {    pf_idle = 0,    pf_scrolling,    pf_cover_in,    pf_show_tracks,    pf_cover_out};static int pf_state;/** code */bool create_bmp(struct bitmap* input_bmp, char *target_path, bool resize);int load_surface(int);static inline PFreal fmul(PFreal a, PFreal b){    return (a*b) >> PFREAL_SHIFT;}/* There are some precision issues when not using (long long) which in turn   takes very long to compute... I guess the best solution would be to optimize   the computations so it only requires a single long */static inline PFreal fdiv(PFreal num, PFreal den){    long long p = (long long) (num) << (PFREAL_SHIFT * 2);    long long q = p / (long long) den;    long long r = q >> PFREAL_SHIFT;    return r;}#define fmin(a,b) (((a) < (b)) ? (a) : (b))#define fmax(a,b) (((a) > (b)) ? (a) : (b))#define fbound(min,val,max) (fmax((min),fmin((max),(val))))#if 0#define fmul(a,b) ( ((a)*(b)) >> PFREAL_SHIFT )#define fdiv(n,m) ( ((n)<< PFREAL_SHIFT ) / m )#define fconv(a, q1, q2) (((q2)>(q1)) ? (a)<<((q2)-(q1)) : (a)>>((q1)-(q2)))#define tofloat(a, q) ( (float)(a) / (float)(1<<(q)) )static inline PFreal fmul(PFreal a, PFreal b){    return (a*b) >> PFREAL_SHIFT;}static inline PFreal fdiv(PFreal n, PFreal m){    return (n<<(PFREAL_SHIFT))/m;}#endif/* warning: regenerate the table if IANGLE_MAX and PFREAL_SHIFT are changed! */static const PFreal sin_tab[] = {    3,    103,    202,    300,    394,    485,    571,    652,    726,    793,    853,    904,    947,    980,   1004,   1019,    1023,   1018,   1003,    978,    944,    901,    849,    789,    721,    647,    566,    479,    388,    294,    196,     97,    -4,   -104,   -203,   -301,   -395,   -486,   -572,   -653,    -727,   -794,   -854,   -905,   -948,   -981,  -1005,  -1020,    -1024,  -1019,  -1004,   -979,   -945,   -902,   -850,   -790,    -722,   -648,   -567,   -480,   -389,   -295,   -197,    -98,    3};static inline PFreal fsin(int iangle){    while(iangle < 0)        iangle += IANGLE_MAX;    iangle &= IANGLE_MASK;    int i = (iangle >> 4);    PFreal p = sin_tab[i];    PFreal q = sin_tab[(i+1)];    PFreal g = (q - p);    return p + g * (iangle-i*16)/16;}static inline PFreal fcos(int iangle){    return fsin(iangle + (IANGLE_MAX >> 2));}/**  Create an index of all albums from the database.  Also store the album names so we can access them later. */int create_album_index(void){    rb->memset(&tcs, 0, sizeof(struct tagcache_search) );    album_count = 0;    rb->tagcache_search(&tcs, tag_album);    rb->tagcache_search_set_uniqbuf(&tcs, uniqbuf, UNIQBUF_SIZE);    int l, old_l = 0;    album[0].name_idx = 0;    while (rb->tagcache_get_next(&tcs) && album_count  < MAX_ALBUMS)    {        l = rb->strlen(tcs.result) + 1;        if ( album_count > 0 )            album[album_count].name_idx = album[album_count-1].name_idx + old_l;        if ( (album[album_count].name_idx + l) > MAX_ALBUMS*AVG_ALBUM_NAME_LENGTH )            /* not enough memory */            return ERROR_BUFFER_FULL;        rb->strcpy(album_names + album[album_count].name_idx, tcs.result);        album[album_count].seek = tcs.result_seek;        old_l = l;        album_count++;    }    rb->tagcache_search_finish(&tcs);    return (album_count > 0) ? 0 : ERROR_NO_ALBUMS;}/** Return a pointer to the album name of the given slide_index */char* get_album_name(const int slide_index){    return album_names + album[slide_index].name_idx;}/** Return a pointer to the track name of the active album create_track_index has to be called first. */char* get_track_name(const int track_index){    if ( track_index < track_count )        return track_names + tracks[track_index].name_idx;    return 0;}/**  Create the track index of the given slide_index. */int create_track_index(const int slide_index){    if ( slide_index == track_index ) {        return -1;    }    if (!rb->tagcache_search(&tcs, tag_title))        return -1;    int ret = 0;    rb->tagcache_search_add_filter(&tcs, tag_album, album[slide_index].seek);    track_count=0;    int l, old_l = 0;    tracks[0].name_idx = 0;    while (rb->tagcache_get_next(&tcs) && track_count  < MAX_TRACKS)    {        l = rb->strlen(tcs.result) + 1;        if ( track_count > 0 )            tracks[track_count].name_idx = tracks[track_count-1].name_idx + old_l;        if ( (tracks[track_count].name_idx + l) > MAX_TRACKS * AVG_TRACK_NAME_LENGTH )        {            /* not enough memory */            ret = ERROR_BUFFER_FULL;            break;        }        rb->strcpy(track_names + tracks[track_count].name_idx, tcs.result);        tracks[track_count].seek = tcs.result_seek;        old_l = l;        track_count++;    }    rb->tagcache_search_finish(&tcs);    track_index = slide_index;    if (ret != 0)        return ret;    else        return (track_count > 0) ? 0 : -1;}/**  Determine filename of the album art for the given slide_index and  store the result in buf.  The algorithm looks for the first track of the given album uses  find_albumart to find the filename. */bool get_albumart_for_index_from_db(const int slide_index, char *buf, int buflen){    if ( slide_index == -1 )    {        rb->strncpy( buf, EMPTY_SLIDE, buflen );    }    if (!rb->tagcache_search(&tcs, tag_filename))        return false;    bool result;    /* find the first track of the album */    rb->tagcache_search_add_filter(&tcs, tag_album, album[slide_index].seek);    if ( rb->tagcache_get_next(&tcs) ) {        struct mp3entry id3;        char size[9];        rb->snprintf(size, sizeof(size), ".%dx%d", PREFERRED_IMG_WIDTH,                     PREFERRED_IMG_HEIGHT);        rb->strncpy( (char*)&id3.path, tcs.result, MAX_PATH );        id3.album = get_album_name(slide_index);        if ( rb->search_albumart_files(&id3, size, buf, buflen) )            result = true;        else if ( rb->search_albumart_files(&id3, "", buf, buflen) )            result = true;        else            result = false;    }    else {        /* did not find a matching track */        result = false;    }    rb->tagcache_search_finish(&tcs);    return result;}/**  Draw the PictureFlow logo */void draw_splashscreen(void){    struct screen* display = rb->screens[0];    rb->lcd_set_background(LCD_RGBPACK(0,0,0));    rb->lcd_set_foreground(LCD_RGBPACK(255,255,255));    rb->lcd_clear_display();    const struct picture* logo = &(logos[display->screen_type]);    picture_draw(display, logo, (LCD_WIDTH - logo->width) / 2, 10);    rb->lcd_update();}/**  Draw a simple progress bar */void draw_progressbar(int step){    int txt_w, txt_h;    const int bar_height = 22;    const int w = LCD_WIDTH - 20;    const int x = 10;    rb->lcd_getstringsize("Preparing album artwork", &txt_w, &txt_h);    int y = (LCD_HEIGHT - txt_h)/2;    rb->lcd_putsxy((LCD_WIDTH - txt_w)/2, y, "Preparing album artwork");    y += (txt_h + 5);    rb->lcd_set_foreground(LCD_RGBPACK(100,100,100));    rb->lcd_drawrect(x, y, w+2, bar_height);    rb->lcd_set_foreground(LCD_RGBPACK(165, 231, 82));    rb->lcd_fillrect(x+1, y+1, step * w / album_count, bar_height-2);    rb->lcd_set_foreground(LCD_RGBPACK(255,255,255));    rb->lcd_update();    rb->yield();}/**  Allocate temporary buffers */bool allocate_buffers(void){    int input_size = MAX_IMG_WIDTH * MAX_IMG_HEIGHT * sizeof( fb_data );    int output_size = MAX_IMG_WIDTH * MAX_IMG_HEIGHT * sizeof( fb_data ) * 2;    input_hid = rb->bufalloc(NULL, input_size, TYPE_BITMAP);    if (input_hid < 0)        return false;    if (rb->bufgetdata(input_hid, 0, (void *)&input_bmp_buffer) < input_size) {        rb->bufclose(input_hid);        return false;    }    output_hid = rb->bufalloc(NULL, output_size, TYPE_BITMAP);    if (output_hid < 0) {        rb->bufclose(input_hid);        return false;    }    if (rb->bufgetdata(output_hid, 0, (void *)&output_bmp_buffer) < output_size) {        rb->bufclose(output_hid);        return false;    }    return true;}/**  Free the temporary buffers */bool free_buffers(void){    rb->bufclose(input_hid);    rb->bufclose(output_hid);    return true;}/** Precomupte the album art images and store them in CACHE_PREFIX. */bool create_albumart_cache(bool force){    number_of_slides  = album_count;    int fh,ret;    if ( ! force && rb->file_exists( CACHE_PREFIX "/ready" ) ) return true;    int i, slides = 0;    struct bitmap input_bmp;    config.avg_album_width = 0;    for (i=0; i < album_count; i++)    {        draw_progressbar(i);        if (!get_albumart_for_index_from_db(i, tmp_path_name, MAX_PATH))            continue;        input_bmp.data = (char *)input_bmp_buffer;        ret = rb->read_bmp_file(tmp_path_name, &input_bmp,                                sizeof(fb_data)*MAX_IMG_WIDTH*MAX_IMG_HEIGHT,                                FORMAT_NATIVE);        if (ret <= 0) {            rb->splash(HZ, "Could not read bmp");            continue; /* skip missing/broken files */        }        rb->snprintf(tmp_path_name, sizeof(tmp_path_name), CACHE_PREFIX "/%d.pfraw", i);        if (!create_bmp(&input_bmp, tmp_path_name, false)) {            rb->splash(HZ, "Could not write bmp");        }        config.avg_album_width += input_bmp.width;        slides++;        if ( rb->button_get(false) == PICTUREFLOW_MENU ) return false;    }    if ( slides == 0 ) {        rb->splash(2*HZ, "No albums found");        return false;    }    config.avg_album_width /= slides;    if ( config.avg_album_width == 0 ) {        rb->splash(HZ, "album size is 0");        return false;    }    fh = rb->creat( CACHE_PREFIX "/ready"  );    rb->close(fh);    return true;}/**   Return the index on the stack of slide_index.   Return -1 if slide_index is not on the stack. */static inline int slide_stack_get_index(const int slide_index){    int i = slide_cache_stack_index + 1;    while (i--) {        if ( slide_cache_stack[i] == slide_index ) return i;    };    return -1;}/**   Push the slide_index on the stack so the image will be loaded.   The algorithm tries to keep the center_index on top and the   slide_index as high as possible (so second if center_index is   on the stack). */void slide_stack_push(const int slide_index){    rb->mutex_lock(&slide_cache_stack_lock);    if ( slide_cache_stack_index == -1 ) {        /* empty stack, no checks at all */        slide_cache_stack[ ++slide_cache_stack_index ] = slide_index;        rb->mutex_unlock(&slide_cache_stack_lock);        return;    }    int i = slide_stack_get_index( slide_index );    if ( i == slide_cache_stack_index ) {        /* slide_index is on top, so we do not change anything */        rb->mutex_unlock(&slide_cache_stack_lock);        return;    }    if ( i >= 0 ) {        /* slide_index is already on the stack, but not on top */        int tmp = slide_cache_stack[ slide_cache_stack_index  ];        if ( tmp == center_index ) {            /* the center_index is on top of the stack so do not touch that */            if ( slide_cache_stack_index  > 0 ) {                /* but maybe it is possible to swap the given slide_index to the second place */                tmp = slide_cache_stack[ slide_cache_stack_index -1 ];                slide_cache_stack[ slide_cache_stack_index - 1  ] = slide_cache_stack[ i  ];                slide_cache_stack[ i ] = tmp;            }        }        else {            /* if the center_index is not on top (i.e. already loaded) bring the slide_index to the top */            slide_cache_stack[ slide_cache_stack_index  ] = slide_cache_stack[ i  ];            slide_cache_stack[ i ] = tmp;        }    }    else {        /* slide_index is not on the stack */        if ( slide_cache_stack_index >= SLIDE_CACHE_SIZE-1 ) {            /* if we exceeded the stack size, clear the first half of the stack */            slide_cache_stack_index = SLIDE_CACHE_SIZE/2;            for (i = 0; i <= slide_cache_stack_index ; i++)                slide_cache_stack[ i ] = slide_cache_stack[ i + slide_cache_stack_index  ];        }        if ( slide_cache_stack[ slide_cache_stack_index ] == center_index ) {            /* if the center_index is on top leave it there */            slide_cache_stack[ slide_cache_stack_index ] = slide_index;            slide_cache_stack[ ++slide_cache_stack_index ] = center_index;        }        else {            /* usual stack case: push the slide_index on top */            slide_cache_stack[ ++slide_cache_stack_index ] = slide_index;        }    }    rb->mutex_unlock(&slide_cache_stack_lock);}/**  Pop the topmost item from the stack and decrease the stack size */static inline int slide_stack_pop(void){    rb->mutex_lock(&slide_cache_stack_lock);    int result;    if ( slide_cache_stack_index >= 0 )        result = slide_cache_stack[ slide_cache_stack_index-- ];    else        result = -1;    rb->mutex_unlock(&slide_cache_stack_lock);    return result;}/**  Load the slide into the cache.  Thus we have to queue the loading request in our thread while discarding the  oldest slide. */static inline void request_surface(const int slide_index){    slide_stack_push(slide_index);    rb->queue_post(&thread_q, EV_WAKEUP, 0);}/** Thread used for loading and preparing bitmaps in the background */void thread(void){    long sleep_time = 5 * HZ;    struct queue_event ev;    while (1) {        rb->queue_wait_w_tmo(&thread_q, &ev, sleep_time);        switch (ev.id) {            case EV_EXIT:                return;            case EV_WAKEUP:                /* we just woke up */                break;        }        int slide_index;        while ( (slide_index = slide_stack_pop()) != -1 ) {            load_surface( slide_index );            rb->queue_wait_w_tmo(&thread_q, &ev, HZ/10);            switch (ev.id) {                case EV_EXIT:                    return;            }        }    }}/** End the thread by posting the EV_EXIT event */void end_pf_thread(void){    if ( thread_is_running ) {        rb->queue_post(&thread_q, EV_EXIT, 0);        rb->thread_wait(thread_id);        /* remove the thread's queue from the broadcast list */        rb->queue_delete(&thread_q);        thread_is_running = false;    }}/** Create the thread an setup the event queue */bool create_pf_thread(void){    rb->queue_init(&thread_q, true);    /* put the thread's queue in the bcast list */    if ((thread_id = rb->create_thread(                           thread,                           thread_stack,                           sizeof(thread_stack),                            0,                           "Picture load thread"                               IF_PRIO(, PRIORITY_BACKGROUND)                               IF_COP(, CPU)                                      )        ) == NULL) {        return false;    }    thread_is_running = true;    return true;}/** Safe the given bitmap as filename in the pfraw format */bool save_pfraw(char* filename, struct bitmap *bm){    struct pfraw_header bmph;    bmph.width = bm->width;    bmph.height = bm->height;    int fh = rb->creat( filename );    if( fh < 0 ) return false;    rb->write( fh, &bmph, sizeof( struct pfraw_header ) );    int y;    for( y = 0; y < bm->height; y++ )    {        fb_data *d = (fb_data*)( bm->data ) + (y*bm->width);        rb->write( fh, d, sizeof( fb_data ) * bm->width );    }    rb->close( fh );    return true;}/** Read the pfraw image given as filename and return the hid of the buffer */int read_pfraw(char* filename){    struct pfraw_header bmph;    int fh = rb->open(filename, O_RDONLY);    rb->read(fh, &bmph, sizeof(struct pfraw_header));    if( fh < 0 ) {        return empty_slide_hid;    }    int size =  sizeof(struct bitmap) + sizeof( fb_data ) * bmph.width * bmph.height;    int hid = rb->bufalloc(NULL, size, TYPE_BITMAP);    if (hid < 0) {        rb->close( fh );        return -1;    }    struct bitmap *bm;    if (rb->bufgetdata(hid, 0, (void *)&bm) < size) {        rb->close( fh );        return -1;    }    bm->width = bmph.width;    bm->height = bmph.height;    bm->format = FORMAT_NATIVE;    bm->data = ((unsigned char *)bm + sizeof(struct bitmap));    int y;    for( y = 0; y < bm->height; y++ )    {        fb_data *d = (fb_data*)( bm->data ) + (y*bm->width);        rb->read( fh, d , sizeof( fb_data ) * bm->width );    }    rb->close( fh );    return hid;}/**  Create the slide with its reflection for the given slide_index and filename  and store it as pfraw in CACHE_PREFIX/[slide_index].pfraw */bool create_bmp(struct bitmap *input_bmp, char *target_path, bool resize){    struct bitmap output_bmp;    output_bmp.format = input_bmp->format;    output_bmp.data = (char *)output_bmp_buffer;    if ( resize ) {        /* resize image */        output_bmp.width = config.avg_album_width;        output_bmp.height = config.avg_album_width;        simple_resize_bitmap(input_bmp, &output_bmp);        /* Resized bitmap is now in the output buffer,           copy it back to the input buffer */        rb->memcpy(input_bmp_buffer, output_bmp_buffer,                   config.avg_album_width * config.avg_album_width * sizeof(fb_data));        input_bmp->data = (char *)input_bmp_buffer;        input_bmp->width = output_bmp.width;        input_bmp->height = output_bmp.height;    }    output_bmp.width = input_bmp->width * 2;    output_bmp.height = input_bmp->height;    fb_data *src = (fb_data *)input_bmp->data;    fb_data *dst = (fb_data *)output_bmp.data;    /* transpose the image, this is to speed-up the rendering       because we process one column at a time       (and much better and faster to work row-wise, i.e in one scanline) */    int hofs = input_bmp->width / 3;    rb->memset(dst, 0, sizeof(fb_data) * output_bmp.width * output_bmp.height);    int x, y;    for (x = 0; x < input_bmp->width; x++)        for (y = 0; y < input_bmp->height; y++)            dst[output_bmp.width * x + (hofs + y)] =                    src[y * input_bmp->width + x];    /* create the reflection */    int ht = input_bmp->height - hofs;    int hte = ht;    for (x = 0; x < input_bmp->width; x++) {        for (y = 0; y < ht; y++) {            fb_data color = src[x + input_bmp->width * (input_bmp->height - y - 1)];            int r = RGB_UNPACK_RED(color) * (hte - y) / hte * 3 / 5;            int g = RGB_UNPACK_GREEN(color) * (hte - y) / hte * 3 / 5;            int b = RGB_UNPACK_BLUE(color) * (hte - y) / hte * 3 / 5;            dst[output_bmp.height + hofs + y + output_bmp.width * x] =                    LCD_RGBPACK(r, g, b);        }    }    return save_pfraw(target_path, &output_bmp);}/**  Load the surface for the given slide_index into the cache at cache_index. */static inline bool load_and_prepare_surface(const int slide_index,                                            const int cache_index){    rb->snprintf(tmp_path_name, sizeof(tmp_path_name), CACHE_PREFIX "/%d.pfraw",                 slide_index);    int hid = read_pfraw(tmp_path_name);    if (hid < 0)        return false;    cache[cache_index].hid = hid;    if ( cache_index < SLIDE_CACHE_SIZE ) {        cache[cache_index].index = slide_index;        cache[cache_index].touched = *rb->current_tick;    }    return true;}/** Load the surface from a bmp and overwrite the oldest slide in the cache if necessary. */int load_surface(const int slide_index){    long oldest_tick = *rb->current_tick;    int oldest_slide = 0;    int i;    if ( slide_cache_in_use < SLIDE_CACHE_SIZE ) { /* initial fill */        oldest_slide = slide_cache_in_use;        load_and_prepare_surface(slide_index, slide_cache_in_use++);    }    else {        for (i = 0; i < SLIDE_CACHE_SIZE; i++) { /* look for oldest slide */            if (cache[i].touched < oldest_tick) {                oldest_slide = i;                oldest_tick = cache[i].touched;            }        }        if (cache[oldest_slide].hid != empty_slide_hid) {            rb->bufclose(cache[oldest_slide].hid);            cache[oldest_slide].hid = -1;        }        load_and_prepare_surface(slide_index, oldest_slide);    }    return oldest_slide;}/**  Get a slide from the buffer */static inline struct bitmap *get_slide(const int hid){    if (hid < 0)        return NULL;    struct bitmap *bmp;    ssize_t ret = rb->bufgetdata(hid, 0, (void *)&bmp);    if (ret < 0)        return NULL;    return bmp;}/** Return the requested surface*/static inline struct bitmap *surface(const int slide_index){    if (slide_index < 0)        return 0;    if (slide_index >= number_of_slides)        return 0;    int i;    for (i = 0; i < slide_cache_in_use; i++) { /* maybe do the inverse mapping => implies dynamic allocation? */        if ( cache[i].index == slide_index ) {            /* We have already loaded our slide, so touch it and return it. */            cache[i].touched = *rb->current_tick;            return get_slide(cache[i].hid);        }    }    request_surface(slide_index);    return get_slide(empty_slide_hid);}/** adjust slides so that they are in "steady state" position */void reset_slides(void){    center_slide.angle = 0;    center_slide.cx = 0;    center_slide.cy = 0;    center_slide.distance = 0;    center_slide.slide_index = center_index;    int i;    for (i = 0; i < config.show_slides; i++) {        struct slide_data *si = &left_slides[i];        si->angle = itilt;        si->cx = -(offsetX + config.spacing_between_slides * i * PFREAL_ONE);        si->cy = offsetY;        si->slide_index = center_index - 1 - i;        si->distance = 0;    }    for (i = 0; i < config.show_slides; i++) {        struct slide_data *si = &right_slides[i];        si->angle = -itilt;        si->cx = offsetX + config.spacing_between_slides * i * PFREAL_ONE;        si->cy = offsetY;        si->slide_index = center_index + 1 + i;        si->distance = 0;    }}/** Updates look-up table and other stuff necessary for the rendering. Call this when the viewport size or slide dimension is changed. */void recalc_table(void){    int w = (BUFFER_WIDTH + 1) / 2;    int h = (BUFFER_HEIGHT + 1) / 2;    int i;    for (i = 0; i < w; i++) {        PFreal gg = (PFREAL_HALF + i * PFREAL_ONE) / (2 * h);        rays[w - i - 1] = -gg;        rays[w + i] = gg;    }    itilt = 70 * IANGLE_MAX / 360;      /* approx. 70 degrees tilted */    offsetX = config.avg_album_width / 2 * (PFREAL_ONE - fcos(itilt));    offsetY = config.avg_album_width / 2 * fsin(itilt);    offsetX += config.avg_album_width * PFREAL_ONE;    offsetY += config.avg_album_width * PFREAL_ONE / 4;    offsetX += config.extra_spacing_for_center_slide << PFREAL_SHIFT;}/**   Fade the given color by spreading the fb_data (ushort)   to an uint, multiply and compress the result back to a ushort. */#if (LCD_PIXELFORMAT == RGB565SWAPPED)static inline fb_data fade_color(fb_data c, unsigned int a){    c = swap16(c);    unsigned int p = ((((c|(c<<16)) & 0x07e0f81f) * a) >> 5) & 0x07e0f81f;    return swap16( (fb_data) (p | ( p >> 16 )) );}#elsestatic inline fb_data fade_color(fb_data c, unsigned int a){    unsigned int p = ((((c|(c<<16)) & 0x07e0f81f) * a) >> 5) & 0x07e0f81f;    return (p | ( p >> 16 ));}#endif/**  Render a single slide*/void render_slide(struct slide_data *slide, struct rect *result_rect,                  const int alpha, int col1, int col2){    rb->memset(result_rect, 0, sizeof(struct rect));    struct bitmap *bmp = surface(slide->slide_index);    if (!bmp) {        return;    }    fb_data *src = (fb_data *)bmp->data;    const int sw = bmp->height;    const int sh = bmp->width;    const int h = LCD_HEIGHT;    const int w = LCD_WIDTH;    if (col1 > col2) {        int c = col2;        col2 = col1;        col1 = c;    }    col1 = (col1 >= 0) ? col1 : 0;    col2 = (col2 >= 0) ? col2 : w - 1;    col1 = fmin(col1, w - 1);    col2 = fmin(col2, w - 1);    int distance = (h + slide->distance) * 100 / config.zoom;    if (distance < 100 ) distance = 100; /* clamp distances */    PFreal sdx = fcos(slide->angle);    PFreal sdy = fsin(slide->angle);    PFreal xs = slide->cx - bmp->width * sdx / 4;    PFreal ys = slide->cy - bmp->width * sdy / 4;    PFreal dist = distance * PFREAL_ONE;    const int alpha4 = alpha >> 3;    int xi = fmax((PFreal) 0,                  ((w * PFREAL_ONE / 2) +                   fdiv(xs * h, dist + ys)) >> PFREAL_SHIFT);    if (xi >= w) {        return;    }    bool flag = false;    result_rect->left = xi;    int x;    for (x = fmax(xi, col1); x <= col2; x++) {        PFreal hity = 0;        PFreal fk = rays[x];        if (sdy) {            fk = fk - fdiv(sdx, sdy);            hity = -fdiv(( rays[x] * distance                         - slide->cx                         + slide->cy * sdx / sdy), fk);        }        dist = distance * PFREAL_ONE + hity;        if (dist < 0)            continue;        PFreal hitx = fmul(dist, rays[x]);        PFreal hitdist = fdiv(hitx - slide->cx, sdx);        const int column = (sw >> 1) + (hitdist >> PFREAL_SHIFT);        if (column >= sw)            break;        if (column < 0)            continue;        result_rect->right = x;        if (!flag)            result_rect->left = x;        flag = true;        int y1 = (h >> 1);        int y2 = y1 + 1;        fb_data *pixel1 = &buffer[y1 * BUFFER_WIDTH + x];        fb_data *pixel2 = &buffer[y2 * BUFFER_WIDTH + x];        const int pixelstep = pixel2 - pixel1;        int center = (sh >> 1);        int dy = dist / h;        int p1 = center * PFREAL_ONE - (dy >> 2);        int p2 = center * PFREAL_ONE + (dy >> 2);        const fb_data *ptr = &src[column * bmp->width];        if (alpha == 256)            while ((y1 >= 0) && (y2 < h) && (p1 >= 0)) {                *pixel1 = ptr[p1 >> PFREAL_SHIFT];                *pixel2 = ptr[p2 >> PFREAL_SHIFT];                p1 -= dy;                p2 += dy;                y1--;                y2++;                pixel1 -= pixelstep;                pixel2 += pixelstep;        } else            while ((y1 >= 0) && (y2 < h) && (p1 >= 0)) {                *pixel1 = fade_color(ptr[p1 >> PFREAL_SHIFT], alpha4);                *pixel2 = fade_color(ptr[p2 >> PFREAL_SHIFT], alpha4);                p1 -= dy;                p2 += dy;                y1--;                y2++;                pixel1 -= pixelstep;                pixel2 += pixelstep;            }    }    /* let the music play... */    rb->yield();    result_rect->top = 0;    result_rect->bottom = h - 1;    return;}/**  Jump the the given slide_index */static inline void set_current_slide(const int slide_index){    step = 0;    center_index = fbound(slide_index, 0, number_of_slides - 1);    target = center_index;    slide_frame = slide_index << 16;    reset_slides();}/**  Start the animation for changing slides */void start_animation(void){    step = (target < center_slide.slide_index) ? -1 : 1;    pf_state = pf_scrolling;}/**  Go to the previous slide */void show_previous_slide(void){    if (step == 0) {        if (center_index > 0) {            target = center_index - 1;            start_animation();        }    } else if ( step > 0 ) {        target = center_index;        start_animation();    } else {        target = fmax(0, center_index - 2);    }}/**  Go to the next slide */void show_next_slide(void){    if (step == 0) {        if (center_index < number_of_slides - 1) {            target = center_index + 1;            start_animation();        }    } else if ( step < 0 ) {        target = center_index;        start_animation();    } else {        target = fmin(center_index + 2, number_of_slides - 1);    }}/**  Return true if the rect has size 0*/static inline bool is_empty_rect(struct rect *r){    return ((r->left == 0) && (r->right == 0) && (r->top == 0)            && (r->bottom == 0));}/**  Render the slides. Updates only the offscreen buffer.*/void render_all_slides(void){    rb->lcd_set_background(LCD_RGBPACK(0,0,0));    rb->lcd_clear_display(); /* TODO: Optimizes this by e.g. invalidating rects */    int nleft = config.show_slides;    int nright = config.show_slides;    struct rect r;    r.left = LCD_WIDTH; r.top = 0; r.bottom = 0; r.right = 0;    render_slide(&center_slide, &r, 256, -1, -1);#ifdef DEBUG_DRAW    rb->lcd_drawrect(r.left, r.top, r.right - r.left, r.bottom - r.top);#endif    int c1 = r.left;    int c2 = r.right;    int index;    if (step == 0) {        /* no animation, boring plain rendering */        for (index = 0; index < nleft - 1; index++) {            int alpha = (index < nleft - 2) ? 256 : 128;            alpha -= extra_fade;            if (alpha < 0 ) alpha = 0;            render_slide(&left_slides[index], &r, alpha, 0, c1 - 1);            if (!is_empty_rect(&r)) {#ifdef DEBUG_DRAW                rb->lcd_drawrect(r.left, r.top, r.right - r.left, r.bottom - r.top);#endif                c1 = r.left;            }        }        for (index = 0; index < nright - 1; index++) {            int alpha = (index < nright - 2) ? 256 : 128;            alpha -= extra_fade;            if (alpha < 0 ) alpha = 0;            render_slide(&right_slides[index], &r, alpha, c2 + 1,                         BUFFER_WIDTH);            if (!is_empty_rect(&r)) {#ifdef DEBUG_DRAW                rb->lcd_drawrect(r.left, r.top, r.right - r.left, r.bottom - r.top);#endif                c2 = r.right;            }        }    } else {        if ( step < 0 ) c1 = BUFFER_WIDTH;        /* the first and last slide must fade in/fade out */        for (index = 0; index < nleft; index++) {            int alpha = 256;            if (index == nleft - 1)                alpha = (step > 0) ? 0 : 128 - fade / 2;            if (index == nleft - 2)                alpha = (step > 0) ? 128 - fade / 2 : 256 - fade / 2;            if (index == nleft - 3)                alpha = (step > 0) ? 256 - fade / 2 : 256;            render_slide(&left_slides[index], &r, alpha, 0, c1 - 1);            if (!is_empty_rect(&r)) {#ifdef DEBUG_DRAW                rb->lcd_drawrect(r.left, r.top, r.right - r.left, r.bottom - r.top);#endif                c1 = r.left;            }        }        if ( step > 0 ) c2 = 0;        for (index = 0; index < nright; index++) {            int alpha = (index < nright - 2) ? 256 : 128;            if (index == nright - 1)                alpha = (step > 0) ? fade / 2 : 0;            if (index == nright - 2)                alpha = (step > 0) ? 128 + fade / 2 : fade / 2;            if (index == nright - 3)                alpha = (step > 0) ? 256 : 128 + fade / 2;            render_slide(&right_slides[index], &r, alpha, c2 + 1,                         BUFFER_WIDTH);            if (!is_empty_rect(&r)) {#ifdef DEBUG_DRAW                rb->lcd_drawrect(r.left, r.top, r.right - r.left, r.bottom - r.top);#endif                c2 = r.right;            }        }    }}/**  Updates the animation effect. Call this periodically from a timer.*/void update_scroll_animation(void){    if (step == 0)        return;    int speed = 16384;    int i;    /* deaccelerate when approaching the target */    if (true) {        const int max = 2 * 65536;        int fi = slide_frame;        fi -= (target << 16);        if (fi < 0)            fi = -fi;        fi = fmin(fi, max);        int ia = IANGLE_MAX * (fi - max / 2) / (max * 2);        speed = 512 + 16384 * (PFREAL_ONE + fsin(ia)) / PFREAL_ONE;    }    slide_frame += speed * step;    int index = slide_frame >> 16;    int pos = slide_frame & 0xffff;    int neg = 65536 - pos;    int tick = (step < 0) ? neg : pos;    PFreal ftick = (tick * PFREAL_ONE) >> 16;    /* the leftmost and rightmost slide must fade away */    fade = pos / 256;    if (step < 0)        index++;    if (center_index != index) {        center_index = index;        slide_frame = index << 16;        center_slide.slide_index = center_index;        for (i = 0; i < config.show_slides; i++)            left_slides[i].slide_index = center_index - 1 - i;        for (i = 0; i < config.show_slides; i++)            right_slides[i].slide_index = center_index + 1 + i;    }    center_slide.angle = (step * tick * itilt) >> 16;    center_slide.cx = -step * fmul(offsetX, ftick);    center_slide.cy = fmul(offsetY, ftick);    if (center_index == target) {        reset_slides();        pf_state = pf_idle;        step = 0;        fade = 256;        return;    }    for (i = 0; i < config.show_slides; i++) {        struct slide_data *si = &left_slides[i];        si->angle = itilt;        si->cx =            -(offsetX + config.spacing_between_slides * i * PFREAL_ONE + step                        * config.spacing_between_slides * ftick);        si->cy = offsetY;    }    for (i = 0; i < config.show_slides; i++) {        struct slide_data *si = &right_slides[i];        si->angle = -itilt;        si->cx =            offsetX + config.spacing_between_slides * i * PFREAL_ONE - step                      * config.spacing_between_slides * ftick;        si->cy = offsetY;    }    if (step > 0) {        PFreal ftick = (neg * PFREAL_ONE) >> 16;        right_slides[0].angle = -(neg * itilt) >> 16;        right_slides[0].cx = fmul(offsetX, ftick);        right_slides[0].cy = fmul(offsetY, ftick);    } else {        PFreal ftick = (pos * PFREAL_ONE) >> 16;        left_slides[0].angle = (pos * itilt) >> 16;        left_slides[0].cx = -fmul(offsetX, ftick);        left_slides[0].cy = fmul(offsetY, ftick);    }    /* must change direction ? */    if (target < index)        if (step > 0)            step = -1;    if (target > index)        if (step < 0)            step = 1;}/**  Cleanup the plugin*/void cleanup(void *parameter){    (void) parameter;#ifdef HAVE_ADJUSTABLE_CPU_FREQ    rb->cpu_boost(false);#endif    /* Turn on backlight timeout (revert to settings) */    backlight_use_settings(rb); /* backlight control in lib/helper.c */    int i;    for (i = 0; i < slide_cache_in_use; i++) {        rb->bufclose(cache[i].hid);    }    if ( empty_slide_hid != - 1)        rb->bufclose(empty_slide_hid);    rb->lcd_set_drawmode(old_drawmode);}/**  Create the "?" slide, that is shown while loading  or when no cover was found. */int create_empty_slide(bool force){    if ( force || ! rb->file_exists( EMPTY_SLIDE ) )  {        struct bitmap input_bmp;        input_bmp.width = BMPWIDTH_pictureflow_emptyslide;        input_bmp.height = BMPHEIGHT_pictureflow_emptyslide;        input_bmp.format = FORMAT_NATIVE;        input_bmp.data = (char*) &pictureflow_emptyslide;        if ( ! create_bmp(&input_bmp, EMPTY_SLIDE, true) ) return false;    }    empty_slide_hid = read_pfraw( EMPTY_SLIDE );    if (empty_slide_hid == -1 ) return false;    return true;}/**    Shows the album name setting menu*/int album_name_menu(void) {    void reset_track_list(void);    int selection = config.show_album_name;    MENUITEM_STRINGLIST(album_name_menu,"Show album title",NULL,            "Hide album title", "Show at the bottom", "Show at the top");    rb->do_menu(&album_name_menu,&selection);    config.show_album_name = selection;    reset_track_list();    return GO_TO_PREVIOUS;}/**  Shows the settings menu */int settings_menu(void) {    int selection = 0;    void reset_track_list(void);    MENUITEM_STRINGLIST(settings_menu, "PictureFlow Settings", NULL, "Show FPS",                        "Spacing", "Center margin", "Number of slides", "Zoom",                        "Show album titles", "Rebuild cache");    do {        selection=rb->do_menu(&settings_menu,&selection);        switch(selection) {            case 0:                rb->set_bool("Show FPS", &show_fps);                reset_track_list();                break;            case 1:                rb->set_int("Spacing between slides", "", 1,                            &(config.spacing_between_slides),                            NULL, 1, 0, 100, NULL );                recalc_table();                reset_slides();                break;            case 2:                rb->set_int("Center margin", "", 1,                            &(config.extra_spacing_for_center_slide),                            NULL, 1, -50, 50, NULL );                recalc_table();                reset_slides();                break;            case 3:                rb->set_int("Number of slides", "", 1, &(config.show_slides),                            NULL, 1, 1, MAX_SLIDES_COUNT, NULL );                recalc_table();                reset_slides();                break;            case 4:                rb->set_int("Zoom", "", 1, &(config.zoom),                            NULL, 1, 10, 300, NULL );                recalc_table();                reset_slides();                break;            case 5:                album_name_menu();                recalc_table();                reset_slides();                break;            case 6:                rb->remove(CACHE_PREFIX "/ready");                rb->remove(EMPTY_SLIDE);                rb->splash(HZ, "Cache will be rebuilt on next restart");                break;            case MENU_ATTACHED_USB:                return PLUGIN_USB_CONNECTED;        }    } while ( selection >= 0 );    return 0;}/**  Show the main menu */int main_menu(void){    int selection = 0;    int result;    rb->lcd_set_foreground(LCD_RGBPACK(255,255,255));    MENUITEM_STRINGLIST(main_menu,"PictureFlow Main Menu",NULL,                        "Settings", "Return", "Quit");    while (1)  {        switch (rb->do_menu(&main_menu,&selection)) {            case 0:                result = settings_menu();                if ( result != 0 ) return result;                break;            case 1:                return 0;            case 2:                return -1;            case MENU_ATTACHED_USB:                return PLUGIN_USB_CONNECTED;            default:                return 0;        }    }}/**  Fill the config struct with some defaults */void set_default_config(void){    config.spacing_between_slides = 40;    config.extra_spacing_for_center_slide = 0;    config.show_slides = 3;    config.avg_album_width = 0;    config.zoom = 100;    config.show_album_name = album_name_bottom;}/**  Read the config file.  For now, the size has to match.  Later a version number might be appropiate. */bool read_pfconfig(void){    set_default_config();    /* defaults */    int fh = rb->open( CONFIG_FILE, O_RDONLY );    if ( fh < 0 ) { /* no config yet */        return true;    }    int ret = rb->read(fh, &config, sizeof(struct config_data));    rb->close(fh);    if ( ret != sizeof(struct config_data) ) {        set_default_config();        rb->splash(2*HZ, "Config invalid. Using defaults");    }    return true;}/**  Write the config file */bool write_pfconfig(void){    int fh = rb->creat( CONFIG_FILE );    if( fh < 0 ) return false;    rb->write( fh, &config, sizeof( struct config_data ) );    rb->close( fh );    return true;}/**   Animation step for zooming into the current cover */void update_cover_in_animation(void){    cover_animation_keyframe++;    if( cover_animation_keyframe < 20 ) {        center_slide.distance-=5;        center_slide.angle+=1;        extra_fade += 13;    }    else if( cover_animation_keyframe < 35 ) {        center_slide.angle+=16;    }    else {        cover_animation_keyframe = 0;        selected_track = 0;        pf_state = pf_show_tracks;    }}/**   Animation step for zooming out the current cover */void update_cover_out_animation(void){    cover_animation_keyframe++;    if( cover_animation_keyframe <= 15 ) {        center_slide.angle-=16;    }    else if( cover_animation_keyframe < 35 ) {        center_slide.distance+=5;        center_slide.angle-=1;        extra_fade -= 13;    }    else {        cover_animation_keyframe = 0;        pf_state = pf_idle;    }}/**   Draw a blue gradient at y with height h */static inline void draw_gradient(int y, int h){    static int r, inc, c;    inc = (100 << 8) / h;    c = 0;    selected_track_pulse = (selected_track_pulse+1) % 10;    int c2 = selected_track_pulse - 5;    for (r=0; r<h; r++) {        rb->lcd_set_foreground(LCD_RGBPACK(c2+80-(c >> 9), c2+100-(c >> 9),                                           c2+250-(c >> 8)));        rb->lcd_hline(0, LCD_WIDTH, r+y);        if ( r > h/2 )            c-=inc;        else            c+=inc;    }}/**    Reset the track list after a album change */void reset_track_list(void){    int albumtxt_w, albumtxt_h;    const char* albumtxt = get_album_name(center_index);    rb->lcd_getstringsize(albumtxt, &albumtxt_w, &albumtxt_h);    const int height = LCD_HEIGHT-albumtxt_h-10;    switch (config.show_album_name) {        case album_name_hide:   /* hide */            track_list_visible_entries = fmin((LCD_HEIGHT-(show_fps ? track_list_offset : 0))/albumtxt_h,                                                track_count);            break;        case album_name_bottom:   /* bottom */        case album_name_top:   /* top  */            track_list_visible_entries = fmin((height-(show_fps ? track_list_offset : 0))/albumtxt_h,                                                track_count);            break;    }    start_index_track_list = 0;    track_scroll_index = 0;    track_scroll_dir = 1;    selected_track = 0;}/**  Display the list of tracks */void show_track_list(void){    rb->lcd_clear_display();    if ( center_slide.slide_index != track_index ) {        create_track_index(center_slide.slide_index);        reset_track_list();    }    static int titletxt_w, titletxt_h, titletxt_y, titletxt_x, i, color;    /* adjust track list a bit downwards whem album title is set to be shown at the top         OR fps show fps is enabled */    titletxt_y = ((config.show_album_name == album_name_top || show_fps) ? track_list_offset : 0);    int track_i;    for (i=0; i < track_list_visible_entries; i++) {        track_i = i+start_index_track_list;        rb->lcd_getstringsize(get_track_name(track_i), &titletxt_w, &titletxt_h);        titletxt_x = (LCD_WIDTH-titletxt_w)/2;        if ( track_i == selected_track ) {            draw_gradient(titletxt_y, titletxt_h);            rb->lcd_set_foreground(LCD_RGBPACK(255,255,255));            if (titletxt_w > LCD_WIDTH ) {                if ( titletxt_w + track_scroll_index <= LCD_WIDTH )                    track_scroll_dir = 1;                else if ( track_scroll_index >= 0 ) track_scroll_dir = -1;                track_scroll_index += track_scroll_dir*2;                titletxt_x = track_scroll_index;            }            rb->lcd_putsxy(titletxt_x,titletxt_y,get_track_name(track_i));        }        else {            color = 250 - (abs(selected_track - track_i) * 200 / track_count);            rb->lcd_set_foreground(LCD_RGBPACK(color,color,color));            rb->lcd_putsxy(titletxt_x,titletxt_y,get_track_name(track_i));        }        titletxt_y += titletxt_h;    }}void select_next_track(void){    if (  selected_track < track_count - 1 ) {        selected_track++;        track_scroll_index = 0;        track_scroll_dir = 1;        if (selected_track==(track_list_visible_entries+start_index_track_list))            start_index_track_list++;    }}void select_prev_track(void){    if (selected_track > 0 ) {        if (selected_track==start_index_track_list) start_index_track_list--;        track_scroll_index = 0;        track_scroll_dir = 1;        selected_track--;    }}/**   Draw the current album name */void draw_album_text(void){    int albumtxt_w, albumtxt_h;    int albumtxt_y = 0;    char *albumtxt;    int c;    /* Draw album text */    if ( pf_state == pf_scrolling ) {        c = ((slide_frame & 0xffff )/ 255);        if (step < 0) c = 255-c;        if (c > 128 ) { /* half way to next slide .. still not perfect! */            albumtxt = get_album_name(center_index+step);            c = (c-128)*2;        }        else {            albumtxt = get_album_name(center_index);            c = (128-c)*2;        }    }    else {        c= 255;        albumtxt = get_album_name(center_index);    }    rb->lcd_set_foreground(LCD_RGBPACK(c,c,c));    rb->lcd_getstringsize(albumtxt, &albumtxt_w, &albumtxt_h);    if (center_index != prev_center_index) {        albumtxt_x = 0;        albumtxt_dir = -1;        prev_center_index = center_index;    }    albumtxt_y = ((config.show_album_name == album_name_bottom) ? (LCD_HEIGHT-albumtxt_h-10) : 10);    if (albumtxt_w > LCD_WIDTH ) {        rb->lcd_putsxy(albumtxt_x, albumtxt_y , albumtxt);        if ( pf_state == pf_idle || pf_state == pf_show_tracks ) {            if ( albumtxt_w + albumtxt_x <= LCD_WIDTH ) albumtxt_dir = 1;            else if ( albumtxt_x >= 0 ) albumtxt_dir = -1;            albumtxt_x += albumtxt_dir;        }    }    else {        rb->lcd_putsxy((LCD_WIDTH - albumtxt_w) /2, albumtxt_y , albumtxt);    }}/**  Main function that also contain the main plasma  algorithm. */int main(void){    int ret;    draw_splashscreen();    if ( ! rb->dir_exists( CACHE_PREFIX ) ) {        if ( rb->mkdir( CACHE_PREFIX ) < 0 ) {            rb->splash(HZ, "Could not create directory " CACHE_PREFIX );            return PLUGIN_ERROR;        }    }    if (!read_pfconfig()) {        rb->splash(HZ, "Error in config. Please delete " CONFIG_FILE);        return PLUGIN_ERROR;    }    if (!allocate_buffers()) {        rb->splash(HZ, "Could not allocate temporary buffers");        return PLUGIN_ERROR;    }    ret = create_album_index();    if (ret == ERROR_BUFFER_FULL) {        rb->splash(HZ, "Not enough memory for album names");        return PLUGIN_ERROR;    } else if (ret == ERROR_NO_ALBUMS) {        rb->splash(HZ, "No albums found. Please enable database");        return PLUGIN_ERROR;    }    if (!create_albumart_cache(config.avg_album_width == 0)) {        rb->splash(HZ, "Could not create album art cache");        return PLUGIN_ERROR;    }    if (!create_empty_slide(false)) {        rb->splash(HZ, "Could not load the empty slide");        return PLUGIN_ERROR;    }    if (!free_buffers()) {        rb->splash(HZ, "Could not free temporary buffers");        return PLUGIN_ERROR;    }    if (!create_pf_thread()) {        rb->splash(HZ, "Cannot create thread!");        return PLUGIN_ERROR;    }    int i;    /* initialize */    int min_slide_cache = fmin(number_of_slides, SLIDE_CACHE_SIZE);    for (i = 0; i < min_slide_cache; i++) {        cache[i].hid = -1;        cache[i].touched = 0;        slide_cache_stack[i] = SLIDE_CACHE_SIZE-i-1;    }    slide_cache_stack_index = min_slide_cache-1;    slide_cache_in_use = 0;    buffer = rb->lcd_framebuffer;    pf_state = pf_idle;    track_index = -1;    extra_fade = 0;    center_index = 0;    slide_frame = 0;    step = 0;    target = 0;    fade = 256;    show_fps = false;    recalc_table();    reset_slides();    char fpstxt[10];    int fpstxt_w, fpstxt_h;    int button;#ifdef HAVE_ADJUSTABLE_CPU_FREQ    rb->cpu_boost(true);#endif    int frames = 0;    long last_update = *rb->current_tick;    long current_update;    long update_interval = 100;    int fps = 0;    bool instant_update;    old_drawmode = rb->lcd_get_drawmode();    rb->lcd_set_drawmode(DRMODE_FG);    while (true) {        current_update = *rb->current_tick;        frames++;        /* Initial rendering */        instant_update = false;        /* Handle states */        switch ( pf_state ) {            case pf_scrolling:                update_scroll_animation();                render_all_slides();                instant_update = true;                break;            case pf_cover_in:                update_cover_in_animation();                render_all_slides();                instant_update = true;                break;            case pf_cover_out:                update_cover_out_animation();                render_all_slides();                instant_update = true;                break;            case pf_show_tracks:                show_track_list();                break;            case pf_idle:                render_all_slides();                break;        }        rb->lcd_getstringsize(fpstxt, &fpstxt_w, &fpstxt_h);        /* Calculate FPS */        if (current_update - last_update > update_interval) {            fps = frames * HZ / (current_update - last_update);            last_update = current_update;            frames = 0;        }        /* Draw FPS */        if (show_fps) {            rb->lcd_set_foreground(LCD_RGBPACK(255, 0, 0));            rb->snprintf(fpstxt, sizeof(fpstxt), "FPS: %d", fps);            /* move fps text to the bottom, when the album             titles are set to be shown at the top */            rb->lcd_putsxy(0, (config.show_album_name == album_name_top ? (LCD_HEIGHT-fpstxt_h) : 0), fpstxt);         }        if (config.show_album_name) /* Don't draw when album names are hidden */            draw_album_text();        /* Copy offscreen buffer to LCD and give time to other threads */        rb->lcd_update();        rb->yield();        /*/ Handle buttons */        button = pluginlib_getaction(rb, instant_update ? 0 : HZ/16,                                     plugin_contexts, NB_ACTION_CONTEXTS);        switch (button) {        case PICTUREFLOW_QUIT:            return PLUGIN_OK;        case PICTUREFLOW_MENU:            if ( pf_state == pf_idle || pf_state == pf_scrolling ) {                ret = main_menu();                if ( ret == -1 ) return PLUGIN_OK;                if ( ret != 0 ) return i;                rb->lcd_set_drawmode(DRMODE_FG);            }            else {                pf_state = pf_cover_out;            }            break;        case PICTUREFLOW_NEXT_ALBUM:        case PICTUREFLOW_NEXT_ALBUM_REPEAT:#ifdef SCROLLWHEEL            if ( pf_state == pf_show_tracks )                select_next_track();#endif            if ( pf_state == pf_idle || pf_state == pf_scrolling )                show_next_slide();            break;        case PICTUREFLOW_PREV_ALBUM:        case PICTUREFLOW_PREV_ALBUM_REPEAT:#ifdef SCROLLWHEEL            if ( pf_state == pf_show_tracks )                select_prev_track();#endif            if ( pf_state == pf_idle || pf_state == pf_scrolling )                show_previous_slide();            break;#ifndef SCROLLWHEEL        case PICTUREFLOW_NEXT_TRACK:        case PICTUREFLOW_NEXT_TRACK_REPEAT:            if ( pf_state == pf_show_tracks )                select_next_track();            break;        case PICTUREFLOW_PREV_TRACK:        case PICTUREFLOW_PREV_TRACK_REPEAT:            if ( pf_state == pf_show_tracks )                select_prev_track();            break;#endif        case PICTUREFLOW_SELECT_ALBUM:            if ( pf_state == pf_idle )                pf_state = pf_cover_in;            if ( pf_state == pf_show_tracks )                pf_state = pf_cover_out;            break;        default:            if (rb->default_event_handler_ex(button, cleanup, NULL)                == SYS_USB_CONNECTED)                return PLUGIN_USB_CONNECTED;            break;        }    }}/*************************** Plugin entry point ****************************/enum plugin_status plugin_start(struct plugin_api *api, void *parameter){    int ret;    rb = api;                   /* copy to global api pointer */    (void) parameter;#if LCD_DEPTH > 1    rb->lcd_set_backdrop(NULL);#endif    /* Turn off backlight timeout */    backlight_force_on(rb);     /* backlight control in lib/helper.c */    ret = main();    if ( ret == PLUGIN_OK ) {        if (!write_pfconfig()) {            rb->splash(HZ, "Error writing config.");            return PLUGIN_ERROR;        }    }    end_pf_thread();    cleanup(NULL);    return ret;}