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
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
|
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<html>
<head>
<title>Building an Audio CD Player, Listing 4</title>
</head>
<body bgcolor="#FFFFFF" text="000000">
<p><HR> <P>
<h3>Listing 4. Jcd_Drive_ix86-Linux.c</h3>
<p><HR> <P>
<pre>
#include <sys/types.h> /* 1 */
#include <sys/stat.h> /* 2 */
#include <fcntl.h> /* 3 */
#include <linux/cdrom.h> /* 4 */
#include <sys/ioctl.h> /* 5 */
#include <unistd.h> /* 6 */
#include <stdlib.h> /* 7 */
#include <stdio.h> /* 8 */
#include <time.h> /* 9 */
#include "Jcd_Drive.h" /* 10 */
/** 12
Jcd - Java CD Audio Player 13
Michael Hamilton (michael@actrix.gen.nz). 14
All rights reserved. 15
*/ /* 16 */
* This code could be far more integrated into
* the Java code, but I may want to used it
* with python (my prefered langauge), so I'm
* avoiding this for now. Ignoring supporting
* multi-disc players for now, but the java
* class allows for it in the future. 22
* If using kaffe generate .h with
* "kaffeh Jcd/Drive" 24
*/ /* 26 */
#ifdef TRUE /* 28 */
#undef TRUE /* 29 */
#undef FALSE /* 30 */
#endif /* 31 */
#define TRUE 1 /* 33 */
#define FALSE 0 /* 34 */
/* 36
* Javah and Kaffeh differ over the type of long
* in Java-1.1.1 this is int32_t 38
*/
#ifndef KAFFE /* 39 */
# define Java_Int long /* Java 1.0 */ /* 40 */
#else /* 41 */
# define Java_Int jint /* kaffeh */ /* 42 */
#endif /* 43 */
#define FRAMES_PER_SECOND \
Jcd_Drive_FRAMES_PER_SECOND /* 46 */
#define MAX_DEVICE_LEN 512 /* 47 */
#define MAX_ERROR_LEN 512 /* 48 */
#define FRAME_ADDRESS(mins, secs, frames) \
(((mins) * FRAMES_PER_SECOND * 60) + \
((secs) * FRAMES_PER_SECOND) + (frames))
static int debug; /* 53 */
static void
yield_player(struct HJcd_Drive *drive);/* 55 */
static void
take_player(struct HJcd_Drive *drive); /* 56 */
static void take_player(struct HJcd_Drive *drive)
{ /* 59 */
/* 60
* If not already open, open the device. 61
*/ /* 62 */
if (unhand(drive)->fd == -1) { /* 63 */
char device_name[MAX_DEVICE_LEN + 1];/* 64 */
javaString2CString(
unhand(drive)->device_name,device_name,
MAX_DEVICE_LEN); /* 65 */
if (device_name == '\0') { /* 66 */
char *device = getenv("CDROM"); /* 67 */
if (device == NULL) /* 68 */
strcpy(device_name, "/dev/cdrom");
} /* 70 */
unhand(drive)->device_flags |=
(getenv("SBPCD") != NULL) ? /* 71 */
Jcd_Drive_FLAG_STOP_PLAY : /* 72 */
Jcd_Drive_FLAG_NONE; /* 73 */
unhand(drive)->fd =open(device_name,O_RDONLY);
if (debug) /* 77 */
fprintf(stderr,
"Openned %s flags=%d fd=%d\n ",
device_name, /* 79 */
unhand(drive)->device_flags,
unhand(drive)->fd); /* 81 */
} /* 82 */
} /* 83 */
static void yield_player(struct HJcd_Drive *drive)
{ /* 87 */
/* 88
* Close the device, make it available to others.
*/ /* 90 */
if (unhand(drive)->fd != -1) { /* 91 */
close(unhand(drive)->fd); /* 92 */
} /* 93 */
unhand(drive)->fd = -1; /* 95 */
unhand(drive)->current_track = 1; /* 96 */
unhand(drive)->current_index = 1; /* 97 */
unhand(drive)->number_of_tracks = 0; /* 98 */
unhand(drive)->audio_status =
Jcd_Drive_STATUS_INVALID; /* 99 */
if (debug) /* 101 */
fprintf(stderr, "closed cd device\n");
} /* 103 */
static Java_Int
new_status(struct HJcd_Drive *drive) /* 105 */
{ /* 106 */
* Try to obtain the device and query its status.
* May cause the tray to close with some drivers.
*/ /* 110 */
struct cdrom_subchnl ch; /* 111 */
long stat; /* 112 */
unhand(drive)->current_track = 1; /* 114 */
unhand(drive)->current_index = 1; /* 115 */
unhand(drive)->current_address = 0; /* 116 */
if (unhand(drive)->fd == -1) {
/* See if there's a new CD */
take_player(drive); /* 120 */
if (unhand(drive)->fd != -1) { /* 121 */
struct cdrom_tochdr tinfo; /* 122 */
stat = ioctl(unhand(drive)->fd,
CDROMREADTOCHDR,
&tinfo); /* 123 */
if (stat == -1) { /* 124 */
yield_player(drive); /* 125 */
unhand(drive)->audio_status =
Jcd_Drive_STATUS_INVALID; /* 126 */
return (Java_Int)
unhand(drive)->audio_status; /* 127 */
} /* 128 */
unhand(drive)->number_of_tracks =
tinfo.cdth_trk1; /* 129 */
if (debug) /* 130 */
fprintf(stderr, /* 131 */
"number_of_tracks=%d\n",
unhand(drive)->number_of_tracks);
} /* 134 */
} /* 135 */
ch.cdsc_format = CDROM_MSF; /* 137 */
stat = ioctl(unhand(drive)->fd,
CDROMSUBCHNL,
&ch); /* 139 */
if (stat == -1) { /* Assume no CD in drive */
yield_player(drive); /* 141 */
unhand(drive)->audio_status =
Jcd_Drive_STATUS_INVALID; /* 142 */
return (Java_Int) unhand(drive)->audio_status;
} /* 144 */
unhand(drive)->current_track = ch.cdsc_trk;
unhand(drive)->current_index = ch.cdsc_ind;
unhand(drive)->current_address =
FRAME_ADDRESS(ch.cdsc_absaddr.msf.minute,
ch.cdsc_absaddr.msf.second,
ch.cdsc_absaddr.msf.frame);
unhand(drive)->audio_status = /* 153 */
ch.cdsc_audiostatus; /* 154 */
return (Java_Int) unhand(drive)->audio_status;
} /* 157 */
static int is_open(struct HJcd_Drive *drive)
{ /* 160 */
if (unhand(drive)->fd == -1) { /* 161 */
return FALSE; /* 163 */
} /* 164 */
return TRUE; /* 165 */
} /* 166 */
static int /* 168 */
is_available_now(struct HJcd_Drive *drive)
{ /* 169 */
new_status(drive); /* 170 */
return is_open(drive); /* 171 */
} /* 172 */
void Jcd_Drive_initDrive(struct HJcd_Drive *drive)
{ /* 175 */
fprintf(stderr, "Initializing cd drive...\n");
debug = getenv("JCD_DEBUG") != NULL; /* 177 */
new_status(drive); /* 178 */
} /* 179 */
Java_Int /* 181 */
Jcd_Drive_status(struct HJcd_Drive *drive)
{ /* 182 */
if (unhand(drive)->fd == -1) { /* 183 */
return unhand(drive)->audio_status; /* 184 */
} /* 185 */
else { /* 186 */
return new_status(drive); /* 187 */
} /* 188 */
} /* 189 */
Java_Int /* 191 */
Jcd_Drive_currentTrack(struct HJcd_Drive *drive)
{ /* 192 */
if (!is_available_now(drive)) { return 1; }
return unhand(drive)->current_track; /* 194 */
} /* 195 */
Java_Int /* 197 */
Jcd_Drive_currentIndex(struct HJcd_Drive *drive)
{ /* Must call current track first */ /* 198 */
if (!is_available_now(drive)) { return 1; }
return unhand(drive)->current_index; /* 200 */
} /* 201 */
Java_Int /* 204 */
Jcd_Drive_currentAddress(struct HJcd_Drive *drive)
{ /* 205 */
if (!is_available_now(drive)) { return 0; }
return unhand(drive)->current_address; /* 207 */
} /* 208 */
Java_Int
Jcd_Drive_numberOfTracks(struct HJcd_Drive *drive)
{ /* 212 */
if (!is_open(drive)) { return 0; } /* 213 */
return unhand(drive)->number_of_tracks;/* 214 */
} /* 215 */
Java_Int /* 218 */
Jcd_Drive_trackAddress(struct HJcd_Drive *drive,
Java_Int track)
{ /* 219 */
struct cdrom_tocentry tocentry; /* 220 */
if (!is_open(drive)) { return 0; } /* 222 */
tocentry.cdte_track = track; /* 223 */
tocentry.cdte_format = CDROM_MSF; /* 224 */
if ((ioctl(unhand(drive)->fd,
CDROMREADTOCENTRY,
&tocentry)) == -1) {
if (debug) /* 226 */
fprintf(stderr, "tae=%d\n", track);/* 227 */
SignalError(0,
"Jcd/TrackAddressException",
strerror(errno)); /* 228 */
return 0; /* 229 */
} /* 230 */
return /* 231 */
FRAME_ADDRESS(tocentry.cdte_addr.msf.minute,
tocentry.cdte_addr.msf.second,
tocentry.cdte_addr.msf.frame);
} /* 234 */
Java_Int
Jcd_Drive_trackLength(struct HJcd_Drive *drive,
Java_Int n) /* 236 */
{ /* 237 */
int starts_at =Jcd_Drive_trackAddress(drive, n);
int start_of_next = /* 239 */
(n >= unhand(drive)->number_of_tracks)
? Jcd_Drive_cdEndAddress(drive) /* 241 */
: Jcd_Drive_trackAddress(drive, n + 1);
return start_of_next - starts_at; /* 243 */
} /* 244 */
Java_Int /* 247 */
Jcd_Drive_cdEndAddress(struct HJcd_Drive *drive)
{ /* 248 */
if (!is_open(drive)) { return 0; } /* 249 */
return /* 250 */
Jcd_Drive_trackAddress(drive, CDROM_LEADOUT);
} /* 251 */
static int cddbSum(int n) /* 253 */
{ /* Sum the digits */ /* 254 */
int s = 0; /* 255 */
while (n != 0) { /* 256 */
s += n % 10; /* 257 */
n = n / 10; /* 258 */
} /* 259 */
return s; /* 260 */
} /* 261 */
struct Hjava_lang_String *Jcd_Drive_cddbID(
struct HJcd_Drive *drive) /* 263 */
{ /* 264 */
/* see http://sunsite.unc.edu~/cddb/xjcd/ */
char id[10] = "00000000"; /* 266 */
int i; /* 267 */
int t = 0; /* 268 */
int n = 0; /* 269 */
if (!is_open(drive))
{ return makeJavaString(id, 8); } /* 271 */
for (i = 1;
i
i++) { /* 272 */
n += cddbSum(Jcd_Drive_trackAddress(drive, i)
/ FRAMES_PER_SECOND);
t += (Jcd_Drive_trackLength(drive, i) /
FRAMES_PER_SECOND) ; /* 274 */
} /* 275 */
i = ((n % 0xff)
<< 24 | t
<< 8 | (unhand(drive)->number_of_tracks));
sprintf(id, "%08x", i); /* 277 */
return makeJavaString(id, 8); /* 278 */
} /* 279 */
void Jcd_Drive_play(struct HJcd_Drive *drive,
Java_Int start_track,
Java_Int start_index,
Java_Int end_track,
Java_Int end_index)
{ /* 286 */
struct cdrom_ti ti; /* 287 */
long stat; /* 288 */
unhand(drive)->current_track = 1; /* 290 */
if (!is_available_now(drive)) { return; }
if (debug) /* 294 */
fprintf(stderr, /* 295 */
"play %d %d %d\n", /* 296 */
start_track,
end_track,
unhand(drive)->number_of_tracks);
if (end_track == 0) {
/* Kludge for first call to play. */ /* 299 */
end_track = unhand(drive)->number_of_tracks;
} /* 301 */
if (start_track
start_track > unhand(drive)->number_of_tracks)
{
SignalError(0,
"Jcd/DriveException",
"Play: start track out of range.");
return; /* 305 */
} /* 306 */
if (end_track
end_track > unhand(drive)->number_of_tracks)
{
SignalError(0,
"Jcd/DriveException",
"Play: end track out of range.");
return; /* 310 */
} /* 311 */
if (!is_open(drive)) { /* 313 */
return; /* 314 */
} /* 315 */
if ((unhand(drive)->device_flags &
Jcd_Drive_FLAG_STOP_PLAY)) { /* 317 */
/* Must issue stop before play. */
Jcd_Drive_stop(drive); /* 318 */
} /* 319 */
if (debug) /* 321 */
fprintf(stderr, "try play %d\n", start_track);
ti.cdti_trk0 = start_track; /* 324 */
ti.cdti_ind0 = start_index; /* 325 */
ti.cdti_trk1 = end_track; /* 326 */
ti.cdti_ind1 = end_index; /* 327 */
if (ti.cdti_ind1 == 0) { /* 329 */
/* Doesn't seem to be a way of specifying end
* index. But this seems to work. 331
*/ /* 332 */
ti.cdti_ind1 =unhand(drive)->number_of_tracks;
} /* 334 */
stat = ioctl(unhand(drive)->fd,
CDROMPLAYTRKIND,
&ti); /* 336 */
if (stat
SignalError(0, "Jcd/PlayException",
strerror(errno)); /* 338 */
return; /* 339 */
} /* 340 */
unhand(drive)->current_track = start_track;
if (debug) /* 344 */
fprintf(stderr, "playing %d\n", /* 346 */
unhand(drive)->current_track);
} /* 346 */
void Jcd_Drive_stop(struct HJcd_Drive *drive)
{ /* 350 */
if (!is_available_now(drive)) { return; }
if (ioctl(unhand(drive)->fd, CDROMSTOP) == -1) {
SignalError(0, "Jcd/StopException",
strerror(errno)); /* 354 */
} /* 355 */
} /* 356 */
void Jcd_Drive_pause(struct HJcd_Drive *drive)
{ /* 360 */
if (!is_available_now(drive)) { return; }
if (unhand(drive)->audio_status !=
Jcd_Drive_STATUS_PLAY) { /* 363 */
SignalError(0, "Jcd/PauseException",
"Pause: drive isn't playing.");
return; /* 365 */
} /* 366 */
if (ioctl(unhand(drive)->fd,CDROMPAUSE) == -1) {
SignalError(0, "Jcd/PauseException",
strerror(errno)); /* 369 */
} /* 370 */
} /* 371 */
void Jcd_Drive_resume(struct HJcd_Drive *drive)
{ /* 375 */
if (!is_available_now(drive)) { return; }
if (unhand(drive)->audio_status !=
Jcd_Drive_STATUS_PAUSED) { /* 378 */
SignalError(0, "Jcd/ResumeException",
"Resume: drive isn't paused.");
return; /* 380 */
} /* 381 */
if (ioctl(unhand(drive)->fd,CDROMRESUME) == -1){
SignalError(0, "Jcd/ResumeException",
strerror(errno)); /* 384 */
} /* 385 */
} /* 386 */
void Jcd_Drive_eject(struct HJcd_Drive *drive)
{ /* 390 */
long retract = unhand(drive)->fd == -1;
if (!is_available_now(drive)) { return; }
if (retract) { return; } /* 396 */
Jcd_Drive_stop(drive); /* 399 */
if (ioctl(unhand(drive)->fd,CDROMEJECT) == -1) {
SignalError(0, "Jcd/EjectException",
strerror(errno)); /* 402 */
} /* 403 */
yield_player(drive); /* 405 */
} /* 406 */
Java_Int /* 409 */
Jcd_Drive_volume(struct HJcd_Drive *drive)
{ /* 410 */
struct cdrom_volctrl vol; /* 411 */
if (!is_available_now(drive)) { return; }
if (ioctl(unhand(drive)->fd, CDROMVOLREAD,
&vol) == -1) { /* 415 */
SignalError(0, "Jcd/VolumeException",
strerror(errno)); /* 416 */
return 0; /* 417 */
} /* 418 */
return vol.channel0; /* 419 */
} /* 420 */
void Jcd_Drive_setVolume(struct HJcd_Drive *drive,
Java_Int volume)
{ /* 423 */
struct cdrom_volctrl vol; /* 424 */
if (!is_available_now(drive)) { return; }
if (volume
SignalError(0, "Jcd/SetVolumeException",
"Volume out of range."); /* 429 */
return; /* 430 */
} /* 431 */
vol.channel0 = volume; /* 433 */
vol.channel1 = volume; /* 434 */
vol.channel2 = volume; /* 435 */
vol.channel3 = volume; /* 436 */
if (ioctl(unhand(drive)->fd, CDROMVOLCTRL,
&vol) == -1) { /* 438 */
SignalError(0, "Jcd/SetVolumeException",
strerror(errno)); /* 439 */
} /* 440 */
} /* 441 */
struct Hjava_lang_String * /* 444 */
Jcd_Drive_productCode(struct HJcd_Drive *drive)
{ /* 445 */
char upc[9] = "00000000"; /* 446 */
if (!is_available_now(drive)) {
return makeJavaString(upc, 8); /* 448 */
} /* 449 */
if (ioctl(unhand(drive)->fd, CDROM_GET_UPC, upc)
== -1) { /* 450 */
SignalError(0, "Jcd/ProductCodeException",
strerror(errno)); /* 451 */
} /* 452 */
return makeJavaString(upc, 8); /* 453 */
} /* 454 */
</pre>
</body>
</html>
|
