geany  1.38
About: Geany is a text editor (using GTK2) with basic features of an integrated development environment (syntax highlighting, code folding, symbol name auto-completion, ...). F: office T: editor programming GTK+ IDE
  Fossies Dox: geany-1.38.tar.bz2  ("unofficial" and yet experimental doxygen-generated source code documentation)  
export.c
Go to the documentation of this file.
1/*
2 * export.c - this file is part of Geany, a fast and lightweight IDE
3 *
4 * Copyright 2007 The Geany contributors
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License along
17 * with this program; if not, write to the Free Software Foundation, Inc.,
18 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
19 */
20
21/* Export plugin. */
22
23#ifdef HAVE_CONFIG_H
24# include "config.h"
25#endif
26
27#include <ctype.h>
28#include <math.h>
29
30#include "geanyplugin.h"
31
32
33GeanyData *geany_data;
34
35PLUGIN_VERSION_CHECK(GEANY_API_VERSION)
36PLUGIN_SET_INFO(_("Export"), _("Exports the current file into different formats."), VERSION,
37 _("The Geany developer team"))
38
39
40static GtkWidget *main_menu_item = NULL;
41
42
43#define ROTATE_RGB(color) \
44 (((color) & 0xFF0000) >> 16) + ((color) & 0x00FF00) + (((color) & 0x0000FF) << 16)
45#define TEMPLATE_HTML "\
46<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n\
47 \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n\
48<html xmlns=\"http://www.w3.org/1999/xhtml\" xml:lang=\"en\" lang=\"en\">\n\
49\n\
50<head>\n\
51 <title>{export_filename}</title>\n\
52 <meta http-equiv=\"content-type\" content=\"text/html;charset=utf-8\" />\n\
53 <meta name=\"generator\" content=\"Geany " VERSION "\" />\n\
54 <meta name=\"date\" content=\"{export_date}\" />\n\
55 <style type=\"text/css\">\n\
56{export_styles}\n\
57 </style>\n\
58</head>\n\
59\n\
60<body>\n\
61<p>\n\
62{export_content}\n\
63</p>\n\
64</body>\n\
65</html>\n"
66
67#define TEMPLATE_LATEX "\
68% {export_filename} (LaTeX code generated by Geany " VERSION " on {export_date})\n\
69\\documentclass[a4paper]{article}\n\
70\\usepackage[a4paper,margin=2cm]{geometry}\n\
71\\usepackage[utf8]{inputenc}\n\
72\\usepackage[T1]{fontenc}\n\
73\\usepackage{color}\n\
74\\setlength{\\parindent}{0em}\n\
75\\setlength{\\parskip}{2ex plus1ex minus0.5ex}\n\
76{export_styles}\n\
77\\begin{document}\
78\n\
79\\ttfamily\n\
80\\setlength{\\fboxrule}{0pt}\n\
81\\setlength{\\fboxsep}{0pt}\n\
82{export_content}\
83\\end{document}\n"
84
85
86enum
87{
88 FORE = 0,
89 BACK,
90 BOLD,
91 ITALIC,
92 USED,
93 MAX_TYPES
94};
95
96enum
97{
98 DATE_TYPE_DEFAULT,
99 DATE_TYPE_HTML
100};
101
102typedef void (*ExportFunc) (GeanyDocument *doc, const gchar *filename,
103 gboolean use_zoom, gboolean insert_line_numbers);
104typedef struct
105{
106 GeanyDocument *doc;
107 gboolean have_zoom_level_checkbox;
108 ExportFunc export_func;
109} ExportInfo;
110
111static void on_file_save_dialog_response(GtkDialog *dialog, gint response, gpointer user_data);
112static void write_html_file(GeanyDocument *doc, const gchar *filename,
113 gboolean use_zoom, gboolean insert_line_numbers);
114static void write_latex_file(GeanyDocument *doc, const gchar *filename,
115 gboolean use_zoom, gboolean insert_line_numbers);
116
117
118/* converts a RGB colour into a LaTeX compatible representation, taken from SciTE */
119static gchar* get_tex_rgb(gint rgb_colour)
120{
121 /* texcolor[rgb]{0,0.5,0}{....} */
122 gdouble rf = (rgb_colour % 256) / 256.0;
123 gdouble gf = ((rgb_colour & - 16711936) / 256) / 256.0;
124 gdouble bf = ((rgb_colour & 0xff0000) / 65536) / 256.0;
125 gint r = (gint) (rf * 10 + 0.5);
126 gint g = (gint) (gf * 10 + 0.5);
127 gint b = (gint) (bf * 10 + 0.5);
128
129 return g_strdup_printf("%d.%d, %d.%d, %d.%d", r / 10, r % 10, g / 10, g % 10, b / 10, b % 10);
130}
131
132
133/* convert a style number (0..127) into a string representation (aa, ab, .., ba, bb, .., zy, zz) */
134static gchar *get_tex_style(gint style)
135{
136 static gchar buf[4];
137 int i = 0;
138
139 do
140 {
141 buf[i] = (style % 26) + 'a';
142 style /= 26;
143 i++;
144 } while (style > 0);
145 buf[i] = '\0';
146
147 return buf;
148}
149
150
151static void create_file_save_as_dialog(const gchar *extension, ExportFunc func,
152 gboolean show_zoom_level_checkbox)
153{
154 GtkWidget *dialog, *vbox;
155 GeanyDocument *doc;
156 ExportInfo *exi;
157
158 g_return_if_fail(extension != NULL);
159
160 doc = document_get_current();
161 g_return_if_fail(doc != NULL);
162
163 exi = g_new(ExportInfo, 1);
164 exi->doc = doc;
165 exi->export_func = func;
166 exi->have_zoom_level_checkbox = FALSE;
167
168 dialog = gtk_file_chooser_dialog_new(_("Export File"), GTK_WINDOW(geany->main_widgets->window),
169 GTK_FILE_CHOOSER_ACTION_SAVE, NULL, NULL);
170 gtk_window_set_modal(GTK_WINDOW(dialog), TRUE);
171 gtk_window_set_destroy_with_parent(GTK_WINDOW(dialog), TRUE);
172 gtk_window_set_skip_taskbar_hint(GTK_WINDOW(dialog), TRUE);
173 gtk_window_set_type_hint(GTK_WINDOW(dialog), GDK_WINDOW_TYPE_HINT_DIALOG);
174 gtk_widget_set_name(dialog, "GeanyExportDialog");
175
176 gtk_dialog_add_buttons(GTK_DIALOG(dialog),
177 GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL, GTK_STOCK_SAVE, GTK_RESPONSE_ACCEPT, NULL);
178 gtk_dialog_set_default_response(GTK_DIALOG(dialog), GTK_RESPONSE_ACCEPT);
179
180 /* file chooser extra widget */
181 vbox = gtk_box_new(GTK_ORIENTATION_VERTICAL, 0);
182 gtk_file_chooser_set_extra_widget(GTK_FILE_CHOOSER(dialog), vbox);
183 {
184 GtkWidget *check_line_numbers;
185
186 check_line_numbers = gtk_check_button_new_with_mnemonic(_("_Insert line numbers"));
187 gtk_widget_set_tooltip_text(check_line_numbers,
188 _("Insert line numbers before each line in the exported document"));
189 gtk_box_pack_start(GTK_BOX(vbox), check_line_numbers, FALSE, FALSE, 0);
190 gtk_widget_show_all(vbox);
191
192 ui_hookup_widget(dialog, check_line_numbers, "check_line_numbers");
193 }
194 if (show_zoom_level_checkbox)
195 {
196 GtkWidget *check_zoom_level;
197
198 check_zoom_level = gtk_check_button_new_with_mnemonic(_("_Use current zoom level"));
199 gtk_widget_set_tooltip_text(check_zoom_level,
200 _("Renders the font size of the document together with the current zoom level"));
201 gtk_box_pack_start(GTK_BOX(vbox), check_zoom_level, FALSE, FALSE, 0);
202 gtk_widget_show_all(vbox);
203
204 ui_hookup_widget(dialog, check_zoom_level, "check_zoom_level");
205 exi->have_zoom_level_checkbox = TRUE;
206 }
207
208 g_signal_connect(dialog, "delete-event", G_CALLBACK(gtk_widget_hide_on_delete), NULL);
209 g_signal_connect(dialog, "response", G_CALLBACK(on_file_save_dialog_response), exi);
210
211 gtk_window_set_transient_for(GTK_WINDOW(dialog), GTK_WINDOW(geany->main_widgets->window));
212
213 /* if the current document has a filename we use it as the default. */
214 gtk_file_chooser_unselect_all(GTK_FILE_CHOOSER(dialog));
215 if (doc->file_name != NULL)
216 {
217 gchar *base_name = g_path_get_basename(doc->file_name);
218 gchar *file_name;
219 gchar *locale_filename;
220 gchar *locale_dirname;
221 const gchar *suffix = "";
222
223 if (g_str_has_suffix(doc->file_name, extension))
224 suffix = "_export";
225
226 file_name = g_strconcat(base_name, suffix, extension, NULL);
227 locale_filename = utils_get_locale_from_utf8(doc->file_name);
228 locale_dirname = g_path_get_dirname(locale_filename);
229 /* set the current name to base_name.html which probably doesn't exist yet so
230 * gtk_file_chooser_set_filename() can't be used and we need
231 * gtk_file_chooser_set_current_folder() additionally */
232 gtk_file_chooser_set_current_folder(GTK_FILE_CHOOSER(dialog), locale_dirname);
233 gtk_file_chooser_set_current_name(GTK_FILE_CHOOSER(dialog), file_name);
234 g_free(locale_dirname);
235 g_free(locale_filename);
236 g_free(file_name);
237 g_free(base_name);
238 }
239 else
240 {
241 const gchar *default_open_path = geany->prefs->default_open_path;
242 gchar *fname = g_strconcat(GEANY_STRING_UNTITLED, extension, NULL);
243
244 gtk_file_chooser_unselect_all(GTK_FILE_CHOOSER(dialog));
245 gtk_file_chooser_set_current_name(GTK_FILE_CHOOSER(dialog), fname);
246
247 /* use default startup directory(if set) if no files are open */
248 if (!EMPTY(default_open_path) && g_path_is_absolute(default_open_path))
249 {
250 gchar *locale_path = utils_get_locale_from_utf8(default_open_path);
251 gtk_file_chooser_set_current_folder(GTK_FILE_CHOOSER(dialog), locale_path);
252 g_free(locale_path);
253 }
254 g_free(fname);
255 }
256 gtk_dialog_run(GTK_DIALOG(dialog));
257}
258
259
260static void on_menu_create_latex_activate(GtkMenuItem *menuitem, gpointer user_data)
261{
262 create_file_save_as_dialog(".tex", write_latex_file, FALSE);
263}
264
265
266static void on_menu_create_html_activate(GtkMenuItem *menuitem, gpointer user_data)
267{
268 create_file_save_as_dialog(".html", write_html_file, TRUE);
269}
270
271
272static void write_data(const gchar *filename, const gchar *data)
273{
274 gint error_nr = utils_write_file(filename, data);
275 gchar *utf8_filename = utils_get_utf8_from_locale(filename);
276
277 if (error_nr == 0)
278 ui_set_statusbar(TRUE, _("Document successfully exported as '%s'."), utf8_filename);
279 else
280 ui_set_statusbar(TRUE, _("File '%s' could not be written (%s)."),
281 utf8_filename, g_strerror(error_nr));
282
283 g_free(utf8_filename);
284}
285
286
287static gchar *get_date(gint type)
288{
289 const gchar *format;
290
291 if (type == DATE_TYPE_HTML)
292/* needs testing */
293#ifdef _GNU_SOURCE
294 format = "%Y-%m-%dT%H:%M:%S%z";
295#else
296 format = "%Y-%m-%dT%H:%M:%S";
297#endif
298 else
299 format = "%c";
300
301 return utils_get_date_time(format, NULL);
302}
303
304
305static void on_file_save_dialog_response(GtkDialog *dialog, gint response, gpointer user_data)
306{
307 ExportInfo *exi = user_data;
308
309 if (response == GTK_RESPONSE_ACCEPT && exi != NULL)
310 {
311 gchar *new_filename = gtk_file_chooser_get_filename(GTK_FILE_CHOOSER(dialog));
312 gchar *utf8_filename;
313 gboolean insert_line_numbers;
314 gboolean use_zoom_level = FALSE;
315
316 if (exi->have_zoom_level_checkbox)
317 {
318 use_zoom_level = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(
319 ui_lookup_widget(GTK_WIDGET(dialog), "check_zoom_level")));
320 }
321 insert_line_numbers = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(
322 ui_lookup_widget(GTK_WIDGET(dialog), "check_line_numbers")));
323
324 utf8_filename = utils_get_utf8_from_locale(new_filename);
325
326 /* check if file exists and ask whether to overwrite or not */
327 if (g_file_test(new_filename, G_FILE_TEST_EXISTS))
328 {
329 if (dialogs_show_question(
330 _("The file '%s' already exists. Do you want to overwrite it?"),
331 utf8_filename) == FALSE)
332 return;
333 }
334
335 exi->export_func(exi->doc, new_filename, use_zoom_level, insert_line_numbers);
336
337 g_free(utf8_filename);
338 g_free(new_filename);
339 }
340 g_free(exi);
341 gtk_widget_destroy(GTK_WIDGET(dialog));
342}
343
344
345/* returns the "width" (count of needed characters) for the given number */
346static gint get_line_numbers_arity(gint line_number)
347{
348 gint a = 0;
349 while ((line_number /= 10) != 0)
350 a++;
351 return a;
352}
353
354
355static gint get_line_number_width(GeanyDocument *doc)
356{
357 gint line_count = sci_get_line_count(doc->editor->sci);
358 return get_line_numbers_arity(line_count);
359}
360
361
362static void write_latex_file(GeanyDocument *doc, const gchar *filename,
363 gboolean use_zoom, gboolean insert_line_numbers)
364{
365 GeanyEditor *editor = doc->editor;
366 ScintillaObject *sci = doc->editor->sci;
367 gint i, doc_len, style = -1, old_style = 0, column = 0;
368 gint k, line_number, line_number_width, line_number_max_width = 0, pad;
369 gchar c, c_next, *tmp, *date;
370 /* 0 - fore, 1 - back, 2 - bold, 3 - italic, 4 - font size, 5 - used(0/1) */
371 gint styles[STYLE_MAX + 1][MAX_TYPES];
372 gboolean block_open = FALSE;
373 GString *body;
374 GString *cmds;
375 GString *latex;
376
377 /* first read all styles from Scintilla */
378 for (i = 0; i < STYLE_MAX; i++)
379 {
380 styles[i][FORE] = scintilla_send_message(sci, SCI_STYLEGETFORE, i, 0);
381 styles[i][BACK] = scintilla_send_message(sci, SCI_STYLEGETBACK, i, 0);
382 styles[i][BOLD] = scintilla_send_message(sci, SCI_STYLEGETBOLD, i, 0);
383 styles[i][ITALIC] = scintilla_send_message(sci, SCI_STYLEGETITALIC, i, 0);
384 styles[i][USED] = 0;
385 }
386
387 if (insert_line_numbers)
388 line_number_max_width = get_line_number_width(doc);
389
390 /* read the document and write the LaTeX code */
391 body = g_string_new("");
392 doc_len = sci_get_length(sci);
393 for (i = 0; i < doc_len; i++)
394 {
395 style = sci_get_style_at(sci, i);
396 c = sci_get_char_at(sci, i);
397 c_next = sci_get_char_at(sci, i + 1);
398
399 /* line numbers */
400 if (insert_line_numbers && column == 0)
401 {
402 line_number = sci_get_line_from_position(sci, i) + 1;
403 line_number_width = get_line_numbers_arity(line_number);
404 /* padding */
405 pad = line_number_max_width - line_number_width;
406 for (k = 0; k < pad; k++)
407 {
408 g_string_append(body, " ");
409 }
410 g_string_append_printf(body, "%d ", line_number);
411 }
412
413 if (style != old_style || ! block_open)
414 {
415 old_style = style;
416 styles[style][USED] = 1;
417 if (block_open)
418 {
419 g_string_append(body, "}\n");
420 block_open = FALSE;
421 }
422 if (i < doc_len)
423 {
424 g_string_append_printf(body, "\\style%s{", get_tex_style(style));
425 block_open = TRUE;
426 }
427 }
428 /* escape the current character if necessary else just add it */
429 switch (c)
430 {
431 case '\r':
432 case '\n':
433 {
434 if (c == '\r' && c_next == '\n')
435 continue; /* when using CR/LF skip CR and add the line break with LF */
436
437 if (block_open)
438 {
439 g_string_append(body, "}");
440 block_open = FALSE;
441 }
442 g_string_append(body, " \\\\\n");
443 column = -1;
444 break;
445 }
446 case '\t':
447 {
448 gint tab_width = sci_get_tab_width(editor->sci);
449 gint tab_stop = tab_width - (column % tab_width);
450
451 column += tab_stop - 1; /* -1 because we add 1 at the end of the loop */
452 g_string_append_printf(body, "\\hspace*{%dem}", tab_stop);
453 break;
454 }
455 case ' ':
456 {
457 if (c_next == ' ')
458 {
459 g_string_append(body, "{\\hspace*{1em}}");
460 i++; /* skip the next character */
461 }
462 else
463 g_string_append_c(body, ' ');
464 break;
465 }
466 case '{':
467 case '}':
468 case '_':
469 case '&':
470 case '$':
471 case '#':
472 case '%':
473 {
474 g_string_append_printf(body, "\\%c", c);
475 break;
476 }
477 case '\\':
478 {
479 g_string_append(body, "\\symbol{92}");
480 break;
481 }
482 case '~':
483 {
484 g_string_append(body, "\\symbol{126}");
485 break;
486 }
487 case '^':
488 {
489 g_string_append(body, "\\symbol{94}");
490 break;
491 }
492 /* mask "--", "<<" and ">>" */
493 case '-':
494 case '<':
495 case '>':
496 {
497 g_string_append_c(body, c);
498 if (c_next == c)
499 g_string_append(body, "\\/");
500
501 break;
502 }
503 default: g_string_append_c(body, c);
504 }
505 column++;
506 }
507 if (block_open)
508 {
509 g_string_append(body, "}\n");
510 block_open = FALSE;
511 }
512
513 /* force writing of style 0 (used at least for line breaks) */
514 styles[0][USED] = 1;
515
516 /* write used styles in the header */
517 cmds = g_string_new("");
518 for (i = 0; i < STYLE_MAX; i++)
519 {
520 if (styles[i][USED])
521 {
522 g_string_append_printf(cmds,
523 "\\newcommand{\\style%s}[1]{\\noindent{", get_tex_style(i));
524 if (styles[i][BOLD])
525 g_string_append(cmds, "\\textbf{");
526 if (styles[i][ITALIC])
527 g_string_append(cmds, "\\textit{");
528
529 tmp = get_tex_rgb(styles[i][FORE]);
530 g_string_append_printf(cmds, "\\textcolor[rgb]{%s}{", tmp);
531 g_free(tmp);
532 tmp = get_tex_rgb(styles[i][BACK]);
533 g_string_append_printf(cmds, "\\fcolorbox[rgb]{0, 0, 0}{%s}{", tmp);
534 g_string_append(cmds, "#1}}");
535 g_free(tmp);
536
537 if (styles[i][BOLD])
538 g_string_append_c(cmds, '}');
539 if (styles[i][ITALIC])
540 g_string_append_c(cmds, '}');
541 g_string_append(cmds, "}}\n");
542 }
543 }
544
545 date = get_date(DATE_TYPE_DEFAULT);
546 /* write all */
547 latex = g_string_new(TEMPLATE_LATEX);
548 utils_string_replace_all(latex, "{export_content}", body->str);
549 utils_string_replace_all(latex, "{export_styles}", cmds->str);
550 utils_string_replace_all(latex, "{export_date}", date);
551 utils_string_replace_all(latex, "{export_filename}", DOC_FILENAME(doc));
552
553 write_data(filename, latex->str);
554
555 g_string_free(body, TRUE);
556 g_string_free(cmds, TRUE);
557 g_string_free(latex, TRUE);
558 g_free(date);
559}
560
561
562static void write_html_file(GeanyDocument *doc, const gchar *filename,
563 gboolean use_zoom, gboolean insert_line_numbers)
564{
565 GeanyEditor *editor = doc->editor;
566 ScintillaObject *sci = doc->editor->sci;
567 gint i, doc_len, style = -1, old_style = 0, column = 0;
568 gint k, line_number, line_number_width, line_number_max_width = 0, pad;
569 gchar c, c_next, *date, *doc_filename;
570 /* 0 - fore, 1 - back, 2 - bold, 3 - italic, 4 - font size, 5 - used(0/1) */
571 gint styles[STYLE_MAX + 1][MAX_TYPES];
572 gboolean span_open = FALSE;
573 const gchar *font_name;
574 gint font_size;
575 PangoFontDescription *font_desc;
576 GString *body;
577 GString *css;
578 GString *html;
579
580 /* first read all styles from Scintilla */
581 for (i = 0; i < STYLE_MAX; i++)
582 {
583 styles[i][FORE] = ROTATE_RGB(scintilla_send_message(sci, SCI_STYLEGETFORE, i, 0));
584 styles[i][BACK] = ROTATE_RGB(scintilla_send_message(sci, SCI_STYLEGETBACK, i, 0));
585 styles[i][BOLD] = scintilla_send_message(sci, SCI_STYLEGETBOLD, i, 0);
586 styles[i][ITALIC] = scintilla_send_message(sci, SCI_STYLEGETITALIC, i, 0);
587 styles[i][USED] = 0;
588 }
589
590 /* read Geany's font and font size */
591 font_desc = pango_font_description_from_string(geany->interface_prefs->editor_font);
592 font_name = pango_font_description_get_family(font_desc);
593 /*font_size = pango_font_description_get_size(font_desc) / PANGO_SCALE;*/
594 /* take the zoom level also into account */
595 font_size = scintilla_send_message(sci, SCI_STYLEGETSIZE, 0, 0);
596 if (use_zoom)
597 font_size += scintilla_send_message(sci, SCI_GETZOOM, 0, 0);
598
599 if (insert_line_numbers)
600 line_number_max_width = get_line_number_width(doc);
601
602 /* read the document and write the HTML body */
603 body = g_string_new("");
604 doc_len = sci_get_length(sci);
605 for (i = 0; i < doc_len; i++)
606 {
607 style = sci_get_style_at(sci, i);
608 c = sci_get_char_at(sci, i);
609 /* sci_get_char_at() takes care of index boundaries and return 0 if i is too high */
610 c_next = sci_get_char_at(sci, i + 1);
611
612 /* line numbers */
613 if (insert_line_numbers && column == 0)
614 {
615 line_number = sci_get_line_from_position(sci, i) + 1;
616 line_number_width = get_line_numbers_arity(line_number);
617 /* padding */
618 pad = line_number_max_width - line_number_width;
619 for (k = 0; k < pad; k++)
620 {
621 g_string_append(body, "&nbsp;");
622 }
623 g_string_append_printf(body, "%d&nbsp;", line_number);
624 }
625
626 if ((style != old_style || ! span_open) && ! isspace(c))
627 {
628 old_style = style;
629 styles[style][USED] = 1;
630 if (span_open)
631 {
632 g_string_append(body, "</span>");
633 }
634 if (i < doc_len)
635 {
636 g_string_append_printf(body, "<span class=\"style_%d\">", style);
637 span_open = TRUE;
638 }
639 }
640 /* escape the current character if necessary else just add it */
641 switch (c)
642 {
643 case '\r':
644 case '\n':
645 {
646 if (c == '\r' && c_next == '\n')
647 continue; /* when using CR/LF skip CR and add the line break with LF */
648
649 if (span_open)
650 {
651 g_string_append(body, "</span>");
652 span_open = FALSE;
653 }
654 g_string_append(body, "<br />\n");
655 column = -1;
656 break;
657 }
658 case '\t':
659 {
660 gint j;
661 gint tab_width = sci_get_tab_width(editor->sci);
662 gint tab_stop = tab_width - (column % tab_width);
663
664 column += tab_stop - 1; /* -1 because we add 1 at the end of the loop */
665 for (j = 0; j < tab_stop; j++)
666 {
667 g_string_append(body, "&nbsp;");
668 }
669 break;
670 }
671 case ' ':
672 {
673 g_string_append(body, "&nbsp;");
674 break;
675 }
676 case '<':
677 {
678 g_string_append(body, "&lt;");
679 break;
680 }
681 case '>':
682 {
683 g_string_append(body, "&gt;");
684 break;
685 }
686 case '&':
687 {
688 g_string_append(body, "&amp;");
689 break;
690 }
691 default: g_string_append_c(body, c);
692 }
693 column++;
694 }
695 if (span_open)
696 {
697 g_string_append(body, "</span>");
698 span_open = FALSE;
699 }
700
701 /* write used styles in the header */
702 css = g_string_new("");
703 g_string_append_printf(css,
704 "\tbody\n\t{\n\t\tfont-family: %s, monospace;\n\t\tfont-size: %dpt;\n\t}\n",
705 font_name, font_size);
706
707 for (i = 0; i < STYLE_MAX; i++)
708 {
709 if (styles[i][USED])
710 {
711 g_string_append_printf(css,
712 "\t.style_%d\n\t{\n\t\tcolor: #%06x;\n\t\tbackground-color: #%06x;\n%s%s\t}\n",
713 i, styles[i][FORE], styles[i][BACK],
714 (styles[i][BOLD]) ? "\t\tfont-weight: bold;\n" : "",
715 (styles[i][ITALIC]) ? "\t\tfont-style: italic;\n" : "");
716 }
717 }
718
719 date = get_date(DATE_TYPE_HTML);
720 doc_filename = g_markup_escape_text(DOC_FILENAME(doc), -1);
721 /* write all */
722 html = g_string_new(TEMPLATE_HTML);
723 utils_string_replace_all(html, "{export_date}", date);
724 utils_string_replace_all(html, "{export_content}", body->str);
725 utils_string_replace_all(html, "{export_styles}", css->str);
726 utils_string_replace_all(html, "{export_filename}", doc_filename);
727
728 write_data(filename, html->str);
729
730 pango_font_description_free(font_desc);
731 g_string_free(body, TRUE);
732 g_string_free(css, TRUE);
733 g_string_free(html, TRUE);
734 g_free(doc_filename);
735 g_free(date);
736}
737
738
739void plugin_init(GeanyData *data)
740{
741 GtkWidget *menu_export;
742 GtkWidget *menu_export_menu;
743 GtkWidget *menu_create_html;
744 GtkWidget *menu_create_latex;
745
746 menu_export = gtk_image_menu_item_new_with_mnemonic(_("_Export"));
747 gtk_container_add(GTK_CONTAINER(geany->main_widgets->tools_menu), menu_export);
748
749 menu_export_menu = gtk_menu_new ();
750 gtk_menu_item_set_submenu(GTK_MENU_ITEM(menu_export), menu_export_menu);
751
752 /* HTML */
753 menu_create_html = gtk_menu_item_new_with_mnemonic(_("As _HTML..."));
754 gtk_container_add(GTK_CONTAINER (menu_export_menu), menu_create_html);
755
756 g_signal_connect(menu_create_html, "activate", G_CALLBACK(on_menu_create_html_activate), NULL);
757
758 /* LaTeX */
759 menu_create_latex = gtk_menu_item_new_with_mnemonic(_("As _LaTeX..."));
760 gtk_container_add(GTK_CONTAINER (menu_export_menu), menu_create_latex);
761
762 g_signal_connect(menu_create_latex, "activate",
763 G_CALLBACK(on_menu_create_latex_activate), NULL);
764
765 /* disable menu_item when there are no documents open */
766 ui_add_document_sensitive(menu_export);
767 main_menu_item = menu_export;
768
769 gtk_widget_show_all(menu_export);
770}
771
772
773void plugin_cleanup(void)
774{
775 gtk_widget_destroy(main_menu_item);
776}
scintilla_send_message
sptr_t scintilla_send_message(ScintillaObject *sci, unsigned int iMessage, uptr_t wParam, sptr_t lParam)
Definition: ScintillaGTK.cxx:3012
SCI_GETZOOM
#define SCI_GETZOOM
Definition: Scintilla.h:719
STYLE_MAX
#define STYLE_MAX
Definition: Scintilla.h:206
SCI_STYLEGETBOLD
#define SCI_STYLEGETBOLD
Definition: Scintilla.h:245
SCI_STYLEGETSIZE
#define SCI_STYLEGETSIZE
Definition: Scintilla.h:247
SCI_STYLEGETFORE
#define SCI_STYLEGETFORE
Definition: Scintilla.h:243
SCI_STYLEGETITALIC
#define SCI_STYLEGETITALIC
Definition: Scintilla.h:246
SCI_STYLEGETBACK
#define SCI_STYLEGETBACK
Definition: Scintilla.h:244
dialogs_show_question
gboolean dialogs_show_question(const gchar *text,...)
Shows a question message box with text and Yes/No buttons.
Definition: dialogs.c:1370
document_get_current
GeanyDocument * document_get_current(void)
Finds the current document.
Definition: document.c:371
DOC_FILENAME
#define DOC_FILENAME(doc)
Returns the filename of the document passed or GEANY_STRING_UNTITLED (e.g.
Definition: document.h:170
sci
ScintillaObject * sci
Definition: editor.c:88
get_line_numbers_arity
static gint get_line_numbers_arity(gint line_number)
Definition: export.c:346
on_menu_create_html_activate
static void on_menu_create_html_activate(GtkMenuItem *menuitem, gpointer user_data)
Definition: export.c:266
write_html_file
static void write_html_file(GeanyDocument *doc, const gchar *filename, gboolean use_zoom, gboolean insert_line_numbers)
Definition: export.c:562
create_file_save_as_dialog
static void create_file_save_as_dialog(const gchar *extension, ExportFunc func, gboolean show_zoom_level_checkbox)
Definition: export.c:151
USED
@ USED
Definition: export.c:92
BOLD
@ BOLD
Definition: export.c:90
ITALIC
@ ITALIC
Definition: export.c:91
BACK
@ BACK
Definition: export.c:89
MAX_TYPES
@ MAX_TYPES
Definition: export.c:93
FORE
@ FORE
Definition: export.c:88
get_date
static gchar * get_date(gint type)
Definition: export.c:287
plugin_cleanup
void plugin_cleanup(void)
Called before unloading the plugin.
Definition: export.c:773
ROTATE_RGB
#define ROTATE_RGB(color)
Definition: export.c:43
on_file_save_dialog_response
static void on_file_save_dialog_response(GtkDialog *dialog, gint response, gpointer user_data)
Definition: export.c:305
get_tex_style
static gchar * get_tex_style(gint style)
Definition: export.c:134
main_menu_item
static GtkWidget * main_menu_item
Definition: export.c:40
get_line_number_width
static gint get_line_number_width(GeanyDocument *doc)
Definition: export.c:355
plugin_init
void plugin_init(GeanyData *data)
Called after loading the plugin.
Definition: export.c:739
DATE_TYPE_DEFAULT
@ DATE_TYPE_DEFAULT
Definition: export.c:98
DATE_TYPE_HTML
@ DATE_TYPE_HTML
Definition: export.c:99
write_latex_file
static void write_latex_file(GeanyDocument *doc, const gchar *filename, gboolean use_zoom, gboolean insert_line_numbers)
Definition: export.c:362
on_menu_create_latex_activate
static void on_menu_create_latex_activate(GtkMenuItem *menuitem, gpointer user_data)
Definition: export.c:260
geany_data
GeanyData * geany_data
Definition: export.c:33
TEMPLATE_LATEX
#define TEMPLATE_LATEX
Definition: export.c:67
ExportFunc
void(* ExportFunc)(GeanyDocument *doc, const gchar *filename, gboolean use_zoom, gboolean insert_line_numbers)
Definition: export.c:102
TEMPLATE_HTML
#define TEMPLATE_HTML
Definition: export.c:45
write_data
static void write_data(const gchar *filename, const gchar *data)
Definition: export.c:272
get_tex_rgb
static gchar * get_tex_rgb(gint rgb_colour)
Definition: export.c:119
GEANY_STRING_UNTITLED
#define GEANY_STRING_UNTITLED
Definition: geany.h:49
format
CobolFormat format
Definition: geany_cobol.c:137
geanyplugin.h
Single include for plugins.
GEANY_API_VERSION
#define GEANY_API_VERSION
The Application Programming Interface (API) version, incremented whenever any plugin data types are m...
Definition: plugindata.h:61
PLUGIN_SET_INFO
#define PLUGIN_SET_INFO(p_name, p_description, p_version, p_author)
Sets the plugin name and some other basic information about a plugin.
Definition: plugindata.h:117
PLUGIN_VERSION_CHECK
#define PLUGIN_VERSION_CHECK(api_required)
Defines a function to check the plugin is safe to load.
Definition: plugindata.h:83
geany
#define geany
Simple macro for geany_data that reduces typing.
Definition: plugindata.h:225
NULL
#define NULL
Definition: rbtree.h:150
sci_get_line_count
gint sci_get_line_count(ScintillaObject *sci)
Gets the total number of lines.
Definition: sciwrappers.c:555
sci_get_style_at
gint sci_get_style_at(ScintillaObject *sci, gint position)
Gets style ID at position.
Definition: sciwrappers.c:1051
sci_get_length
gint sci_get_length(ScintillaObject *sci)
Gets the length of all text.
Definition: sciwrappers.c:656
sci_get_tab_width
gint sci_get_tab_width(ScintillaObject *sci)
Gets display tab width (this is not indent width, see GeanyIndentPrefs).
Definition: sciwrappers.c:878
sci_get_char_at
gchar sci_get_char_at(ScintillaObject *sci, gint pos)
Gets a character.
Definition: sciwrappers.c:889
sci_get_line_from_position
gint sci_get_line_from_position(ScintillaObject *sci, gint position)
Gets the line number from position.
Definition: sciwrappers.c:469
filename
const gchar filename[]
Definition: stash-example.c:4
dialog
GtkWidget * dialog
Definition: stash-gui-example.c:15
gtk_container_add
gtk_container_add(GTK_CONTAINER(dialog->vbox), check_button)
ui_hookup_widget
ui_hookup_widget(dialog, check_button, "check_handle")
gtk_widget_show_all
gtk_widget_show_all(dialog)
ExportInfo::export_func
ExportFunc export_func
Definition: export.c:108
ExportInfo::have_zoom_level_checkbox
gboolean have_zoom_level_checkbox
Definition: export.c:107
ExportInfo::doc
GeanyDocument * doc
Definition: export.c:106
GeanyData
This contains pointers to global variables owned by Geany for plugins to use.
Definition: plugindata.h:167
GeanyDocument
Structure for representing an open tab with all its properties.
Definition: document.h:81
GeanyDocument::file_name
gchar * file_name
The UTF-8 encoded file name.
Definition: document.h:92
GeanyDocument::editor
GeanyEditor * editor
The editor associated with the document.
Definition: document.h:98
GeanyEditor
Editor-owned fields for each document.
Definition: editor.h:150
GeanyEditor::sci
ScintillaObject * sci
The Scintilla editor GtkWidget.
Definition: editor.h:152
_
#define _(String)
Definition: support.h:42
ui_add_document_sensitive
void ui_add_document_sensitive(GtkWidget *widget)
Adds a widget to the list of widgets that should be set sensitive/insensitive when some documents are...
Definition: ui_utils.c:976
ui_set_statusbar
void ui_set_statusbar(gboolean log, const gchar *format,...)
Displays text on the statusbar.
Definition: ui_utils.c:168
ui_lookup_widget
GtkWidget * ui_lookup_widget(GtkWidget *widget, const gchar *widget_name)
Returns a widget from a name in a component, usually created by Glade.
Definition: ui_utils.c:2743
utils_write_file
gint utils_write_file(const gchar *filename, const gchar *text)
Writes text into a file named filename.
Definition: utils.c:209
utils_string_replace_all
guint utils_string_replace_all(GString *haystack, const gchar *needle, const gchar *replace)
Replaces all occurrences of needle in haystack with replace.
Definition: utils.c:1529
utils_get_utf8_from_locale
gchar * utils_get_utf8_from_locale(const gchar *locale_text)
Converts the given string (in locale encoding) into UTF-8 encoding.
Definition: utils.c:1272
utils_get_date_time
gchar * utils_get_date_time(const gchar *format, time_t *time_to_use)
Retrieves a formatted date/time string from strftime().
Definition: utils.c:736
utils_get_locale_from_utf8
gchar * utils_get_locale_from_utf8(const gchar *utf8_text)
Converts the given UTF-8 encoded string into locale encoding.
Definition: utils.c:1243
EMPTY
#define EMPTY(ptr)
Returns TRUE if ptr is NULL or *ptr is FALSE.
Definition: utils.h:38