?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Remove spurious colon
[geany-mirror.git] / src / build.c
blobf68e7b70e009372925745f9c4e166a93a977a16a
1 /*
2 * build.c - this file is part of Geany, a fast and lightweight IDE
3 *
4 * Copyright 2005-2012 Enrico Tröger <enrico(dot)troeger(at)uvena(dot)de>
5 * Copyright 2006-2012 Nick Treleaven <nick(dot)treleaven(at)btinternet(dot)com>
6 * Copyright 2009 Lex Trotman <elextr(at)gmail(dot)com>
7 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License along
19 * with this program; if not, write to the Free Software Foundation, Inc.,
20 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
21 */
22
23 /*
24 * Build commands and menu items.
25 */
26 /* TODO: tidy code:
27 * Use intermediate pointers for common subexpressions.
28 * Replace defines with enums.
29 * Other TODOs in code. */
30
31 #ifdef HAVE_CONFIG_H
32 # include "config.h"
33 #endif
34
35 #include "app.h"
36 #include "build.h"
37 #include "dialogs.h"
38 #include "document.h"
39 #include "filetypesprivate.h"
40 #include "geanymenubuttonaction.h"
41 #include "geanyobject.h"
42 #include "keybindingsprivate.h"
43 #include "msgwindow.h"
44 #include "prefs.h"
45 #include "projectprivate.h"
46 #include "sciwrappers.h"
47 #include "spawn.h"
48 #include "support.h"
49 #include "toolbar.h"
50 #include "ui_utils.h"
51 #include "utils.h"
52 #include "vte.h"
53 #include "win32.h"
54
55 #include "gtkcompat.h"
56
57 #include <stdlib.h>
58 #include <string.h>
59 #include <sys/stat.h>
60 #include <unistd.h>
61 #include <errno.h>
62 #include <glib/gstdio.h>
63
64
65
66 /* Number of editor indicators to draw - limited as this can affect performance */
67 #define GEANY_BUILD_ERR_HIGHLIGHT_MAX 50
68
69
70 GeanyBuildInfo build_info = {GEANY_GBG_FT, 0, 0, NULL, GEANY_FILETYPES_NONE, NULL, 0};
71
72 static gchar *current_dir_entered = NULL;
73
74 typedef struct RunInfo
75 {
76 GPid pid;
77 gint file_type_id;
78 } RunInfo;
79
80 static RunInfo *run_info;
81
82 #ifndef G_OS_WIN32
83 static const gchar RUN_SCRIPT_CMD[] = "geany_run_script_XXXXXX.sh";
84 #endif
85
86 /* pack group (<8) and command (<32) into a user_data pointer */
87 #define GRP_CMD_TO_POINTER(grp, cmd) GUINT_TO_POINTER((((grp)&7) << 5) | ((cmd)&0x1f))
88 #define GBO_TO_POINTER(gbo) (GRP_CMD_TO_POINTER(GBO_TO_GBG(gbo), GBO_TO_CMD(gbo)))
89 #define GPOINTER_TO_CMD(gptr) (GPOINTER_TO_UINT(gptr)&0x1f)
90 #define GPOINTER_TO_GRP(gptr) ((GPOINTER_TO_UINT(gptr)&0xe0) >> 5)
91
92 static gpointer last_toolbutton_action = GBO_TO_POINTER(GEANY_GBO_BUILD);
93
94 static BuildMenuItems menu_items = {NULL, {NULL, NULL, NULL, NULL}};
95
96 static struct
97 {
98 GtkAction *run_action;
99 GtkAction *compile_action;
100 GtkAction *build_action;
101 GtkWidget *toolmenu;
102
103 GtkWidget *toolitem_build;
104 GtkWidget *toolitem_make_all;
105 GtkWidget *toolitem_make_custom;
106 GtkWidget *toolitem_make_object;
107 GtkWidget *toolitem_set_args;
108 }
109 widgets;
110
111 static guint build_groups_count[GEANY_GBG_COUNT] = { 3, 4, 2 };
112 static guint build_items_count = 9;
113
114 static void build_exit_cb(GPid pid, gint status, gpointer user_data);
115 static void build_iofunc(GString *string, GIOCondition condition, gpointer data);
116 #ifndef G_OS_WIN32
117 static gchar *build_create_shellscript(const gchar *working_dir, const gchar *cmd, gboolean autoclose, GError **error);
118 #endif
119 static void build_spawn_cmd(GeanyDocument *doc, const gchar *cmd, const gchar *dir);
120 static void set_stop_button(gboolean stop);
121 static void run_exit_cb(GPid child_pid, gint status, gpointer user_data);
122 static void on_set_build_commands_activate(GtkWidget *w, gpointer u);
123 static void on_build_next_error(GtkWidget *menuitem, gpointer user_data);
124 static void on_build_previous_error(GtkWidget *menuitem, gpointer user_data);
125 static void kill_process(GPid *pid);
126 static void show_build_result_message(gboolean failure);
127 static void process_build_output_line(gchar *msg, gint color);
128 static void show_build_commands_dialog(void);
129 static void on_build_menu_item(GtkWidget *w, gpointer user_data);
130
131 void build_finalize(void)
132 {
133 g_free(build_info.dir);
134 g_free(build_info.custom_target);
135
136 if (menu_items.menu != NULL && GTK_IS_WIDGET(menu_items.menu))
137 gtk_widget_destroy(menu_items.menu);
138 }
139
140
141 /* note: copied from keybindings.c, may be able to go away */
142 static void add_menu_accel(GeanyKeyGroup *group, guint kb_id,
143 GtkAccelGroup *accel_group, GtkWidget *menuitem)
144 {
145 GeanyKeyBinding *kb = keybindings_get_item(group, kb_id);
146
147 if (kb->key != 0)
148 gtk_widget_add_accelerator(menuitem, "activate", accel_group,
149 kb->key, kb->mods, GTK_ACCEL_VISIBLE);
150 }
151
152
153 /* convenience routines to access parts of GeanyBuildCommand */
154 static gchar *id_to_str(GeanyBuildCommand *bc, gint id)
155 {
156 switch (id)
157 {
158 case GEANY_BC_LABEL:
159 return bc->label;
160 case GEANY_BC_COMMAND:
161 return bc->command;
162 case GEANY_BC_WORKING_DIR:
163 return bc->working_dir;
164 }
165 g_assert(0);
166 return NULL;
167 }
168
169
170 static void set_command(GeanyBuildCommand *bc, gint id, gchar *str)
171 {
172 switch (id)
173 {
174 case GEANY_BC_LABEL:
175 SETPTR(bc->label, str);
176 break;
177 case GEANY_BC_COMMAND:
178 SETPTR(bc->command, str);
179 break;
180 case GEANY_BC_WORKING_DIR:
181 SETPTR(bc->working_dir, str);
182 break;
183 default:
184 g_assert(0);
185 }
186 }
187
188
189 static const gchar *config_keys[GEANY_BC_CMDENTRIES_COUNT] = {
190 "LB", /* label */
191 "CM", /* command */
192 "WD" /* working directory */
193 };
194
195 /*-----------------------------------------------------
196 *
197 * Execute commands and handle results
198 *
199 *-----------------------------------------------------*/
200
201 /* the various groups of commands not in the filetype struct */
202 static GeanyBuildCommand *ft_def = NULL;
203 static GeanyBuildCommand *non_ft_proj = NULL;
204 static GeanyBuildCommand *non_ft_pref = NULL;
205 static GeanyBuildCommand *non_ft_def = NULL;
206 static GeanyBuildCommand *exec_proj = NULL;
207 static GeanyBuildCommand *exec_pref = NULL;
208 static GeanyBuildCommand *exec_def = NULL;
209 /* and the regexen not in the filetype structure */
210 static gchar *regex_pref = NULL;
211 /* project non-fileregex string */
212 static gchar *regex_proj = NULL;
213
214 /* control if build commands are printed by get_build_cmd, for debug purposes only*/
215 #ifndef PRINTBUILDCMDS
216 #define PRINTBUILDCMDS FALSE
217 #endif
218 static gboolean printbuildcmds = PRINTBUILDCMDS;
219
220
221 /* for debug only, print the commands structures in priority order */
222 static void printfcmds(void)
223 {
224 #if 0
225 GeanyBuildCommand **cl[GEANY_GBG_COUNT][GEANY_BCS_COUNT] = {
226 /* GEANY_BCS_DEF, GEANY_BCS_FT, GEANY_BCS_HOME_FT, GEANY_BCS_PREF,
227 * GEANY_BCS_FT_PROJ, GEANY_BCS_PROJ */
228 { &ft_def, NULL, NULL, NULL, NULL, NULL },
229 { &non_ft_def, NULL, NULL, &non_ft_pref, NULL, &non_ft_proj },
230 { &exec_def, NULL, NULL, &exec_pref, NULL, &exec_proj }
231 };
232 GeanyFiletype *ft = NULL;
233 GeanyDocument *doc;
234 gint i, j, k, l, m;
235 enum GeanyBuildCmdEntries n;
236 gint cc[GEANY_BCS_COUNT];
237 gchar c;
238
239 doc = document_get_current();
240 if (doc != NULL)
241 ft = doc->file_type;
242 if (ft != NULL)
243 {
244 printf("filetype %s\n",ft->name);
245 cl[GEANY_GBG_FT][GEANY_BCS_FT] = &(ft->priv->filecmds);
246 cl[GEANY_GBG_FT][GEANY_BCS_HOME_FT] = &(ft->priv->homefilecmds);
247 cl[GEANY_GBG_FT][GEANY_BCS_PROJ] = &(ft->priv->projfilecmds);
248 cl[GEANY_GBG_NON_FT][GEANY_BCS_FT] = &(ft->priv->ftdefcmds);
249 cl[GEANY_GBG_EXEC][GEANY_BCS_FT] = &(ft->priv->execcmds);
250 cl[GEANY_GBG_EXEC][GEANY_BCS_HOME_FT] = &(ft->priv->homeexeccmds);
251 cl[GEANY_GBG_EXEC][GEANY_BCS_PROJ_FT] = &(ft->priv->projexeccmds);
252 }
253 for (i = 0; i < GEANY_BCS_COUNT; ++i)
254 {
255 m = 1;
256 for (j = 0; j < GEANY_GBG_COUNT; ++j)
257 {
258 for (k = 0; k < build_groups_count[j]; ++k)
259 if (cl[j][i] != NULL && *(cl[j][i]) != NULL && (*(cl[j][i]))[k].exists)
260 {
261 for (n = 0; n < GEANY_BC_CMDENTRIES_COUNT; n++)
262 {
263 if ((*(cl[j][i]))[k].entries[n] != NULL &&
264 (l = strlen((*(cl[j][i]))[k].entries[n])) > m)
265 {
266 m = l;
267 }
268 }
269 }
270 }
271 cc[i] = m;
272 }
273 for (i = 0; i < GEANY_GBG_COUNT; ++i)
274 {
275 for (k = 0; k < build_groups_count[i]; ++k)
276 {
277 for (l = 0; l < 2; ++l)
278 {
279 c = ' ';
280 for (j = 0; j < GEANY_BCS_COUNT; ++j)
281 {
282 if (cl[i][j] != NULL && *(cl[i][j]) != NULL && (*(cl[i][j]))[k].exists)
283 {
284 for (n = 0; n < GEANY_BC_CMDENTRIES_COUNT; n++)
285 {
286 if ((*(cl[i][j]))[k].entries[i] != NULL)
287 printf("%c %*.*s",c,cc[j],cc[j],(*(cl[i][j]))[k].entries[i]);
288 else
289 printf("%c %*.*s",c,cc[j],cc[j]," ");
290 }
291 }
292 else
293 printf("%c %*.*s",c,cc[j],cc[j]," ");
294 c = ',';
295 }
296 printf("\n");
297 }
298 }
299 printf("\n");
300 }
301 #endif
302 }
303
304
305 /* macros to save typing and make the logic visible */
306 #define return_cmd_if(src, cmds)\
307 if (cmds != NULL && cmds[cmdindex].exists && below>src)\
308 { \
309 *fr=src; \
310 if (printbuildcmds) \
311 printf("cmd[%u,%u]=%u\n",cmdgrp,cmdindex,src); \
312 return &(cmds[cmdindex]); \
313 }
314
315 #define return_ft_cmd_if(src, cmds)\
316 if (ft != NULL && ft->priv->cmds != NULL \
317 && ft->priv->cmds[cmdindex].exists && below>src)\
318 { \
319 *fr=src; \
320 if (printbuildcmds) \
321 printf("cmd[%u,%u]=%u\n",cmdgrp,cmdindex,src); \
322 return &(ft->priv->cmds[cmdindex]); \
323 }
324
325
326 /* get the next lowest command taking priority into account */
327 static GeanyBuildCommand *get_next_build_cmd(GeanyDocument *doc, guint cmdgrp, guint cmdindex,
328 guint below, guint *from)
329 {
330 /* Note: parameter below used in macros above */
331 GeanyFiletype *ft = NULL;
332 guint sink, *fr = &sink;
333
334 g_return_val_if_fail(doc == NULL || doc->is_valid, NULL);
335
336 if (printbuildcmds)
337 printfcmds();
338 if (cmdgrp >= GEANY_GBG_COUNT)
339 return NULL;
340 if (from != NULL)
341 fr = from;
342 if (doc == NULL)
343 doc = document_get_current();
344 if (doc != NULL)
345 ft = doc->file_type;
346
347 switch (cmdgrp)
348 {
349 case GEANY_GBG_FT: /* order proj ft, home ft, ft, defft */
350 if (ft != NULL)
351 {
352 return_ft_cmd_if(GEANY_BCS_PROJ, projfilecmds);
353 return_ft_cmd_if(GEANY_BCS_PREF, homefilecmds);
354 return_ft_cmd_if(GEANY_BCS_FT, filecmds);
355 }
356 return_cmd_if(GEANY_BCS_DEF, ft_def);
357 break;
358 case GEANY_GBG_NON_FT: /* order proj, pref, def */
359 return_cmd_if(GEANY_BCS_PROJ, non_ft_proj);
360 return_cmd_if(GEANY_BCS_PREF, non_ft_pref);
361 return_ft_cmd_if(GEANY_BCS_FT, ftdefcmds);
362 return_cmd_if(GEANY_BCS_DEF, non_ft_def);
363 break;
364 case GEANY_GBG_EXEC: /* order proj, proj ft, pref, home ft, ft, def */
365 return_cmd_if(GEANY_BCS_PROJ, exec_proj);
366 return_ft_cmd_if(GEANY_BCS_PROJ_FT, projexeccmds);
367 return_cmd_if(GEANY_BCS_PREF, exec_pref);
368 return_ft_cmd_if(GEANY_BCS_FT, homeexeccmds);
369 return_ft_cmd_if(GEANY_BCS_FT, execcmds);
370 return_cmd_if(GEANY_BCS_DEF, exec_def);
371 break;
372 default:
373 break;
374 }
375 return NULL;
376 }
377
378
379 /* shortcut to start looking at the top */
380 static GeanyBuildCommand *get_build_cmd(GeanyDocument *doc, guint grp, guint cmdindex, guint *from)
381 {
382 return get_next_build_cmd(doc, grp, cmdindex, GEANY_BCS_COUNT, from);
383 }
384
385
386 #define return_nonblank_regex(src, ptr)\
387 if (!EMPTY(ptr)) \
388 { *fr = (src); return &(ptr); }
389
390
391 /* like get_build_cmd, but for regexen, used by filetypes */
392 gchar **build_get_regex(GeanyBuildGroup grp, GeanyFiletype *ft, guint *from)
393 {
394 guint sink, *fr = &sink;
395
396 if (from != NULL)
397 fr = from;
398 if (grp == GEANY_GBG_FT)
399 {
400 if (ft == NULL)
401 {
402 GeanyDocument *doc = document_get_current();
403 if (doc != NULL)
404 ft = doc->file_type;
405 }
406 if (ft == NULL)
407 return NULL;
408 return_nonblank_regex(GEANY_BCS_PROJ, ft->priv->projerror_regex_string);
409 return_nonblank_regex(GEANY_BCS_HOME_FT, ft->priv->homeerror_regex_string);
410 return_nonblank_regex(GEANY_BCS_FT, ft->error_regex_string);
411 }
412 else if (grp == GEANY_GBG_NON_FT)
413 {
414 return_nonblank_regex(GEANY_BCS_PROJ, regex_proj);
415 return_nonblank_regex(GEANY_BCS_PREF, regex_pref);
416 }
417 return NULL;
418 }
419
420
421 static GeanyBuildCommand **get_build_group_pointer(const GeanyBuildSource src, const GeanyBuildGroup grp)
422 {
423 GeanyDocument *doc;
424 GeanyFiletype *ft = NULL;
425
426 switch (grp)
427 {
428 case GEANY_GBG_FT:
429 if ((doc = document_get_current()) == NULL)
430 return NULL;
431 if ((ft = doc->file_type) == NULL)
432 return NULL;
433 switch (src)
434 {
435 case GEANY_BCS_DEF: return &(ft->priv->ftdefcmds);
436 case GEANY_BCS_FT: return &(ft->priv->filecmds);
437 case GEANY_BCS_HOME_FT: return &(ft->priv->homefilecmds);
438 case GEANY_BCS_PREF: return &(ft->priv->homefilecmds);
439 case GEANY_BCS_PROJ: return &(ft->priv->projfilecmds);
440 default: return NULL;
441 }
442 break;
443 case GEANY_GBG_NON_FT:
444 switch (src)
445 {
446 case GEANY_BCS_DEF: return &(non_ft_def);
447 case GEANY_BCS_PREF: return &(non_ft_pref);
448 case GEANY_BCS_PROJ: return &(non_ft_proj);
449 default: return NULL;
450 }
451 break;
452 case GEANY_GBG_EXEC:
453 if ((doc = document_get_current()) != NULL)
454 ft = doc->file_type;
455 switch (src)
456 {
457 case GEANY_BCS_DEF: return &(exec_def);
458 case GEANY_BCS_FT: return ft ? &(ft->priv->execcmds): NULL;
459 case GEANY_BCS_HOME_FT: return ft ? &(ft->priv->homeexeccmds): NULL;
460 case GEANY_BCS_PROJ_FT: return ft ? &(ft->priv->projexeccmds): NULL;
461 case GEANY_BCS_PREF: return &(exec_pref);
462 case GEANY_BCS_PROJ: return &(exec_proj);
463 default: return NULL;
464 }
465 break;
466 default:
467 return NULL;
468 }
469 }
470
471
472 /* get pointer to the command group array */
473 static GeanyBuildCommand *get_build_group(const GeanyBuildSource src, const GeanyBuildGroup grp)
474 {
475 GeanyBuildCommand **g = get_build_group_pointer(src, grp);
476 if (g == NULL) return NULL;
477 return *g;
478 }
479
480
481 /** Remove the specified Build menu item.
482 *
483 * Makes the specified menu item configuration no longer exist. This
484 * is different to setting fields to blank because the menu item
485 * will be deleted from the configuration file on saving
486 * (except the system filetypes settings @see Build Menu Configuration
487 * section of the Manual).
488 *
489 * @param src the source of the menu item to remove.
490 * @param grp the group of the command to remove.
491 * @param cmd the index (from 0) of the command within the group. A negative
492 * value will remove the whole group.
493 *
494 * If any parameter is out of range does nothing.
495 *
496 * Updates the menu.
497 *
498 **/
499 GEANY_API_SYMBOL
500 void build_remove_menu_item(const GeanyBuildSource src, const GeanyBuildGroup grp, const gint cmd)
501 {
502 GeanyBuildCommand *bc;
503 guint i;
504
505 bc = get_build_group(src, grp);
506 if (bc == NULL)
507 return;
508 if (cmd < 0)
509 {
510 for (i = 0; i < build_groups_count[grp]; ++i)
511 bc[i].exists = FALSE;
512 }
513 else if ((guint) cmd < build_groups_count[grp])
514 bc[cmd].exists = FALSE;
515 }
516
517
518 /* * Get the @a GeanyBuildCommand structure for the specified Build menu item.
519 *
520 * Get the command for any menu item specified by @a src, @a grp and @a cmd even if it is
521 * hidden by higher priority commands.
522 *
523 * @param src the source of the specified menu item.
524 * @param grp the group of the specified menu item.
525 * @param cmd the index of the command within the group.
526 *
527 * @return a pointer to the @a GeanyBuildCommand structure or @c NULL if it doesn't exist.
528 * This is a pointer to an internal structure and must not be freed.
529 *
530 * @see build_menu_update
531 **/
532 GeanyBuildCommand *build_get_menu_item(GeanyBuildSource src, GeanyBuildGroup grp, guint cmd)
533 {
534 GeanyBuildCommand *bc;
535
536 g_return_val_if_fail(src < GEANY_BCS_COUNT, NULL);
537 g_return_val_if_fail(grp < GEANY_GBG_COUNT, NULL);
538 g_return_val_if_fail(cmd < build_groups_count[grp], NULL);
539
540 bc = get_build_group(src, grp);
541 if (bc == NULL)
542 return NULL;
543 return &(bc[cmd]);
544 }
545
546
547 /** Get the string for the menu item field.
548 *
549 * Get the current highest priority command specified by @a grp and @a cmd. This is the one
550 * that the menu item will use if activated.
551 *
552 * @param grp the group of the specified menu item.
553 * @param cmd the index of the command within the group.
554 * @param fld the field to return
555 *
556 * @return @nullable a pointer to the constant string or @c NULL if it doesn't exist.
557 * This is a pointer to an internal structure and must not be freed.
558 *
559 **/
560 GEANY_API_SYMBOL
561 const gchar *build_get_current_menu_item(const GeanyBuildGroup grp, const guint cmd,
562 const GeanyBuildCmdEntries fld)
563 {
564 GeanyBuildCommand *c;
565 gchar *str = NULL;
566
567 g_return_val_if_fail(grp < GEANY_GBG_COUNT, NULL);
568 g_return_val_if_fail(fld < GEANY_BC_CMDENTRIES_COUNT, NULL);
569 g_return_val_if_fail(cmd < build_groups_count[grp], NULL);
570
571 c = get_build_cmd(NULL, grp, cmd, NULL);
572 if (c == NULL) return NULL;
573 switch (fld)
574 {
575 case GEANY_BC_COMMAND:
576 str = c->command;
577 break;
578 case GEANY_BC_LABEL:
579 str = c->label;
580 break;
581 case GEANY_BC_WORKING_DIR:
582 str = c->working_dir;
583 break;
584 default:
585 break;
586 }
587 return str;
588 }
589
590 /** Set the string for the menu item field.
591 *
592 * Set the specified field of the command specified by @a src, @a grp and @a cmd.
593 *
594 * @param src the source of the menu item
595 * @param grp the group of the specified menu item.
596 * @param cmd the index of the menu item within the group.
597 * @param fld the field in the menu item command to set
598 * @param val the value to set the field to, is copied
599 *
600 **/
601 GEANY_API_SYMBOL
602 void build_set_menu_item(const GeanyBuildSource src, const GeanyBuildGroup grp,
603 const guint cmd, const GeanyBuildCmdEntries fld, const gchar *val)
604 {
605 GeanyBuildCommand **g;
606
607 g_return_if_fail(src < GEANY_BCS_COUNT);
608 g_return_if_fail(grp < GEANY_GBG_COUNT);
609 g_return_if_fail(fld < GEANY_BC_CMDENTRIES_COUNT);
610 g_return_if_fail(cmd < build_groups_count[grp]);
611
612 g = get_build_group_pointer(src, grp);
613 if (g == NULL) return;
614 if (*g == NULL )
615 {
616 *g = g_new0(GeanyBuildCommand, build_groups_count[grp]);
617 }
618 switch (fld)
619 {
620 case GEANY_BC_COMMAND:
621 SETPTR((*g)[cmd].command, g_strdup(val));
622 (*g)[cmd].exists = TRUE;
623 break;
624 case GEANY_BC_LABEL:
625 SETPTR((*g)[cmd].label, g_strdup(val));
626 (*g)[cmd].exists = TRUE;
627 break;
628 case GEANY_BC_WORKING_DIR:
629 SETPTR((*g)[cmd].working_dir, g_strdup(val));
630 (*g)[cmd].exists = TRUE;
631 break;
632 default:
633 break;
634 }
635 build_menu_update(NULL);
636 }
637
638 /** Activate the menu item.
639 *
640 * Activate the menu item specified by @a grp and @a cmd.
641 *
642 * @param grp the group of the specified menu item.
643 * @param cmd the index of the command within the group.
644 *
645 **/
646 GEANY_API_SYMBOL
647 void build_activate_menu_item(const GeanyBuildGroup grp, const guint cmd)
648 {
649 on_build_menu_item(NULL, GRP_CMD_TO_POINTER(grp, cmd));
650 }
651
652
653 /* Clear all error indicators in all documents. */
654 static void clear_all_errors(void)
655 {
656 guint i;
657
658 foreach_document(i)
659 {
660 editor_indicator_clear_errors(documents[i]->editor);
661 }
662 }
663
664
665 /* Replaces occurrences of %e and %p with the appropriate filenames and
666 * %l with current line number. %d and %p replacements should be in UTF8 */
667 static gchar *build_replace_placeholder(const GeanyDocument *doc, const gchar *src)
668 {
669 GString *stack;
670 gchar *replacement;
671 gchar *executable = NULL;
672 gint line_num;
673
674 g_return_val_if_fail(doc == NULL || doc->is_valid, NULL);
675
676 stack = g_string_new(src);
677 if (doc != NULL && doc->file_name != NULL)
678 {
679 /* replace %f with the filename (including extension) */
680 replacement = g_path_get_basename(doc->file_name);
681 utils_string_replace_all(stack, "%f", replacement);
682 g_free(replacement);
683
684 /* replace %d with the absolute path of the dir of the current file */
685 replacement = g_path_get_dirname(doc->file_name);
686 utils_string_replace_all(stack, "%d", replacement);
687 g_free(replacement);
688
689 /* replace %e with the filename (excluding extension) */
690 executable = utils_remove_ext_from_filename(doc->file_name);
691 replacement = g_path_get_basename(executable);
692 utils_string_replace_all(stack, "%e", replacement);
693 g_free(replacement);
694
695 /* replace %l with the current 1-based line number */
696 line_num = sci_get_current_line(doc->editor->sci) + 1;
697 replacement = g_strdup_printf("%i", line_num);
698 utils_string_replace_all(stack, "%l", replacement);
699 g_free(replacement);
700 }
701
702 /* replace %p with the current project's (absolute) base directory */
703 replacement = NULL; /* prevent double free if no replacement found */
704 if (app->project)
705 {
706 replacement = project_get_base_path();
707 }
708 else if (strstr(stack->str, "%p"))
709 { /* fall back to %d */
710 ui_set_statusbar(FALSE, _("failed to substitute %%p, no project active"));
711 if (doc != NULL && doc->file_name != NULL)
712 replacement = g_path_get_dirname(doc->file_name);
713 }
714
715 utils_string_replace_all(stack, "%p", replacement);
716 g_free(replacement);
717 g_free(executable);
718
719 return g_string_free(stack, FALSE); /* don't forget to free src also if needed */
720 }
721
722
723 /* dir is the UTF-8 working directory to run cmd in. It can be NULL to use the
724 * idx document directory */
725 static void build_spawn_cmd(GeanyDocument *doc, const gchar *cmd, const gchar *dir)
726 {
727 GError *error = NULL;
728 gchar *argv[] = { "/bin/sh", "-c", NULL, NULL };
729 gchar *working_dir;
730 gchar *utf8_working_dir;
731 gchar *cmd_string;
732
733 g_return_if_fail(doc == NULL || doc->is_valid);
734
735 if ((doc == NULL || EMPTY(doc->file_name)) && EMPTY(dir))
736 {
737 geany_debug("Failed to run command with no working directory");
738 ui_set_statusbar(TRUE, _("Process failed, no working directory"));
739 return;
740 }
741
742 clear_all_errors();
743 SETPTR(current_dir_entered, NULL);
744
745 utf8_working_dir = !EMPTY(dir) ? g_strdup(dir) : g_path_get_dirname(doc->file_name);
746 working_dir = utils_get_locale_from_utf8(utf8_working_dir);
747
748 gtk_list_store_clear(msgwindow.store_compiler);
749 gtk_notebook_set_current_page(GTK_NOTEBOOK(msgwindow.notebook), MSG_COMPILER);
750 msgwin_compiler_add(COLOR_BLUE, _("%s (in directory: %s)"), cmd, utf8_working_dir);
751 g_free(utf8_working_dir);
752
753 #ifdef G_OS_UNIX
754 cmd_string = utils_get_locale_from_utf8(cmd);
755 argv[2] = cmd_string;
756 cmd = NULL; /* under Unix, use argv to start cmd via sh for compatibility */
757 #else
758 /* Expand environment variables like %blah%. */
759 cmd_string = win32_expand_environment_variables(cmd);
760 argv[0] = NULL; /* under Windows, run cmd directly */
761 cmd = cmd_string;
762 #endif
763
764 /* set the build info for the message window */
765 g_free(build_info.dir);
766 build_info.dir = g_strdup(working_dir);
767 build_info.file_type_id = (doc == NULL) ? GEANY_FILETYPES_NONE : doc->file_type->id;
768 build_info.message_count = 0;
769
770 if (!spawn_with_callbacks(working_dir, cmd, argv, NULL, 0, NULL, NULL, build_iofunc,
771 GINT_TO_POINTER(0), 0, build_iofunc, GINT_TO_POINTER(1), 0, build_exit_cb, NULL,
772 &build_info.pid, &error))
773 {
774 geany_debug("build command spawning failed: %s", error->message);
775 ui_set_statusbar(TRUE, _("Process failed (%s)"), error->message);
776 g_error_free(error);
777 }
778
779 g_free(working_dir);
780 g_free(cmd_string);
781 }
782
783
784 /* Returns: NULL if there was an error, or the command to be executed. If Geany is
785 * set to use a run script, the returned value is a path to the script that runs
786 * the command; otherwise the command itself is returned. working_dir is a pointer
787 * to the working directory from which the command is executed. Both strings are
788 * in the locale encoding. */
789 static gchar *prepare_run_cmd(GeanyDocument *doc, gchar **working_dir, guint cmdindex)
790 {
791 GeanyBuildCommand *cmd = NULL;
792 const gchar *cmd_working_dir;
793 gboolean autoclose = FALSE;
794 gchar *cmd_string_utf8, *working_dir_utf8, *run_cmd, *cmd_string;
795 GError *error = NULL;
796
797 cmd = get_build_cmd(doc, GEANY_GBG_EXEC, cmdindex, NULL);
798
799 cmd_string_utf8 = build_replace_placeholder(doc, cmd->command);
800 cmd_working_dir = cmd->working_dir;
801 if (EMPTY(cmd_working_dir))
802 cmd_working_dir = "%d";
803 working_dir_utf8 = build_replace_placeholder(doc, cmd_working_dir);
804 *working_dir = utils_get_locale_from_utf8(working_dir_utf8);
805
806 if (EMPTY(*working_dir) || ! g_file_test(*working_dir, G_FILE_TEST_EXISTS) ||
807 ! g_file_test(*working_dir, G_FILE_TEST_IS_DIR))
808 {
809 ui_set_statusbar(TRUE, _("Invalid working directory \"%s\""),
810 !EMPTY(working_dir_utf8) ? working_dir_utf8 : "<NULL>" );
811 utils_free_pointers(3, cmd_string_utf8, working_dir_utf8, *working_dir, NULL);
812 return NULL;
813 }
814
815 cmd_string = utils_get_locale_from_utf8(cmd_string_utf8);
816
817 #ifdef HAVE_VTE
818 if (vte_info.have_vte && vc->run_in_vte)
819 {
820 if (vc->skip_run_script)
821 {
822 utils_free_pointers(2, cmd_string_utf8, working_dir_utf8, NULL);
823 return cmd_string;
824 }
825 else
826 /* don't wait for user input at the end of script when we are running in VTE */
827 autoclose = TRUE;
828 }
829 #endif
830
831 #ifdef G_OS_WIN32
832 /* Expand environment variables like %blah%. */
833 SETPTR(cmd_string, win32_expand_environment_variables(cmd_string));
834
835 gchar *helper = g_build_filename(utils_resource_dir(RESOURCE_DIR_LIBEXEC), "geany-run-helper", NULL);
836 /* escape helper appropriately */
837 /* FIXME: check the Windows rules, but it should not matter too much here as \es and "es are not
838 * allowed in paths anyway */
839 run_cmd = g_strdup_printf("\"%s\" \"%s\" %d %s", helper, *working_dir, autoclose ? 1 : 0, cmd_string);
840 g_free(helper);
841 #else
842 run_cmd = build_create_shellscript(*working_dir, cmd_string, autoclose, &error);
843 if (!run_cmd)
844 {
845 ui_set_statusbar(TRUE, _("Failed to execute \"%s\" (start-script could not be created: %s)"),
846 !EMPTY(cmd_string_utf8) ? cmd_string_utf8 : NULL, error->message);
847 g_error_free(error);
848 g_free(*working_dir);
849 }
850 #endif
851 utils_free_pointers(3, cmd_string_utf8, working_dir_utf8, cmd_string, NULL);
852 return run_cmd;
853 }
854
855
856 static void build_run_cmd(GeanyDocument *doc, guint cmdindex)
857 {
858 gchar *working_dir;
859 gchar *run_cmd = NULL;
860
861 if (! DOC_VALID(doc) || doc->file_name == NULL)
862 return;
863
864 run_cmd = prepare_run_cmd(doc, &working_dir, cmdindex);
865 if (run_cmd == NULL)
866 return;
867
868 run_info[cmdindex].file_type_id = doc->file_type->id;
869
870 #ifdef HAVE_VTE
871 if (vte_info.have_vte && vc->run_in_vte)
872 {
873 gchar *vte_cmd;
874
875 /* VTE expects commands in UTF-8 */
876 SETPTR(run_cmd, utils_get_utf8_from_locale(run_cmd));
877 SETPTR(working_dir, utils_get_utf8_from_locale(working_dir));
878
879 if (vc->skip_run_script)
880 vte_cmd = g_strconcat(run_cmd, "\n", NULL);
881 else
882 vte_cmd = g_strconcat("\n/bin/sh ", run_cmd, "\n", NULL);
883
884 vte_cwd(working_dir, TRUE);
885 if (! vte_send_cmd(vte_cmd))
886 {
887 const gchar *msg = _("File not executed because the terminal may contain some input (press Ctrl+C or Enter to clear it).");
888 ui_set_statusbar(FALSE, "%s", msg);
889 geany_debug("%s", msg);
890 if (!vc->skip_run_script)
891 g_unlink(run_cmd);
892 }
893
894 /* show the VTE */
895 gtk_notebook_set_current_page(GTK_NOTEBOOK(msgwindow.notebook), MSG_VTE);
896 gtk_widget_grab_focus(vc->vte);
897 msgwin_show_hide(TRUE);
898
899 run_info[cmdindex].pid = 1;
900 g_free(vte_cmd);
901 }
902 else
903 #endif
904 {
905 gchar *locale_term_cmd = utils_get_locale_from_utf8(tool_prefs.term_cmd);
906 GError *error = NULL;
907
908 #ifdef G_OS_WIN32
909 if (g_regex_match_simple("^[ \"]*cmd([.]exe)?[\" ]", locale_term_cmd, 0, 0))
910 {
911 /* if passing an argument to cmd.exe, respect its quoting rules */
912 GString *escaped_run_cmd = g_string_new(NULL);
913 for (gchar *p = run_cmd; *p; p++)
914 {
915 if (strchr("()%!^\"<>&| ", *p)) // cmd.exe metacharacters
916 g_string_append_c(escaped_run_cmd, '^');
917 g_string_append_c(escaped_run_cmd, *p);
918 }
919 SETPTR(run_cmd, g_string_free(escaped_run_cmd, FALSE));
920 }
921 #endif
922
923 utils_str_replace_all(&locale_term_cmd, "%c", run_cmd);
924
925 if (spawn_async(working_dir, locale_term_cmd, NULL, NULL, &(run_info[cmdindex].pid),
926 &error))
927 {
928 g_child_watch_add(run_info[cmdindex].pid, (GChildWatchFunc) run_exit_cb,
929 (gpointer) &(run_info[cmdindex]));
930 build_menu_update(doc);
931 }
932 else
933 {
934 gchar *utf8_term_cmd = utils_get_utf8_from_locale(locale_term_cmd);
935 ui_set_statusbar(TRUE, _("Cannot execute build command \"%s\": %s. "
936 "Check the Terminal setting in Preferences"), utf8_term_cmd, error->message);
937 g_free(utf8_term_cmd);
938 g_error_free(error);
939 #ifndef G_OS_WIN32
940 g_unlink(run_cmd);
941 #endif
942 run_info[cmdindex].pid = (GPid) 0;
943 }
944 }
945
946 g_free(working_dir);
947 g_free(run_cmd);
948 }
949
950
951 static void process_build_output_line(gchar *msg, gint color)
952 {
953 gchar *tmp;
954 gchar *filename;
955 gint line;
956
957 g_strchomp(msg);
958
959 if (EMPTY(msg))
960 return;
961
962 if (build_parse_make_dir(msg, &tmp))
963 {
964 SETPTR(current_dir_entered, tmp);
965 }
966 msgwin_parse_compiler_error_line(msg, current_dir_entered, &filename, &line);
967
968 if (line != -1 && filename != NULL)
969 {
970 GeanyDocument *doc = document_find_by_filename(filename);
971
972 /* limit number of indicators */
973 if (doc && editor_prefs.use_indicators &&
974 build_info.message_count < GEANY_BUILD_ERR_HIGHLIGHT_MAX)
975 {
976 if (line > 0) /* some compilers, like pdflatex report errors on line 0 */
977 line--; /* so only adjust the line number if it is greater than 0 */
978 editor_indicator_set_on_line(doc->editor, GEANY_INDICATOR_ERROR, line);
979 }
980 build_info.message_count++;
981 color = COLOR_RED; /* error message parsed on the line */
982 }
983 g_free(filename);
984
985 msgwin_compiler_add_string(color, msg);
986 }
987
988
989 static void build_iofunc(GString *string, GIOCondition condition, gpointer data)
990 {
991 if (condition & (G_IO_IN | G_IO_PRI))
992 {
993 process_build_output_line(string->str,
994 (GPOINTER_TO_INT(data)) ? COLOR_DARK_RED : COLOR_BLACK);
995 }
996 }
997
998
999 gboolean build_parse_make_dir(const gchar *string, gchar **prefix)
1000 {
1001 const gchar *pos;
1002
1003 *prefix = NULL;
1004
1005 if (string == NULL)
1006 return FALSE;
1007
1008 if ((pos = strstr(string, "Entering directory")) != NULL)
1009 {
1010 gsize len;
1011 gchar *input;
1012
1013 /* get the start of the path */
1014 pos = strstr(string, "/");
1015
1016 if (pos == NULL)
1017 return FALSE;
1018
1019 input = g_strdup(pos);
1020
1021 /* kill the ' at the end of the path */
1022 len = strlen(input);
1023 input[len - 1] = '\0';
1024 input = g_realloc(input, len); /* shorten by 1 */
1025 *prefix = input;
1026
1027 return TRUE;
1028 }
1029
1030 if (strstr(string, "Leaving directory") != NULL)
1031 {
1032 *prefix = NULL;
1033 return TRUE;
1034 }
1035
1036 return FALSE;
1037 }
1038
1039
1040 static void show_build_result_message(gboolean failure)
1041 {
1042 gchar *msg;
1043
1044 if (failure)
1045 {
1046 msg = _("Compilation failed.");
1047 msgwin_compiler_add_string(COLOR_BLUE, msg);
1048 /* If msgwindow is hidden, user will want to display it to see the error */
1049 if (! ui_prefs.msgwindow_visible)
1050 {
1051 gtk_notebook_set_current_page(GTK_NOTEBOOK(msgwindow.notebook), MSG_COMPILER);
1052 msgwin_show_hide(TRUE);
1053 }
1054 else
1055 if (gtk_notebook_get_current_page(GTK_NOTEBOOK(msgwindow.notebook)) != MSG_COMPILER)
1056 ui_set_statusbar(FALSE, "%s", msg);
1057 }
1058 else
1059 {
1060 msg = _("Compilation finished successfully.");
1061 msgwin_compiler_add_string(COLOR_BLUE, msg);
1062 if (! ui_prefs.msgwindow_visible ||
1063 gtk_notebook_get_current_page(GTK_NOTEBOOK(msgwindow.notebook)) != MSG_COMPILER)
1064 ui_set_statusbar(FALSE, "%s", msg);
1065 }
1066 }
1067
1068
1069 static void build_exit_cb(GPid child_pid, gint status, gpointer user_data)
1070 {
1071 show_build_result_message(!SPAWN_WIFEXITED(status) || SPAWN_WEXITSTATUS(status) != EXIT_SUCCESS);
1072 utils_beep();
1073
1074 build_info.pid = 0;
1075 /* enable build items again */
1076 build_menu_update(NULL);
1077 ui_progress_bar_stop();
1078 }
1079
1080
1081 static void run_exit_cb(GPid child_pid, gint status, gpointer user_data)
1082 {
1083 RunInfo *run_info_data = user_data;
1084
1085 g_spawn_close_pid(child_pid);
1086
1087 run_info_data->pid = 0;
1088 /* reset the stop button and menu item to the original meaning */
1089 build_menu_update(NULL);
1090 }
1091
1092
1093 /* write a little shellscript to call the executable (similar to anjuta_launcher but "internal")
1094 * working_dir and cmd are both in the locale encoding
1095 * it returns the full file name (including path) of the created script in the locale encoding */
1096 #ifndef G_OS_WIN32
1097 static gchar *build_create_shellscript(const gchar *working_dir, const gchar *cmd, gboolean autoclose, GError **error)
1098 {
1099 gint fd;
1100 gchar *str, *fname;
1101 gboolean success = TRUE;
1102 gchar *escaped_dir;
1103 fd = g_file_open_tmp (RUN_SCRIPT_CMD, &fname, error);
1104 if (fd < 0)
1105 return NULL;
1106 close(fd);
1107
1108 escaped_dir = g_shell_quote(working_dir);
1109 str = g_strdup_printf(
1110 "#!/bin/sh\n\nrm $0\n\ncd %s\n\n%s\n\necho \"\n\n------------------\n(program exited with code: $?)\" \
1111 \n\n%s\n", escaped_dir, cmd, (autoclose) ? "" :
1112 "\necho \"Press return to continue\"\n#to be more compatible with shells like "
1113 "dash\ndummy_var=\"\"\nread dummy_var");
1114 g_free(escaped_dir);
1115
1116 if (!g_file_set_contents(fname, str, -1, error))
1117 success = FALSE;
1118 g_free(str);
1119 #ifdef __APPLE__
1120 if (success && g_chmod(fname, 0777) != 0)
1121 {
1122 if (error)
1123 {
1124 gint errsv = errno;
1125
1126 g_set_error(error, G_FILE_ERROR, g_file_error_from_errno(errsv),
1127 "Failed to make file executable: %s", g_strerror(errsv));
1128 }
1129 success = FALSE;
1130 }
1131 #endif
1132
1133 if (!success)
1134 {
1135 g_unlink(fname);
1136 g_free(fname);
1137 fname = NULL;
1138 }
1139
1140 return fname;
1141 }
1142 #endif
1143
1144
1145 typedef void Callback(GtkWidget *w, gpointer u);
1146
1147 /* run the command catenating cmd_cat if present */
1148 static void build_command(GeanyDocument *doc, GeanyBuildGroup grp, guint cmd, gchar *cmd_cat)
1149 {
1150 gchar *dir;
1151 gchar *full_command, *subs_command;
1152 GeanyBuildCommand *buildcmd = get_build_cmd(doc, grp, cmd, NULL);
1153 gchar *cmdstr;
1154
1155 if (buildcmd == NULL)
1156 return;
1157
1158 cmdstr = buildcmd->command;
1159
1160 if (cmd_cat != NULL)
1161 {
1162 if (cmdstr != NULL)
1163 full_command = g_strconcat(cmdstr, cmd_cat, NULL);
1164 else
1165 full_command = g_strdup(cmd_cat);
1166 }
1167 else
1168 full_command = cmdstr;
1169
1170 dir = build_replace_placeholder(doc, buildcmd->working_dir);
1171 subs_command = build_replace_placeholder(doc, full_command);
1172 build_info.grp = grp;
1173 build_info.cmd = cmd;
1174 build_spawn_cmd(doc, subs_command, dir);
1175 g_free(subs_command);
1176 g_free(dir);
1177 if (cmd_cat != NULL)
1178 g_free(full_command);
1179 build_menu_update(doc);
1180 if (build_info.pid)
1181 ui_progress_bar_start(NULL);
1182 }
1183
1184
1185 /*----------------------------------------------------------------
1186 *
1187 * Create build menu and handle callbacks (&toolbar callbacks)
1188 *
1189 *----------------------------------------------------------------*/
1190 static void on_make_custom_input_response(const gchar *input, gpointer data)
1191 {
1192 GeanyDocument *doc = document_get_current();
1193
1194 SETPTR(build_info.custom_target, g_strdup(input));
1195 build_command(doc, GBO_TO_GBG(GEANY_GBO_CUSTOM), GBO_TO_CMD(GEANY_GBO_CUSTOM),
1196 build_info.custom_target);
1197 }
1198
1199
1200 static void on_build_menu_item(GtkWidget *w, gpointer user_data)
1201 {
1202 GeanyDocument *doc = document_get_current();
1203 GeanyBuildCommand *bc;
1204 guint grp = GPOINTER_TO_GRP(user_data);
1205 guint cmd = GPOINTER_TO_CMD(user_data);
1206
1207 if (doc && doc->changed)
1208 {
1209 if (!document_save_file(doc, FALSE))
1210 return;
1211 }
1212 g_signal_emit_by_name(geany_object, "build-start");
1213
1214 if (grp == GEANY_GBG_NON_FT && cmd == GBO_TO_CMD(GEANY_GBO_CUSTOM))
1215 {
1216 static GtkWidget *dialog = NULL; /* keep dialog for combo history */
1217
1218 if (! dialog)
1219 {
1220 dialog = dialogs_show_input_persistent(_("Custom Text"), GTK_WINDOW(main_widgets.window),
1221 _("Enter custom text here, all entered text is appended to the command."),
1222 build_info.custom_target, &on_make_custom_input_response, NULL);
1223 }
1224 else
1225 {
1226 gtk_widget_show(dialog);
1227 }
1228 return;
1229 }
1230 else if (grp == GEANY_GBG_EXEC)
1231 {
1232 if (run_info[cmd].pid > (GPid) 1)
1233 {
1234 kill_process(&run_info[cmd].pid);
1235 return;
1236 }
1237 bc = get_build_cmd(doc, grp, cmd, NULL);
1238 if (bc != NULL && strcmp(bc->command, "builtin") == 0)
1239 {
1240 const gchar *uri_file_prefix;
1241 gchar *uri;
1242 if (doc == NULL)
1243 return;
1244 uri_file_prefix = utils_get_uri_file_prefix();
1245 uri = g_strconcat(uri_file_prefix, doc->file_name, NULL);
1246 utils_open_browser(uri);
1247 g_free(uri);
1248 }
1249 else
1250 build_run_cmd(doc, cmd);
1251 }
1252 else
1253 build_command(doc, grp, cmd, NULL);
1254 }
1255
1256
1257 /* group codes for menu items other than the known commands
1258 * value order is important, see the following table for use */
1259
1260 /* the rest in each group */
1261 #define MENU_FT_REST (GEANY_GBG_COUNT + GEANY_GBG_FT)
1262 #define MENU_NON_FT_REST (GEANY_GBG_COUNT + GEANY_GBG_NON_FT)
1263 #define MENU_EXEC_REST (GEANY_GBG_COUNT + GEANY_GBG_EXEC)
1264 /* the separator */
1265 #define MENU_SEPARATOR (2*GEANY_GBG_COUNT)
1266 /* the fixed items */
1267 #define MENU_NEXT_ERROR (MENU_SEPARATOR + 1)
1268 #define MENU_PREV_ERROR (MENU_NEXT_ERROR + 1)
1269 #define MENU_COMMANDS (MENU_PREV_ERROR + 1)
1270 #define MENU_DONE (MENU_COMMANDS + 1)
1271
1272
1273 static struct BuildMenuItemSpec {
1274 const gchar *stock_id;
1275 const gint key_binding;
1276 const guint build_grp;
1277 const guint build_cmd;
1278 const gchar *fix_label;
1279 Callback *cb;
1280 } build_menu_specs[] = {
1281 {GTK_STOCK_CONVERT, GEANY_KEYS_BUILD_COMPILE, GBO_TO_GBG(GEANY_GBO_COMPILE),
1282 GBO_TO_CMD(GEANY_GBO_COMPILE), NULL, on_build_menu_item},
1283 {GEANY_STOCK_BUILD, GEANY_KEYS_BUILD_LINK, GBO_TO_GBG(GEANY_GBO_BUILD),
1284 GBO_TO_CMD(GEANY_GBO_BUILD), NULL, on_build_menu_item},
1285 {NULL, -1, MENU_FT_REST,
1286 GBO_TO_CMD(GEANY_GBO_BUILD) + 1, NULL, on_build_menu_item},
1287 {NULL, -1, MENU_SEPARATOR,
1288 GBF_SEP_1, NULL, NULL},
1289 {NULL, GEANY_KEYS_BUILD_MAKE, GBO_TO_GBG(GEANY_GBO_MAKE_ALL),
1290 GBO_TO_CMD(GEANY_GBO_MAKE_ALL), NULL, on_build_menu_item},
1291 {NULL, GEANY_KEYS_BUILD_MAKEOWNTARGET, GBO_TO_GBG(GEANY_GBO_CUSTOM),
1292 GBO_TO_CMD(GEANY_GBO_CUSTOM), NULL, on_build_menu_item},
1293 {NULL, GEANY_KEYS_BUILD_MAKEOBJECT, GBO_TO_GBG(GEANY_GBO_MAKE_OBJECT),
1294 GBO_TO_CMD(GEANY_GBO_MAKE_OBJECT), NULL, on_build_menu_item},
1295 {NULL, -1, MENU_NON_FT_REST,
1296 GBO_TO_CMD(GEANY_GBO_MAKE_OBJECT) + 1, NULL, on_build_menu_item},
1297 {NULL, -1, MENU_SEPARATOR,
1298 GBF_SEP_2, NULL, NULL},
1299 {GTK_STOCK_GO_DOWN, GEANY_KEYS_BUILD_NEXTERROR, MENU_NEXT_ERROR,
1300 GBF_NEXT_ERROR, N_("_Next Error"), on_build_next_error},
1301 {GTK_STOCK_GO_UP, GEANY_KEYS_BUILD_PREVIOUSERROR, MENU_PREV_ERROR,
1302 GBF_PREV_ERROR, N_("_Previous Error"), on_build_previous_error},
1303 {NULL, -1, MENU_SEPARATOR,
1304 GBF_SEP_3, NULL, NULL},
1305 {GTK_STOCK_EXECUTE, GEANY_KEYS_BUILD_RUN, GBO_TO_GBG(GEANY_GBO_EXEC),
1306 GBO_TO_CMD(GEANY_GBO_EXEC), NULL, on_build_menu_item},
1307 {NULL, -1, MENU_EXEC_REST,
1308 GBO_TO_CMD(GEANY_GBO_EXEC) + 1, NULL, on_build_menu_item},
1309 {NULL, -1, MENU_SEPARATOR,
1310 GBF_SEP_4, NULL, NULL},
1311 {GTK_STOCK_PREFERENCES, GEANY_KEYS_BUILD_OPTIONS, MENU_COMMANDS,
1312 GBF_COMMANDS, N_("_Set Build Commands"), on_set_build_commands_activate},
1313 {NULL, -1, MENU_DONE,
1314 0, NULL, NULL}
1315 };
1316
1317
1318 static void create_build_menu_item(GtkWidget *menu, GeanyKeyGroup *group, GtkAccelGroup *ag,
1319 struct BuildMenuItemSpec *bs, const gchar *lbl, guint grp, guint cmd)
1320 {
1321 GtkWidget *item = gtk_image_menu_item_new_with_mnemonic(lbl);
1322
1323 if (bs->stock_id != NULL)
1324 {
1325 GtkWidget *image = gtk_image_new_from_stock(bs->stock_id, GTK_ICON_SIZE_MENU);
1326 gtk_image_menu_item_set_image(GTK_IMAGE_MENU_ITEM(item), image);
1327 }
1328 gtk_widget_show(item);
1329 if (bs->key_binding >= 0)
1330 add_menu_accel(group, (guint) bs->key_binding, ag, item);
1331 gtk_container_add(GTK_CONTAINER(menu), item);
1332 if (bs->cb != NULL)
1333 {
1334 g_signal_connect(item, "activate", G_CALLBACK(bs->cb), GRP_CMD_TO_POINTER(grp,cmd));
1335 }
1336 menu_items.menu_item[grp][cmd] = item;
1337 }
1338
1339
1340 static void create_build_menu(BuildMenuItems *build_menu_items)
1341 {
1342 GtkWidget *menu;
1343 GtkAccelGroup *accel_group = gtk_accel_group_new();
1344 GeanyKeyGroup *keygroup = keybindings_get_core_group(GEANY_KEY_GROUP_BUILD);
1345 guint i, j;
1346
1347 menu = gtk_menu_new();
1348 build_menu_items->menu_item[GEANY_GBG_FT] = g_new0(GtkWidget*, build_groups_count[GEANY_GBG_FT]);
1349 build_menu_items->menu_item[GEANY_GBG_NON_FT] = g_new0(GtkWidget*, build_groups_count[GEANY_GBG_NON_FT]);
1350 build_menu_items->menu_item[GEANY_GBG_EXEC] = g_new0(GtkWidget*, build_groups_count[GEANY_GBG_EXEC]);
1351 build_menu_items->menu_item[GBG_FIXED] = g_new0(GtkWidget*, GBF_COUNT);
1352
1353 for (i = 0; build_menu_specs[i].build_grp != MENU_DONE; ++i)
1354 {
1355 struct BuildMenuItemSpec *bs = &(build_menu_specs[i]);
1356 if (bs->build_grp == MENU_SEPARATOR)
1357 {
1358 GtkWidget *item = gtk_separator_menu_item_new();
1359 gtk_widget_show(item);
1360 gtk_container_add(GTK_CONTAINER(menu), item);
1361 build_menu_items->menu_item[GBG_FIXED][bs->build_cmd] = item;
1362 }
1363 else if (bs->fix_label != NULL)
1364 {
1365 create_build_menu_item(menu, keygroup, accel_group, bs, _(bs->fix_label),
1366 GBG_FIXED, bs->build_cmd);
1367 }
1368 else if (bs->build_grp >= MENU_FT_REST && bs->build_grp <= MENU_SEPARATOR)
1369 {
1370 guint grp = bs->build_grp - GEANY_GBG_COUNT;
1371 for (j = bs->build_cmd; j < build_groups_count[grp]; ++j)
1372 {
1373 GeanyBuildCommand *bc = get_build_cmd(NULL, grp, j, NULL);
1374 const gchar *lbl = (bc == NULL) ? "" : bc->label;
1375 create_build_menu_item(menu, keygroup, accel_group, bs, lbl, grp, j);
1376 }
1377 }
1378 else
1379 {
1380 GeanyBuildCommand *bc = get_build_cmd(NULL, bs->build_grp, bs->build_cmd, NULL);
1381 const gchar *lbl = (bc == NULL) ? "" : bc->label;
1382 create_build_menu_item(menu, keygroup, accel_group, bs, lbl, bs->build_grp, bs->build_cmd);
1383 }
1384 }
1385 build_menu_items->menu = menu;
1386 gtk_widget_show(menu);
1387 gtk_menu_item_set_submenu(GTK_MENU_ITEM(ui_lookup_widget(main_widgets.window, "menu_build1")), menu);
1388 }
1389
1390
1391 /* * Update the build menu to reflect changes in configuration or status.
1392 *
1393 * Sets the labels and number of visible items to match the highest
1394 * priority configured commands. Also sets sensitivity if build commands are
1395 * running and switches executes to stop when commands are running.
1396 *
1397 * @param doc The current document, if available, to save looking it up.
1398 * If @c NULL it will be looked up.
1399 *
1400 * Call this after modifying any fields of a GeanyBuildCommand structure.
1401 *
1402 * @see Build Menu Configuration section of the Manual.
1403 *
1404 **/
1405 void build_menu_update(GeanyDocument *doc)
1406 {
1407 guint i, cmdcount, cmd, grp;
1408 gboolean vis = FALSE;
1409 gboolean have_path, build_running, exec_running, have_errors, cmd_sensitivity;
1410 gboolean can_compile, can_build, can_make, run_sensitivity = FALSE, run_running = FALSE;
1411 GeanyBuildCommand *bc;
1412
1413 g_return_if_fail(doc == NULL || doc->is_valid);
1414
1415 if (menu_items.menu == NULL)
1416 create_build_menu(&menu_items);
1417 if (doc == NULL)
1418 doc = document_get_current();
1419 have_path = doc != NULL && doc->file_name != NULL;
1420 build_running = build_info.pid > (GPid) 1;
1421 have_errors = gtk_tree_model_iter_n_children(GTK_TREE_MODEL(msgwindow.store_compiler), NULL) > 0;
1422 for (i = 0; build_menu_specs[i].build_grp != MENU_DONE; ++i)
1423 {
1424 struct BuildMenuItemSpec *bs = &(build_menu_specs[i]);
1425 switch (bs->build_grp)
1426 {
1427 case MENU_SEPARATOR:
1428 if (vis == TRUE)
1429 {
1430 gtk_widget_show_all(menu_items.menu_item[GBG_FIXED][bs->build_cmd]);
1431 vis = FALSE;
1432 }
1433 else
1434 gtk_widget_hide(menu_items.menu_item[GBG_FIXED][bs->build_cmd]);
1435 break;
1436 case MENU_NEXT_ERROR:
1437 case MENU_PREV_ERROR:
1438 gtk_widget_set_sensitive(menu_items.menu_item[GBG_FIXED][bs->build_cmd], have_errors);
1439 vis |= TRUE;
1440 break;
1441 case MENU_COMMANDS:
1442 vis |= TRUE;
1443 break;
1444 default: /* all configurable commands */
1445 if (bs->build_grp >= GEANY_GBG_COUNT)
1446 {
1447 grp = bs->build_grp - GEANY_GBG_COUNT;
1448 cmdcount = build_groups_count[grp];
1449 }
1450 else
1451 {
1452 grp = bs->build_grp;
1453 cmdcount = bs->build_cmd + 1;
1454 }
1455 for (cmd = bs->build_cmd; cmd < cmdcount; ++cmd)
1456 {
1457 GtkWidget *menu_item = menu_items.menu_item[grp][cmd];
1458 const gchar *label;
1459 bc = get_build_cmd(doc, grp, cmd, NULL);
1460 if (bc)
1461 label = bc->label;
1462 else
1463 label = NULL;
1464
1465 if (grp < GEANY_GBG_EXEC)
1466 {
1467 cmd_sensitivity =
1468 (grp == GEANY_GBG_FT && bc != NULL && have_path && ! build_running) ||
1469 (grp == GEANY_GBG_NON_FT && bc != NULL && ! build_running);
1470 gtk_widget_set_sensitive(menu_item, cmd_sensitivity);
1471 if (bc != NULL && !EMPTY(label))
1472 {
1473 gtk_menu_item_set_label(GTK_MENU_ITEM(menu_item), label);
1474 gtk_widget_show_all(menu_item);
1475 vis |= TRUE;
1476 }
1477 else
1478 gtk_widget_hide(menu_item);
1479 }
1480 else
1481 {
1482 GtkWidget *image;
1483 exec_running = run_info[cmd].pid > (GPid) 1;
1484 cmd_sensitivity = (bc != NULL) || exec_running;
1485 gtk_widget_set_sensitive(menu_item, cmd_sensitivity);
1486 if (cmd == GBO_TO_CMD(GEANY_GBO_EXEC))
1487 run_sensitivity = cmd_sensitivity;
1488 if (! exec_running)
1489 {
1490 image = gtk_image_new_from_stock(bs->stock_id, GTK_ICON_SIZE_MENU);
1491 }
1492 else
1493 {
1494 image = gtk_image_new_from_stock(GTK_STOCK_STOP, GTK_ICON_SIZE_MENU);
1495 }
1496 if (cmd == GBO_TO_CMD(GEANY_GBO_EXEC))
1497 run_running = exec_running;
1498 gtk_image_menu_item_set_image(GTK_IMAGE_MENU_ITEM(menu_item), image);
1499 if (bc != NULL && !EMPTY(label))
1500 {
1501 gtk_menu_item_set_label(GTK_MENU_ITEM(menu_item), label);
1502 gtk_widget_show_all(menu_item);
1503 vis |= TRUE;
1504 }
1505 else
1506 gtk_widget_hide(menu_item);
1507 }
1508 }
1509 }
1510 }
1511
1512 run_sensitivity &= (doc != NULL);
1513 can_build = get_build_cmd(doc, GEANY_GBG_FT, GBO_TO_CMD(GEANY_GBO_BUILD), NULL) != NULL
1514 && have_path && ! build_running;
1515 if (widgets.toolitem_build != NULL)
1516 gtk_widget_set_sensitive(widgets.toolitem_build, can_build);
1517 can_make = FALSE;
1518 if (widgets.toolitem_make_all != NULL)
1519 gtk_widget_set_sensitive(widgets.toolitem_make_all,
1520 (can_make |= get_build_cmd(doc, GEANY_GBG_FT, GBO_TO_CMD(GEANY_GBO_MAKE_ALL), NULL) != NULL
1521 && ! build_running));
1522 if (widgets.toolitem_make_custom != NULL)
1523 gtk_widget_set_sensitive(widgets.toolitem_make_custom,
1524 (can_make |= get_build_cmd(doc, GEANY_GBG_FT, GBO_TO_CMD(GEANY_GBO_CUSTOM), NULL) != NULL
1525 && ! build_running));
1526 if (widgets.toolitem_make_object != NULL)
1527 gtk_widget_set_sensitive(widgets.toolitem_make_object,
1528 (can_make |= get_build_cmd(doc, GEANY_GBG_FT, GBO_TO_CMD(GEANY_GBO_MAKE_OBJECT), NULL) != NULL
1529 && ! build_running));
1530 if (widgets.toolitem_set_args != NULL)
1531 gtk_widget_set_sensitive(widgets.toolitem_set_args, TRUE);
1532
1533 can_compile = get_build_cmd(doc, GEANY_GBG_FT, GBO_TO_CMD(GEANY_GBO_COMPILE), NULL) != NULL
1534 && have_path && ! build_running;
1535 gtk_action_set_sensitive(widgets.compile_action, can_compile);
1536 gtk_action_set_sensitive(widgets.build_action, can_make);
1537 gtk_action_set_sensitive(widgets.run_action, run_sensitivity);
1538
1539 /* show the stop command if a program is running from execute 0 , otherwise show run command */
1540 set_stop_button(run_running);
1541
1542 }
1543
1544
1545 /* Call build_menu_update() instead of calling this directly. */
1546 static void set_stop_button(gboolean stop)
1547 {
1548 const gchar *button_stock_id = NULL;
1549 GtkToolButton *run_button;
1550
1551 run_button = GTK_TOOL_BUTTON(toolbar_get_widget_by_name("Run"));
1552 if (run_button != NULL)
1553 button_stock_id = gtk_tool_button_get_stock_id(run_button);
1554
1555 if (stop && utils_str_equal(button_stock_id, GTK_STOCK_STOP))
1556 return;
1557 if (! stop && utils_str_equal(button_stock_id, GTK_STOCK_EXECUTE))
1558 return;
1559
1560 /* use the run button also as stop button */
1561 if (stop)
1562 {
1563 if (run_button != NULL)
1564 gtk_tool_button_set_stock_id(run_button, GTK_STOCK_STOP);
1565 }
1566 else
1567 {
1568 if (run_button != NULL)
1569 gtk_tool_button_set_stock_id(run_button, GTK_STOCK_EXECUTE);
1570 }
1571 }
1572
1573
1574 static void on_set_build_commands_activate(GtkWidget *w, gpointer u)
1575 {
1576 /* For now, just show the project dialog */
1577 if (app->project)
1578 project_build_properties();
1579 else
1580 show_build_commands_dialog();
1581 }
1582
1583
1584 static void on_toolbutton_build_activate(GtkWidget *menuitem, gpointer user_data)
1585 {
1586 last_toolbutton_action = user_data;
1587 g_object_set(widgets.build_action, "tooltip", _("Build the current file"), NULL);
1588 on_build_menu_item(menuitem, user_data);
1589 }
1590
1591
1592 static void on_toolbutton_make_activate(GtkWidget *menuitem, gpointer user_data)
1593 {
1594 gchar *msg;
1595
1596 last_toolbutton_action = user_data;
1597 if (last_toolbutton_action == GBO_TO_POINTER(GEANY_GBO_MAKE_ALL))
1598 msg = _("Build the current file with Make and the default target");
1599 else if (last_toolbutton_action == GBO_TO_POINTER(GEANY_GBO_CUSTOM))
1600 msg = _("Build the current file with Make and the specified target");
1601 else if (last_toolbutton_action == GBO_TO_POINTER(GEANY_GBO_MAKE_OBJECT))
1602 msg = _("Compile the current file with Make");
1603 else
1604 msg = NULL;
1605 g_object_set(widgets.build_action, "tooltip", msg, NULL);
1606 on_build_menu_item(menuitem, user_data);
1607 }
1608
1609
1610 static void kill_process(GPid *pid)
1611 {
1612 GError *error = NULL;
1613
1614 if (spawn_kill_process(*pid, &error))
1615 {
1616 *pid = 0;
1617 build_menu_update(NULL);
1618 }
1619 else
1620 {
1621 ui_set_statusbar(TRUE, _("Process could not be stopped (%s)."), error->message);
1622 g_error_free(error);
1623 }
1624 }
1625
1626
1627 static void on_build_next_error(GtkWidget *menuitem, gpointer user_data)
1628 {
1629 if (ui_tree_view_find_next(GTK_TREE_VIEW(msgwindow.tree_compiler),
1630 msgwin_goto_compiler_file_line))
1631 {
1632 gtk_notebook_set_current_page(GTK_NOTEBOOK(msgwindow.notebook), MSG_COMPILER);
1633 }
1634 else
1635 ui_set_statusbar(FALSE, _("No more build errors."));
1636 }
1637
1638
1639 static void on_build_previous_error(GtkWidget *menuitem, gpointer user_data)
1640 {
1641 if (ui_tree_view_find_previous(GTK_TREE_VIEW(msgwindow.tree_compiler),
1642 msgwin_goto_compiler_file_line))
1643 {
1644 gtk_notebook_set_current_page(GTK_NOTEBOOK(msgwindow.notebook), MSG_COMPILER);
1645 }
1646 else
1647 ui_set_statusbar(FALSE, _("No more build errors."));
1648 }
1649
1650
1651 void build_toolbutton_build_clicked(GtkAction *action, gpointer unused)
1652 {
1653 if (last_toolbutton_action == GBO_TO_POINTER(GEANY_GBO_BUILD))
1654 {
1655 on_build_menu_item(NULL, GBO_TO_POINTER(GEANY_GBO_BUILD));
1656 }
1657 else
1658 {
1659 on_build_menu_item(NULL, last_toolbutton_action);
1660 }
1661 }
1662
1663
1664 /*------------------------------------------------------
1665 *
1666 * Create and handle the build menu configuration dialog
1667 *
1668 *-------------------------------------------------------*/
1669 typedef struct RowWidgets
1670 {
1671 GtkWidget *entries[GEANY_BC_CMDENTRIES_COUNT];
1672 GeanyBuildSource src;
1673 GeanyBuildSource dst;
1674 GeanyBuildCommand *cmdsrc;
1675 guint grp;
1676 guint cmd;
1677 gboolean cleared;
1678 gboolean used_dst;
1679 } RowWidgets;
1680
1681 #if GTK_CHECK_VERSION(3,0,0)
1682 typedef GdkRGBA InsensitiveColor;
1683 #else
1684 typedef GdkColor InsensitiveColor;
1685 #endif
1686 static InsensitiveColor insensitive_color;
1687
1688 static void set_row_color(RowWidgets *r, InsensitiveColor *color)
1689 {
1690 enum GeanyBuildCmdEntries i;
1691
1692 for (i = 0; i < GEANY_BC_CMDENTRIES_COUNT; i++)
1693 {
1694 if (i == GEANY_BC_LABEL)
1695 continue;
1696
1697 #if GTK_CHECK_VERSION(3,0,0)
1698 gtk_widget_override_color(r->entries[i], GTK_STATE_FLAG_NORMAL, color);
1699 #else
1700 gtk_widget_modify_text(r->entries[i], GTK_STATE_NORMAL, color);
1701 #endif
1702 }
1703 }
1704
1705
1706 static void set_build_command_entry_text(GtkWidget *wid, const gchar *text)
1707 {
1708 if (GTK_IS_BUTTON(wid))
1709 gtk_button_set_label(GTK_BUTTON(wid), text);
1710 else
1711 gtk_entry_set_text(GTK_ENTRY(wid), text);
1712 }
1713
1714
1715 static void on_clear_dialog_row(GtkWidget *unused, gpointer user_data)
1716 {
1717 RowWidgets *r = user_data;
1718 guint src;
1719 enum GeanyBuildCmdEntries i;
1720 GeanyBuildCommand *bc = get_next_build_cmd(NULL, r->grp, r->cmd, r->dst, &src);
1721
1722 if (bc != NULL)
1723 {
1724 r->cmdsrc = bc;
1725 r->src = src;
1726 for (i = 0; i < GEANY_BC_CMDENTRIES_COUNT; i++)
1727 {
1728 set_build_command_entry_text(r->entries[i],
1729 id_to_str(bc,i) != NULL ? id_to_str(bc,i) : "");
1730 }
1731 }
1732 else
1733 {
1734 r->cmdsrc = NULL;
1735 for (i = 0; i < GEANY_BC_CMDENTRIES_COUNT; i++)
1736 {
1737 set_build_command_entry_text(r->entries[i], "");
1738 }
1739 }
1740 r->used_dst = FALSE;
1741 set_row_color(r, &insensitive_color);
1742 r->cleared = TRUE;
1743 }
1744
1745
1746 static void on_clear_dialog_regex_row(GtkEntry *regex, gpointer unused)
1747 {
1748 gtk_entry_set_text(regex,"");
1749 }
1750
1751
1752 static void on_label_button_clicked(GtkWidget *wid, gpointer user_data)
1753 {
1754 RowWidgets *r = user_data;
1755 GtkWidget *top_level = gtk_widget_get_toplevel(wid);
1756 const gchar *old = gtk_button_get_label(GTK_BUTTON(wid));
1757 gchar *str;
1758
1759 if (gtk_widget_is_toplevel(top_level) && GTK_IS_WINDOW(top_level))
1760 str = dialogs_show_input(_("Set menu item label"), GTK_WINDOW(top_level), NULL, old);
1761 else
1762 str = dialogs_show_input(_("Set menu item label"), NULL, NULL, old);
1763
1764 if (!str)
1765 return;
1766
1767 gtk_button_set_label(GTK_BUTTON(wid), str);
1768 g_free(str);
1769 r->used_dst = TRUE;
1770 set_row_color(r, NULL);
1771 }
1772
1773
1774 static void on_entry_focus(GtkWidget *wid, GdkEventFocus *unused, gpointer user_data)
1775 {
1776 RowWidgets *r = user_data;
1777
1778 r->used_dst = TRUE;
1779 set_row_color(r, NULL);
1780 }
1781
1782
1783 /* Column headings, array NULL-terminated */
1784 static const gchar *colheads[] =
1785 {
1786 "#",
1787 N_("Label"),
1788 N_("Command"),
1789 N_("Working directory"),
1790 N_("Reset"),
1791 NULL
1792 };
1793
1794 /* column names */
1795 #define DC_ITEM 0
1796 #define DC_ENTRIES 1
1797 #define DC_CLEAR 4
1798 #define DC_N_COL 5
1799
1800 static const guint entry_x_padding = 3;
1801 static const guint entry_y_padding = 0;
1802
1803
1804 static RowWidgets *build_add_dialog_row(GeanyDocument *doc, GtkTable *table, guint row,
1805 GeanyBuildSource dst, guint grp, guint cmd, gboolean dir)
1806 {
1807 GtkWidget *label, *clear, *clearicon;
1808 RowWidgets *roww;
1809 GeanyBuildCommand *bc;
1810 guint src;
1811 enum GeanyBuildCmdEntries i;
1812 guint column = 0;
1813 gchar *text;
1814
1815 g_return_val_if_fail(doc == NULL || doc->is_valid, NULL);
1816
1817 text = g_strdup_printf("%d.", cmd + 1);
1818 label = gtk_label_new(text);
1819 g_free(text);
1820 #if GTK_CHECK_VERSION(3,0,0)
1821 {
1822 GtkStyleContext *ctx = gtk_widget_get_style_context(label);
1823
1824 gtk_style_context_save(ctx);
1825 gtk_style_context_get_color(ctx, GTK_STATE_FLAG_INSENSITIVE, &insensitive_color);
1826 gtk_style_context_restore(ctx);
1827 }
1828 #else
1829 insensitive_color = gtk_widget_get_style(label)->text[GTK_STATE_INSENSITIVE];
1830 #endif
1831 gtk_table_attach(table, label, column, column + 1, row, row + 1, GTK_FILL,
1832 GTK_FILL | GTK_EXPAND, entry_x_padding, entry_y_padding);
1833 roww = g_new0(RowWidgets, 1);
1834 roww->src = GEANY_BCS_COUNT;
1835 roww->grp = grp;
1836 roww->cmd = cmd;
1837 roww->dst = dst;
1838 for (i = 0; i < GEANY_BC_CMDENTRIES_COUNT; i++)
1839 {
1840 gint xflags = (i == GEANY_BC_COMMAND) ? GTK_FILL | GTK_EXPAND : GTK_FILL;
1841
1842 column += 1;
1843 if (i == GEANY_BC_LABEL)
1844 {
1845 GtkWidget *wid = roww->entries[i] = gtk_button_new();
1846 gtk_button_set_use_underline(GTK_BUTTON(wid), TRUE);
1847 gtk_widget_set_tooltip_text(wid, _("Click to set menu item label"));
1848 g_signal_connect(wid, "clicked", G_CALLBACK(on_label_button_clicked), roww);
1849 }
1850 else
1851 {
1852 roww->entries[i] = gtk_entry_new();
1853 g_signal_connect(roww->entries[i], "focus-in-event", G_CALLBACK(on_entry_focus), roww);
1854 }
1855 gtk_table_attach(table, roww->entries[i], column, column + 1, row, row + 1, xflags,
1856 GTK_FILL | GTK_EXPAND, entry_x_padding, entry_y_padding);
1857 }
1858 column++;
1859 clearicon = gtk_image_new_from_stock(GTK_STOCK_CLEAR, GTK_ICON_SIZE_MENU);
1860 clear = gtk_button_new();
1861 gtk_button_set_image(GTK_BUTTON(clear), clearicon);
1862 g_signal_connect(clear, "clicked", G_CALLBACK(on_clear_dialog_row), roww);
1863 gtk_table_attach(table, clear, column, column + 1, row, row + 1, GTK_FILL,
1864 GTK_FILL | GTK_EXPAND, entry_x_padding, entry_y_padding);
1865 roww->cmdsrc = bc = get_build_cmd(doc, grp, cmd, &src);
1866 if (bc != NULL)
1867 roww->src = src;
1868
1869 for (i = 0; i < GEANY_BC_CMDENTRIES_COUNT; i++)
1870 {
1871 const gchar *str = "";
1872
1873 if (bc != NULL )
1874 {
1875 if ((str = id_to_str(bc, i)) == NULL)
1876 str = "";
1877 else if (dst == src)
1878 roww->used_dst = TRUE;
1879 }
1880 set_build_command_entry_text(roww->entries[i], str);
1881 }
1882 if (bc != NULL && (dst > src))
1883 set_row_color(roww, &insensitive_color);
1884 if (bc != NULL && (src > dst || (grp == GEANY_GBG_FT && (doc == NULL || doc->file_type == NULL))))
1885 {
1886 for (i = 0; i < GEANY_BC_CMDENTRIES_COUNT; i++)
1887 gtk_widget_set_sensitive(roww->entries[i], FALSE);
1888 gtk_widget_set_sensitive(clear, FALSE);
1889 }
1890 return roww;
1891 }
1892
1893
1894 typedef struct BuildTableFields
1895 {
1896 RowWidgets **rows;
1897 GtkWidget *fileregex;
1898 GtkWidget *nonfileregex;
1899 gchar **fileregexstring;
1900 gchar **nonfileregexstring;
1901 } BuildTableFields;
1902
1903
1904 GtkWidget *build_commands_table(GeanyDocument *doc, GeanyBuildSource dst, BuildTableData *table_data,
1905 GeanyFiletype *ft)
1906 {
1907 GtkWidget *label, *sep, *clearicon, *clear;
1908 BuildTableFields *fields;
1909 GtkTable *table;
1910 const gchar **ch;
1911 gchar *txt;
1912 guint col, row, cmdindex;
1913 guint cmd;
1914 guint src;
1915 gboolean sensitivity;
1916 guint sep_padding = entry_y_padding + 3;
1917
1918 table = GTK_TABLE(gtk_table_new(build_items_count + 12, 5, FALSE));
1919 fields = g_new0(BuildTableFields, 1);
1920 fields->rows = g_new0(RowWidgets*, build_items_count);
1921 for (ch = colheads, col = 0; *ch != NULL; ch++, col++)
1922 {
1923 label = gtk_label_new(_(*ch));
1924 gtk_table_attach(table, label, col, col + 1, 0, 1,
1925 GTK_FILL, GTK_FILL | GTK_EXPAND, entry_x_padding, entry_y_padding);
1926 }
1927 sep = gtk_hseparator_new();
1928 gtk_table_attach(table, sep, 0, DC_N_COL, 1, 2, GTK_FILL, GTK_FILL | GTK_EXPAND,
1929 entry_x_padding, sep_padding);
1930 if (ft != NULL && ft->id != GEANY_FILETYPES_NONE)
1931 txt = g_strdup_printf(_("%s commands"), ft->name);
1932 else
1933 txt = g_strdup_printf(_("%s commands"), _("No filetype"));
1934
1935 label = ui_label_new_bold(txt);
1936 g_free(txt);
1937 gtk_misc_set_alignment(GTK_MISC(label), 0.0, 0.5);
1938 gtk_table_attach(table, label, 0, DC_N_COL, 2, 3, GTK_FILL, GTK_FILL | GTK_EXPAND,
1939 entry_x_padding, entry_y_padding);
1940 for (row = 3, cmdindex = 0, cmd = 0; cmd < build_groups_count[GEANY_GBG_FT]; ++row, ++cmdindex, ++cmd)
1941 fields->rows[cmdindex] = build_add_dialog_row(doc, table, row, dst, GEANY_GBG_FT, cmd, FALSE);
1942 label = gtk_label_new(_("Error regular expression:"));
1943 gtk_table_attach(table, label, 0, DC_ENTRIES + 1, row, row + 1, GTK_FILL, GTK_FILL | GTK_EXPAND,
1944 entry_x_padding, entry_y_padding);
1945 fields->fileregex = gtk_entry_new();
1946 fields->fileregexstring = build_get_regex(GEANY_GBG_FT, NULL, &src);
1947 sensitivity = (ft == NULL) ? FALSE : TRUE;
1948 if (fields->fileregexstring != NULL && *(fields->fileregexstring) != NULL)
1949 {
1950 gtk_entry_set_text(GTK_ENTRY(fields->fileregex), *(fields->fileregexstring));
1951 if (src > dst)
1952 sensitivity = FALSE;
1953 }
1954 gtk_table_attach(table, fields->fileregex, DC_ENTRIES + 1, DC_CLEAR, row, row + 1, GTK_FILL,
1955 GTK_FILL | GTK_EXPAND, entry_x_padding, entry_y_padding);
1956 clearicon = gtk_image_new_from_stock(GTK_STOCK_CLEAR, GTK_ICON_SIZE_MENU);
1957 clear = gtk_button_new();
1958 gtk_button_set_image(GTK_BUTTON(clear), clearicon);
1959 g_signal_connect_swapped(clear, "clicked",
1960 G_CALLBACK(on_clear_dialog_regex_row), (fields->fileregex));
1961 gtk_table_attach(table, clear, DC_CLEAR, DC_CLEAR + 1, row, row + 1, GTK_FILL,
1962 GTK_FILL | GTK_EXPAND, entry_x_padding, entry_y_padding);
1963 gtk_widget_set_sensitive(fields->fileregex, sensitivity);
1964 gtk_widget_set_sensitive(clear, sensitivity);
1965 ++row;
1966 sep = gtk_hseparator_new();
1967 gtk_table_attach(table, sep, 0, DC_N_COL, row, row + 1, GTK_FILL, GTK_FILL | GTK_EXPAND,
1968 entry_x_padding, sep_padding);
1969 ++row;
1970 label = ui_label_new_bold(_("Independent commands"));
1971 gtk_misc_set_alignment(GTK_MISC(label), 0.0, 0.5);
1972 gtk_table_attach(table, label, 0, DC_N_COL, row, row + 1, GTK_FILL, GTK_FILL | GTK_EXPAND,
1973 entry_x_padding, entry_y_padding);
1974 for (++row, cmd = 0; cmd < build_groups_count[GEANY_GBG_NON_FT]; ++row, ++cmdindex, ++cmd)
1975 fields->rows[cmdindex] = build_add_dialog_row(
1976 doc, table, row, dst, GEANY_GBG_NON_FT, cmd, TRUE);
1977 label = gtk_label_new(_("Error regular expression:"));
1978 gtk_table_attach(table, label, 0, DC_ENTRIES + 1, row, row + 1, GTK_FILL,
1979 GTK_FILL | GTK_EXPAND, entry_x_padding, entry_y_padding);
1980 fields->nonfileregex = gtk_entry_new();
1981 fields->nonfileregexstring = build_get_regex(GEANY_GBG_NON_FT, NULL, &src);
1982 sensitivity = TRUE;
1983 if (fields->nonfileregexstring != NULL && *(fields->nonfileregexstring) != NULL)
1984 {
1985 gtk_entry_set_text(GTK_ENTRY(fields->nonfileregex), *(fields->nonfileregexstring));
1986 sensitivity = src > dst ? FALSE : TRUE;
1987 }
1988 gtk_table_attach(table, fields->nonfileregex, DC_ENTRIES + 1, DC_CLEAR, row, row + 1, GTK_FILL,
1989 GTK_FILL | GTK_EXPAND, entry_x_padding, entry_y_padding);
1990 clearicon = gtk_image_new_from_stock(GTK_STOCK_CLEAR, GTK_ICON_SIZE_MENU);
1991 clear = gtk_button_new();
1992 gtk_button_set_image(GTK_BUTTON(clear), clearicon);
1993 g_signal_connect_swapped(clear, "clicked",
1994 G_CALLBACK(on_clear_dialog_regex_row), (fields->nonfileregex));
1995 gtk_table_attach(table, clear, DC_CLEAR, DC_CLEAR + 1, row, row + 1, GTK_FILL,
1996 GTK_FILL | GTK_EXPAND, entry_x_padding, entry_y_padding);
1997 gtk_widget_set_sensitive(fields->nonfileregex, sensitivity);
1998 gtk_widget_set_sensitive(clear, sensitivity);
1999 ++row;
2000 label = gtk_label_new(NULL);
2001 ui_label_set_markup(GTK_LABEL(label), "<i>%s</i>",
2002 _("Note: Item 2 opens a dialog and appends the response to the command."));
2003 gtk_misc_set_alignment(GTK_MISC(label), 0.0, 0.5);
2004 gtk_table_attach(table, label, 0, DC_N_COL, row, row + 1, GTK_FILL, GTK_FILL | GTK_EXPAND,
2005 entry_x_padding, entry_y_padding);
2006 ++row;
2007 sep = gtk_hseparator_new();
2008 gtk_table_attach(table, sep, 0, DC_N_COL, row, row + 1, GTK_FILL, GTK_FILL | GTK_EXPAND,
2009 entry_x_padding, sep_padding);
2010 ++row;
2011 label = ui_label_new_bold(_("Execute commands"));
2012 gtk_misc_set_alignment(GTK_MISC(label), 0.0, 0.5);
2013 gtk_table_attach(table, label, 0, DC_N_COL, row, row + 1, GTK_FILL, GTK_FILL | GTK_EXPAND,
2014 entry_x_padding, entry_y_padding);
2015 for (++row, cmd = 0; cmd < build_groups_count[GEANY_GBG_EXEC]; ++row, ++cmdindex, ++cmd)
2016 fields->rows[cmdindex] = build_add_dialog_row(doc, table, row, dst, GEANY_GBG_EXEC, cmd, TRUE);
2017 sep = gtk_hseparator_new();
2018 gtk_table_attach(table, sep, 0, DC_N_COL, row, row + 1, GTK_FILL, GTK_FILL | GTK_EXPAND,
2019 entry_x_padding, sep_padding);
2020 ++row;
2021 label = gtk_label_new(NULL);
2022 ui_label_set_markup(GTK_LABEL(label), "<i>%s</i>",
2023 _("%d, %e, %f, %p, %l are substituted in command and directory fields, see manual for details."));
2024 gtk_misc_set_alignment(GTK_MISC(label), 0.0, 0.5);
2025 gtk_table_attach(table, label, 0, DC_N_COL, row, row + 1, GTK_FILL, GTK_FILL | GTK_EXPAND,
2026 entry_x_padding, entry_y_padding);
2027 /*printf("%d extra rows in dialog\n", row-build_items_count);*/
2028 ++row;
2029 *table_data = fields;
2030 return GTK_WIDGET(table);
2031 }
2032
2033
2034 void build_free_fields(BuildTableData table_data)
2035 {
2036 guint cmdindex;
2037
2038 for (cmdindex = 0; cmdindex < build_items_count; ++cmdindex)
2039 g_free(table_data->rows[cmdindex]);
2040 g_free(table_data->rows);
2041 g_free(table_data);
2042 }
2043
2044
2045 /* string compare where null pointers match null or 0 length strings */
2046 #if 0
2047 static gint stcmp(const gchar *a, const gchar *b)
2048 {
2049 if (a == NULL && b == NULL)
2050 return 0;
2051 if (a == NULL && b != NULL)
2052 return strlen(b);
2053 if (a != NULL && b == NULL)
2054 return strlen(a);
2055 return strcmp(a, b);
2056 }
2057 #endif
2058
2059
2060 static const gchar *get_build_command_entry_text(GtkWidget *wid)
2061 {
2062 if (GTK_IS_BUTTON(wid))
2063 return gtk_button_get_label(GTK_BUTTON(wid));
2064 else
2065 return gtk_entry_get_text(GTK_ENTRY(wid));
2066 }
2067
2068
2069 static gboolean read_row(BuildDestination *dst, BuildTableData table_data, guint drow, guint grp, guint cmd)
2070 {
2071 gchar *entries[GEANY_BC_CMDENTRIES_COUNT];
2072 gboolean changed = FALSE;
2073 enum GeanyBuildCmdEntries i;
2074
2075 for (i = 0; i < GEANY_BC_CMDENTRIES_COUNT; i++)
2076 {
2077 entries[i] = g_strdup(get_build_command_entry_text(table_data->rows[drow]->entries[i]));
2078 }
2079 if (table_data->rows[drow]->cleared)
2080 {
2081 if (dst->dst[grp] != NULL)
2082 {
2083 if (*(dst->dst[grp]) == NULL)
2084 *(dst->dst[grp]) = g_new0(GeanyBuildCommand, build_groups_count[grp]);
2085 (*(dst->dst[grp]))[cmd].exists = FALSE;
2086 (*(dst->dst[grp]))[cmd].changed = TRUE;
2087 changed = TRUE;
2088 }
2089 }
2090 if (table_data->rows[drow]->used_dst == TRUE)
2091 {
2092 if (dst->dst[grp] != NULL)
2093 {
2094 if (*(dst->dst[grp]) == NULL)
2095 *(dst->dst[grp]) = g_new0(GeanyBuildCommand, build_groups_count[grp]);
2096 for (i = 0; i < GEANY_BC_CMDENTRIES_COUNT; i++)
2097 set_command(&(*(dst->dst[grp]))[cmd], i, entries[i]);
2098 (*(dst->dst[grp]))[cmd].exists = TRUE;
2099 (*(dst->dst[grp]))[cmd].changed = TRUE;
2100 changed = TRUE;
2101 }
2102 }
2103 else
2104 {
2105 for (i = 0; i < GEANY_BC_CMDENTRIES_COUNT; i++)
2106 g_free(entries[i]);
2107 }
2108 return changed;
2109 }
2110
2111
2112 static gboolean read_regex(GtkWidget *regexentry, gchar **src, gchar **dst)
2113 {
2114 gboolean changed = FALSE;
2115 const gchar *reg = gtk_entry_get_text(GTK_ENTRY(regexentry));
2116
2117 if (((src == NULL /* originally there was no regex */
2118 || *src == NULL) /* or it was NULL*/
2119 && !EMPTY(reg)) /* and something was typed */
2120 || (src != NULL /* originally there was a regex*/
2121 && (*src == NULL /* and either it was NULL */
2122 || strcmp(*src, reg) != 0))) /* or it has been changed */
2123 {
2124 if (dst != NULL)
2125 {
2126 SETPTR(*dst, g_strdup(reg));
2127 changed = TRUE;
2128 }
2129 }
2130 return changed;
2131 }
2132
2133
2134 static gboolean build_read_commands(BuildDestination *dst, BuildTableData table_data, gint response)
2135 {
2136 guint cmdindex, cmd;
2137 gboolean changed = FALSE;
2138
2139 if (response == GTK_RESPONSE_ACCEPT)
2140 {
2141 for (cmdindex = 0, cmd = 0; cmd < build_groups_count[GEANY_GBG_FT]; ++cmdindex, ++cmd)
2142 changed |= read_row(dst, table_data, cmdindex, GEANY_GBG_FT, cmd);
2143 for (cmd = 0; cmd < build_groups_count[GEANY_GBG_NON_FT]; ++cmdindex, ++cmd)
2144 changed |= read_row(dst, table_data, cmdindex, GEANY_GBG_NON_FT, cmd);
2145 for (cmd = 0; cmd < build_groups_count[GEANY_GBG_EXEC]; ++cmdindex, ++cmd)
2146 changed |= read_row(dst, table_data, cmdindex, GEANY_GBG_EXEC, cmd);
2147 changed |= read_regex(table_data->fileregex, table_data->fileregexstring, dst->fileregexstr);
2148 changed |= read_regex(table_data->nonfileregex, table_data->nonfileregexstring, dst->nonfileregexstr);
2149 }
2150 return changed;
2151 }
2152
2153
2154 void build_read_project(GeanyFiletype *ft, BuildTableData build_properties)
2155 {
2156 BuildDestination menu_dst;
2157
2158 if (ft != NULL)
2159 {
2160 menu_dst.dst[GEANY_GBG_FT] = &(ft->priv->projfilecmds);
2161 menu_dst.fileregexstr = &(ft->priv->projerror_regex_string);
2162 }
2163 else
2164 {
2165 menu_dst.dst[GEANY_GBG_FT] = NULL;
2166 menu_dst.fileregexstr = NULL;
2167 }
2168 menu_dst.dst[GEANY_GBG_NON_FT] = &non_ft_proj;
2169 menu_dst.dst[GEANY_GBG_EXEC] = &exec_proj;
2170 menu_dst.nonfileregexstr = &regex_proj;
2171
2172 build_read_commands(&menu_dst, build_properties, GTK_RESPONSE_ACCEPT);
2173 }
2174
2175
2176 static void show_build_commands_dialog(void)
2177 {
2178 GtkWidget *dialog, *table, *vbox;
2179 GeanyDocument *doc = document_get_current();
2180 GeanyFiletype *ft = NULL;
2181 const gchar *title = _("Set Build Commands");
2182 gint response;
2183 BuildTableData table_data;
2184 BuildDestination prefdsts;
2185
2186 if (doc != NULL)
2187 ft = doc->file_type;
2188 dialog = gtk_dialog_new_with_buttons(title, GTK_WINDOW(main_widgets.window),
2189 GTK_DIALOG_DESTROY_WITH_PARENT,
2190 GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
2191 GTK_STOCK_OK, GTK_RESPONSE_ACCEPT, NULL);
2192 table = build_commands_table(doc, GEANY_BCS_PREF, &table_data, ft);
2193 vbox = ui_dialog_vbox_new(GTK_DIALOG(dialog));
2194 gtk_box_pack_start(GTK_BOX(vbox), table, TRUE, TRUE, 0);
2195 gtk_widget_show_all(dialog);
2196 /* run modally to prevent user changing idx filetype */
2197 response = gtk_dialog_run(GTK_DIALOG(dialog));
2198
2199 prefdsts.dst[GEANY_GBG_NON_FT] = &non_ft_pref;
2200 if (ft != NULL)
2201 {
2202 prefdsts.dst[GEANY_GBG_FT] = &(ft->priv->homefilecmds);
2203 prefdsts.fileregexstr = &(ft->priv->homeerror_regex_string);
2204 prefdsts.dst[GEANY_GBG_EXEC] = &(ft->priv->homeexeccmds);
2205 }
2206 else
2207 {
2208 prefdsts.dst[GEANY_GBG_FT] = NULL;
2209 prefdsts.fileregexstr = NULL;
2210 prefdsts.dst[GEANY_GBG_EXEC] = NULL;
2211 }
2212 prefdsts.nonfileregexstr = &regex_pref;
2213 if (build_read_commands(&prefdsts, table_data, response) && ft != NULL)
2214 filetypes_save_commands(ft);
2215 build_free_fields(table_data);
2216
2217 build_menu_update(doc);
2218 gtk_widget_destroy(dialog);
2219 }
2220
2221
2222 /* Creates the relevant build menu if necessary. */
2223 BuildMenuItems *build_get_menu_items(gint filetype_idx)
2224 {
2225 BuildMenuItems *items;
2226
2227 items = &menu_items;
2228 if (items->menu == NULL)
2229 create_build_menu(items);
2230 return items;
2231 }
2232
2233
2234 /*----------------------------------------------------------
2235 *
2236 * Load and store configuration
2237 *
2238 * ---------------------------------------------------------*/
2239 static const gchar *build_grp_name = "build-menu";
2240
2241 /* config format for build-menu group is prefix_gg_nn_xx=value
2242 * where gg = FT, NF, EX for the command group
2243 * nn = 2 digit command number
2244 * xx = LB for label, CM for command and WD for working dir */
2245 static const gchar *groups[GEANY_GBG_COUNT] = { "FT", "NF", "EX" };
2246 static const gchar *fixedkey="xx_xx_xx";
2247
2248 #define set_key_grp(key, grp) (key[prefixlen + 0] = grp[0], key[prefixlen + 1] = grp[1])
2249 #define set_key_cmd(key, cmd) (key[prefixlen + 3] = cmd[0], key[prefixlen + 4] = cmd[1])
2250 #define set_key_fld(key, fld) (key[prefixlen + 6] = fld[0], key[prefixlen + 7] = fld[1])
2251
2252 static void build_load_menu_grp(GKeyFile *config, GeanyBuildCommand **dst, gint grp,
2253 gchar *prefix, gboolean loc)
2254 {
2255 guint cmd;
2256 gsize prefixlen; /* NOTE prefixlen used in macros above */
2257 GeanyBuildCommand *dstcmd;
2258 gchar *key;
2259 static gchar cmdbuf[3] = " ";
2260
2261 if (*dst == NULL)
2262 *dst = g_new0(GeanyBuildCommand, build_groups_count[grp]);
2263 dstcmd = *dst;
2264 prefixlen = prefix == NULL ? 0 : strlen(prefix);
2265 key = g_strconcat(prefix == NULL ? "" : prefix, fixedkey, NULL);
2266 for (cmd = 0; cmd < build_groups_count[grp]; ++cmd)
2267 {
2268 gchar *label;
2269 if (cmd >= 100)
2270 break; /* ensure no buffer overflow */
2271 sprintf(cmdbuf, "%02u", cmd);
2272 set_key_grp(key, groups[grp]);
2273 set_key_cmd(key, cmdbuf);
2274 set_key_fld(key, "LB");
2275 if (loc)
2276 label = g_key_file_get_locale_string(config, build_grp_name, key, NULL, NULL);
2277 else
2278 label = g_key_file_get_string(config, build_grp_name, key, NULL);
2279 if (label != NULL)
2280 {
2281 dstcmd[cmd].exists = TRUE;
2282 SETPTR(dstcmd[cmd].label, label);
2283 set_key_fld(key,"CM");
2284 SETPTR(dstcmd[cmd].command,
2285 g_key_file_get_string(config, build_grp_name, key, NULL));
2286 set_key_fld(key,"WD");
2287 SETPTR(dstcmd[cmd].working_dir,
2288 g_key_file_get_string(config, build_grp_name, key, NULL));
2289 }
2290 else dstcmd[cmd].exists = FALSE;
2291 }
2292 g_free(key);
2293 }
2294
2295
2296 /* for the specified source load new format build menu items or try to make some sense of
2297 * old format setings, not done perfectly but better than ignoring them */
2298 void build_load_menu(GKeyFile *config, GeanyBuildSource src, gpointer p)
2299 {
2300 GeanyFiletype *ft;
2301 GeanyProject *pj;
2302 gchar **ftlist;
2303 gchar *value, *basedir, *makebasedir;
2304 gboolean bvalue = FALSE;
2305
2306 if (g_key_file_has_group(config, build_grp_name))
2307 {
2308 switch (src)
2309 {
2310 case GEANY_BCS_FT:
2311 ft = (GeanyFiletype*)p;
2312 if (ft == NULL)
2313 return;
2314 build_load_menu_grp(config, &(ft->priv->filecmds), GEANY_GBG_FT, NULL, TRUE);
2315 build_load_menu_grp(config, &(ft->priv->ftdefcmds), GEANY_GBG_NON_FT, NULL, TRUE);
2316 build_load_menu_grp(config, &(ft->priv->execcmds), GEANY_GBG_EXEC, NULL, TRUE);
2317 SETPTR(ft->error_regex_string,
2318 g_key_file_get_string(config, build_grp_name, "error_regex", NULL));
2319 break;
2320 case GEANY_BCS_HOME_FT:
2321 ft = (GeanyFiletype*)p;
2322 if (ft == NULL)
2323 return;
2324 build_load_menu_grp(config, &(ft->priv->homefilecmds), GEANY_GBG_FT, NULL, FALSE);
2325 build_load_menu_grp(config, &(ft->priv->homeexeccmds), GEANY_GBG_EXEC, NULL, FALSE);
2326 SETPTR(ft->priv->homeerror_regex_string,
2327 g_key_file_get_string(config, build_grp_name, "error_regex", NULL));
2328 break;
2329 case GEANY_BCS_PREF:
2330 build_load_menu_grp(config, &non_ft_pref, GEANY_GBG_NON_FT, NULL, FALSE);
2331 build_load_menu_grp(config, &exec_pref, GEANY_GBG_EXEC, NULL, FALSE);
2332 SETPTR(regex_pref, g_key_file_get_string(config, build_grp_name, "error_regex", NULL));
2333 break;
2334 case GEANY_BCS_PROJ:
2335 build_load_menu_grp(config, &non_ft_proj, GEANY_GBG_NON_FT, NULL, FALSE);
2336 build_load_menu_grp(config, &exec_proj, GEANY_GBG_EXEC, NULL, FALSE);
2337 SETPTR(regex_proj, g_key_file_get_string(config, build_grp_name, "error_regex", NULL));
2338 pj = (GeanyProject*)p;
2339 if (p == NULL)
2340 return;
2341 ftlist = g_key_file_get_string_list(config, build_grp_name, "filetypes", NULL, NULL);
2342 if (ftlist != NULL)
2343 {
2344 gchar **ftname;
2345 if (pj->priv->build_filetypes_list == NULL)
2346 pj->priv->build_filetypes_list = g_ptr_array_new();
2347 g_ptr_array_set_size(pj->priv->build_filetypes_list, 0);
2348 for (ftname = ftlist; *ftname != NULL; ++ftname)
2349 {
2350 ft = filetypes_lookup_by_name(*ftname);
2351 if (ft != NULL)
2352 {
2353 gchar *regkey = g_strdup_printf("%serror_regex", *ftname);
2354 g_ptr_array_add(pj->priv->build_filetypes_list, ft);
2355 SETPTR(ft->priv->projerror_regex_string,
2356 g_key_file_get_string(config, build_grp_name, regkey, NULL));
2357 g_free(regkey);
2358 build_load_menu_grp(config, &(ft->priv->projfilecmds), GEANY_GBG_FT, *ftname, FALSE);
2359 build_load_menu_grp(config, &(ft->priv->projexeccmds), GEANY_GBG_EXEC, *ftname, FALSE);
2360 }
2361 }
2362 g_free(ftlist);
2363 }
2364 break;
2365 default: /* defaults don't load from config, see build_init */
2366 break;
2367 }
2368 }
2369
2370 /* load old [build_settings] values if there is no value defined by [build-menu] */
2371
2372 /* set GeanyBuildCommand if it doesn't already exist and there is a command */
2373 /* TODO: rewrite as function */
2374 #define ASSIGNIF(type, id, string, value) \
2375 do { \
2376 gchar *ASSIGNF__value = (value); \
2377 if (!EMPTY(ASSIGNF__value) && ! type[GBO_TO_CMD(id)].exists) { \
2378 type[GBO_TO_CMD(id)].exists = TRUE; \
2379 SETPTR(type[GBO_TO_CMD(id)].label, g_strdup(string)); \
2380 SETPTR(type[GBO_TO_CMD(id)].command, ASSIGNF__value); \
2381 SETPTR(type[GBO_TO_CMD(id)].working_dir, NULL); \
2382 type[GBO_TO_CMD(id)].old = TRUE; \
2383 } else \
2384 g_free(ASSIGNF__value); \
2385 } while (0)
2386
2387 switch (src)
2388 {
2389 case GEANY_BCS_FT:
2390 ft = (GeanyFiletype*)p;
2391 value = g_key_file_get_string(config, "build_settings", "compiler", NULL);
2392 if (value != NULL)
2393 {
2394 if (ft->priv->filecmds == NULL)
2395 ft->priv->filecmds = g_new0(GeanyBuildCommand, build_groups_count[GEANY_GBG_FT]);
2396 ASSIGNIF(ft->priv->filecmds, GEANY_GBO_COMPILE, _("_Compile"), value);
2397 }
2398 value = g_key_file_get_string(config, "build_settings", "linker", NULL);
2399 if (value != NULL)
2400 {
2401 if (ft->priv->filecmds == NULL)
2402 ft->priv->filecmds = g_new0(GeanyBuildCommand, build_groups_count[GEANY_GBG_FT]);
2403 ASSIGNIF(ft->priv->filecmds, GEANY_GBO_BUILD, _("_Build"), value);
2404 }
2405 value = g_key_file_get_string(config, "build_settings", "run_cmd", NULL);
2406 if (value != NULL)
2407 {
2408 if (ft->priv->execcmds == NULL)
2409 ft->priv->execcmds = g_new0(GeanyBuildCommand, build_groups_count[GEANY_GBG_EXEC]);
2410 ASSIGNIF(ft->priv->execcmds, GEANY_GBO_EXEC, _("_Execute"), value);
2411 }
2412 if (ft->error_regex_string == NULL)
2413 ft->error_regex_string = g_key_file_get_string(config, "build_settings", "error_regex", NULL);
2414 break;
2415 case GEANY_BCS_PROJ:
2416 if (non_ft_pref == NULL)
2417 non_ft_pref = g_new0(GeanyBuildCommand, build_groups_count[GEANY_GBG_NON_FT]);
2418 basedir = project_get_base_path();
2419 if (basedir == NULL)
2420 basedir = g_strdup("%d");
2421 bvalue = g_key_file_get_boolean(config, "project", "make_in_base_path", NULL);
2422 if (bvalue)
2423 makebasedir = g_strdup(basedir);
2424 else
2425 makebasedir = g_strdup("%d");
2426 if (non_ft_pref[GBO_TO_CMD(GEANY_GBO_MAKE_ALL)].old)
2427 SETPTR(non_ft_pref[GBO_TO_CMD(GEANY_GBO_MAKE_ALL)].working_dir, g_strdup(makebasedir));
2428 if (non_ft_pref[GBO_TO_CMD(GEANY_GBO_CUSTOM)].old)
2429 SETPTR(non_ft_pref[GBO_TO_CMD(GEANY_GBO_CUSTOM)].working_dir, g_strdup(makebasedir));
2430 if (non_ft_pref[GBO_TO_CMD(GEANY_GBO_MAKE_OBJECT)].old)
2431 SETPTR(non_ft_pref[GBO_TO_CMD(GEANY_GBO_MAKE_OBJECT)].working_dir, g_strdup("%d"));
2432 value = g_key_file_get_string(config, "project", "run_cmd", NULL);
2433 if (!EMPTY(value))
2434 {
2435 if (exec_proj == NULL)
2436 exec_proj = g_new0(GeanyBuildCommand, build_groups_count[GEANY_GBG_EXEC]);
2437 if (! exec_proj[GBO_TO_CMD(GEANY_GBO_EXEC)].exists)
2438 {
2439 exec_proj[GBO_TO_CMD(GEANY_GBO_EXEC)].exists = TRUE;
2440 SETPTR(exec_proj[GBO_TO_CMD(GEANY_GBO_EXEC)].label, g_strdup(_("_Execute")));
2441 SETPTR(exec_proj[GBO_TO_CMD(GEANY_GBO_EXEC)].command, value);
2442 SETPTR(exec_proj[GBO_TO_CMD(GEANY_GBO_EXEC)].working_dir, g_strdup(basedir));
2443 exec_proj[GBO_TO_CMD(GEANY_GBO_EXEC)].old = TRUE;
2444 }
2445 }
2446 g_free(makebasedir);
2447 g_free(basedir);
2448 break;
2449 case GEANY_BCS_PREF:
2450 value = g_key_file_get_string(config, "tools", "make_cmd", NULL);
2451 if (value != NULL)
2452 {
2453 if (non_ft_pref == NULL)
2454 non_ft_pref = g_new0(GeanyBuildCommand, build_groups_count[GEANY_GBG_NON_FT]);
2455 ASSIGNIF(non_ft_pref, GEANY_GBO_CUSTOM, _("Make Custom _Target..."),
2456 g_strdup_printf("%s ", value));
2457 ASSIGNIF(non_ft_pref, GEANY_GBO_MAKE_OBJECT, _("Make _Object"),
2458 g_strdup_printf("%s %%e.o",value));
2459 ASSIGNIF(non_ft_pref, GEANY_GBO_MAKE_ALL, _("_Make"), value);
2460 }
2461 break;
2462 default:
2463 break;
2464 }
2465 }
2466
2467
2468 static guint build_save_menu_grp(GKeyFile *config, GeanyBuildCommand *src, gint grp, gchar *prefix)
2469 {
2470 guint cmd;
2471 gsize prefixlen; /* NOTE prefixlen used in macros above */
2472 gchar *key;
2473 guint count = 0;
2474 enum GeanyBuildCmdEntries i;
2475
2476 if (src == NULL)
2477 return 0;
2478 prefixlen = prefix == NULL ? 0 : strlen(prefix);
2479 key = g_strconcat(prefix == NULL ? "" : prefix, fixedkey, NULL);
2480 for (cmd = 0; cmd < build_groups_count[grp]; ++cmd)
2481 {
2482 if (src[cmd].exists) ++count;
2483 if (src[cmd].changed)
2484 {
2485 static gchar cmdbuf[4] = " ";
2486 if (cmd >= 100)
2487 break; /* ensure no buffer overflow */
2488 sprintf(cmdbuf, "%02u", cmd);
2489 set_key_grp(key, groups[grp]);
2490 set_key_cmd(key, cmdbuf);
2491 if (src[cmd].exists)
2492 {
2493 for (i = 0; i < GEANY_BC_CMDENTRIES_COUNT; i++)
2494 {
2495 set_key_fld(key, config_keys[i]);
2496 g_key_file_set_string(config, build_grp_name, key, id_to_str(&src[cmd], i));
2497 }
2498 }
2499 else
2500 {
2501 for (i = 0; i < GEANY_BC_CMDENTRIES_COUNT; i++)
2502 {
2503 set_key_fld(key, config_keys[i]);
2504 g_key_file_remove_key(config, build_grp_name, key, NULL);
2505 }
2506 }
2507 }
2508 }
2509 g_free(key);
2510 return count;
2511 }
2512
2513
2514 typedef struct ForEachData
2515 {
2516 GKeyFile *config;
2517 GPtrArray *ft_names;
2518 } ForEachData;
2519
2520
2521 static void foreach_project_filetype(gpointer data, gpointer user_data)
2522 {
2523 GeanyFiletype *ft = data;
2524 ForEachData *d = user_data;
2525 guint i = 0;
2526 gchar *regkey = g_strdup_printf("%serror_regex", ft->name);
2527
2528 i += build_save_menu_grp(d->config, ft->priv->projfilecmds, GEANY_GBG_FT, ft->name);
2529 i += build_save_menu_grp(d->config, ft->priv->projexeccmds, GEANY_GBG_EXEC, ft->name);
2530 if (!EMPTY(ft->priv->projerror_regex_string))
2531 {
2532 g_key_file_set_string(d->config, build_grp_name, regkey, ft->priv->projerror_regex_string);
2533 i++;
2534 }
2535 else
2536 g_key_file_remove_key(d->config, build_grp_name, regkey, NULL);
2537 g_free(regkey);
2538 if (i > 0)
2539 g_ptr_array_add(d->ft_names, ft->name);
2540 }
2541
2542
2543 /* TODO: untyped ptr is too ugly (also for build_load_menu) */
2544 void build_save_menu(GKeyFile *config, gpointer ptr, GeanyBuildSource src)
2545 {
2546 GeanyFiletype *ft;
2547 GeanyProject *pj;
2548 ForEachData data;
2549
2550 switch (src)
2551 {
2552 case GEANY_BCS_HOME_FT:
2553 ft = (GeanyFiletype*)ptr;
2554 if (ft == NULL)
2555 return;
2556 build_save_menu_grp(config, ft->priv->homefilecmds, GEANY_GBG_FT, NULL);
2557 build_save_menu_grp(config, ft->priv->homeexeccmds, GEANY_GBG_EXEC, NULL);
2558 if (!EMPTY(ft->priv->homeerror_regex_string))
2559 g_key_file_set_string(config, build_grp_name, "error_regex", ft->priv->homeerror_regex_string);
2560 else
2561 g_key_file_remove_key(config, build_grp_name, "error_regex", NULL);
2562 break;
2563 case GEANY_BCS_PREF:
2564 build_save_menu_grp(config, non_ft_pref, GEANY_GBG_NON_FT, NULL);
2565 build_save_menu_grp(config, exec_pref, GEANY_GBG_EXEC, NULL);
2566 if (!EMPTY(regex_pref))
2567 g_key_file_set_string(config, build_grp_name, "error_regex", regex_pref);
2568 else
2569 g_key_file_remove_key(config, build_grp_name, "error_regex", NULL);
2570 break;
2571 case GEANY_BCS_PROJ:
2572 pj = (GeanyProject*)ptr;
2573 build_save_menu_grp(config, non_ft_proj, GEANY_GBG_NON_FT, NULL);
2574 build_save_menu_grp(config, exec_proj, GEANY_GBG_EXEC, NULL);
2575 if (!EMPTY(regex_proj))
2576 g_key_file_set_string(config, build_grp_name, "error_regex", regex_proj);
2577 else
2578 g_key_file_remove_key(config, build_grp_name, "error_regex", NULL);
2579 if (pj->priv->build_filetypes_list != NULL)
2580 {
2581 data.config = config;
2582 data.ft_names = g_ptr_array_new();
2583 g_ptr_array_foreach(pj->priv->build_filetypes_list, foreach_project_filetype, (gpointer)(&data));
2584 if (data.ft_names->pdata != NULL)
2585 g_key_file_set_string_list(config, build_grp_name, "filetypes",
2586 (const gchar**)(data.ft_names->pdata), data.ft_names->len);
2587 else
2588 g_key_file_remove_key(config, build_grp_name, "filetypes", NULL);
2589 g_ptr_array_free(data.ft_names, TRUE);
2590 }
2591 break;
2592 default: /* defaults and GEANY_BCS_FT can't save */
2593 break;
2594 }
2595 }
2596
2597
2598 /* FIXME: count is int only because calling code doesn't handle checking its value itself */
2599 void build_set_group_count(GeanyBuildGroup grp, gint count)
2600 {
2601 guint i, sum;
2602
2603 g_return_if_fail(count >= 0);
2604
2605 if ((guint) count > build_groups_count[grp])
2606 build_groups_count[grp] = (guint) count;
2607 for (i = 0, sum = 0; i < GEANY_GBG_COUNT; ++i)
2608 sum += build_groups_count[i];
2609 build_items_count = sum;
2610 }
2611
2612
2613 /** Get the count of commands for the group
2614 *
2615 * Get the number of commands in the group specified by @a grp.
2616 *
2617 * @param grp the group of the specified menu item.
2618 *
2619 * @return a count of the number of commands in the group
2620 *
2621 **/
2622 GEANY_API_SYMBOL
2623 guint build_get_group_count(const GeanyBuildGroup grp)
2624 {
2625 g_return_val_if_fail(grp < GEANY_GBG_COUNT, 0);
2626 return build_groups_count[grp];
2627 }
2628
2629
2630 static void on_project_close(void)
2631 {
2632 /* remove project regexen */
2633 SETPTR(regex_proj, NULL);
2634 }
2635
2636
2637 static struct
2638 {
2639 const gchar *label;
2640 const gchar *command;
2641 const gchar *working_dir;
2642 GeanyBuildCommand **ptr;
2643 gint index;
2644 } default_cmds[] = {
2645 { N_("_Make"), "make", NULL, &non_ft_def, GBO_TO_CMD(GEANY_GBO_MAKE_ALL)},
2646 { N_("Make Custom _Target..."), "make ", NULL, &non_ft_def, GBO_TO_CMD(GEANY_GBO_CUSTOM)},
2647 { N_("Make _Object"), "make %e.o", NULL, &non_ft_def, GBO_TO_CMD(GEANY_GBO_MAKE_OBJECT)},
2648 { N_("_Execute"), "./%e", NULL, &exec_def, GBO_TO_CMD(GEANY_GBO_EXEC)},
2649 { NULL, NULL, NULL, NULL, 0 }
2650 };
2651
2652
2653 void build_init(void)
2654 {
2655 GtkWidget *item;
2656 GtkWidget *toolmenu;
2657 gint cmdindex;
2658
2659 g_signal_connect(geany_object, "project-close", on_project_close, NULL);
2660
2661 ft_def = g_new0(GeanyBuildCommand, build_groups_count[GEANY_GBG_FT]);
2662 non_ft_def = g_new0(GeanyBuildCommand, build_groups_count[GEANY_GBG_NON_FT]);
2663 exec_def = g_new0(GeanyBuildCommand, build_groups_count[GEANY_GBG_EXEC]);
2664 run_info = g_new0(RunInfo, build_groups_count[GEANY_GBG_EXEC]);
2665
2666 for (cmdindex = 0; default_cmds[cmdindex].command != NULL; ++cmdindex)
2667 {
2668 GeanyBuildCommand *cmd = &((*(default_cmds[cmdindex].ptr))[ default_cmds[cmdindex].index ]);
2669 cmd->exists = TRUE;
2670 cmd->label = g_strdup(_(default_cmds[cmdindex].label));
2671 cmd->command = g_strdup(default_cmds[cmdindex].command);
2672 cmd->working_dir = g_strdup(default_cmds[cmdindex].working_dir);
2673 }
2674
2675 /* create the toolbar Build item sub menu */
2676 toolmenu = gtk_menu_new();
2677 g_object_ref(toolmenu);
2678
2679 /* build the code */
2680 item = ui_image_menu_item_new(GEANY_STOCK_BUILD, _("_Build"));
2681 gtk_widget_show(item);
2682 gtk_container_add(GTK_CONTAINER(toolmenu), item);
2683 g_signal_connect(item, "activate", G_CALLBACK(on_toolbutton_build_activate),
2684 GBO_TO_POINTER(GEANY_GBO_BUILD));
2685 widgets.toolitem_build = item;
2686
2687 item = gtk_separator_menu_item_new();
2688 gtk_widget_show(item);
2689 gtk_container_add(GTK_CONTAINER(toolmenu), item);
2690
2691 /* build the code with make all */
2692 item = gtk_image_menu_item_new_with_mnemonic(_("_Make All"));
2693 gtk_widget_show(item);
2694 gtk_container_add(GTK_CONTAINER(toolmenu), item);
2695 g_signal_connect(item, "activate", G_CALLBACK(on_toolbutton_make_activate),
2696 GBO_TO_POINTER(GEANY_GBO_MAKE_ALL));
2697 widgets.toolitem_make_all = item;
2698
2699 /* build the code with make custom */
2700 item = gtk_image_menu_item_new_with_mnemonic(_("Make Custom _Target..."));
2701 gtk_widget_show(item);
2702 gtk_container_add(GTK_CONTAINER(toolmenu), item);
2703 g_signal_connect(item, "activate", G_CALLBACK(on_toolbutton_make_activate),
2704 GBO_TO_POINTER(GEANY_GBO_CUSTOM));
2705 widgets.toolitem_make_custom = item;
2706
2707 /* build the code with make object */
2708 item = gtk_image_menu_item_new_with_mnemonic(_("Make _Object"));
2709 gtk_widget_show(item);
2710 gtk_container_add(GTK_CONTAINER(toolmenu), item);
2711 g_signal_connect(item, "activate", G_CALLBACK(on_toolbutton_make_activate),
2712 GBO_TO_POINTER(GEANY_GBO_MAKE_OBJECT));
2713 widgets.toolitem_make_object = item;
2714
2715 item = gtk_separator_menu_item_new();
2716 gtk_widget_show(item);
2717 gtk_container_add(GTK_CONTAINER(toolmenu), item);
2718
2719 /* arguments */
2720 item = ui_image_menu_item_new(GTK_STOCK_PREFERENCES, _("_Set Build Commands"));
2721 gtk_widget_show(item);
2722 gtk_container_add(GTK_CONTAINER(toolmenu), item);
2723 g_signal_connect(item, "activate", G_CALLBACK(on_set_build_commands_activate), NULL);
2724 widgets.toolitem_set_args = item;
2725
2726 /* get toolbar action pointers */
2727 widgets.build_action = toolbar_get_action_by_name("Build");
2728 widgets.compile_action = toolbar_get_action_by_name("Compile");
2729 widgets.run_action = toolbar_get_action_by_name("Run");
2730 widgets.toolmenu = toolmenu;
2731 /* set the submenu to the toolbar item */
2732 geany_menu_button_action_set_menu(GEANY_MENU_BUTTON_ACTION(widgets.build_action), toolmenu);
2733 }
A fast and lightweight IDE