voicebox matlab语音信号处理工具箱

voicebox语音信号处理工具箱 工具箱内容 音频文件输入/输出 读写WAV和其他语音文件格式 频率标度 在Hz，Mel，Erb和MIDI频率刻度之间转换 傅立叶/ DCT / Hartley变换 各种相关的变换 随机数和概率分布 生成随机向量和噪声信号 矢量距离 计算矢量列表之间的距离 言语分析 有源电平估计，频谱图 LPC语音分析 线性预测编码例程 语音合成 文本到语音合成和声门波形模型 语音增强 光谱噪声减法 语音编码 PCM编码，矢量量化 语音识别 用于识别的前端处理 信号处理 其他信号处理功能 信息论 熵计算和符号代码的例程 计算机视觉 3D旋转的例程 打印和显示功能 用于打印和图形的实用程序 语音箱参数和系统接口 获取或设置VOICEBOX和WINDOWS系统参数 效用函数 其他实用功能 音频文件输入/输出

/******************************************************************************
*                                                                             *
*       Copyright （C） 2002 Brian Willoughby and Sound Consulting              *
*                                                                             *
*       See the file LICENSE for conditions on distribution and usage         *
*                                                                             *
******************************************************************************/

/*
 * $Id: aiff.cv 1.5 2003/01/11 01:28:23 jason Exp $
 */

#include 
#include 

#include “shorten.h“

#define N_CKID	4

#define FORM_SIGNATURE “FORM“
#define AIFF_SIGNATURE “AIFF“
#define AIFC_SIGNATURE “AIFC“
#define COMM_SIGNATURE “COMM“
#define SSND_SIGNATURE “SSND“

ulong bytes;

const char *fread_id（FILE *fp） {
  static char ach[N_CKID];

  if （N_CKID > bytes）
    fprintf（stderr “possible AIFF error - reading beyond chunk size\n“）;
  if （N_CKID != fread（ach sizeof（char） N_CKID fp））
    return NULL;
  bytes -= N_CKID;
  return ach;
}

/*
 * Portably read a big-endian long integer from a file.
 */
static ulong fread_long_int（fp） FILE *fp; {
  ulong result;

  if （sizeof（ulong） > bytes）
    fprintf（stderr “possible AIFF error - reading beyond chunk size\n“）;
  result = （（ulong）fgetc（fp） << 24）;
  result |= （（ulong）fgetc（fp） << 16）;
  result |= （（ulong）fgetc（fp） << 8）;
  result |= （ulong）fgetc（fp）;
  bytes -= sizeof（ulong）;
  return result;
}

/*
 * Retrieve a big-endian short integer from a char array again
 * portably.
 */
static ushort short_at（p） unsigned char *p; {
  return （（ushort）p[0] << 8） | p[1];
}
static ulong long_at（p） unsigned char *p; {
  return （（ulong）p[0] << 24） | （（ulong）p[1] << 16） | （（ulong）p[2] << 8） | p[3];
}

/*
 * Write a big-endian long integer into a header chunk.
 */
static void write_hdr_long（data hdr）
ulong data; Iff_Header *hdr;
{
  uchar realdata[4];
  realdata[0] = （data >> 24） & 0xFF;
  realdata[1] = （data >> 16） & 0xFF;
  realdata[2] = （data >> 8） & 0xFF;
  realdata[3] = data & 0xFF;
  write_hdr （realdata 4 hdr）;
}

Iff_Header *aiff_prochdr（filei ftype nchan datalen wtype）
FILE *filei; int *ftype *nchan; slong *datalen; int *wtype;
{
  Iff_Header *hdr;
  const char *ckhdr;
  ulong len;
  int seen_fmt = 0;

  /* Initialize the returned aiff type */
  if （wtype）
    *wtype = 0;

  /* Reserve space for the header structure. */
  hdr = pmalloc（sizeof（*hdr））;
  hdr->nblocks = hdr->nblk_alloc = 0;
  hdr->blocks = NULL;
  hdr->blklen = NULL;

  /* Read the AIFF signature. */
  bytes = 8;
  /* NOTE: The following comparison has been moved out to shorten.c
  if （strncmp（fread_id（filei） FORM_SIGNATURE 4）） {
    goto abort;
  } */
  len = fread_long_int（filei）;
  bytes = len;
  ckhdr = fread_id（filei）;
  if （!ckhdr）
      goto abort;
  if （strncmp（ckhdr AIFF_SIGNATURE 4） && strncmp（ckhdr AIFC_SIGNATURE 4）） {
    goto abort;
  }

  

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

    .......       461  2018-12-04 20:12  sapVoicebox\.gitattributes

    .......     17982  2018-12-04 20:12  sapVoicebox\doc\copying.txt

    .......     15465  2018-12-04 20:12  sapVoicebox\doc\lpc.html

    .......       273  2018-12-04 20:12  sapVoicebox\doc\mdoc\alpha.png

    .......       327  2018-12-04 20:12  sapVoicebox\doc\mdoc\c++.png

    .......       252  2018-12-04 20:12  sapVoicebox\doc\mdoc\c.png

    .......       214  2018-12-04 20:12  sapVoicebox\doc\mdoc\demoicon.gif

    .......       133  2018-12-04 20:12  sapVoicebox\doc\mdoc\down.png

    .......       265  2018-12-04 20:12  sapVoicebox\doc\mdoc\fortran.png

    .......       255  2018-12-04 20:12  sapVoicebox\doc\mdoc\hp.png

    .......     22750  2018-12-04 20:12  sapVoicebox\doc\mdoc\index.html

    .......       136  2018-12-04 20:12  sapVoicebox\doc\mdoc\left.png

    .......       272  2018-12-04 20:12  sapVoicebox\doc\mdoc\linux.png

    .......      1002  2018-12-04 20:12  sapVoicebox\doc\mdoc\m2html.css

    .......       574  2018-12-04 20:12  sapVoicebox\doc\mdoc\matlabicon.gif

    .......       242  2018-12-04 20:12  sapVoicebox\doc\mdoc\mex.png

    .......       136  2018-12-04 20:12  sapVoicebox\doc\mdoc\right.png

    .......       263  2018-12-04 20:12  sapVoicebox\doc\mdoc\sgi.png

    .......       977  2018-12-04 20:12  sapVoicebox\doc\mdoc\simulinkicon.gif

    .......       286  2018-12-04 20:12  sapVoicebox\doc\mdoc\solaris.png

    .......       162  2018-12-04 20:12  sapVoicebox\doc\mdoc\up.png

    .......     16354  2018-12-04 20:12  sapVoicebox\doc\mdoc\v_mfiles\Contents.html

    .......     52006  2018-12-04 20:12  sapVoicebox\doc\mdoc\v_mfiles\index.html

    .......     35388  2018-12-04 20:12  sapVoicebox\doc\mdoc\v_mfiles\v_activlev.html

    .......     19583  2018-12-04 20:12  sapVoicebox\doc\mdoc\v_mfiles\v_activlevg.html

    .......     34782  2018-12-04 20:12  sapVoicebox\doc\mdoc\v_mfiles\v_addnoise.html

    .......      6203  2018-12-04 20:12  sapVoicebox\doc\mdoc\v_mfiles\v_atan2sc.html

    .......      8537  2018-12-04 20:12  sapVoicebox\doc\mdoc\v_mfiles\v_axisenlarge.html

    .......     12692  2018-12-04 20:12  sapVoicebox\doc\mdoc\v_mfiles\v_bark2frq.html

    .......      5590  2018-12-04 20:12  sapVoicebox\doc\mdoc\v_mfiles\v_berk2prob.html

............此处省略908个文件信息