cannam@125
|
1 /*
|
cannam@125
|
2 ** Copyright (C) 1999-2015 Erik de Castro Lopo <erikd@mega-nerd.com>
|
cannam@125
|
3 **
|
cannam@125
|
4 ** All rights reserved.
|
cannam@125
|
5 **
|
cannam@125
|
6 ** Redistribution and use in source and binary forms, with or without
|
cannam@125
|
7 ** modification, are permitted provided that the following conditions are
|
cannam@125
|
8 ** met:
|
cannam@125
|
9 **
|
cannam@125
|
10 ** * Redistributions of source code must retain the above copyright
|
cannam@125
|
11 ** notice, this list of conditions and the following disclaimer.
|
cannam@125
|
12 ** * Redistributions in binary form must reproduce the above copyright
|
cannam@125
|
13 ** notice, this list of conditions and the following disclaimer in
|
cannam@125
|
14 ** the documentation and/or other materials provided with the
|
cannam@125
|
15 ** distribution.
|
cannam@125
|
16 ** * Neither the author nor the names of any contributors may be used
|
cannam@125
|
17 ** to endorse or promote products derived from this software without
|
cannam@125
|
18 ** specific prior written permission.
|
cannam@125
|
19 **
|
cannam@125
|
20 ** THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
cannam@125
|
21 ** "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
cannam@125
|
22 ** TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
cannam@125
|
23 ** PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
|
cannam@125
|
24 ** CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
|
cannam@125
|
25 ** EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
|
cannam@125
|
26 ** PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
|
cannam@125
|
27 ** OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
|
cannam@125
|
28 ** WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
|
cannam@125
|
29 ** OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
|
cannam@125
|
30 ** ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
cannam@125
|
31 */
|
cannam@125
|
32
|
cannam@125
|
33 /*
|
cannam@125
|
34 ** A quick/rough hack to add SF_INSTRUMENT data to a file. It compiles, but
|
cannam@125
|
35 ** no guarantees beyond that. Happy to receive patches to fix/improve it.
|
cannam@125
|
36 **
|
cannam@125
|
37 ** Code for this was stolen from programs/sndfile-convert.c and related code.
|
cannam@125
|
38 */
|
cannam@125
|
39
|
cannam@125
|
40 #include <stdio.h>
|
cannam@125
|
41 #include <stdlib.h>
|
cannam@125
|
42 #include <string.h>
|
cannam@125
|
43 #include <ctype.h>
|
cannam@125
|
44
|
cannam@125
|
45 #include <sndfile.h>
|
cannam@125
|
46
|
cannam@125
|
47 #include "common.h"
|
cannam@125
|
48
|
cannam@125
|
49 #define BUFFER_LEN (1 << 14)
|
cannam@125
|
50
|
cannam@125
|
51
|
cannam@125
|
52 typedef struct
|
cannam@125
|
53 { char *infilename, *outfilename ;
|
cannam@125
|
54 SF_INFO infileinfo, outfileinfo ;
|
cannam@125
|
55 } OptionData ;
|
cannam@125
|
56
|
cannam@125
|
57 const char * program_name (const char * argv0) ;
|
cannam@125
|
58 static void sfe_copy_data_int (SNDFILE *outfile, SNDFILE *infile, int channels) ;
|
cannam@125
|
59 static void add_instrument_data (SNDFILE *outfile, const SF_INFO * in_info) ;
|
cannam@125
|
60
|
cannam@125
|
61 static void
|
cannam@125
|
62 usage_exit (const char *progname)
|
cannam@125
|
63 {
|
cannam@125
|
64 printf ("\nUsage : %s <input file> <output file>\n", progname) ;
|
cannam@125
|
65 puts ("") ;
|
cannam@125
|
66 exit (1) ;
|
cannam@125
|
67 } /* usage_exit */
|
cannam@125
|
68
|
cannam@125
|
69 int
|
cannam@125
|
70 main (int argc, char * argv [])
|
cannam@125
|
71 { const char *progname, *infilename, *outfilename ;
|
cannam@125
|
72 SNDFILE *infile = NULL, *outfile = NULL ;
|
cannam@125
|
73 SF_INFO in_sfinfo, out_sfinfo ;
|
cannam@125
|
74
|
cannam@125
|
75 progname = program_name (argv [0]) ;
|
cannam@125
|
76
|
cannam@125
|
77 if (argc < 3 || argc > 5)
|
cannam@125
|
78 usage_exit (progname) ;
|
cannam@125
|
79
|
cannam@125
|
80 infilename = argv [argc-2] ;
|
cannam@125
|
81 outfilename = argv [argc-1] ;
|
cannam@125
|
82
|
cannam@125
|
83 if (strcmp (infilename, outfilename) == 0)
|
cannam@125
|
84 { printf ("Error : Input and output filenames are the same.\n\n") ;
|
cannam@125
|
85 usage_exit (progname) ;
|
cannam@125
|
86 } ;
|
cannam@125
|
87
|
cannam@125
|
88 if (strlen (infilename) > 1 && infilename [0] == '-')
|
cannam@125
|
89 { printf ("Error : Input filename (%s) looks like an option.\n\n", infilename) ;
|
cannam@125
|
90 usage_exit (progname) ;
|
cannam@125
|
91 } ;
|
cannam@125
|
92
|
cannam@125
|
93 if (outfilename [0] == '-')
|
cannam@125
|
94 { printf ("Error : Output filename (%s) looks like an option.\n\n", outfilename) ;
|
cannam@125
|
95 usage_exit (progname) ;
|
cannam@125
|
96 } ;
|
cannam@125
|
97
|
cannam@125
|
98 memset (&in_sfinfo, 0, sizeof (in_sfinfo)) ;
|
cannam@125
|
99
|
cannam@125
|
100 if ((infile = sf_open (infilename, SFM_READ, &in_sfinfo)) == NULL)
|
cannam@125
|
101 { printf ("Not able to open input file %s.\n", infilename) ;
|
cannam@125
|
102 puts (sf_strerror (NULL)) ;
|
cannam@125
|
103 return 1 ;
|
cannam@125
|
104 } ;
|
cannam@125
|
105
|
cannam@125
|
106 memcpy (&out_sfinfo, &in_sfinfo, sizeof (out_sfinfo)) ;
|
cannam@125
|
107 /* Open the output file. */
|
cannam@125
|
108 if ((outfile = sf_open (outfilename, SFM_WRITE, &out_sfinfo)) == NULL)
|
cannam@125
|
109 { printf ("Not able to open output file %s : %s\n", outfilename, sf_strerror (NULL)) ;
|
cannam@125
|
110 return 1 ;
|
cannam@125
|
111 } ;
|
cannam@125
|
112
|
cannam@125
|
113 /* Add the loop data */
|
cannam@125
|
114 add_instrument_data (outfile, &in_sfinfo) ;
|
cannam@125
|
115
|
cannam@125
|
116 /* Copy the audio data */
|
cannam@125
|
117 sfe_copy_data_int (outfile, infile, in_sfinfo.channels) ;
|
cannam@125
|
118
|
cannam@125
|
119 sf_close (infile) ;
|
cannam@125
|
120 sf_close (outfile) ;
|
cannam@125
|
121
|
cannam@125
|
122 return 0 ;
|
cannam@125
|
123 } /* main */
|
cannam@125
|
124
|
cannam@125
|
125 const char *
|
cannam@125
|
126 program_name (const char * argv0)
|
cannam@125
|
127 { const char * tmp ;
|
cannam@125
|
128
|
cannam@125
|
129 tmp = strrchr (argv0, '/') ;
|
cannam@125
|
130 argv0 = tmp ? tmp + 1 : argv0 ;
|
cannam@125
|
131
|
cannam@125
|
132 /* Remove leading libtool name mangling. */
|
cannam@125
|
133 if (strstr (argv0, "lt-") == argv0)
|
cannam@125
|
134 return argv0 + 3 ;
|
cannam@125
|
135
|
cannam@125
|
136 return argv0 ;
|
cannam@125
|
137 } /* program_name */
|
cannam@125
|
138
|
cannam@125
|
139 static void
|
cannam@125
|
140 sfe_copy_data_int (SNDFILE *outfile, SNDFILE *infile, int channels)
|
cannam@125
|
141 { static int data [BUFFER_LEN] ;
|
cannam@125
|
142 int frames, readcount ;
|
cannam@125
|
143
|
cannam@125
|
144 frames = BUFFER_LEN / channels ;
|
cannam@125
|
145 readcount = frames ;
|
cannam@125
|
146
|
cannam@125
|
147 while (readcount > 0)
|
cannam@125
|
148 { readcount = sf_readf_int (infile, data, frames) ;
|
cannam@125
|
149 sf_writef_int (outfile, data, readcount) ;
|
cannam@125
|
150 } ;
|
cannam@125
|
151
|
cannam@125
|
152 return ;
|
cannam@125
|
153 } /* sfe_copy_data_int */
|
cannam@125
|
154
|
cannam@125
|
155 static void
|
cannam@125
|
156 add_instrument_data (SNDFILE *file, const SF_INFO *info)
|
cannam@125
|
157 { SF_INSTRUMENT instr ;
|
cannam@125
|
158
|
cannam@125
|
159 memset (&instr, 0, sizeof (instr)) ;
|
cannam@125
|
160
|
cannam@125
|
161 instr.gain = 1 ;
|
cannam@125
|
162 instr.basenote = 0 ;
|
cannam@125
|
163 instr.detune = 0 ;
|
cannam@125
|
164 instr.velocity_lo = 0 ;
|
cannam@125
|
165 instr.velocity_hi = 0 ;
|
cannam@125
|
166 instr.key_lo = 0 ;
|
cannam@125
|
167 instr.key_hi = 0 ;
|
cannam@125
|
168 instr.loop_count = 1 ;
|
cannam@125
|
169
|
cannam@125
|
170 instr.loops [0].mode = SF_LOOP_FORWARD ;
|
cannam@125
|
171 instr.loops [0].start = 0 ;
|
cannam@125
|
172 instr.loops [0].end = info->frames ;
|
cannam@125
|
173 instr.loops [0].count = 0 ;
|
cannam@125
|
174
|
cannam@125
|
175 if (sf_command (file, SFC_SET_INSTRUMENT, &instr, sizeof (instr)) == SF_FALSE)
|
cannam@125
|
176 { printf ("\n\nLine %d : sf_command (SFC_SET_INSTRUMENT) failed.\n\n", __LINE__) ;
|
cannam@125
|
177 exit (1) ;
|
cannam@125
|
178 } ;
|
cannam@125
|
179
|
cannam@125
|
180 return ;
|
cannam@125
|
181 } /* add_instrument_data */
|
cannam@125
|
182
|