-
Notifications
You must be signed in to change notification settings - Fork 0
/
MAIN.BAK
237 lines (209 loc) · 6.97 KB
/
MAIN.BAK
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
#include <dos.h>
/*
* Play Audio CD digitally on Windows Sound System compatible soundcard
* (C) Lefucjusz, Gdansk 03.2020
*
* This program has to be compiled with compact memory model
*
* Things to develop:
*
* -graphic interface
* -add WSS detection, now it's hardcoded base=0x530,irq=5,dma=1
*
*
*/
#include <alloc.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include "inttypes.h"
#include "cd.h"
#include "buffer.h"
#include "irq.h"
#include "wss.h"
#include "playback.h"
#define KEY_ESC 27
volatile uint8_t irq_fired = 0;
void interrupt irq_isr(void)
{
irq_fired = 1;
outp(WSS_STATUS_REG, 0x00); //Clear WSS interrupt bit
outp(PIC_STATUS_REG, PIC_END_OF_INTERRUPT); //Acknowledge interrupt
}
int main(void)
{
uint32_t *tracks_locations, *tracks_lengths;
uint32_t sectors_qty, sector = 0;
uint16_t drives_qty, first_drive, mscdex_ver, selected_drive, offset, i;
uint8_t *drive_letters, *audio_buffer;
uint8_t tracks_qty, hr, min, min_played, sec, sec_played, page, play_state = STOPPED, pause_state = RESUMED, track_played = 0;
char input;
clrscr(); //Clear display
printf("Digital CD Audio player for WSS-compatible card\n(c)Copyright Lefucjusz, 2020\n\n");
/* Check if any drives installed */
cd_check_drives(&drives_qty, &first_drive, &mscdex_ver); //Check if any drive is available
if(drives_qty == 0) //If no drive
{
printf("MSCDEX not installed! Terminating...\n");
return -1;
}
printf("MSCDEX detected, version %u.%u\n", (mscdex_ver >> 8), (mscdex_ver & 0xFF));
/* Drive selection */
if(drives_qty == 1) //If only one drive
{
printf("Found 1 drive: %c\n", first_drive + 'A');
selected_drive = first_drive;
}
else //If more than one drive; this case has never been tested as I couldn't connect more than one drive to my test computer
{
drive_letters = farmalloc(sizeof(uint8_t)*drives_qty); //Allocate memory for letters array
if(!drive_letters) //If failed to allocate
{
printf("Failed to allocate memory for drive letters! Terminating...\n");
return -2;
}
cd_get_drive_letters(drive_letters); //Get drive letters
printf("Found %u drives: ", drives_qty);
for(i = 0; i < drives_qty; i++)
{
printf("%c ", drive_letters[i]+'A');
}
printf("Select drive for playback: ");
input = getch();
for(i = 0; i < drives_qty; i++) //Check if such drive is available
{
if((drive_letters[i] + 'A') == toupper(input))
{
selected_drive = drive_letters[i];
farfree(drive_letters); //Free letters array
break;
}
}
if(i == drives_qty) //Nothing has been found
{
printf("No such drive available! Terminating...\n");
farfree(drive_letters); //Free letters array
return -3;
}
}
printf("Selected drive: %c\n\n", selected_drive + 'A');
cd_init(selected_drive); //Initialize CD driver
/* Read TOC */
printf("Reading disc information...\n");
sleep(2); //Time for messages to display
while(!cd_check_if_audiocd(selected_drive)) //Loop until proper CD inserted or quit on escape key
{
printf("Drive not ready or inserted CD is not an Audio CD\nPress any key to retry, ESC to quit...\n");
input = getch();
if(input == KEY_ESC)
{
return -4;
}
}
cd_get_disc_info(selected_drive, &tracks_qty, §ors_qty); //Obtain disc info
tracks_locations = farmalloc(sizeof(uint32_t)*tracks_qty);
tracks_lengths = farmalloc(sizeof(uint32_t)*tracks_qty);
if(!tracks_locations || !tracks_lengths) //Potential memory leak?
{
printf("Failed to allocate memory for TOC data! Terminating...\n");
return -5;
}
for(i = 0; i < tracks_qty; i++) //Obtain tracks locations
{
tracks_locations[i] = cd_get_track_location(selected_drive, i+1);
}
for(i = 0; i < tracks_qty-1; i++) //Compute tracks lengths
{
tracks_lengths[i] = tracks_locations[i+1] - tracks_locations[i];
}
tracks_lengths[tracks_qty-1] = sectors_qty - tracks_locations[tracks_qty-1]; //Last one has to be computed differently
clrscr(); //Clear display
printf("---------------------\t\tControl:\n");
printf("------ CD Info ------\t\t[ESC] - leave to DOS\n");
printf("---------------------\t\t[I] - previous track\n");
printf("| #Track | Length |\t\t[O] - next track\n");
printf("|--------|----------|\t\t[P] - pause/resume\n");
for(i = 0; i < tracks_qty; i++)
{
cd_sectors_to_time(tracks_lengths[i], &hr, &min, &sec);
printf("| %02u | %02u:%02u:%02u |\n", i+1, hr, min, sec);
}
cd_sectors_to_time(sectors_qty, &hr, &min, &sec);
printf("---------------------\n");
printf("| Full | %02u:%02u:%02u |\n", hr, min, sec);
/* Start playback */
audio_buffer = buffer_alloc(&page, &offset);
if(!audio_buffer)
{
printf("Failed to allocate memory for playback buffer! Terminating...\n");
farfree(tracks_lengths);
farfree(tracks_locations);
return -6;
}
cd_lock(selected_drive);
irq_init(irq_isr);
playback_start(audio_buffer, page, offset, sectors_qty, §or, selected_drive);
play_state = STARTED;
while(input != KEY_ESC && (play_state == STARTED))
{
if(kbhit())
{
input = getch();
switch(toupper(input)) //toupper for being independent of input case
{
case 'I':
if((track_played > 0) && (pause_state == RESUMED)) //If track is not first and not paused (if paused it would start and infinitely loop first 64KB of file...)
{
track_played--;
playback_stop();
sector = tracks_locations[track_played];
playback_start(audio_buffer, page, offset, (sectors_qty-tracks_locations[track_played]), §or, selected_drive);
}
break;
case 'O':
if((track_played < tracks_qty-1) && (pause_state == RESUMED)) //If track is not last and not paused (if paused it would start and infinitely loop first 64KB of file...)
{
track_played++;
playback_stop();
sector = tracks_locations[track_played];
playback_start(audio_buffer, page, offset, (sectors_qty-tracks_locations[track_played]), §or, selected_drive);
}
break;
case 'P':
if(pause_state == PAUSED)
{
pause_state = RESUMED;
playback_resume();
}
else
{
pause_state = PAUSED;
playback_stop();
}
break;
default:
break;
}
}
if(irq_fired && (pause_state == RESUMED))
{
irq_fired = 0;
playback_continue(audio_buffer, page, offset, §or, &play_state);
if(sector >= tracks_locations[track_played+1])
{
track_played++;
}
cd_sectors_to_time(sector-tracks_locations[track_played], &hr, &min_played, &sec_played);
cd_sectors_to_time(tracks_lengths[track_played], &hr, &min, &sec);
printf("\r\t\t\t\tPlaying track: #%u, %02u:%02u/%02u:%02u ", track_played+1, min_played, sec_played, min, sec);
}
}
playback_stop();
cd_unlock(selected_drive);
cd_deinit(selected_drive);
irq_release();
buffer_free();
farfree(tracks_lengths);
farfree(tracks_locations);
return 0;
}