window_name.c


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

#include <stdio.h>
#include <string.h>
#include <m_pd.h>
#include <g_canvas.h>

#define DEBUG(x)

static t_class *window_name_class;

typedef struct _window_name
{
    t_object x_obj;
    t_symbol *windowname;
} t_window_name;

static void window_name_bang(t_window_name *x)
{
    outlet_symbol(x->x_obj.ob_outlet,x->windowname);
}

static void *window_name_new(void)
{
    t_window_name *x = (t_window_name *)pd_new(window_name_class);
    char buf[MAXPDSTRING];
    
    snprintf(buf, MAXPDSTRING, ".x%lx", (long unsigned int)canvas_getcurrent());
    x->windowname = gensym(buf);
    
	outlet_new(&x->x_obj, &s_symbol);

    return(x);
}

void window_name_setup(void)
{
    window_name_class = class_new(gensym("window_name"),
        (t_newmethod)window_name_new, NULL,
        sizeof(t_window_name), 0, 0);

    class_addbang(window_name_class, (t_method)window_name_bang);
}