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
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
|
/*
* Adplug - Replayer for many OPL2/OPL3 audio file formats.
* Copyright (C) 1999 - 2008 Simon Peter <dn.tlp@gmx.net>, et al.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library 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
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
* imf.cpp - IMF Player by Simon Peter <dn.tlp@gmx.net>
*
* FILE FORMAT:
* There seem to be 2 different flavors of IMF formats out there. One version
* contains just the raw IMF music data. In this case, the first word of the
* file is always 0 (because the music data starts this way). This is already
* the music data! So read in the entire file and play it.
*
* If this word is greater than 0, it specifies the size of the following
* song data in bytes. In this case, the file has a footer that contains
* arbitrary infos about it. Mostly, this is plain ASCII text with some words
* of the author. Read and play the specified amount of song data and display
* the remaining data as ASCII text.
*
* NOTES:
* This player handles the two above mentioned formats, as well as a third
* type, invented by Martin Fernandez <mfernan@cnba.uba.ar>, that's got a
* proper header to add title/game name information. After the header starts
* the normal IMF file in one of the two above mentioned formats.
*
* This player also handles a special footer format by Adam Nielsen,
* which has defined fields of information about the song, the author
* and more.
*/
#include <string.h>
#include "imf.h"
#include "database.h"
/*** public methods *************************************/
CPlayer *CimfPlayer::factory(Copl *newopl)
{
return new CimfPlayer(newopl);
}
bool CimfPlayer::load(const std::string &filename, const CFileProvider &fp)
{
binistream *f = fp.open(filename); if(!f) return false;
unsigned long fsize, flsize, mfsize = 0;
unsigned int i;
// file validation section
{
char header[5];
int version;
f->readString(header, 5);
version = f->readInt(1);
if(strncmp(header, "ADLIB", 5) || version != 1) {
if(!fp.extension(filename, ".imf") && !fp.extension(filename, ".wlf")) {
// It's no IMF file at all
fp.close(f);
return false;
} else
f->seek(0); // It's a normal IMF file
} else {
// It's a IMF file with header
track_name = f->readString('\0');
game_name = f->readString('\0');
f->ignore(1);
mfsize = f->pos() + 2;
}
}
// load section
if(mfsize)
fsize = f->readInt(4);
else
fsize = f->readInt(2);
flsize = fp.filesize(f);
if(!fsize) { // footerless file (raw music data)
if(mfsize)
f->seek(-4, binio::Add);
else
f->seek(-2, binio::Add);
size = (flsize - mfsize) / 4;
} else // file has got a footer
size = fsize / 4;
data = new Sdata[size];
for(i = 0; i < size; i++) {
data[i].reg = f->readInt(1); data[i].val = f->readInt(1);
data[i].time = f->readInt(2);
}
// read footer, if any
if(fsize && (fsize < flsize - 2 - mfsize)) {
if(f->readInt(1) == 0x1a) {
// Adam Nielsen's footer format
track_name = f->readString();
author_name = f->readString();
remarks = f->readString();
} else {
// Generic footer
unsigned long footerlen = flsize - fsize - 2 - mfsize;
footer = new char[footerlen + 1];
f->readString(footer, footerlen);
footer[footerlen] = '\0'; // Make ASCIIZ string
}
}
rate = getrate(filename, fp, f);
fp.close(f);
rewind(0);
return true;
}
bool CimfPlayer::update()
{
do {
opl->write(data[pos].reg,data[pos].val);
del = data[pos].time;
pos++;
} while(!del && pos < size);
if(pos >= size) {
pos = 0;
songend = true;
}
else timer = rate / (float)del;
return !songend;
}
void CimfPlayer::rewind(int subsong)
{
pos = 0; del = 0; timer = rate; songend = false;
opl->init(); opl->write(1,32); // go to OPL2 mode
}
std::string CimfPlayer::gettitle()
{
std::string title;
title = track_name;
if(!track_name.empty() && !game_name.empty())
title += " - ";
title += game_name;
return title;
}
std::string CimfPlayer::getdesc()
{
std::string desc;
if(footer)
desc = std::string(footer);
if(!remarks.empty() && footer)
desc += "\n\n";
desc += remarks;
return desc;
}
/*** private methods *************************************/
float CimfPlayer::getrate(const std::string &filename, const CFileProvider &fp, binistream *f)
{
if(db) { // Database available
f->seek(0, binio::Set);
CClockRecord *record = (CClockRecord *)db->search(CAdPlugDatabase::CKey(*f));
if (record && record->type == CAdPlugDatabase::CRecord::ClockSpeed)
return record->clock;
}
// Otherwise the database is either unavailable, or there's no entry for this file
if (fp.extension(filename, ".imf")) return 560.0f;
if (fp.extension(filename, ".wlf")) return 700.0f;
return 700.0f; // default speed for unknown files that aren't .IMF or .WLF
}
|
