开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 嵌入式/单片机编程 > Windows CE > 查看源码
float.c
资源名称：tcpmp.rar　[点击查看]
上传用户：wstnjxml
上传日期：2014-04-03
资源大小：7248k
文件大小：2k
源码类别：

Windows CE

开发平台：

C/C++

float.c：源码内容
  1. ////////////////////////////////////////////////////////////////////////////
  2. //      **** WAVPACK ****   //
  3. //     Hybrid Lossless Wavefile Compressor   //
  4. // Copyright (c) 1998 - 2004 Conifer Software.   //
  5. //     All Rights Reserved.   //
  6. //      Distributed under the BSD Software License (see license.txt)      //
  7. ////////////////////////////////////////////////////////////////////////////
  9. // float.c
  11. #include "wavpack.h"
  13. int read_float_info (WavpackStream *wps, WavpackMetadata *wpmd)
  14. {
  15.     int bytecnt = wpmd->byte_length;
  16.     char *byteptr = wpmd->data;
  18.     if (bytecnt != 4)
  19. return FALSE;
  21.     wps->float_flags = *byteptr++;
  22.     wps->float_shift = *byteptr++;
  23.     wps->float_max_exp = *byteptr++;
  24.     wps->float_norm_exp = *byteptr;
  25.     return TRUE;
  26. }
  28. void float_values (WavpackStream *wps, long *values, long num_values)
  29. {
  30.     while (num_values--) {
  31. int shift_count = 0, exp = wps->float_max_exp;
  32. f32 outval = { 0, 0, 0 };
  34. if (*values) {
  35.     *values <<= wps->float_shift;
  37.     if (*values < 0) {
  38. *values = -*values;
  39. outval.sign = 1;
  40.     }
  42.     if (*values == 0x1000000)
  43. outval.exponent = 255;
  44.     else {
  45. if (exp)
  46.     while (!(*values & 0x800000) && --exp) {
  47. shift_count++;
  48. *values <<= 1;
  49.     }
  51. if (shift_count && (wps->float_flags & FLOAT_SHIFT_ONES))
  52.     *values |= ((1 << shift_count) - 1);
  54. outval.mantissa = *values;
  55. outval.exponent = exp;
  56.     }
  57. }
  59. * (f32 *) values++ = outval;
  60.     }
  61. }
  63. void float_normalize (long *values, long num_values, int delta_exp)
  64. {
  65.     f32 *fvalues = (f32 *) values, fzero = { 0, 0, 0 };
  66.     int exp;
  68.     if (!delta_exp)
  69. return;
  71.     while (num_values--) {
  72. if ((exp = fvalues->exponent) == 0 || exp + delta_exp <= 0)
  73.     *fvalues = fzero;
  74. else if (exp == 255 || (exp += delta_exp) >= 255) {
  75.     fvalues->exponent = 255;
  76.     fvalues->mantissa = 0;
  77. }
  78. else
  79.     fvalues->exponent = exp;
  81. fvalues++;
  82.     }
  83. }