pico/cd/buffering.c

   1 /*
   2  * Buffering handling
   3  * (C) notaz, 2007,2008
   4  *
   5  * This work is licensed under the terms of MAME license.
   6  * See COPYING file in the top-level directory.
   7  */
   8
   9 #include "../pico_int.h"
  10
  11 int PicoCDBuffers = 0;
  12 static unsigned char *cd_buffer = NULL;
  13 static int prev_lba = 0x80000000;
  14
  15 static int hits, reads;
  16
  17
  18 void PicoCDBufferInit(void)
  19 {
  20         void *tmp = NULL;
  21
  22         prev_lba = 0x80000000;
  23         hits = reads = 0;
  24
  25         if (PicoCDBuffers <= 1) {
  26                 PicoCDBuffers = 0;
  27                 return; /* buffering off */
  28         }
  29
  30         /* try alloc'ing until we succeed */
  31         while (PicoCDBuffers > 0)
  32         {
  33                 tmp = realloc(cd_buffer, PicoCDBuffers * 2048 + 304);
  34                 if (tmp != NULL) break;
  35                 PicoCDBuffers >>= 1;
  36         }
  37
  38         if (PicoCDBuffers <= 0) return; /* buffering became off */
  39
  40         cd_buffer = tmp;
  41 }
  42
  43
  44 void PicoCDBufferFree(void)
  45 {
  46         if (cd_buffer) {
  47                 free(cd_buffer);
  48                 cd_buffer = NULL;
  49         }
  50         if (reads)
  51                 elprintf(EL_STATUS, "CD buffer hits: %i/%i (%i%%)\n", hits, reads, hits * 100 / reads);
  52 }
  53
  54
  55 void PicoCDBufferFlush(void)
  56 {
  57         prev_lba = 0x80000000;
  58 }
  59
  60
  61 /* this is was a try to fight slow SD access of GP2X */
  62 PICO_INTERNAL void PicoCDBufferRead(void *dest, int lba)
  63 {
  64         int is_bin, offs, read_len, moved = 0;
  65         reads++;
  66
  67         is_bin = Pico_mcd->TOC.Tracks[0].ftype == TYPE_BIN;
  68
  69         if (PicoCDBuffers <= 0)
  70         {
  71                 /* no buffering */
  72                 int where_seek = is_bin ? (lba * 2352 + 16) : (lba << 11);
  73                 pm_seek(Pico_mcd->TOC.Tracks[0].F, where_seek, SEEK_SET);
  74                 pm_read(dest, 2048, Pico_mcd->TOC.Tracks[0].F);
  75                 return;
  76         }
  77
  78         /* hit? */
  79         offs = lba - prev_lba;
  80         if (offs >= 0 && offs < PicoCDBuffers)
  81         {
  82                 hits++;
  83                 if (offs == 0) dprintf("CD buffer seek to old %i -> %i\n", prev_lba, lba);
  84                 memcpy32(dest, (int *)(cd_buffer + offs*2048), 2048/4);
  85                 return;
  86         }
  87
  88         if (prev_lba + PicoCDBuffers != lba)
  89         {
  90                 int where_seek = is_bin ? (lba * 2352 + 16) : (lba << 11);
  91                 dprintf("CD buffer seek %i -> %i\n", prev_lba, lba);
  92                 pm_seek(Pico_mcd->TOC.Tracks[0].F, where_seek, SEEK_SET);
  93         }
  94
  95         dprintf("CD buffer miss %i -> %i\n", prev_lba, lba);
  96
  97         if (lba < prev_lba && prev_lba - lba < PicoCDBuffers)
  98         {
  99                 read_len = prev_lba - lba;
 100                 dprintf("CD buffer move=%i, read_len=%i", PicoCDBuffers - read_len, read_len);
 101                 memmove(cd_buffer + read_len*2048, cd_buffer, (PicoCDBuffers - read_len)*2048);
 102                 moved = 1;
 103         }
 104         else
 105         {
 106                 read_len = PicoCDBuffers;
 107         }
 108
 109         if (PicoMessage != NULL && read_len >= 512)
 110         {
 111                 PicoMessage("Buffering data...");
 112         }
 113
 114         if (is_bin)
 115         {
 116                 int i = 0;
 117 #if REDUCE_IO_CALLS
 118                 int bufs = (read_len*2048) / (2048+304);
 119                 pm_read(cd_buffer, bufs*(2048+304), Pico_mcd->TOC.Tracks[0].F);
 120                 for (i = 1; i < bufs; i++)
 121                         // should really use memmove here, but my memcpy32 implementation is also suitable here
 122                         memcpy32((int *)(cd_buffer + i*2048), (int *)(cd_buffer + i*(2048+304)), 2048/4);
 123 #endif
 124                 for (; i < read_len - 1; i++)
 125                 {
 126                         pm_read(cd_buffer + i*2048, 2048 + 304, Pico_mcd->TOC.Tracks[0].F);
 127                         // pm_seek(Pico_mcd->TOC.Tracks[0].F, 304, SEEK_CUR); // seeking is slower, in PSP case even more
 128                 }
 129                 // further data might be moved, do not overwrite
 130                 pm_read(cd_buffer + i*2048, 2048, Pico_mcd->TOC.Tracks[0].F);
 131                 pm_seek(Pico_mcd->TOC.Tracks[0].F, 304, SEEK_CUR);
 132         }
 133         else
 134         {
 135                 pm_read(cd_buffer, read_len*2048, Pico_mcd->TOC.Tracks[0].F);
 136         }
 137         memcpy32(dest, (int *) cd_buffer, 2048/4);
 138         prev_lba = lba;
 139
 140         if (moved)
 141         {
 142                 /* file pointer must point to the same data in file, as would-be data after our buffer */
 143                 int where_seek;
 144                 lba += PicoCDBuffers;
 145                 where_seek = is_bin ? (lba * 2352 + 16) : (lba << 11);
 146                 pm_seek(Pico_mcd->TOC.Tracks[0].F, where_seek, SEEK_SET);
 147         }
 148 }
 149