1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
|
/***************************************************************************
* __________ __ ___.
* Open \______ \ ____ ____ | | _\_ |__ _______ ___
* Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
* Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
* Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
* \/ \/ \/ \/ \/
*
* SID Codec for Rockbox using Hermit's cRSID library
*
* Written by Hermit (Mihaly Horvath) and Ninja (Wolfram Sang) in 2022/23.
* Some generic codec handling taken from the former SID codec done by
* Tammo Hinrichs, Rainer Sinsch, Dave Chapman, Stefan Waigand, Igor Poretsky,
* Solomon Peachy.
*
* 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 software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
* KIND, either express or implied.
*
***************************************************************************/
#include "cRSID/libcRSID.h"
#include "codeclib.h"
#include <inttypes.h>
CODEC_HEADER
/* bigger CHUNK_SIZE makes Clip sluggish when playing 2SIDs */
#define CHUNK_SIZE 512
#define SID_BUFFER_SIZE 0x10000
#define SAMPLE_RATE 44100
static int32_t samples_r[CHUNK_SIZE] IBSS_ATTR;
static int32_t samples_l[CHUNK_SIZE] IBSS_ATTR;
void sid_render(int32_t *buffer_r, int32_t *buffer_l, unsigned long len) ICODE_ATTR;
void sid_render(int32_t *buffer_r, int32_t *buffer_l, unsigned long len) {
unsigned long bp;
int output;
for (bp = 0; bp < len; bp++) {
output = cRSID_generateSample(&cRSID_C64) << 12;
*(buffer_r + bp) = output; *(buffer_l + bp) = output;
}
}
enum codec_status codec_main(enum codec_entry_call_reason reason)
{
if (reason == CODEC_LOAD) {
ci->configure(DSP_SET_FREQUENCY, SAMPLE_RATE);
ci->configure(DSP_SET_SAMPLE_DEPTH, 28);
ci->configure(DSP_SET_STEREO_MODE, STEREO_NONINTERLEAVED);
cRSID_init(SAMPLE_RATE, CHUNK_SIZE);
}
return CODEC_OK;
}
enum codec_status codec_run(void)
{
cRSID_SIDheader *SIDheader;
size_t filesize;
unsigned char subSong;
unsigned char *sidfile = NULL;
intptr_t param;
bool resume;
long action;
if (codec_init())
return CODEC_ERROR;
codec_set_replaygain(ci->id3);
ci->seek_buffer(0);
sidfile = ci->request_buffer(&filesize, SID_BUFFER_SIZE);
if (filesize == 0)
return CODEC_ERROR;
param = ci->id3->elapsed;
resume = param != 0;
/* Start first song */
action = CODEC_ACTION_SEEK_TIME;
while (action != CODEC_ACTION_HALT) {
if (action == CODEC_ACTION_SEEK_TIME) {
/* Start playing from scratch */
SIDheader = cRSID_processSIDfile(&cRSID_C64, sidfile, filesize);
subSong = SIDheader->DefaultSubtune - 1;
/* Now use the current seek time in seconds as subsong */
if (!resume || (resume && param))
subSong = param / 1000;
/* Set the elapsed time to the current subsong (in seconds) */
ci->set_elapsed(subSong * 1000);
ci->seek_complete();
resume = false;
cRSID_initSIDtune(&cRSID_C64, SIDheader, subSong + 1);
}
sid_render(samples_r, samples_l, CHUNK_SIZE);
ci->pcmbuf_insert(samples_r, samples_l, CHUNK_SIZE);
/* New time is in param */
action = ci->get_command(¶m);
}
return CODEC_OK;
}
|