sndfile-interleave.c
上传用户:shw771010
上传日期:2022-01-05
资源大小:991k
文件大小:5k
源码类别:

Audio

开发平台:

Unix_Linux

  1. /*
  2. ** Copyright (C) 2009 Erik de Castro Lopo <erikd@mega-nerd.com>
  3. **
  4. ** All rights reserved.
  5. **
  6. ** Redistribution and use in source and binary forms, with or without
  7. ** modification, are permitted provided that the following conditions are
  8. ** met:
  9. **
  10. **     * Redistributions of source code must retain the above copyright
  11. **       notice, this list of conditions and the following disclaimer.
  12. **     * Redistributions in binary form must reproduce the above copyright
  13. **       notice, this list of conditions and the following disclaimer in
  14. **       the documentation and/or other materials provided with the
  15. **       distribution.
  16. **     * Neither the author nor the names of any contributors may be used
  17. **       to endorse or promote products derived from this software without
  18. **       specific prior written permission.
  19. **
  20. ** THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  21. ** "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  22. ** TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  23. ** PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
  24. ** CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  25. ** EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  26. ** PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
  27. ** OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  28. ** WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  29. ** OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
  30. ** ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  31. */
  32. #include <stdio.h>
  33. #include <stdlib.h>
  34. #include <string.h>
  35. #include <sndfile.h>
  36. #include "common.h"
  37. #define BUFFER_LEN 4096
  38. #define MAX_INPUTS 16
  39. typedef struct
  40. { SNDFILE * infile [MAX_INPUTS] ;
  41. SNDFILE * outfile ;
  42. union
  43. { double d [BUFFER_LEN] ;
  44. int i [BUFFER_LEN] ;
  45. } din ;
  46. union
  47. { double d [MAX_INPUTS * BUFFER_LEN] ;
  48. int i [MAX_INPUTS * BUFFER_LEN] ;
  49. } dout ;
  50. int channels ;
  51. } STATE ;
  52. static void usage_exit (void) ;
  53. static void interleave_int (STATE * state) ;
  54. static void interleave_double (STATE * state) ;
  55. int
  56. main (int argc, char **argv)
  57. { STATE state ;
  58. SF_INFO sfinfo ;
  59. int k, double_merge = 0 ;
  60. if (argc < 5)
  61. { puts ("nError : need at least 2 input files.") ;
  62. usage_exit () ;
  63. } ;
  64. if (strcmp (argv [argc - 2], "-o") != 0)
  65. { puts ("nError : second last command line parameter should be '-o'.n") ;
  66. usage_exit () ;
  67. } ;
  68. if (argc - 2 > MAX_INPUTS)
  69. { printf ("nError : Cannot handle more than %d input channels.nn", MAX_INPUTS) ;
  70. exit (1) ;
  71. } ;
  72. memset (&state, 0, sizeof (state)) ;
  73. memset (&sfinfo, 0, sizeof (sfinfo)) ;
  74. for (k = 1 ; k < argc - 2 ; k++)
  75. {
  76. if ((state.infile [k - 1] = sf_open (argv [k], SFM_READ, &sfinfo)) == NULL)
  77. { printf ("nError : Not able to open input file '%s'n%sn", argv [k], sf_strerror (NULL)) ;
  78. exit (1) ;
  79. } ;
  80. if (sfinfo.channels != 1)
  81. { printf ("bError : Input file '%s' should be mono (has %d channels).n", argv [k], sfinfo.channels) ;
  82. exit (1) ;
  83. } ;
  84. switch (sfinfo.format & SF_FORMAT_SUBMASK)
  85. { case SF_FORMAT_FLOAT :
  86. case SF_FORMAT_DOUBLE :
  87. case SF_FORMAT_VORBIS :
  88. double_merge = 1 ;
  89. break ;
  90. default :
  91. break ;
  92. } ;
  93. state.channels ++ ;
  94. } ;
  95. sfinfo.channels = state.channels ;
  96. sfinfo.format = sfe_file_type_of_ext (argv [argc - 1], sfinfo.format) ;
  97. if ((state.outfile = sf_open (argv [argc - 1], SFM_WRITE, &sfinfo)) == NULL)
  98. { printf ("Not able to open output file '%s'n%sn", argv [argc - 1], sf_strerror (NULL)) ;
  99. exit (1) ;
  100. } ;
  101. if (double_merge)
  102. interleave_double (&state) ;
  103. else
  104. interleave_int (&state) ;
  105. for (k = 0 ; k < MAX_INPUTS ; k++)
  106. if (state.infile [k] != NULL)
  107. sf_close (state.infile [k]) ;
  108. sf_close (state.outfile) ;
  109. return 0 ;
  110. } /* main */
  111. /*------------------------------------------------------------------------------
  112. */
  113. static void
  114. usage_exit (void)
  115. { puts ("nUsage : sndfile-interleave <input 1> <input 2> ... -o <output file>n") ;
  116. puts ("Merge two mono files to one stereo filen") ;
  117. exit (0) ;
  118. } /* usage_exit */
  119. static void
  120. interleave_int (STATE * state)
  121. { int max_read_len, read_len ;
  122. int ch, k ;
  123. do
  124. { max_read_len = 0 ;
  125. for (ch = 0 ; ch < state->channels ; ch ++)
  126. { read_len = sf_read_int (state->infile [ch], state->din.i, BUFFER_LEN) ;
  127. if (read_len < BUFFER_LEN)
  128. memset (state->din.i + read_len, 0, sizeof (state->din.i [0]) * (BUFFER_LEN - read_len)) ;
  129. for (k = 0 ; k < read_len ; k++)
  130. state->dout.i [k * state->channels + ch] = state->din.i [k] ;
  131. max_read_len = MAX (max_read_len, read_len) ;
  132. } ;
  133. sf_writef_int (state->outfile, state->dout.i, max_read_len) ;
  134. }
  135. while (max_read_len > 0) ;
  136. } /* interleave_int */
  137. static void
  138. interleave_double (STATE * state)
  139. { int max_read_len, read_len ;
  140. int ch, k ;
  141. do
  142. { max_read_len = 0 ;
  143. for (ch = 0 ; ch < state->channels ; ch ++)
  144. { read_len = sf_read_double (state->infile [ch], state->din.d, BUFFER_LEN) ;
  145. if (read_len < BUFFER_LEN)
  146. memset (state->din.d + read_len, 0, sizeof (state->din.d [0]) * (BUFFER_LEN - read_len)) ;
  147. for (k = 0 ; k < read_len ; k++)
  148. state->dout.d [k * state->channels + ch] = state->din.d [k] ;
  149. max_read_len = MAX (max_read_len, read_len) ;
  150. } ;
  151. sf_writef_double (state->outfile, state->dout.d, max_read_len) ;
  152. }
  153. while (max_read_len > 0) ;
  154. } /* interleave_double */