1 /*
2 ** Copyright (C) 2003-2017 Erik de Castro Lopo <erikd@mega-nerd.com>
3 **
4 ** This program is free software; you can redistribute it and/or modify
5 ** it under the terms of the GNU General Public License as published by
6 ** the Free Software Foundation; either version 2 of the License, or
7 ** (at your option) any later version.
8 **
9 ** This program is distributed in the hope that it will be useful,
10 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
11 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 ** GNU General Public License for more details.
13 **
14 ** You should have received a copy of the GNU General Public License
15 ** along with this program; if not, write to the Free Software
16 ** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
17 */
18
19 #include "sfconfig.h"
20
21 #include <stdio.h>
22 #include <stdlib.h>
23 #include <string.h>
24 #if HAVE_UNISTD_H
25 #include <unistd.h>
26 #else
27 #include "sf_unistd.h"
28 #endif
29 #include <math.h>
30 #include <inttypes.h>
31
32
33 #include <sndfile.h>
34
35 #include "utils.h"
36
37
38 static unsigned char aifc_data [] =
39 { 'F' , 'O' , 'R' , 'M' ,
40 0x00, 0x00, 0x01, 0xE8, /* FORM length */
41
42 'A' , 'I' , 'F' , 'C' ,
43 0x43, 0x4F, 0x4D, 0x4D, /* COMM */
44 0x00, 0x00, 0x00, 0x26, /* COMM length */
45 0x00, 0x01, 0x00, 0x00, 0x00, 0xAE, 0x00, 0x10, 0x40, 0x0D, 0xAC, 0x44,
46 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x4E, 0x4F, 0x4E, 0x45, 0x0D, 'N' ,
47 'o' , 't' , ' ' , 'c' , 'o' , 'm' , 'p' , 'r' , 'e' , 's' , 's' , 'e' ,
48 'd' , 0x00,
49
50 'F' , 'V' , 'E' , 'R' , 0x00, 0x00, 0x00, 0x04, 0xA2, 0x80, 0x51, 0x40,
51
52 /* A 'MARK' chunk. */
53 'M' , 'A' , 'R' , 'K' , 0x00, 0x00, 0x00, 0x36, 0x00, 0x05,
54 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x01, 'A' ,
55 0x00, 0x02, 0x00, 0x00, 0x11, 0x3A, 0x02, 'B' , 'C' , 0x00,
56 0x00, 0x03, 0x00, 0x00, 0x22, 0x74, 0x03, 'D' , 'E' , 'F',
57 0x00, 0x04, 0x00, 0x00, 0x33, 0xAE, 0x04, 'G' , 'H' , 'I', 'J' , 0x00,
58 0x00, 0x05, 0x00, 0x00, 0x44, 0xE8, 0x05, 'K' , 'L' , 'M', 'N' , 'O' ,
59
60 'S' , 'S' , 'N' , 'D' ,
61 0x00, 0x00, 0x01, 0x64, /* SSND length */
62 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
63 0xFF, 0xE0, 0xFF, 0xDB, 0xFF, 0xD0, 0xFF, 0xD5, 0xFF, 0xD6, 0xFF, 0xD0,
64 0xFF, 0xBF, 0xFF, 0xBE, 0xFF, 0xB9, 0xFF, 0xC8, 0xFF, 0xBF, 0xFF, 0xD5,
65 0xFF, 0xC3, 0xFF, 0xBF, 0xFF, 0xB3, 0xFF, 0xBE, 0xFF, 0xB4, 0xFF, 0xAD,
66 0xFF, 0xAC, 0xFF, 0xAF, 0xFF, 0xB9, 0xFF, 0xB3, 0xFF, 0xA4, 0xFF, 0xA5,
67 0xFF, 0x93, 0xFF, 0x95, 0xFF, 0x97, 0xFF, 0x98, 0xFF, 0x99, 0xFF, 0x9E,
68 0xFF, 0x90, 0xFF, 0x80, 0xFF, 0x81, 0xFF, 0x7C, 0xFF, 0x80, 0xFF, 0x7C,
69 0xFF, 0x72, 0xFF, 0x72, 0xFF, 0x6C, 0xFF, 0x75, 0xFF, 0x6E, 0xFF, 0x6F,
70 0xFF, 0x66, 0xFF, 0x62, 0xFF, 0x5C, 0xFF, 0x64, 0xFF, 0x50, 0xFF, 0x56,
71 0xFF, 0x56, 0xFF, 0x4A, 0xFF, 0x4A, 0xFF, 0x49, 0xFF, 0x44, 0xFF, 0x49,
72 0xFF, 0x3B, 0xFF, 0x3F, 0xFF, 0x48, 0xFF, 0x46, 0xFF, 0x42, 0xFF, 0x49,
73 0xFF, 0x43, 0xFF, 0x36, 0xFF, 0x40, 0xFF, 0x35, 0xFF, 0x3F, 0xFF, 0x36,
74 0xFF, 0x37, 0xFF, 0x2E, 0xFF, 0x23, 0xFF, 0x23, 0xFF, 0x21, 0xFF, 0x1F,
75 0xFF, 0x25, 0xFF, 0x2C, 0xFF, 0x1E, 0xFF, 0x22, 0xFF, 0x24, 0xFF, 0x2B,
76 0xFF, 0x35, 0xFF, 0x27, 0xFF, 0x2E, 0xFF, 0x21, 0xFF, 0x18, 0xFF, 0x21,
77 0xFF, 0x20, 0xFF, 0x0F, 0xFF, 0x21, 0xFF, 0x1A, 0xFF, 0x10, 0xFF, 0x09,
78 0xFF, 0x1E, 0xFF, 0x19, 0xFF, 0x21, 0xFF, 0x13, 0xFF, 0x1B, 0xFF, 0x18,
79 0xFF, 0x21, 0xFF, 0x0F, 0xFF, 0x1A, 0xFF, 0x16, 0xFF, 0x21, 0xFF, 0x1B,
80 0xFF, 0x1B, 0xFF, 0x23, 0xFF, 0x1A, 0xFF, 0x21, 0xFF, 0x26, 0xFF, 0x23,
81 0xFF, 0x26, 0xFF, 0x27, 0xFF, 0x30, 0xFF, 0x27, 0xFF, 0x2F, 0xFF, 0x28,
82 0xFF, 0x2C, 0xFF, 0x27, 0xFF, 0x33, 0xFF, 0x29, 0xFF, 0x33, 0xFF, 0x3A,
83 0xFF, 0x42, 0xFF, 0x3B, 0xFF, 0x4D, 0xFF, 0x4B, 0xFF, 0x4D, 0xFF, 0x4A,
84 0xFF, 0x67, 0xFF, 0x77, 0xFF, 0x73, 0xFF, 0x7B, 0xFF, 0xDE, 0xFF, 0xAD,
85 0x00, 0x4A, 0x00, 0x63, 0xEC, 0x8C, 0x03, 0xBB, 0x0E, 0xE4, 0x08, 0xF2,
86 0x00, 0x70, 0xE3, 0xD1, 0xE5, 0xE4, 0x01, 0x6E, 0x0A, 0x67, 0x1C, 0x74,
87 0xF8, 0x8E, 0x10, 0x7B, 0xEA, 0x3C, 0x09, 0x87, 0x1B, 0x24, 0xEF, 0x05,
88 0x17, 0x76, 0x0D, 0x5B, 0x02, 0x43, 0xF5, 0xEF, 0x0C, 0x1D, 0xF7, 0x61,
89 0x05, 0x95, 0x0B, 0xC2, 0xF1, 0x69, 0x1A, 0xA1, 0xEC, 0x75, 0xF4, 0x11,
90 0x13, 0x4F, 0x13, 0x71, 0xFA, 0x33, 0xEC, 0x32, 0xC8, 0xCF, 0x05, 0xB0,
91 0x0B, 0x61, 0x33, 0x19, 0xCE, 0x37, 0xEF, 0xD4, 0x21, 0x9D, 0xFA, 0xAE,
92 } ;
93
94 static void rw_test (const char *filename) ;
95
96 int
main(void)97 main (void)
98 { const char *filename = "rw.aifc" ;
99
100 print_test_name ("aiff_rw_test", filename) ;
101
102 dump_data_to_file (filename, aifc_data, sizeof (aifc_data)) ;
103
104 rw_test (filename) ;
105
106 unlink (filename) ;
107
108 puts ("ok") ;
109 return 0 ;
110 } /* main */
111
112 /*==============================================================================
113 */
114
115 static void
rw_test(const char * filename)116 rw_test (const char *filename)
117 { SNDFILE *file ;
118 SF_INFO sfinfo_rd, sfinfo_rw ;
119
120 memset (&sfinfo_rd, 0, sizeof (sfinfo_rd)) ;
121 memset (&sfinfo_rw, 0, sizeof (sfinfo_rw)) ;
122
123 /* Open the file in read only mode and fill in the SF_INFO struct. */
124 if ((file = sf_open (filename, SFM_READ, &sfinfo_rd)) == NULL)
125 { printf ("\n\nLine %d : sf_open SFM_READ failed : %s\n\n", __LINE__, sf_strerror (NULL)) ;
126 exit (1) ;
127 } ;
128 check_log_buffer_or_die (file, __LINE__) ;
129 sf_close (file) ;
130
131 /* Now open read/write and close the file. */
132 if ((file = sf_open (filename, SFM_RDWR, &sfinfo_rw)) == NULL)
133 { printf ("\n\nLine %d : sf_open SFM_RDWR failed : %s\n\n", __LINE__, sf_strerror (NULL)) ;
134 exit (1) ;
135 } ;
136 check_log_buffer_or_die (file, __LINE__) ;
137 sf_close (file) ;
138
139 /* Open again as read only again and fill in a new SF_INFO struct. */
140 memset (&sfinfo_rw, 0, sizeof (sfinfo_rw)) ;
141 if ((file = sf_open (filename, SFM_READ, &sfinfo_rw)) == NULL)
142 { printf ("\n\nLine %d : sf_open SFM_RDWR failed : %s\n\n", __LINE__, sf_strerror (NULL)) ;
143 exit (1) ;
144 } ;
145 check_log_buffer_or_die (file, __LINE__) ;
146 sf_close (file) ;
147
148 /* Now compare the two. */
149 if (sfinfo_rd.format != sfinfo_rw.format)
150 { printf ("\n\nLine %d : format mismatch (0x%08X != 0x%08X).\n\n", __LINE__,
151 sfinfo_rd.format, sfinfo_rw.format) ;
152 exit (1) ;
153 } ;
154
155 if (sfinfo_rd.channels != sfinfo_rw.channels)
156 { printf ("\n\nLine %d : channel count mismatch (%d != %d).\n\n", __LINE__,
157 sfinfo_rd.channels, sfinfo_rw.channels) ;
158 exit (1) ;
159 } ;
160
161 if (sfinfo_rd.frames != sfinfo_rw.frames)
162 { printf ("\n\nLine %d : frame count mismatch (rd %" PRId64 " != rw %" PRId64 ").\n\n", __LINE__,
163 sfinfo_rd.frames, sfinfo_rw.frames) ;
164 exit (1) ;
165 } ;
166
167 return ;
168 } /* rw_test */
169
170