More node goodies!
[blender.git] / source / blender / src / header_script.c
1 /**
2  * header_script.c nov-2003
3  *
4  * Functions to draw the "Script Window" window header
5  * and handle user events sent to it.
6  * 
7  * $Id$
8  *
9  * ***** BEGIN GPL/BL DUAL LICENSE BLOCK *****
10  *
11  * This program is free software; you can redistribute it and/or
12  * modify it under the terms of the GNU General Public License
13  * as published by the Free Software Foundation; either version 2
14  * of the License, or (at your option) any later version. The Blender
15  * Foundation also sells licenses for use in proprietary software under
16  * the Blender License.  See http://www.blender.org/BL/ for information
17  * about this.
18  *
19  * This program is distributed in the hope that it will be useful,
20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22  * GNU General Public License for more details.
23  *
24  * You should have received a copy of the GNU General Public License
25  * along with this program; if not, write to the Free Software Foundation,
26  * Inc., 59 Temple Place - Suite 330, Boston, MA        02111-1307, USA.
27  *
28  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
29  * All rights reserved.
30  *
31  * Contributor(s): Willian P. Germano.
32  *
33  * ***** END GPL/BL DUAL LICENSE BLOCK *****
34  */
35
36 #include <stdlib.h>
37 #include <string.h>
38 #include <stdio.h>
39
40 #ifdef HAVE_CONFIG_H
41 #include <config.h>
42 #endif
43
44 #include "BLI_blenlib.h"
45
46 #include "BSE_headerbuttons.h"
47
48 #include "DNA_ID.h"
49 #include "DNA_screen_types.h"
50 #include "DNA_space_types.h"
51
52 #include "BIF_interface.h"
53 #include "BIF_resources.h"
54 #include "BIF_screen.h"
55 #include "BIF_space.h"
56 #include "BIF_toolbox.h"
57 #include "BKE_global.h"
58 #include "BKE_library.h"
59 #include "BKE_main.h"
60 #include "BKE_sca.h"
61 #include "BSE_filesel.h"
62
63 #include "BPI_script.h"
64 #include "BPY_extern.h"
65 #include "BPY_menus.h"
66
67 #include "blendef.h"
68 #include "mydevice.h"
69
70 /* ********************** SCRIPT ****************************** */
71
72 /* action executed after clicking in Scripts menu */
73 static void do_scripts_submenus(void *int_arg, int event)
74 {
75         int menutype = (int)int_arg;
76
77         BPY_menu_do_python (menutype, event);
78
79         //allqueue(REDRAWSCRIPT, 0);
80 }
81
82 static uiBlock *script_scripts_submenus(void *int_menutype)
83 {
84         uiBlock *block;
85         short yco = 20, menuwidth = 120;
86         BPyMenu *pym;
87         int i = 0, menutype = (int)int_menutype;
88
89         if ((menutype < 0) || (menutype > PYMENU_SCRIPTS_MENU_TOTAL))
90                 return NULL;
91
92         block= uiNewBlock(&curarea->uiblocks, "scriptsscriptssubmenus", UI_EMBOSSP, UI_HELV, G.curscreen->mainwin);
93         uiBlockSetButmFunc(block, do_scripts_submenus, int_menutype);
94
95         for (pym = BPyMenuTable[menutype]; pym; pym = pym->next, i++) {
96                 uiDefIconTextBut(block, BUTM, 1, ICON_PYTHON, pym->name, 0, yco-=20, menuwidth, 19, NULL, 0.0, 0.0, 1, i, pym->tooltip?pym->tooltip:pym->filename);
97         }
98
99         uiDefBut(block, SEPR, 0, "", 0, yco-=6, menuwidth, 6, NULL, 0.0, 0.0, 0, 0, "");
100
101         uiBlockSetDirection(block, UI_RIGHT);
102         uiTextBoundsBlock(block, 60);
103
104         return block;
105 }
106
107 static void do_script_scriptsmenu(void *arg, int event)
108 {
109         ScrArea *sa;
110         
111         if(curarea->spacetype==SPACE_INFO) {
112                 sa= closest_bigger_area();
113                 areawinset(sa->win);
114         }
115
116         /* these are no defines, easier this way, the codes are in the function below */
117         switch(event) {
118         case 0: /* update menus */
119                 BPyMenu_RemoveAllEntries();
120                 if (BPyMenu_Init(1) == -1) error("Invalid scripts dir: check console");
121                 break;
122         }
123
124 //      allqueue(REDRAWSCRIPT, 0);
125 }
126
127 /* Scripts menu */
128 static uiBlock *script_scriptsmenu(void *arg_unused)
129 {
130         uiBlock *block;
131         short yco = 0, menuwidth = 120;
132         int i;
133
134         block= uiNewBlock(&curarea->uiblocks, "script_scriptsmenu", UI_EMBOSSP, UI_HELV, curarea->headwin);
135         uiBlockSetButmFunc(block, do_script_scriptsmenu, NULL);
136
137         for (i = 0; i < PYMENU_SCRIPTS_MENU_TOTAL; i++) {
138                 uiDefIconTextBlockBut(block, script_scripts_submenus, (void *)i, ICON_RIGHTARROW_THIN, BPyMenu_group_itoa(i), 0, yco-=20, menuwidth, 19, "");
139         }
140
141         uiDefBut(block, SEPR, 0, "", 0, yco-=6, menuwidth, 6, NULL, 0.0, 0.0, 0, 0, "");
142
143         uiDefIconTextBut(block, BUTM, 1, ICON_BLANK1, "Update Menus", 0, yco-=20, menuwidth, 19, NULL, 0.0, 0.0, 1, 0, "Use when a scripts folder or its contents are modified");
144
145         if(curarea->headertype==HEADERTOP) {
146                 uiBlockSetDirection(block, UI_DOWN);
147         }
148         else {
149                 uiBlockSetDirection(block, UI_TOP);
150                 uiBlockFlipOrder(block);
151         }
152
153         uiTextBoundsBlock(block, 50);
154         return block;
155 }
156
157 void do_script_buttons(unsigned short event)
158 {       
159         SpaceScript *sc= curarea->spacedata.first;
160         ID *id, *idtest;
161         int nr= 1;
162         Script *script = sc->script;
163
164         if (!sc) return;
165         if (sc->spacetype != SPACE_SCRIPT) return;
166
167         switch (event) {
168         case B_SCRIPTBROWSE:
169                 if (sc->menunr==-2) {
170                         activate_databrowse((ID *)script, ID_SCR, 0, B_SCRIPTBROWSE,
171                                                                                         &sc->menunr, do_script_buttons);
172                         break;
173                 }
174
175                 if(sc->menunr < 0) break;
176
177                 nr = 1;
178                 id = (ID *)script;
179
180                 idtest= G.main->script.first;
181                 while(idtest) {
182                         if(nr==sc->menunr) {
183                                 break;
184                         }
185                         nr++;
186                         idtest= idtest->next;
187                 }
188                 if(idtest!=id) {
189                         sc->script= (Script *)idtest;
190
191                         allqueue(REDRAWSCRIPT, 0);
192                         allqueue(REDRAWHEADERS, 0);
193                 }
194                 break;
195         case B_SCRIPT2PREV:
196                 if(sc->next) {
197                         BLI_remlink(&curarea->spacedata, sc);
198                         BLI_addtail(&curarea->spacedata, sc);
199                         sc = curarea->spacedata.first;
200                         newspace(curarea, sc->spacetype);
201                 }
202                 break;
203         }
204
205         return;
206 }
207
208 void script_buttons(void)
209 {
210         uiBlock *block;
211         SpaceScript *sc= curarea->spacedata.first;
212         short xco = 8, xmax;
213         char naam[256];
214         
215         if (!sc || sc->spacetype != SPACE_SCRIPT) return;
216
217         sprintf(naam, "header %d", curarea->headwin);
218         block= uiNewBlock(&curarea->uiblocks, naam, UI_EMBOSS, UI_HELV, curarea->headwin);
219
220         if(area_is_active_area(curarea)) uiBlockSetCol(block, TH_HEADER);
221         else uiBlockSetCol(block, TH_HEADERDESEL);
222
223         curarea->butspacetype= SPACE_SCRIPT;
224
225         uiDefIconTextButC(block, ICONTEXTROW,B_NEWSPACE, ICON_VIEW3D,
226                         windowtype_pup(), xco,0,XIC+10,YIC, &(curarea->butspacetype), 1.0,
227                         SPACEICONMAX, 0, 0, "Displays Current Window Type. Click for menu"
228                         " of available types.");
229         xco += XIC+14;
230
231         uiBlockSetEmboss(block, UI_EMBOSSN);
232         if(curarea->flag & HEADER_NO_PULLDOWN) {
233                 uiDefIconButBitS(block, TOG, HEADER_NO_PULLDOWN, B_FLIPINFOMENU, ICON_DISCLOSURE_TRI_RIGHT,
234                                 xco,2,XIC,YIC-2,
235                                 &(curarea->flag), 0, 0, 0, 0, "Enables display of pulldown menus");
236         } else {
237                 uiDefIconButBitS(block, TOG, HEADER_NO_PULLDOWN, B_FLIPINFOMENU, ICON_DISCLOSURE_TRI_DOWN,
238                                 xco,2,XIC,YIC-2,
239                                 &(curarea->flag), 0, 0, 0, 0, "Hides pulldown menus");
240         }
241         uiBlockSetEmboss(block, UI_EMBOSS);
242         xco+=XIC;
243
244         /* pull down menus */
245         if((curarea->flag & HEADER_NO_PULLDOWN)==0) {
246                 uiBlockSetEmboss(block, UI_EMBOSSP);
247         
248                 xmax= GetButStringLength("Scripts");
249                 uiDefPulldownBut(block,script_scriptsmenu, NULL, "Scripts", xco, 0, xmax, 20, "");
250                 xco+=xmax;
251         }
252
253         uiBlockSetEmboss(block, UI_EMBOSS);
254
255         uiDefIconBut(block, BUT, B_SCRIPT2PREV, ICON_GO_LEFT, xco+=XIC, 0, XIC, YIC,
256                 0, 0, 0, 0, 0, "Returns to previous window");
257
258         /* FULL WINDOW */
259         if(curarea->full)
260                 uiDefIconBut(block, BUT,B_FULL, ICON_SPLITSCREEN,       xco+=XIC,0,XIC,YIC, 0, 0,
261                           0, 0, 0, "Returns to multiple views window (CTRL+Up arrow)");
262         else
263                 uiDefIconBut(block, BUT,B_FULL, ICON_FULLSCREEN,        xco+=XIC,0,XIC,YIC, 0, 0,
264                                 0, 0, 0, "Makes current window full screen (CTRL+Down arrow)");
265
266         /* STD SCRIPT BUTTONS */
267         xco += 2*XIC;
268         xco= std_libbuttons(block, xco, 0, 0, NULL, B_SCRIPTBROWSE, ID_SCRIPT, 0, (ID*)sc->script, 0, &(sc->menunr), 0, 0, 0, 0, 0);
269
270         /* always as last  */
271         curarea->headbutlen= xco+2*XIC;
272
273         uiDrawBlock(block);
274 }
275
276
277 /* ********************** SCRIPT ****************************** */
278