1998-12-23 23:04:31 +03:00
|
|
|
//
|
2005-02-25 00:55:12 +03:00
|
|
|
// "$Id$"
|
1998-12-23 23:04:31 +03:00
|
|
|
//
|
|
|
|
// A simple text editor program for the Fast Light Tool Kit (FLTK).
|
|
|
|
//
|
|
|
|
// This program is described in Chapter 4 of the FLTK Programmer's Guide.
|
|
|
|
//
|
2005-02-25 00:55:12 +03:00
|
|
|
// Copyright 1998-2005 by Bill Spitzak and others.
|
1998-12-23 23:04:31 +03:00
|
|
|
//
|
|
|
|
// This library is free software; you can redistribute it and/or
|
|
|
|
// modify it under the terms of the GNU Library General Public
|
|
|
|
// License as published by the Free Software Foundation; either
|
|
|
|
// version 2 of the License, or (at your option) any later version.
|
|
|
|
//
|
|
|
|
// This library is distributed in the hope that it will be useful,
|
|
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
|
// Library General Public License for more details.
|
|
|
|
//
|
|
|
|
// You should have received a copy of the GNU Library General Public
|
|
|
|
// License along with this library; if not, write to the Free Software
|
|
|
|
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
|
|
|
|
// USA.
|
|
|
|
//
|
2005-04-16 04:13:17 +04:00
|
|
|
// Please report all bugs and problems on the following page:
|
|
|
|
//
|
|
|
|
// http://www.fltk.org/str.php
|
1998-12-23 23:04:31 +03:00
|
|
|
//
|
|
|
|
|
|
|
|
//
|
|
|
|
// Include necessary headers...
|
|
|
|
//
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
#include <stdio.h>
|
1998-12-23 23:04:31 +03:00
|
|
|
#include <stdlib.h>
|
|
|
|
#include <string.h>
|
2002-06-09 17:35:49 +04:00
|
|
|
#include <ctype.h>
|
2001-08-04 16:21:34 +04:00
|
|
|
#include <errno.h>
|
|
|
|
|
2002-07-12 02:43:53 +04:00
|
|
|
#ifdef __MWERKS__
|
|
|
|
# define FL_DLL
|
|
|
|
#endif
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
#include <FL/Fl.H>
|
|
|
|
#include <FL/Fl_Group.H>
|
|
|
|
#include <FL/Fl_Double_Window.H>
|
|
|
|
#include <FL/fl_ask.H>
|
2001-09-30 21:37:06 +04:00
|
|
|
#include <FL/Fl_File_Chooser.H>
|
2001-08-04 16:21:34 +04:00
|
|
|
#include <FL/Fl_Menu_Bar.H>
|
|
|
|
#include <FL/Fl_Input.H>
|
|
|
|
#include <FL/Fl_Button.H>
|
|
|
|
#include <FL/Fl_Return_Button.H>
|
|
|
|
#include <FL/Fl_Text_Buffer.H>
|
|
|
|
#include <FL/Fl_Text_Editor.H>
|
1998-12-23 23:04:31 +03:00
|
|
|
|
|
|
|
|
|
|
|
int changed = 0;
|
2001-08-04 16:21:34 +04:00
|
|
|
char filename[256] = "";
|
|
|
|
char title[256];
|
2002-06-09 17:35:49 +04:00
|
|
|
Fl_Text_Buffer *textbuf = 0;
|
|
|
|
|
|
|
|
|
|
|
|
// Syntax highlighting stuff...
|
|
|
|
Fl_Text_Buffer *stylebuf = 0;
|
|
|
|
Fl_Text_Display::Style_Table_Entry
|
2002-06-09 22:28:49 +04:00
|
|
|
styletable[] = { // Style table
|
2002-07-15 01:25:39 +04:00
|
|
|
{ FL_BLACK, FL_COURIER, 14 }, // A - Plain
|
|
|
|
{ FL_DARK_GREEN, FL_COURIER_ITALIC, 14 }, // B - Line comments
|
|
|
|
{ FL_DARK_GREEN, FL_COURIER_ITALIC, 14 }, // C - Block comments
|
|
|
|
{ FL_BLUE, FL_COURIER, 14 }, // D - Strings
|
|
|
|
{ FL_DARK_RED, FL_COURIER, 14 }, // E - Directives
|
|
|
|
{ FL_DARK_RED, FL_COURIER_BOLD, 14 }, // F - Types
|
|
|
|
{ FL_BLUE, FL_COURIER_BOLD, 14 } // G - Keywords
|
2002-06-09 17:35:49 +04:00
|
|
|
};
|
2002-06-09 22:28:49 +04:00
|
|
|
const char *code_keywords[] = { // List of known C/C++ keywords...
|
2002-06-09 17:35:49 +04:00
|
|
|
"and",
|
|
|
|
"and_eq",
|
|
|
|
"asm",
|
|
|
|
"bitand",
|
|
|
|
"bitor",
|
|
|
|
"break",
|
|
|
|
"case",
|
|
|
|
"catch",
|
|
|
|
"compl",
|
|
|
|
"continue",
|
|
|
|
"default",
|
|
|
|
"delete",
|
|
|
|
"do",
|
|
|
|
"else",
|
|
|
|
"false",
|
|
|
|
"for",
|
|
|
|
"goto",
|
|
|
|
"if",
|
|
|
|
"new",
|
|
|
|
"not",
|
|
|
|
"not_eq",
|
|
|
|
"operator",
|
|
|
|
"or",
|
|
|
|
"or_eq",
|
|
|
|
"return",
|
|
|
|
"switch",
|
|
|
|
"template",
|
|
|
|
"this",
|
|
|
|
"throw",
|
|
|
|
"true",
|
|
|
|
"try",
|
|
|
|
"while",
|
|
|
|
"xor",
|
|
|
|
"xor_eq"
|
|
|
|
};
|
2002-06-09 22:28:49 +04:00
|
|
|
const char *code_types[] = { // List of known C/C++ types...
|
2002-06-09 17:35:49 +04:00
|
|
|
"auto",
|
|
|
|
"bool",
|
|
|
|
"char",
|
|
|
|
"class",
|
|
|
|
"const",
|
|
|
|
"const_cast",
|
|
|
|
"double",
|
|
|
|
"dynamic_cast",
|
|
|
|
"enum",
|
|
|
|
"explicit",
|
|
|
|
"extern",
|
|
|
|
"float",
|
|
|
|
"friend",
|
|
|
|
"inline",
|
|
|
|
"int",
|
|
|
|
"long",
|
|
|
|
"mutable",
|
|
|
|
"namespace",
|
|
|
|
"private",
|
|
|
|
"protected",
|
|
|
|
"public",
|
|
|
|
"register",
|
|
|
|
"short",
|
|
|
|
"signed",
|
|
|
|
"sizeof",
|
|
|
|
"static",
|
|
|
|
"static_cast",
|
|
|
|
"struct",
|
|
|
|
"template",
|
|
|
|
"typedef",
|
|
|
|
"typename",
|
|
|
|
"union",
|
|
|
|
"unsigned",
|
|
|
|
"virtual",
|
|
|
|
"void",
|
|
|
|
"volatile"
|
|
|
|
};
|
2001-08-04 16:21:34 +04:00
|
|
|
|
|
|
|
|
2002-06-09 17:35:49 +04:00
|
|
|
//
|
|
|
|
// 'compare_keywords()' - Compare two keywords...
|
|
|
|
//
|
|
|
|
|
2005-04-14 16:29:51 +04:00
|
|
|
extern "C" {
|
|
|
|
int
|
|
|
|
compare_keywords(const void *a,
|
|
|
|
const void *b) {
|
|
|
|
return (strcmp(*((const char **)a), *((const char **)b)));
|
|
|
|
}
|
2002-06-09 17:35:49 +04:00
|
|
|
}
|
|
|
|
|
|
|
|
//
|
|
|
|
// 'style_parse()' - Parse text and produce style data.
|
|
|
|
//
|
|
|
|
|
|
|
|
void
|
|
|
|
style_parse(const char *text,
|
|
|
|
char *style,
|
|
|
|
int length) {
|
|
|
|
char current;
|
|
|
|
int col;
|
|
|
|
int last;
|
|
|
|
char buf[255],
|
|
|
|
*bufptr;
|
|
|
|
const char *temp;
|
|
|
|
|
2005-03-23 06:13:31 +03:00
|
|
|
// Style letters:
|
|
|
|
//
|
|
|
|
// A - Plain
|
|
|
|
// B - Line comments
|
|
|
|
// C - Block comments
|
|
|
|
// D - Strings
|
|
|
|
// E - Directives
|
|
|
|
// F - Types
|
|
|
|
// G - Keywords
|
|
|
|
|
2002-06-09 17:35:49 +04:00
|
|
|
for (current = *style, col = 0, last = 0; length > 0; length --, text ++) {
|
2005-03-23 06:13:31 +03:00
|
|
|
if (current == 'B' || current == 'F' || current == 'G') current = 'A';
|
2002-06-09 17:35:49 +04:00
|
|
|
if (current == 'A') {
|
|
|
|
// Check for directives, comments, strings, and keywords...
|
|
|
|
if (col == 0 && *text == '#') {
|
|
|
|
// Set style to directive
|
|
|
|
current = 'E';
|
|
|
|
} else if (strncmp(text, "//", 2) == 0) {
|
|
|
|
current = 'B';
|
2002-09-27 00:43:03 +04:00
|
|
|
for (; length > 0 && *text != '\n'; length --, text ++) *style++ = 'B';
|
|
|
|
|
|
|
|
if (length == 0) break;
|
2002-06-09 17:35:49 +04:00
|
|
|
} else if (strncmp(text, "/*", 2) == 0) {
|
|
|
|
current = 'C';
|
|
|
|
} else if (strncmp(text, "\\\"", 2) == 0) {
|
|
|
|
// Quoted quote...
|
|
|
|
*style++ = current;
|
|
|
|
*style++ = current;
|
|
|
|
text ++;
|
|
|
|
length --;
|
|
|
|
col += 2;
|
|
|
|
continue;
|
|
|
|
} else if (*text == '\"') {
|
|
|
|
current = 'D';
|
2005-03-23 06:13:31 +03:00
|
|
|
} else if (!last && (islower(*text) || *text == '_')) {
|
2002-06-09 17:35:49 +04:00
|
|
|
// Might be a keyword...
|
|
|
|
for (temp = text, bufptr = buf;
|
2005-03-23 06:13:31 +03:00
|
|
|
(islower(*temp) || *temp == '_') && bufptr < (buf + sizeof(buf) - 1);
|
2002-06-09 17:35:49 +04:00
|
|
|
*bufptr++ = *temp++);
|
|
|
|
|
2005-03-23 06:13:31 +03:00
|
|
|
if (!islower(*temp) && *temp != '_') {
|
2002-06-09 17:35:49 +04:00
|
|
|
*bufptr = '\0';
|
|
|
|
|
|
|
|
bufptr = buf;
|
|
|
|
|
|
|
|
if (bsearch(&bufptr, code_types,
|
|
|
|
sizeof(code_types) / sizeof(code_types[0]),
|
|
|
|
sizeof(code_types[0]), compare_keywords)) {
|
|
|
|
while (text < temp) {
|
|
|
|
*style++ = 'F';
|
|
|
|
text ++;
|
|
|
|
length --;
|
|
|
|
col ++;
|
|
|
|
}
|
|
|
|
|
|
|
|
text --;
|
|
|
|
length ++;
|
|
|
|
last = 1;
|
|
|
|
continue;
|
|
|
|
} else if (bsearch(&bufptr, code_keywords,
|
|
|
|
sizeof(code_keywords) / sizeof(code_keywords[0]),
|
|
|
|
sizeof(code_keywords[0]), compare_keywords)) {
|
|
|
|
while (text < temp) {
|
|
|
|
*style++ = 'G';
|
|
|
|
text ++;
|
|
|
|
length --;
|
|
|
|
col ++;
|
|
|
|
}
|
|
|
|
|
|
|
|
text --;
|
|
|
|
length ++;
|
|
|
|
last = 1;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
} else if (current == 'C' && strncmp(text, "*/", 2) == 0) {
|
|
|
|
// Close a C comment...
|
|
|
|
*style++ = current;
|
|
|
|
*style++ = current;
|
|
|
|
text ++;
|
|
|
|
length --;
|
|
|
|
current = 'A';
|
|
|
|
col += 2;
|
|
|
|
continue;
|
|
|
|
} else if (current == 'D') {
|
|
|
|
// Continuing in string...
|
|
|
|
if (strncmp(text, "\\\"", 2) == 0) {
|
|
|
|
// Quoted end quote...
|
|
|
|
*style++ = current;
|
|
|
|
*style++ = current;
|
|
|
|
text ++;
|
|
|
|
length --;
|
|
|
|
col += 2;
|
|
|
|
continue;
|
|
|
|
} else if (*text == '\"') {
|
|
|
|
// End quote...
|
|
|
|
*style++ = current;
|
|
|
|
col ++;
|
|
|
|
current = 'A';
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
// Copy style info...
|
|
|
|
if (current == 'A' && (*text == '{' || *text == '}')) *style++ = 'G';
|
|
|
|
else *style++ = current;
|
|
|
|
col ++;
|
|
|
|
|
2005-03-23 06:13:31 +03:00
|
|
|
last = isalnum(*text) || *text == '_' || *text == '.';
|
2002-06-09 17:35:49 +04:00
|
|
|
|
|
|
|
if (*text == '\n') {
|
|
|
|
// Reset column and possibly reset the style
|
|
|
|
col = 0;
|
|
|
|
if (current == 'B' || current == 'E') current = 'A';
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
//
|
|
|
|
// 'style_init()' - Initialize the style buffer...
|
|
|
|
//
|
|
|
|
|
|
|
|
void
|
|
|
|
style_init(void) {
|
|
|
|
char *style = new char[textbuf->length() + 1];
|
|
|
|
char *text = textbuf->text();
|
|
|
|
|
|
|
|
|
|
|
|
memset(style, 'A', textbuf->length());
|
|
|
|
style[textbuf->length()] = '\0';
|
|
|
|
|
2002-06-11 01:04:20 +04:00
|
|
|
if (!stylebuf) stylebuf = new Fl_Text_Buffer(textbuf->length());
|
2002-06-09 17:35:49 +04:00
|
|
|
|
|
|
|
style_parse(text, style, textbuf->length());
|
|
|
|
|
|
|
|
stylebuf->text(style);
|
|
|
|
delete[] style;
|
|
|
|
free(text);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
//
|
|
|
|
// 'style_unfinished_cb()' - Update unfinished styles.
|
|
|
|
//
|
|
|
|
|
|
|
|
void
|
2002-09-20 23:59:45 +04:00
|
|
|
style_unfinished_cb(int, void*) {
|
2002-06-09 17:35:49 +04:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
//
|
|
|
|
// 'style_update()' - Update the style buffer...
|
|
|
|
//
|
|
|
|
|
|
|
|
void
|
|
|
|
style_update(int pos, // I - Position of update
|
|
|
|
int nInserted, // I - Number of inserted chars
|
|
|
|
int nDeleted, // I - Number of deleted chars
|
2002-06-29 04:10:05 +04:00
|
|
|
int /*nRestyled*/, // I - Number of restyled chars
|
2002-09-27 00:43:03 +04:00
|
|
|
const char * /*deletedText*/,// I - Text that was deleted
|
2002-06-09 17:35:49 +04:00
|
|
|
void *cbArg) { // I - Callback data
|
|
|
|
int start, // Start of text
|
|
|
|
end; // End of text
|
|
|
|
char last, // Last style on line
|
|
|
|
*style, // Style data
|
|
|
|
*text; // Text data
|
|
|
|
|
|
|
|
|
|
|
|
// If this is just a selection change, just unselect the style buffer...
|
|
|
|
if (nInserted == 0 && nDeleted == 0) {
|
|
|
|
stylebuf->unselect();
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Track changes in the text buffer...
|
|
|
|
if (nInserted > 0) {
|
|
|
|
// Insert characters into the style buffer...
|
|
|
|
style = new char[nInserted + 1];
|
|
|
|
memset(style, 'A', nInserted);
|
|
|
|
style[nInserted] = '\0';
|
|
|
|
|
|
|
|
stylebuf->replace(pos, pos + nDeleted, style);
|
|
|
|
delete[] style;
|
|
|
|
} else {
|
|
|
|
// Just delete characters in the style buffer...
|
|
|
|
stylebuf->remove(pos, pos + nDeleted);
|
|
|
|
}
|
|
|
|
|
|
|
|
// Select the area that was just updated to avoid unnecessary
|
|
|
|
// callbacks...
|
|
|
|
stylebuf->select(pos, pos + nInserted - nDeleted);
|
|
|
|
|
|
|
|
// Re-parse the changed region; we do this by parsing from the
|
2005-03-23 06:13:31 +03:00
|
|
|
// beginning of the previous line of the changed region to the end of
|
2002-06-09 17:35:49 +04:00
|
|
|
// the line of the changed region... Then we check the last
|
|
|
|
// style character and keep updating if we have a multi-line
|
|
|
|
// comment character...
|
|
|
|
start = textbuf->line_start(pos);
|
2005-03-23 06:13:31 +03:00
|
|
|
// if (start > 0) start = textbuf->line_start(start - 1);
|
2002-09-27 00:43:03 +04:00
|
|
|
end = textbuf->line_end(pos + nInserted);
|
2002-06-09 17:35:49 +04:00
|
|
|
text = textbuf->text_range(start, end);
|
|
|
|
style = stylebuf->text_range(start, end);
|
|
|
|
last = style[end - start - 1];
|
|
|
|
|
2002-09-27 22:01:30 +04:00
|
|
|
// printf("start = %d, end = %d, text = \"%s\", style = \"%s\"...\n",
|
|
|
|
// start, end, text, style);
|
2002-09-27 00:43:03 +04:00
|
|
|
|
2002-06-09 17:35:49 +04:00
|
|
|
style_parse(text, style, end - start);
|
|
|
|
|
2002-09-27 22:01:30 +04:00
|
|
|
// printf("new style = \"%s\"...\n", style);
|
2002-09-27 00:43:03 +04:00
|
|
|
|
2002-06-09 17:35:49 +04:00
|
|
|
stylebuf->replace(start, end, style);
|
|
|
|
((Fl_Text_Editor *)cbArg)->redisplay_range(start, end);
|
|
|
|
|
|
|
|
if (last != style[end - start - 1]) {
|
|
|
|
// The last character on the line changed styles, so reparse the
|
|
|
|
// remainder of the buffer...
|
|
|
|
free(text);
|
|
|
|
free(style);
|
|
|
|
|
|
|
|
end = textbuf->length();
|
|
|
|
text = textbuf->text_range(start, end);
|
|
|
|
style = stylebuf->text_range(start, end);
|
|
|
|
|
|
|
|
style_parse(text, style, end - start);
|
|
|
|
|
|
|
|
stylebuf->replace(start, end, style);
|
|
|
|
((Fl_Text_Editor *)cbArg)->redisplay_range(start, end);
|
|
|
|
}
|
|
|
|
|
|
|
|
free(text);
|
|
|
|
free(style);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
// Editor window functions and class...
|
2001-08-04 16:21:34 +04:00
|
|
|
void save_cb();
|
|
|
|
void saveas_cb();
|
|
|
|
void find2_cb(Fl_Widget*, void*);
|
|
|
|
void replall_cb(Fl_Widget*, void*);
|
|
|
|
void replace2_cb(Fl_Widget*, void*);
|
|
|
|
void replcan_cb(Fl_Widget*, void*);
|
|
|
|
|
|
|
|
class EditorWindow : public Fl_Double_Window {
|
|
|
|
public:
|
|
|
|
EditorWindow(int w, int h, const char* t);
|
|
|
|
~EditorWindow();
|
|
|
|
|
|
|
|
Fl_Window *replace_dlg;
|
|
|
|
Fl_Input *replace_find;
|
|
|
|
Fl_Input *replace_with;
|
|
|
|
Fl_Button *replace_all;
|
|
|
|
Fl_Return_Button *replace_next;
|
|
|
|
Fl_Button *replace_cancel;
|
|
|
|
|
|
|
|
Fl_Text_Editor *editor;
|
|
|
|
char search[256];
|
|
|
|
};
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
EditorWindow::EditorWindow(int w, int h, const char* t) : Fl_Double_Window(w, h, t) {
|
|
|
|
replace_dlg = new Fl_Window(300, 105, "Replace");
|
2001-12-13 00:33:34 +03:00
|
|
|
replace_find = new Fl_Input(80, 10, 210, 25, "Find:");
|
2001-08-04 16:21:34 +04:00
|
|
|
replace_find->align(FL_ALIGN_LEFT);
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-12-13 00:33:34 +03:00
|
|
|
replace_with = new Fl_Input(80, 40, 210, 25, "Replace:");
|
2001-08-04 16:21:34 +04:00
|
|
|
replace_with->align(FL_ALIGN_LEFT);
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
replace_all = new Fl_Button(10, 70, 90, 25, "Replace All");
|
|
|
|
replace_all->callback((Fl_Callback *)replall_cb, this);
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
replace_next = new Fl_Return_Button(105, 70, 120, 25, "Replace Next");
|
|
|
|
replace_next->callback((Fl_Callback *)replace2_cb, this);
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
replace_cancel = new Fl_Button(230, 70, 60, 25, "Cancel");
|
|
|
|
replace_cancel->callback((Fl_Callback *)replcan_cb, this);
|
|
|
|
replace_dlg->end();
|
|
|
|
replace_dlg->set_non_modal();
|
|
|
|
editor = 0;
|
|
|
|
*search = (char)0;
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
EditorWindow::~EditorWindow() {
|
|
|
|
delete replace_dlg;
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
int check_save(void) {
|
|
|
|
if (!changed) return 1;
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
int r = fl_choice("The current file has not been saved.\n"
|
|
|
|
"Would you like to save it now?",
|
2005-03-23 06:13:31 +03:00
|
|
|
"Cancel", "Save", "Don't Save");
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-10-18 23:21:45 +04:00
|
|
|
if (r == 1) {
|
2001-08-04 16:21:34 +04:00
|
|
|
save_cb(); // Save the file...
|
|
|
|
return !changed;
|
2001-10-18 23:21:45 +04:00
|
|
|
}
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-10-18 23:21:45 +04:00
|
|
|
return (r == 2) ? 1 : 0;
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
int loading = 0;
|
|
|
|
void load_file(char *newfile, int ipos) {
|
|
|
|
loading = 1;
|
|
|
|
int insert = (ipos != -1);
|
|
|
|
changed = insert;
|
|
|
|
if (!insert) strcpy(filename, "");
|
|
|
|
int r;
|
|
|
|
if (!insert) r = textbuf->loadfile(newfile);
|
|
|
|
else r = textbuf->insertfile(newfile, ipos);
|
|
|
|
if (r)
|
|
|
|
fl_alert("Error reading from file \'%s\':\n%s.", newfile, strerror(errno));
|
|
|
|
else
|
|
|
|
if (!insert) strcpy(filename, newfile);
|
|
|
|
loading = 0;
|
|
|
|
textbuf->call_modify_callbacks();
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void save_file(char *newfile) {
|
|
|
|
if (textbuf->savefile(newfile))
|
|
|
|
fl_alert("Error writing to file \'%s\':\n%s.", newfile, strerror(errno));
|
|
|
|
else
|
|
|
|
strcpy(filename, newfile);
|
|
|
|
changed = 0;
|
|
|
|
textbuf->call_modify_callbacks();
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void copy_cb(Fl_Widget*, void* v) {
|
|
|
|
EditorWindow* e = (EditorWindow*)v;
|
|
|
|
Fl_Text_Editor::kf_copy(0, e->editor);
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void cut_cb(Fl_Widget*, void* v) {
|
|
|
|
EditorWindow* e = (EditorWindow*)v;
|
|
|
|
Fl_Text_Editor::kf_cut(0, e->editor);
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void delete_cb(Fl_Widget*, void*) {
|
|
|
|
textbuf->remove_selection();
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void find_cb(Fl_Widget* w, void* v) {
|
|
|
|
EditorWindow* e = (EditorWindow*)v;
|
1998-12-23 23:04:31 +03:00
|
|
|
const char *val;
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
val = fl_input("Search String:", e->search);
|
1998-12-23 23:04:31 +03:00
|
|
|
if (val != NULL) {
|
|
|
|
// User entered a string - go find it!
|
2001-08-04 16:21:34 +04:00
|
|
|
strcpy(e->search, val);
|
|
|
|
find2_cb(w, v);
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void find2_cb(Fl_Widget* w, void* v) {
|
|
|
|
EditorWindow* e = (EditorWindow*)v;
|
|
|
|
if (e->search[0] == '\0') {
|
1998-12-23 23:04:31 +03:00
|
|
|
// Search string is blank; get a new one...
|
2001-08-04 16:21:34 +04:00
|
|
|
find_cb(w, v);
|
1998-12-23 23:04:31 +03:00
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
int pos = e->editor->insert_position();
|
|
|
|
int found = textbuf->search_forward(pos, e->search, &pos);
|
|
|
|
if (found) {
|
|
|
|
// Found a match; select and update the position...
|
|
|
|
textbuf->select(pos, pos+strlen(e->search));
|
|
|
|
e->editor->insert_position(pos+strlen(e->search));
|
|
|
|
e->editor->show_insert_position();
|
|
|
|
}
|
|
|
|
else fl_alert("No occurrences of \'%s\' found!", e->search);
|
|
|
|
}
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void set_title(Fl_Window* w) {
|
|
|
|
if (filename[0] == '\0') strcpy(title, "Untitled");
|
|
|
|
else {
|
|
|
|
char *slash;
|
|
|
|
slash = strrchr(filename, '/');
|
|
|
|
#ifdef WIN32
|
|
|
|
if (slash == NULL) slash = strrchr(filename, '\\');
|
|
|
|
#endif
|
|
|
|
if (slash != NULL) strcpy(title, slash + 1);
|
|
|
|
else strcpy(title, filename);
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
2001-08-04 16:21:34 +04:00
|
|
|
|
|
|
|
if (changed) strcat(title, " (modified)");
|
|
|
|
|
|
|
|
w->label(title);
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void changed_cb(int, int nInserted, int nDeleted,int, const char*, void* v) {
|
|
|
|
if ((nInserted || nDeleted) && !loading) changed = 1;
|
|
|
|
EditorWindow *w = (EditorWindow *)v;
|
|
|
|
set_title(w);
|
|
|
|
if (loading) w->editor->show_insert_position();
|
|
|
|
}
|
|
|
|
|
|
|
|
void new_cb(Fl_Widget*, void*) {
|
|
|
|
if (!check_save()) return;
|
1998-12-23 23:04:31 +03:00
|
|
|
|
|
|
|
filename[0] = '\0';
|
2001-08-04 16:21:34 +04:00
|
|
|
textbuf->select(0, textbuf->length());
|
|
|
|
textbuf->remove_selection();
|
|
|
|
changed = 0;
|
|
|
|
textbuf->call_modify_callbacks();
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void open_cb(Fl_Widget*, void*) {
|
|
|
|
if (!check_save()) return;
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
char *newfile = fl_file_chooser("Open File?", "*", filename);
|
|
|
|
if (newfile != NULL) load_file(newfile, -1);
|
|
|
|
}
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void insert_cb(Fl_Widget*, void *v) {
|
|
|
|
char *newfile = fl_file_chooser("Insert File?", "*", filename);
|
|
|
|
EditorWindow *w = (EditorWindow *)v;
|
|
|
|
if (newfile != NULL) load_file(newfile, w->editor->insert_position());
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void paste_cb(Fl_Widget*, void* v) {
|
|
|
|
EditorWindow* e = (EditorWindow*)v;
|
|
|
|
Fl_Text_Editor::kf_paste(0, e->editor);
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
int num_windows = 0;
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void close_cb(Fl_Widget*, void* v) {
|
|
|
|
Fl_Window* w = (Fl_Window*)v;
|
|
|
|
if (num_windows == 1 && !check_save()) {
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
w->hide();
|
|
|
|
textbuf->remove_modify_callback(changed_cb, w);
|
|
|
|
delete w;
|
|
|
|
num_windows--;
|
|
|
|
if (!num_windows) exit(0);
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void quit_cb(Fl_Widget*, void*) {
|
|
|
|
if (changed && !check_save())
|
|
|
|
return;
|
|
|
|
|
|
|
|
exit(0);
|
|
|
|
}
|
|
|
|
|
|
|
|
void replace_cb(Fl_Widget*, void* v) {
|
|
|
|
EditorWindow* e = (EditorWindow*)v;
|
|
|
|
e->replace_dlg->show();
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void replace2_cb(Fl_Widget*, void* v) {
|
|
|
|
EditorWindow* e = (EditorWindow*)v;
|
|
|
|
const char *find = e->replace_find->value();
|
|
|
|
const char *replace = e->replace_with->value();
|
1998-12-23 23:04:31 +03:00
|
|
|
|
|
|
|
if (find[0] == '\0') {
|
|
|
|
// Search string is blank; get a new one...
|
2001-08-04 16:21:34 +04:00
|
|
|
e->replace_dlg->show();
|
1998-12-23 23:04:31 +03:00
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
e->replace_dlg->hide();
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
int pos = e->editor->insert_position();
|
|
|
|
int found = textbuf->search_forward(pos, find, &pos);
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
if (found) {
|
1998-12-23 23:04:31 +03:00
|
|
|
// Found a match; update the position and replace text...
|
2001-08-04 16:21:34 +04:00
|
|
|
textbuf->select(pos, pos+strlen(find));
|
|
|
|
textbuf->remove_selection();
|
|
|
|
textbuf->insert(pos, replace);
|
|
|
|
textbuf->select(pos, pos+strlen(replace));
|
|
|
|
e->editor->insert_position(pos+strlen(replace));
|
|
|
|
e->editor->show_insert_position();
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
else fl_alert("No occurrences of \'%s\' found!", find);
|
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void replall_cb(Fl_Widget*, void* v) {
|
|
|
|
EditorWindow* e = (EditorWindow*)v;
|
|
|
|
const char *find = e->replace_find->value();
|
|
|
|
const char *replace = e->replace_with->value();
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
find = e->replace_find->value();
|
1998-12-23 23:04:31 +03:00
|
|
|
if (find[0] == '\0') {
|
|
|
|
// Search string is blank; get a new one...
|
2001-08-04 16:21:34 +04:00
|
|
|
e->replace_dlg->show();
|
1998-12-23 23:04:31 +03:00
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
e->replace_dlg->hide();
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
e->editor->insert_position(0);
|
|
|
|
int times = 0;
|
1998-12-23 23:04:31 +03:00
|
|
|
|
|
|
|
// Loop through the whole string
|
2001-08-04 16:21:34 +04:00
|
|
|
for (int found = 1; found;) {
|
|
|
|
int pos = e->editor->insert_position();
|
|
|
|
found = textbuf->search_forward(pos, find, &pos);
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
if (found) {
|
1998-12-23 23:04:31 +03:00
|
|
|
// Found a match; update the position and replace text...
|
2001-08-04 16:21:34 +04:00
|
|
|
textbuf->select(pos, pos+strlen(find));
|
|
|
|
textbuf->remove_selection();
|
|
|
|
textbuf->insert(pos, replace);
|
|
|
|
e->editor->insert_position(pos+strlen(replace));
|
|
|
|
e->editor->show_insert_position();
|
|
|
|
times++;
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
2001-08-04 16:21:34 +04:00
|
|
|
}
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
if (times) fl_message("Replaced %d occurrences.", times);
|
1998-12-23 23:04:31 +03:00
|
|
|
else fl_alert("No occurrences of \'%s\' found!", find);
|
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void replcan_cb(Fl_Widget*, void* v) {
|
|
|
|
EditorWindow* e = (EditorWindow*)v;
|
|
|
|
e->replace_dlg->hide();
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void save_cb() {
|
1998-12-23 23:04:31 +03:00
|
|
|
if (filename[0] == '\0') {
|
|
|
|
// No filename - get one!
|
|
|
|
saveas_cb();
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
else save_file(filename);
|
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
void saveas_cb() {
|
1998-12-23 23:04:31 +03:00
|
|
|
char *newfile;
|
|
|
|
|
|
|
|
newfile = fl_file_chooser("Save File As?", "*", filename);
|
|
|
|
if (newfile != NULL) save_file(newfile);
|
|
|
|
}
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
Fl_Window* new_view();
|
|
|
|
|
|
|
|
void view_cb(Fl_Widget*, void*) {
|
|
|
|
Fl_Window* w = new_view();
|
|
|
|
w->show();
|
1998-12-23 23:04:31 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
Fl_Menu_Item menuitems[] = {
|
2001-08-04 16:21:34 +04:00
|
|
|
{ "&File", 0, 0, 0, FL_SUBMENU },
|
|
|
|
{ "&New File", 0, (Fl_Callback *)new_cb },
|
|
|
|
{ "&Open File...", FL_CTRL + 'o', (Fl_Callback *)open_cb },
|
|
|
|
{ "&Insert File...", FL_CTRL + 'i', (Fl_Callback *)insert_cb, 0, FL_MENU_DIVIDER },
|
|
|
|
{ "&Save File", FL_CTRL + 's', (Fl_Callback *)save_cb },
|
|
|
|
{ "Save File &As...", FL_CTRL + FL_SHIFT + 's', (Fl_Callback *)saveas_cb, 0, FL_MENU_DIVIDER },
|
|
|
|
{ "New &View", FL_ALT + 'v', (Fl_Callback *)view_cb, 0 },
|
|
|
|
{ "&Close View", FL_CTRL + 'w', (Fl_Callback *)close_cb, 0, FL_MENU_DIVIDER },
|
|
|
|
{ "E&xit", FL_CTRL + 'q', (Fl_Callback *)quit_cb, 0 },
|
1998-12-23 23:04:31 +03:00
|
|
|
{ 0 },
|
|
|
|
|
|
|
|
{ "&Edit", 0, 0, 0, FL_SUBMENU },
|
2001-08-04 16:21:34 +04:00
|
|
|
{ "Cu&t", FL_CTRL + 'x', (Fl_Callback *)cut_cb },
|
|
|
|
{ "&Copy", FL_CTRL + 'c', (Fl_Callback *)copy_cb },
|
|
|
|
{ "&Paste", FL_CTRL + 'v', (Fl_Callback *)paste_cb },
|
1998-12-23 23:04:31 +03:00
|
|
|
{ "&Delete", 0, (Fl_Callback *)delete_cb },
|
|
|
|
{ 0 },
|
|
|
|
|
|
|
|
{ "&Search", 0, 0, 0, FL_SUBMENU },
|
2001-08-04 16:21:34 +04:00
|
|
|
{ "&Find...", FL_CTRL + 'f', (Fl_Callback *)find_cb },
|
|
|
|
{ "F&ind Again", FL_CTRL + 'g', find2_cb },
|
|
|
|
{ "&Replace...", FL_CTRL + 'r', replace_cb },
|
|
|
|
{ "Re&place Again", FL_CTRL + 't', replace2_cb },
|
1998-12-23 23:04:31 +03:00
|
|
|
{ 0 },
|
|
|
|
|
|
|
|
{ 0 }
|
|
|
|
};
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
Fl_Window* new_view() {
|
2002-06-09 17:35:49 +04:00
|
|
|
EditorWindow* w = new EditorWindow(660, 400, title);
|
2001-08-04 16:21:34 +04:00
|
|
|
w->begin();
|
2002-06-09 17:35:49 +04:00
|
|
|
Fl_Menu_Bar* m = new Fl_Menu_Bar(0, 0, 660, 30);
|
2001-08-04 16:21:34 +04:00
|
|
|
m->copy(menuitems, w);
|
2002-06-09 17:35:49 +04:00
|
|
|
w->editor = new Fl_Text_Editor(0, 30, 660, 370);
|
2001-08-04 16:21:34 +04:00
|
|
|
w->editor->buffer(textbuf);
|
2002-06-09 17:35:49 +04:00
|
|
|
w->editor->highlight_data(stylebuf, styletable,
|
|
|
|
sizeof(styletable) / sizeof(styletable[0]),
|
|
|
|
'A', style_unfinished_cb, 0);
|
2001-08-04 16:21:34 +04:00
|
|
|
w->editor->textfont(FL_COURIER);
|
|
|
|
w->end();
|
|
|
|
w->resizable(w->editor);
|
|
|
|
w->callback((Fl_Callback *)close_cb, w);
|
2002-06-09 17:35:49 +04:00
|
|
|
|
|
|
|
textbuf->add_modify_callback(style_update, w->editor);
|
2002-06-11 01:04:20 +04:00
|
|
|
textbuf->add_modify_callback(changed_cb, w);
|
2001-08-04 16:21:34 +04:00
|
|
|
textbuf->call_modify_callbacks();
|
|
|
|
num_windows++;
|
|
|
|
return w;
|
|
|
|
}
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
int main(int argc, char **argv) {
|
|
|
|
textbuf = new Fl_Text_Buffer;
|
2002-06-09 17:35:49 +04:00
|
|
|
style_init();
|
1998-12-23 23:04:31 +03:00
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
Fl_Window* window = new_view();
|
1998-12-23 23:04:31 +03:00
|
|
|
|
|
|
|
window->show(1, argv);
|
|
|
|
|
2001-08-04 16:21:34 +04:00
|
|
|
if (argc > 1) load_file(argv[1], -1);
|
1998-12-23 23:04:31 +03:00
|
|
|
|
|
|
|
return Fl::run();
|
|
|
|
}
|
|
|
|
|
|
|
|
//
|
2005-02-25 00:55:12 +03:00
|
|
|
// End of "$Id$".
|
1998-12-23 23:04:31 +03:00
|
|
|
//
|