source: src/utils/scale.c @ e665063

feature/autosinkfeature/cnnfeature/cnn_orgfeature/constantqfeature/crepefeature/crepe_orgfeature/pitchshiftfeature/pydocstringsfeature/timestretchfix/ffmpeg5pitchshiftsamplertimestretchyinfft+
Last change on this file since e665063 was 28c162c, checked in by Paul Brossier <piem@piem.org>, 15 years ago

src/utils/scale.{c,h}: set method to return int

  • Property mode set to 100644
File size: 2.0 KB
Line 
1/*
2   Copyright (C) 2003 Paul Brossier
3
4   This program is free software; you can redistribute it and/or modify
5   it under the terms of the GNU General Public License as published by
6   the Free Software Foundation; either version 2 of the License, or
7   (at your option) any later version.
8
9   This program is distributed in the hope that it will be useful,
10   but WITHOUT ANY WARRANTY; without even the implied warranty of
11   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12   GNU General Public License for more details.
13
14   You should have received a copy of the GNU General Public License
15   along with this program; if not, write to the Free Software
16   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17
18*/
19
20#include "aubio_priv.h"
21#include "fvec.h"
22#include "utils/scale.h"
23
24struct _aubio_scale_t {
25  smpl_t ilow;
26  smpl_t ihig;
27  smpl_t olow;
28  smpl_t ohig;
29
30  smpl_t scaler;
31  smpl_t irange;
32
33  /* not implemented yet : type in/out data
34     bool inint;
35     bool outint;
36     */
37};
38
39aubio_scale_t * new_aubio_scale (smpl_t ilow, smpl_t ihig, 
40    smpl_t olow, smpl_t ohig) {
41  aubio_scale_t * s = AUBIO_NEW(aubio_scale_t);
42  aubio_scale_set_limits (s, ilow, ihig, olow, ohig);
43  return s;
44}
45
46void del_aubio_scale(aubio_scale_t *s) {
47  AUBIO_FREE(s);
48}
49
50uint_t aubio_scale_set_limits (aubio_scale_t *s, smpl_t ilow, smpl_t ihig,
51    smpl_t olow, smpl_t ohig) {
52  smpl_t inputrange = ihig - ilow;
53  smpl_t outputrange= ohig - olow;
54  s->ilow = ilow;
55  s->ihig = ihig;
56  s->olow = olow;
57  s->ohig = ohig;
58  if (inputrange == 0) {
59    s->scaler = 0.0;
60  } else {
61    s->scaler = outputrange/inputrange;
62    if (inputrange < 0) {
63      inputrange = inputrange * -1.0f;
64    }
65  }
66  return AUBIO_OK;
67}
68
69void aubio_scale_do (aubio_scale_t *s, fvec_t *input) 
70{
71  uint_t i, j;
72  for (i=0; i < input->channels; i++){
73    for (j=0;  j < input->length; j++){
74      input->data[i][j] -= s->ilow;
75      input->data[i][j] *= s->scaler;
76      input->data[i][j] += s->olow;
77    }
78  }
79}
80
Note: See TracBrowser for help on using the repository browser.