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
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
/* gAlan - Graphical Audio Language
* Copyright (C) 1999 Tony Garnock-Jones
*
* 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
*/
#include <stdlib.h>
#include <string.h>
#include <stdio.h>
#include <stddef.h>
#include <gdk/gdk.h>
#include <gtk/gtk.h>
#include "global.h"
#include "generator.h"
#include "comp.h"
#include "control.h"
#include "gencomp.h"
#define GENERATOR_CLASS_NAME "power_spec"
#define GENERATOR_CLASS_PATH "Misc/PowerSpectrum"
#define SIG_INPUT 0
#define SIG_OUTPUT 0
#define EVT_INPUT 0
#define NUM_EVENT_INPUTS 1
#define EVT_OUTPUT 0
#define NUM_EVENT_OUTPUTS 1
typedef struct Data {
} Data;
PRIVATE int init_instance(Generator *g) {
//Data *data = safe_malloc(sizeof(Data));
//g->data = data;
return 1;
}
PRIVATE void destroy_instance(Generator *g) {
//Data *data = g->data;
//free(data);
}
PRIVATE void unpickle_instance(Generator *g, ObjectStoreItem *item, ObjectStore *db) {
//Data *data = safe_malloc(sizeof(Data));
//g->data = data;
}
PRIVATE void pickle_instance(Generator *g, ObjectStoreItem *item, ObjectStore *db) {
//Data *data = g->data;
}
PRIVATE void evt_input_handler(Generator *g, AEvent *event) {
//Data *data = g->data;
int i,len;
SAMPLE *out, *in;
AEvent send_ev;
RETURN_UNLESS( event->kind == AE_NUMARRAY );
//RETURN_UNLESS( (event->d.array.len & 1) == 0 );
in = event->d.array.numbers;
len = event->d.array.len;
// TODO: make this alloca...
out = safe_malloc( sizeof( SAMPLE ) * (len/2+1) );
out[0] = in[0] * in [0];
for( i=1; i<(len+1)/2; i++ )
out[i] = in[i]*in[i] + in[len-i] * in[len-i];
if( (len & 1) == 0 )
out[len/2] = in[len/2] * in[len/2];
//rfftw_one( data->plan, event->d.array.numbers, out );
gen_init_aevent(&send_ev, AE_NUMARRAY, NULL, 0, NULL, 0, event->time);
send_ev.d.array.len = len/2+1;
send_ev.d.array.numbers = out;
gen_send_events(g, EVT_OUTPUT, -1, &send_ev);
free(out);
}
PRIVATE ControlDescriptor controls[] = {
/* { kind, name, min,max,step,page, size,editable, is_dst,queue_number,
init,destroy,refresh,refresh_data }, */
{ CONTROL_KIND_NONE, },
};
PRIVATE void setup_class(void) {
GeneratorClass *k = gen_new_generatorclass(GENERATOR_CLASS_NAME, FALSE,
NUM_EVENT_INPUTS, NUM_EVENT_OUTPUTS,
NULL, NULL, controls,
init_instance, destroy_instance,
unpickle_instance, pickle_instance);
gen_configure_event_input(k, EVT_INPUT, "Input", evt_input_handler);
gen_configure_event_output(k, EVT_OUTPUT, "Output" );
gencomp_register_generatorclass(k, FALSE, GENERATOR_CLASS_PATH, NULL, NULL);
}
PUBLIC void init_plugin_powerspectrum(void) {
setup_class();
}
|
