hermite_resampler.h 3.47 KB
Newer Older
OV2's avatar
OV2 committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
/* Simple resampler based on bsnes's ruby audio library */

#ifndef __HERMITE_RESAMPLER_H
#define __HERMITE_RESAMPLER_H

#include "resampler.h"

#undef CLAMP
#undef SHORT_CLAMP
#define CLAMP(x, low, high) (((x) > (high)) ? (high) : (((x) < (low)) ? (low) : (x)))
#define SHORT_CLAMP(n) ((short) CLAMP((n), -32768, 32767))

class HermiteResampler : public Resampler
{
    protected:

17 18
        float r_step;
        float r_frac;
19
        int   r_left[4], r_right[4];
OV2's avatar
OV2 committed
20

21 22
        static inline float
        hermite (float mu1, float a, float b, float c, float d)
OV2's avatar
OV2 committed
23
        {
24
            float mu2, mu3, m0, m1, a0, a1, a2, a3;
OV2's avatar
OV2 committed
25

26 27
            mu2 = mu1 * mu1;
            mu3 = mu2 * mu1;
OV2's avatar
OV2 committed
28

29 30
            m0 = (c - a) * 0.5;
            m1 = (d - b) * 0.5;
OV2's avatar
OV2 committed
31

32 33 34 35
            a0 = +2 * mu3 - 3 * mu2 + 1;
            a1 =      mu3 - 2 * mu2 + mu1;
            a2 =      mu3 -     mu2;
            a3 = -2 * mu3 + 3 * mu2;
OV2's avatar
OV2 committed
36

37
            return (a0 * b) + (a1 * m0) + (a2 * m1) + (a3 * c);
OV2's avatar
OV2 committed
38 39 40 41 42 43 44 45 46 47 48 49 50 51 52
        }

    public:
        HermiteResampler (int num_samples) : Resampler (num_samples)
        {
            clear ();
        }

        ~HermiteResampler ()
        {
        }

        void
        time_ratio (double ratio)
        {
53
            r_step = ratio;
OV2's avatar
OV2 committed
54 55 56 57 58 59 60
            clear ();
        }

        void
        clear (void)
        {
            ring_buffer::clear ();
61
            r_frac = 1.0;
OV2's avatar
OV2 committed
62 63 64 65 66 67 68 69
            r_left [0] = r_left [1] = r_left [2] = r_left [3] = 0;
            r_right[0] = r_right[1] = r_right[2] = r_right[3] = 0;
        }

        void
        read (short *data, int num_samples)
        {
            int i_position = start >> 1;
70
            int max_samples = buffer_size >> 1;
OV2's avatar
OV2 committed
71 72 73 74 75 76 77 78
            short *internal_buffer = (short *) buffer;
            int o_position = 0;
            int consumed = 0;

            while (o_position < num_samples && consumed < buffer_size)
            {
                int s_left = internal_buffer[i_position];
                int s_right = internal_buffer[i_position + 1];
79
                float hermite_val[2];
OV2's avatar
OV2 committed
80

81
                while (r_frac <= 1.0 && o_position < num_samples)
OV2's avatar
OV2 committed
82
                {
83 84 85 86
                    hermite_val[0] = hermite (r_frac, r_left [0], r_left [1], r_left [2], r_left [3]);
                    hermite_val[1] = hermite (r_frac, r_right[0], r_right[1], r_right[2], r_right[3]); 
                    data[o_position]     = SHORT_CLAMP (hermite_val[0]);
                    data[o_position + 1] = SHORT_CLAMP (hermite_val[1]);
OV2's avatar
OV2 committed
87 88 89 90 91 92

                    o_position += 2;

                    r_frac += r_step;
                }

93
                if (r_frac > 1.0)
OV2's avatar
OV2 committed
94 95 96 97 98
                {
                    r_left [0] = r_left [1];
                    r_left [1] = r_left [2];
                    r_left [2] = r_left [3];
                    r_left [3] = s_left;
99

OV2's avatar
OV2 committed
100 101 102
                    r_right[0] = r_right[1];
                    r_right[1] = r_right[2];
                    r_right[2] = r_right[3];
103 104
                    r_right[3] = s_right;

105
                    r_frac -= 1.0;
106

OV2's avatar
OV2 committed
107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122
                    i_position += 2;
                    if (i_position >= max_samples)
                        i_position -= max_samples;
                    consumed += 2;
                }
            }

            size -= consumed << 1;
            start += consumed << 1;
            if (start >= buffer_size)
                start -= buffer_size;
        }

        inline int
        avail (void)
        {
123
            return (int) floor (((size >> 2) - r_frac) / r_step) * 2;
OV2's avatar
OV2 committed
124 125 126 127
        }
};

#endif /* __HERMITE_RESAMPLER_H */