Mercurial > repos > blastem

annotate wave.c @ 2288:efc75ea79164

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Support WAVE files in CUE sheets
author Michael Pavone <pavone@retrodev.com>
date Wed, 18 Jan 2023 23:31:44 -0800
parents 6e9d1a8c1b08
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
467
140af5509ce7 Added copyright notice to source files and added GPL license text in COPYING
Mike Pavone <pavone@retrodev.com>
parents: 407
diff changeset
1 /*
140af5509ce7 Added copyright notice to source files and added GPL license text in COPYING
Mike Pavone <pavone@retrodev.com>
parents: 407
diff changeset
2 Copyright 2013 Michael Pavone
520
6e9d1a8c1b08 Fix check of fwrite return value in wave_finalize so that the data subchunk size gets written
Michael Pavone <pavone@retrodev.com>
parents: 467
diff changeset
3 This file is part of BlastEm.
467
140af5509ce7 Added copyright notice to source files and added GPL license text in COPYING
Mike Pavone <pavone@retrodev.com>
parents: 407
diff changeset
4 BlastEm is free software distributed under the terms of the GNU General Public License version 3 or greater. See COPYING for full license text.
140af5509ce7 Added copyright notice to source files and added GPL license text in COPYING
Mike Pavone <pavone@retrodev.com>
parents: 407
diff changeset
5 */
407
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
6 #include "wave.h"
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
7 #include <stddef.h>
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
8 #include <string.h>
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
9
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
10 int wave_init(FILE * f, uint32_t sample_rate, uint16_t bits_per_sample, uint16_t num_channels)
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
11 {
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
12 wave_header header;
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
13 memcpy(header.chunk.id, "RIFF", 4);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
14 memcpy(header.chunk.format, "WAVE", 4);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
15 header.chunk.size = 0; //This will be filled in later
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
16 memcpy(header.format_header.id, "fmt ", 4);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
17 header.format_header.size = sizeof(wave_header) - (sizeof(header.chunk) + sizeof(header.data_header) + sizeof(header.format_header));
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
18 header.audio_format = 1;
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
19 header.num_channels = num_channels;
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
20 header.sample_rate = sample_rate;
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
21 header.byte_rate = sample_rate * num_channels * (bits_per_sample/8);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
22 header.block_align = num_channels * (bits_per_sample/8);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
23 header.bits_per_sample = bits_per_sample;
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
24 memcpy(header.data_header.id, "data", 4);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
25 header.data_header.size = 0;//This will be filled in later;
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
26 return fwrite(&header, 1, sizeof(header), f) == sizeof(header);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
27 }
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
28
2288
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
29 uint8_t wave_read_header(FILE *f, wave_header *header)
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
30 {
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
31 size_t initial_read = sizeof(*header) - sizeof(header->data_header);
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
32 if (fread(header, 1, initial_read, f) != initial_read) {
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
33 return 0;
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
34 }
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
35 if (memcmp(header->chunk.id, "RIFF", 4)) {
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
36 return 0;
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
37 }
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
38 if (memcmp(header->chunk.format, "WAVE", 4)) {
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
39 return 0;
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
40 }
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
41 if (header->chunk.size < sizeof(*header) - 8) {
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
42 return 0;
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
43 }
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
44 if (memcmp(header->format_header.id, "fmt ", 4)) {
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
45 return 0;
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
46 }
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
47 if (header->format_header.size < sizeof(*header) - sizeof(header->chunk) - sizeof(header->format_header) - sizeof(header->data_header)) {
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
48 return 0;
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
49 }
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
50 fseek(f, header->format_header.size + sizeof(header->chunk) + sizeof(header->format_header), SEEK_SET);
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
51 if (fread(&header->data_header, 1, sizeof(header->data_header), f) != sizeof(header->data_header)) {
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
52 return 0;
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
53 }
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
54 if (memcmp(header->data_header.id, "data", 4)) {
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
55 return 0;
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
56 }
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
57 return 1;
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
58 }
efc75ea79164 Support WAVE files in CUE sheets
Michael Pavone <pavone@retrodev.com>
parents: 520
diff changeset
59
407
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
60 int wave_finalize(FILE * f)
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
61 {
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
62 uint32_t size = ftell(f);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
63 fseek(f, offsetof(wave_header, chunk.size), SEEK_SET);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
64 size -= 8;
520
6e9d1a8c1b08 Fix check of fwrite return value in wave_finalize so that the data subchunk size gets written
Michael Pavone <pavone@retrodev.com>
parents: 467
diff changeset
65 if (fwrite(&size, sizeof(size), 1, f) != 1) {
407
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
66 fclose(f);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
67 return 0;
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
68 }
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
69 fseek(f, offsetof(wave_header, data_header.size), SEEK_SET);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
70 size -= 36;
520
6e9d1a8c1b08 Fix check of fwrite return value in wave_finalize so that the data subchunk size gets written
Michael Pavone <pavone@retrodev.com>
parents: 467
diff changeset
71 if (fwrite(&size, sizeof(size), 1, f) != 1) {
407
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
72 fclose(f);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
73 return 0;
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
74 }
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
75 fclose(f);
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
76 return 1;
c3abc4ada43d Add support for logging YM2612 channels to WAVE files
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
77 }