File: bits2bytes.cpp

package info (click to toggle)
qsstv 9.5.8-6
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 10,928 kB
  • sloc: cpp: 47,579; makefile: 4
file content (76 lines) | stat: -rw-r--r-- 3,756 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
/******************************************************************************/
/*                                                                            */
/*  University of Kaiserslautern, Institute of Communications Engineering     */
/*  Copyright (C) 2004 Torsten Schorr                                         */
/*                                                                            */
/*  Author(s)    : Torsten Schorr (schorr@eit.uni-kl.de)                      */
/*  Project start: 23.07.2004                                                 */
/*  Last change  : 23.07.2004                                                 */
/*                                                                            */
/******************************************************************************/
/*                                                                            */
/*  This program is free software; you can redistribute it and/or modify      */
/*  it under the terms of the GNU General Public License as published by      */
/*  the Free Software Foundation; either version 2 of the License, or         */
/*  (at your option) any later version.                                       */
/*                                                                            */
/*  This program is distributed in the hope that it will be useful,           */
/*  but WITHOUT ANY WARRANTY; without even the implied warranty of            */
/*  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the             */
/*  GNU General Public License for more details.                              */
/*                                                                            */
/*  You should have received a copy of the GNU General Public License         */
/*  along with this program; if not, write to the Free Software               */
/*  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
/*                                                                            */
/******************************************************************************/


/******************************************************************************/
/*                                                                            */
/*  bits2bytes.c                                                              */
/*                                                                            */
/******************************************************************************/
/*  Description:                                                              */
/*  Deinterleaver/Interleaver generation for DRM frames                       */
/*  Usage:                                                                    */
/*                                                                            */
/*  bytes = bits2bytes(bits);                                                 */
/*                                                                            */
/*  converts a serial double bit-stream into a uint8 byte-stream              */
/******************************************************************************/


/*
*   modified for use directly in  C-language without Matlab interface
*   M.Bos - PA0MBO
*   Date Nov 15th 2007
*
*/

#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <float.h>

void bits2bytes(double *inbits, int N, unsigned char /*@out@ */ *outbytes)
{
  unsigned char single_byte;
  int m, n;

  if (N % 8 != 0)
    {
      return;
    }
  for (m = 0; m < N / 8; m++)
    {
      single_byte = '\0';
      for (n = 7; n >= 0; n--)
	{
	  single_byte |=
	    ((fabs(inbits[8 * m + 7 - n]) > DBL_EPSILON) & 0x01) << n;
	}
      outbytes[m] = single_byte;
    }
  return;
}