aboutsummaryrefslogtreecommitdiff
path: root/shared/tkwidgets.h
blob: e234ccd39dacfebd496e1584ec3aa1dc63f5aa19 (plain)
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
/* 
    Copyright (C) 2007 Free Software Foundation
    written by Hans-Christoph Steiner <hans@at.or.at>

    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., 675 Mass Ave, Cambridge, MA 02139, USA.

    This is the shared library for the tkwidgets library for Pd.

*/

#ifndef __TKWIDGETS_H
#define __TKWIDGETS_H

#include "m_pd.h"
#include "m_imp.h"
#include "g_canvas.h"

/* I don't know what these do, but they seem to be everywhere */
#ifdef _MSC_VER
#pragma warning( disable : 4244 )
#pragma warning( disable : 4305 )
#endif

/* so far, all of the tkwidgets objects have the same inlets/outlets */
#define TOTAL_INLETS            1
#define TOTAL_OUTLETS           2

#define TKW_SELECTION_COLOR     "#bdbddd"

/* size and offset for the resizing handle */
#define TKW_HANDLE_HEIGHT       15
#define TKW_HANDLE_WIDTH        15
#define TKW_HANDLE_INSET        -2

/* sketch for a common struct */
typedef struct _tkwidgets
{
    t_canvas* canvas;        /* canvas/glist this widget is currently drawn in*/
    t_glist*  glist;         /* glist that owns this widget */
    t_binbuf* options_binbuf;/* binbuf to save options state in */
    t_symbol* receive_name;  /* name to bind to, to receive callbacks */
    t_symbol* tcl_namespace; /* namespace to prevent name collisions */
    t_symbol* canvas_id;     /* the canvas that is showing this widget */
    t_symbol* frame_id;      /* the frame around the widget and supporters */
    t_symbol* window_tag;     /* the window that contains the widget */
    t_symbol* widget_id;     /* the core widget */
    t_symbol* handle_id;     /* the resizing handle */
    t_symbol* all_tag;       /* the tag for moving/deleting everything */
    int       resizing;      /* flag to tell when being resized */
    int       selected;      /* flag for when widget is selected */
} t_tkwidgets;   

/* handle options */
void tkwidgets_store_options(t_symbol *receive_name, t_symbol *tcl_namespace,
                             t_symbol *widget_id, int argc, char **argv);
void tkwidgets_restore_options(t_symbol *widget_id, t_binbuf *options_binbuf);
void tkwidgets_query_options(t_symbol *receive_name, t_symbol *widget_id, 
                             int argc, char** argv);
void tkwidgets_list_options(t_outlet *status_outlet, int argc, char** argv);

/* generate ID and tag names for using in Tcl/Tk space */
t_symbol* tkwidgets_gen_tcl_namespace(t_object* x, t_symbol* widget_name);
t_symbol* tkwidgets_gen_callback_name(t_symbol* tcl_namespace);
t_symbol* tkwidgets_gen_canvas_id(t_canvas* canvas);
t_symbol* tkwidgets_gen_frame_id(t_object* x, t_symbol* canvas_id);
t_symbol* tkwidgets_gen_widget_id(t_object* x, t_symbol* parent_id);
t_symbol* tkwidgets_gen_handle_id(t_object *x, t_symbol* canvas_id);
t_symbol* tkwidgets_gen_scrollbar_id(t_object *x, t_symbol* frame_id);
t_symbol* tkwidgets_gen_window_tag(t_object* x, t_symbol* canvas_id);
t_symbol* tkwidgets_gen_iolets_tag(t_object* x);
t_symbol* tkwidgets_gen_all_tag(t_object *x);


// TODO perhaps I should try to use glist_drawiofor() from g_text.c
void tkwidgets_draw_iolets(t_object *x, t_glist *glist, t_symbol *canvas_id,
                           t_symbol *iolets_tag, t_symbol *all_tag,
                           int width, int height);
void tkwidgets_erase_iolets(t_symbol* canvas_id, t_symbol* iolets_tag);
void tkwidgets_draw_y_scrollbar(t_symbol *widget_id, t_symbol *scrollbar_id);
void tkwidgets_erase_y_scrollbar(t_symbol *widget_id, t_symbol *scrollbar_id);

void tkwidgets_draw_handle(); // TODO draw resize handle when selected in editmode
void tkwidgets_draw_resize_window(); // TODO draw the resize window while resizing

/* selection */



/* bind this widget to Cmd/Ctrl keys and mouse events to support things like
 * then standard keys and right-click to bring up the Properties/Open/Help
 * menu when the Tk widgets have focus */
void tkwidgets_bind_key_events(t_symbol *canvas_id, t_symbol *widget_id);
void tkwidgets_bind_mouse_events(t_symbol *canvas_id, t_symbol *widget_id);



#endif /* NOT __TK_WIDGETS_H */