1998-09-15 00:18:54 +04:00
/* editor high level editing commands.
Copyright ( C ) 1996 , 1997 the Free Software Foundation
Authors : 1996 , 1997 Paul Sheer
2000-09-07 21:18:32 +04:00
$ Id $
1998-09-15 00:18:54 +04:00
This program is free software ; you can redistribute it and / or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation ; either version 2 of the License , or
( at your option ) any later version .
This program is distributed in the hope that it will be useful ,
but WITHOUT ANY WARRANTY ; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE . See the
GNU General Public License for more details .
You should have received a copy of the GNU General Public License
along with this program ; if not , write to the Free Software
1999-03-21 04:56:20 +03:00
Foundation , Inc . , 59 Temple Place , Suite 330 , Boston , MA
02111 - 1307 , USA .
2000-09-07 21:18:32 +04:00
1999-03-21 04:56:20 +03:00
*/
1998-09-15 00:18:54 +04:00
/* #define PIPE_BLOCKS_SO_READ_BYTE_BY_BYTE */
# include <config.h>
1999-01-10 11:55:35 +03:00
# ifdef NEEDS_IO_H
1998-09-15 00:18:54 +04:00
# include <io.h>
# include <fcntl.h>
# endif
# include <ctype.h>
# include "edit.h"
# include "editcmddef.h"
# ifndef MIDNIGHT
# include <X11/Xatom.h>
# ifndef GTK
# include "loadfile.h"
# endif
# endif
2001-06-08 11:22:28 +04:00
# ifdef HAVE_CHARSET
2001-06-06 03:02:08 +04:00
# include "../src/charsets.h"
# endif
1998-09-15 00:18:54 +04:00
/* globals: */
/* search and replace: */
int replace_scanf = 0 ;
int replace_regexp = 0 ;
int replace_all = 0 ;
int replace_prompt = 1 ;
int replace_whole = 0 ;
int replace_case = 0 ;
int replace_backwards = 0 ;
2000-02-18 14:16:06 +03:00
int search_create_bookmark = 0 ;
1998-09-15 00:18:54 +04:00
/* queries on a save */
# ifdef MIDNIGHT
int edit_confirm_save = 1 ;
# else
int edit_confirm_save = 0 ;
# endif
1999-03-21 04:56:20 +03:00
# define NUM_REPL_ARGS 64
1998-09-15 00:18:54 +04:00
# define MAX_REPL_LEN 1024
# if defined(MIDNIGHT) || defined(GTK)
static inline int my_lower_case ( int c )
{
1999-07-22 00:03:23 +04:00
return tolower ( c & 0xFF ) ;
1998-09-15 00:18:54 +04:00
}
char * strcasechr ( const unsigned char * s , int c )
{
2000-11-01 22:53:30 +03:00
for ( c = my_lower_case ( c ) ; my_lower_case ( ( int ) * s ) ! = c ; + + s )
1998-09-15 00:18:54 +04:00
if ( * s = = ' \0 ' )
return 0 ;
return ( char * ) s ;
}
# ifdef MIDNIGHT
# include "../src/mad.h"
1999-07-22 00:03:23 +04:00
# elif !defined (GTK)
# include "mad.h"
1998-09-15 00:18:54 +04:00
# endif
# ifndef HAVE_MEMMOVE
/* for Christophe */
static void * memmove ( void * dest , const void * src , size_t n )
{
char * t , * s ;
if ( dest < = src ) {
t = ( char * ) dest ;
s = ( char * ) src ;
while ( n - - )
* t + + = * s + + ;
} else {
t = ( char * ) dest + n ;
s = ( char * ) src + n ;
while ( n - - )
* - - t = * - - s ;
}
return dest ;
}
# endif
/* #define itoa MY_itoa <---- this line is now in edit.h */
char * itoa ( int i )
{
static char t [ 14 ] ;
char * s = t + 13 ;
int j = i ;
* s - - = 0 ;
do {
* s - - = i % 10 + ' 0 ' ;
} while ( ( i = i / 10 ) ) ;
if ( j < 0 )
* s - - = ' - ' ;
return + + s ;
}
/*
This joins strings end on end and allocates memory for the result .
The result is later automatically free ' d and must not be free ' d
by the caller .
*/
char * catstrs ( const char * first , . . . )
{
static char * stacked [ 16 ] =
{ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 } ;
static int i = 0 ;
va_list ap ;
int len ;
char * data ;
if ( ! first )
return 0 ;
len = strlen ( first ) ;
va_start ( ap , first ) ;
while ( ( data = va_arg ( ap , char * ) ) ! = 0 )
len + = strlen ( data ) ;
len + + ;
i = ( i + 1 ) % 16 ;
if ( stacked [ i ] )
free ( stacked [ i ] ) ;
stacked [ i ] = malloc ( len ) ;
va_end ( ap ) ;
va_start ( ap , first ) ;
strcpy ( stacked [ i ] , first ) ;
while ( ( data = va_arg ( ap , char * ) ) ! = 0 )
strcat ( stacked [ i ] , data ) ;
va_end ( ap ) ;
return stacked [ i ] ;
}
# endif
# ifdef MIDNIGHT
void edit_help_cmd ( WEdit * edit )
{
2001-06-09 11:24:04 +04:00
interactive_display ( NULL , " [Internal File Editor] " ) ;
1998-09-15 00:18:54 +04:00
edit - > force | = REDRAW_COMPLETELY ;
}
void edit_refresh_cmd ( WEdit * edit )
{
# ifndef HAVE_SLANG
clr_scr ( ) ;
do_refresh ( ) ;
# else
{
int fg , bg ;
edit_get_syntax_color ( edit , - 1 , & fg , & bg ) ;
}
touchwin ( stdscr ) ;
2000-09-07 21:18:32 +04:00
# endif /* !HAVE_SLANG */
1998-09-15 00:18:54 +04:00
mc_refresh ( ) ;
doupdate ( ) ;
}
2000-09-07 21:18:32 +04:00
# else /* MIDNIGHT */
1998-09-15 00:18:54 +04:00
void edit_help_cmd ( WEdit * edit )
{
}
void edit_refresh_cmd ( WEdit * edit )
{
int fg , bg ;
edit_get_syntax_color ( edit , - 1 , & fg , & bg ) ;
edit - > force | = REDRAW_COMPLETELY ;
}
void CRefreshEditor ( WEdit * edit )
{
edit_refresh_cmd ( edit ) ;
}
2000-09-07 21:18:32 +04:00
# endif /* MIDNIGHT */
1998-09-15 00:18:54 +04:00
# ifndef MIDNIGHT
# ifndef GTK
/* three argument open */
int my_open ( const char * pathname , int flags , . . . )
{
int file ;
va_list ap ;
file = open ( ( char * ) pathname , O_RDONLY ) ;
if ( file < 0 & & ( flags & O_CREAT ) ) { /* must it be created ? */
mode_t mode ;
va_start ( ap , flags ) ;
mode = va_arg ( ap , mode_t ) ;
va_end ( ap ) ;
return creat ( ( char * ) pathname , mode ) ;
}
close ( file ) ;
return open ( ( char * ) pathname , flags ) ;
}
# define open my_open
2000-09-07 21:18:32 +04:00
# endif /* !GTK */
# endif /* !MIDNIGHT */
1998-09-15 00:18:54 +04:00
/* "Oleg Yu. Repin" <repin@ssd.sscc.ru> added backup filenames
. . . thanks - paul */
/* If 0 (quick save) then a) create/truncate <filename> file,
b ) save to < filename > ;
if 1 ( safe save ) then a ) save to < tempnam > ,
b ) rename < tempnam > to < filename > ;
if 2 ( do backups ) then a ) save to < tempnam > ,
b ) rename < filename > to < filename . backup_ext > ,
c ) rename < tempnam > to < filename > . */
/* returns 0 on error */
int edit_save_file ( WEdit * edit , const char * filename )
{
2000-02-18 14:16:06 +03:00
char * p ;
1998-09-15 00:18:54 +04:00
long filelen = 0 ;
2000-02-18 14:16:06 +03:00
char * savename = 0 ;
int this_save_mode , fd ;
if ( ! filename )
return 0 ;
if ( ! * filename )
return 0 ;
savename = ( char * ) strdup ( ( char * ) filename ) ;
1998-09-15 00:18:54 +04:00
2001-08-02 01:54:59 +04:00
if ( vfs_file_is_local ( filename ) ) {
if ( ( fd = open ( savename , O_WRONLY ) ) = = - 1 ) {
/*
* The file does not exists yet , so no safe save or
* backup are necessary .
*/
this_save_mode = 0 ;
} else {
close ( fd ) ;
this_save_mode = option_save_mode ;
}
1998-09-15 00:18:54 +04:00
} else {
2001-08-02 01:54:59 +04:00
/*
* FIXME - rename is not impemented in VFS , so only
* quick save is possible .
*/
this_save_mode = 0 ;
1998-09-15 00:18:54 +04:00
}
if ( this_save_mode > 0 ) {
2001-08-02 01:54:59 +04:00
char * savedir , * slashpos , * saveprefix ;
2000-02-18 14:16:06 +03:00
savedir = ( char * ) strdup ( " . " ) ;
slashpos = strrchr ( filename , ' / ' ) ;
if ( slashpos ) {
free ( savedir ) ;
1999-07-22 00:03:23 +04:00
savedir = ( char * ) strdup ( filename ) ;
1998-09-15 00:18:54 +04:00
savedir [ slashpos - filename + 1 ] = ' \0 ' ;
}
2000-02-18 14:16:06 +03:00
if ( savename )
free ( savename ) ;
2001-08-02 01:54:59 +04:00
saveprefix = concat_dir_and_file ( savedir , " cooledit " ) ;
fd = mc_mkstemps ( & savename , saveprefix , NULL ) ;
g_free ( saveprefix ) ;
2000-02-18 14:16:06 +03:00
free ( savedir ) ;
1998-09-15 00:18:54 +04:00
if ( ! savename )
2000-07-20 02:23:58 +04:00
return 0 ;
2001-08-02 01:54:59 +04:00
/*
* Close for now because it needs to be reopened by
* VFS - aware mc_open ( ) and MY_O_TEXT should be used .
*/
close ( fd ) ;
1998-09-15 00:18:54 +04:00
}
2000-09-15 14:10:18 +04:00
2001-06-26 19:52:12 +04:00
if ( ( fd = open ( savename , O_CREAT | O_WRONLY | O_TRUNC | MY_O_TEXT ,
edit - > stat1 . st_mode ) ) = = - 1 )
2000-02-18 14:16:06 +03:00
goto error_save ;
2000-09-15 14:10:18 +04:00
2001-06-26 19:52:12 +04:00
chmod ( savename , edit - > stat1 . st_mode ) ;
chown ( savename , edit - > stat1 . st_uid , edit - > stat1 . st_gid ) ;
1998-09-15 00:18:54 +04:00
2000-02-18 14:16:06 +03:00
/* pipe save */
if ( ( p = ( char * ) edit_get_write_filter ( savename , filename ) ) ) {
2000-09-15 14:10:18 +04:00
FILE * file ;
close ( fd ) ;
file = ( FILE * ) popen ( p , " w " ) ;
2000-02-18 14:16:06 +03:00
if ( file ) {
filelen = edit_write_stream ( edit , file ) ;
# if 1
pclose ( file ) ;
# else
2000-09-07 21:18:32 +04:00
if ( pclose ( file ) ! = 0 ) {
2000-02-18 14:16:06 +03:00
edit_error_dialog ( _ ( " Error " ) , catstrs ( _ ( " Error writing to pipe: " ) , p , " " , 0 ) ) ;
free ( p ) ;
goto error_save ;
1998-09-15 00:18:54 +04:00
}
2000-02-18 14:16:06 +03:00
# endif
} else {
edit_error_dialog ( _ ( " Error " ) , get_sys_error ( catstrs ( _ ( " Failed trying to open pipe for writing: " ) , p , " " , 0 ) ) ) ;
free ( p ) ;
goto error_save ;
1998-09-15 00:18:54 +04:00
}
2000-02-18 14:16:06 +03:00
free ( p ) ;
# ifdef CR_LF_TRANSLATION
} else { /* optimised save */
filelen = edit_write_stream ( edit , f ) ;
2000-07-20 02:23:58 +04:00
if ( fclose ( file ) )
filelen = - 1 ;
2000-02-18 14:16:06 +03:00
# else
} else {
long buf ;
buf = 0 ;
filelen = edit - > last_byte ;
while ( buf < = ( edit - > curs1 > > S_EDIT_BUF_SIZE ) - 1 ) {
2000-10-30 21:07:19 +03:00
if ( write ( fd , ( char * ) edit - > buffers1 [ buf ] , EDIT_BUF_SIZE ) ! = EDIT_BUF_SIZE ) {
2000-09-15 14:10:18 +04:00
close ( fd ) ;
2000-07-20 02:23:58 +04:00
goto error_save ;
1998-09-15 00:18:54 +04:00
}
2000-02-18 14:16:06 +03:00
buf + + ;
1998-09-15 00:18:54 +04:00
}
2000-10-30 21:07:19 +03:00
if ( write ( fd , ( char * ) edit - > buffers1 [ buf ] , edit - > curs1 & M_EDIT_BUF_SIZE ) ! = ( edit - > curs1 & M_EDIT_BUF_SIZE ) ) {
2000-02-18 14:16:06 +03:00
filelen = - 1 ;
} else if ( edit - > curs2 ) {
edit - > curs2 - - ;
buf = ( edit - > curs2 > > S_EDIT_BUF_SIZE ) ;
2000-10-30 21:07:19 +03:00
if ( write ( fd , ( char * ) edit - > buffers2 [ buf ] + EDIT_BUF_SIZE - ( edit - > curs2 & M_EDIT_BUF_SIZE ) - 1 , 1 + ( edit - > curs2 & M_EDIT_BUF_SIZE ) ) ! = 1 + ( edit - > curs2 & M_EDIT_BUF_SIZE ) ) {
2000-02-18 14:16:06 +03:00
filelen = - 1 ;
} else {
2000-09-15 14:10:18 +04:00
while ( - - buf > = 0 ) {
2000-10-30 21:07:19 +03:00
if ( write ( fd , ( char * ) edit - > buffers2 [ buf ] , EDIT_BUF_SIZE ) ! = EDIT_BUF_SIZE ) {
2000-02-18 14:16:06 +03:00
filelen = - 1 ;
break ;
}
}
}
edit - > curs2 + + ;
}
2000-09-15 14:10:18 +04:00
if ( close ( fd ) )
2000-07-20 02:23:58 +04:00
goto error_save ;
# endif /* CR_LF_TRANSLATION */
1998-09-15 00:18:54 +04:00
}
2000-02-18 14:16:06 +03:00
if ( filelen ! = edit - > last_byte )
goto error_save ;
if ( this_save_mode = = 2 )
if ( rename ( filename , catstrs ( filename , option_backup_ext , 0 ) ) = = - 1 )
goto error_save ;
if ( this_save_mode > 0 )
if ( rename ( savename , filename ) = = - 1 )
goto error_save ;
if ( savename )
free ( savename ) ;
return 1 ;
error_save :
if ( savename )
free ( savename ) ;
return 0 ;
1998-09-15 00:18:54 +04:00
}
# ifdef MIDNIGHT
/*
I changed this from Oleg ' s original routine so
that option_backup_ext works with coolwidgets as well . This
does mean there is a memory leak - paul .
*/
void menu_save_mode_cmd ( void )
{
2000-02-18 14:16:06 +03:00
# define DLG_X 38
1998-09-15 00:18:54 +04:00
# define DLG_Y 10
static char * str_result ;
static int save_mode_new ;
static char * str [ ] =
{
1999-02-27 00:14:52 +03:00
N_ ( " Quick save " ) ,
N_ ( " Safe save " ) ,
N_ ( " Do backups --> " ) } ;
1998-09-15 00:18:54 +04:00
static QuickWidget widgets [ ] =
{
2000-02-18 14:16:06 +03:00
{ quick_button , 18 , DLG_X , 7 , DLG_Y , N_ ( " &Cancel " ) , 0 ,
2001-04-07 01:48:11 +04:00
B_CANCEL , 0 , 0 , " c " } ,
2000-02-18 14:16:06 +03:00
{ quick_button , 6 , DLG_X , 7 , DLG_Y , N_ ( " &Ok " ) , 0 ,
2001-04-07 01:48:11 +04:00
B_ENTER , 0 , 0 , " o " } ,
2000-02-18 14:16:06 +03:00
{ quick_input , 23 , DLG_X , 5 , DLG_Y , 0 , 9 ,
2001-07-14 02:45:12 +04:00
0 , 0 , & str_result , " edit-backup-ext " } ,
2000-02-18 14:16:06 +03:00
{ quick_label , 22 , DLG_X , 4 , DLG_Y , N_ ( " Extension: " ) , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , 0 , " savemext " } ,
2000-02-18 14:16:06 +03:00
{ quick_radio , 4 , DLG_X , 3 , DLG_Y , " " , 3 ,
2001-04-07 01:48:11 +04:00
0 , & save_mode_new , str , " t " } ,
1998-09-15 00:18:54 +04:00
{ 0 } } ;
static QuickDialog dialog =
2000-02-18 14:16:06 +03:00
{ DLG_X , DLG_Y , - 1 , - 1 , N_ ( " Edit Save Mode " ) , " [Edit Save Mode] " ,
1998-09-15 00:18:54 +04:00
" esm " , widgets } ;
1999-03-11 00:56:08 +03:00
static int i18n_flag = 0 ;
1999-02-27 00:14:52 +03:00
if ( ! i18n_flag ) {
int i ;
2001-07-28 18:52:05 +04:00
int maxlen = 0 ;
int dlg_x ;
int l1 ;
/* Ok/Cancel buttons */
l1 = strlen ( _ ( widgets [ 0 ] . text ) ) + strlen ( _ ( widgets [ 1 ] . text ) ) + 5 ;
maxlen = max ( maxlen , l1 ) ;
1999-02-27 00:14:52 +03:00
2001-07-28 18:52:05 +04:00
for ( i = 0 ; i < 3 ; i + + ) {
1999-02-27 00:14:52 +03:00
str [ i ] = _ ( str [ i ] ) ;
2001-07-28 18:52:05 +04:00
maxlen = max ( maxlen , strlen ( str [ i ] ) + 7 ) ;
}
1999-02-27 00:14:52 +03:00
i18n_flag = 1 ;
2001-07-28 18:52:05 +04:00
dlg_x = maxlen + strlen ( _ ( widgets [ 3 ] . text ) ) + 5 + 1 ;
widgets [ 2 ] . hotkey_pos = strlen ( _ ( widgets [ 3 ] . text ) ) ; /* input field length */
dlg_x = min ( COLS , dlg_x ) ;
dialog . xlen = dlg_x ;
i = ( dlg_x - l1 ) / 3 ;
widgets [ 1 ] . relative_x = i ;
widgets [ 0 ] . relative_x = i + strlen ( _ ( widgets [ 1 ] . text ) ) + i + 4 ;
widgets [ 2 ] . relative_x = widgets [ 3 ] . relative_x = maxlen + 2 ;
for ( i = 0 ; i < sizeof ( widgets ) / sizeof ( widgets [ 0 ] ) ; i + + )
widgets [ i ] . x_divisions = dlg_x ;
1999-02-27 00:14:52 +03:00
}
1998-09-15 00:18:54 +04:00
widgets [ 2 ] . text = option_backup_ext ;
widgets [ 4 ] . value = option_save_mode ;
if ( quick_dialog ( & dialog ) ! = B_ENTER )
return ;
option_save_mode = save_mode_new ;
option_backup_ext = str_result ; /* this is a memory leak */
option_backup_ext_int = 0 ;
str_result [ min ( strlen ( str_result ) , sizeof ( int ) ) ] = ' \0 ' ;
memcpy ( ( char * ) & option_backup_ext_int , str_result , strlen ( option_backup_ext ) ) ;
}
2000-10-30 21:07:19 +03:00
void edit_split_filename ( WEdit * edit , const char * f )
1998-09-15 00:18:54 +04:00
{
if ( edit - > filename )
free ( edit - > filename ) ;
1999-07-22 00:03:23 +04:00
edit - > filename = ( char * ) strdup ( f ) ;
1998-09-15 00:18:54 +04:00
if ( edit - > dir )
free ( edit - > dir ) ;
1999-07-22 00:03:23 +04:00
edit - > dir = ( char * ) strdup ( " " ) ;
1998-09-15 00:18:54 +04:00
}
2000-09-07 21:18:32 +04:00
# else /* MIDNIGHT */
1998-09-15 00:18:54 +04:00
# ifdef GTK
2001-06-16 03:43:21 +04:00
static char * edit_canonicalize_pathname ( const char * p )
1998-09-15 00:18:54 +04:00
{
char * q , * r ;
2000-11-01 22:53:30 +03:00
char * t = NULL ;
2001-07-20 07:38:31 +04:00
char * cwd ;
1998-09-15 00:18:54 +04:00
if ( * p ! = ' / ' ) {
2001-07-20 07:38:31 +04:00
cwd = g_get_current_dir ( ) ;
t = g_malloc ( strlen ( cwd ) + strlen ( p ) + 2 ) ;
2000-11-01 22:53:30 +03:00
strcpy ( t , cwd ) ;
strcat ( t , " / " ) ;
strcat ( t , p ) ;
2001-07-20 07:38:31 +04:00
g_free ( cwd ) ;
2000-11-01 22:53:30 +03:00
p = t ;
1998-09-15 00:18:54 +04:00
}
2001-07-20 07:38:31 +04:00
1998-09-15 00:18:54 +04:00
r = q = malloc ( strlen ( p ) + 2 ) ;
2000-11-01 22:53:30 +03:00
while ( * p ) {
1998-09-15 00:18:54 +04:00
if ( * p ! = ' / ' ) {
* q + + = * p + + ;
} else {
while ( * p = = ' / ' ) {
* q = ' / ' ;
if ( ! strncmp ( p , " /./ " , 3 ) | | ! strcmp ( p , " /. " ) )
p + + ;
else if ( ! strncmp ( p , " /../ " , 4 ) | | ! strcmp ( p , " /.. " ) ) {
p + = 2 ;
* q = ' ' ;
q = strrchr ( r , ' / ' ) ;
if ( ! q ) {
q = r ;
* q = ' / ' ;
}
}
p + + ;
}
q + + ;
}
}
2001-07-20 07:38:31 +04:00
g_free ( t ) ;
2000-11-01 22:53:30 +03:00
* q = ' \0 ' ;
1998-09-15 00:18:54 +04:00
/* get rid of trailing / */
if ( r [ 0 ] & & r [ 1 ] )
if ( * - - q = = ' / ' )
* q = ' \0 ' ;
return r ;
}
# endif /* GTK */
2000-10-31 22:24:52 +03:00
void edit_split_filename ( WEdit * edit , const char * longname )
1998-09-15 00:18:54 +04:00
{
char * exp , * p ;
2000-09-07 21:18:32 +04:00
# ifdef GTK
2001-06-16 03:43:21 +04:00
exp = edit_canonicalize_pathname ( longname ) ;
2000-02-18 14:16:06 +03:00
# else
exp = pathdup ( longname ) ; /* this ensures a full path */
# endif
1998-09-15 00:18:54 +04:00
if ( edit - > filename )
free ( edit - > filename ) ;
if ( edit - > dir )
free ( edit - > dir ) ;
p = strrchr ( exp , ' / ' ) ;
1999-07-22 00:03:23 +04:00
edit - > filename = ( char * ) strdup ( + + p ) ;
1998-09-15 00:18:54 +04:00
* p = 0 ;
1999-07-22 00:03:23 +04:00
edit - > dir = ( char * ) strdup ( exp ) ;
1998-09-15 00:18:54 +04:00
free ( exp ) ;
}
# endif /* ! MIDNIGHT */
/* here we want to warn the user of overwriting an existing file, but only if they
have made a change to the filename */
/* returns 1 on success */
int edit_save_as_cmd ( WEdit * edit )
{
/* This heads the 'Save As' dialog box */
char * exp = 0 ;
int different_filename = 0 ;
exp = edit_get_save_file ( edit - > dir , edit - > filename , _ ( " Save As " ) ) ;
edit_push_action ( edit , KEY_PRESS + edit - > start_display ) ;
if ( exp ) {
if ( ! * exp ) {
free ( exp ) ;
1999-07-22 00:03:23 +04:00
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
return 0 ;
} else {
if ( strcmp ( catstrs ( edit - > dir , edit - > filename , 0 ) , exp ) ) {
int file ;
different_filename = 1 ;
if ( ( file = open ( ( char * ) exp , O_RDONLY ) ) ! = - 1 ) { /* the file exists */
close ( file ) ;
if ( edit_query_dialog2 ( _ ( " Warning " ) ,
_ ( " A file already exists with this name. " ) ,
/* Push buttons to over-write the current file, or cancel the operation */
1999-07-22 00:03:23 +04:00
_ ( " Overwrite " ) , _ ( " Cancel " ) ) ) {
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
return 0 ;
1999-07-22 00:03:23 +04:00
}
1998-09-15 00:18:54 +04:00
}
}
if ( edit_save_file ( edit , exp ) ) {
edit_split_filename ( edit , exp ) ;
free ( exp ) ;
edit - > modified = 0 ;
# if defined(MIDNIGHT) || defined(GTK)
edit - > delete_file = 0 ;
# endif
if ( different_filename & & ! edit - > explicit_syntax )
edit_load_syntax ( edit , 0 , 0 ) ;
1999-07-22 00:03:23 +04:00
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
return 1 ;
} else {
free ( exp ) ;
edit_error_dialog ( _ ( " Save as " ) , get_sys_error ( _ ( " Error trying to save file. " ) ) ) ;
1999-07-22 00:03:23 +04:00
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
return 0 ;
}
}
1999-07-22 00:03:23 +04:00
}
edit - > force | = REDRAW_COMPLETELY ;
return 0 ;
1998-09-15 00:18:54 +04:00
}
/* {{{ Macro stuff starts here */
# ifdef MIDNIGHT
int raw_callback ( struct Dlg_head * h , int key , int Msg )
{
switch ( Msg ) {
case DLG_DRAW :
attrset ( REVERSE_COLOR ) ;
dlg_erase ( h ) ;
draw_box ( h , 1 , 1 , h - > lines - 2 , h - > cols - 2 ) ;
attrset ( COLOR_HOT_NORMAL ) ;
dlg_move ( h , 1 , 2 ) ;
printw ( h - > title ) ;
break ;
case DLG_KEY :
h - > running = 0 ;
h - > ret_value = key ;
return 1 ;
}
return 0 ;
}
/* gets a raw key from the keyboard. Passing cancel = 1 draws
a cancel button thus allowing c - c etc . . Alternatively , cancel = 0
will return the next key pressed */
int edit_raw_key_query ( char * heading , char * query , int cancel )
{
int w = strlen ( query ) + 7 ;
struct Dlg_head * raw_dlg = create_dlg ( 0 , 0 , 7 , w , dialog_colors ,
/* NLS ? */
raw_callback , " [Raw Key Query] " ,
" raw_key_input " ,
DLG_CENTER | DLG_TRYUP ) ;
x_set_dialog_title ( raw_dlg , heading ) ;
raw_dlg - > raw = 1 ; /* to return even a tab key */
if ( cancel )
1999-03-11 00:56:08 +03:00
add_widget ( raw_dlg , button_new ( 4 , w / 2 - 5 , B_CANCEL , NORMAL_BUTTON , _ ( " Cancel " ) , 0 , 0 , 0 ) ) ;
1998-09-15 00:18:54 +04:00
add_widget ( raw_dlg , label_new ( 3 - cancel , 2 , query , 0 ) ) ;
add_widget ( raw_dlg , input_new ( 3 - cancel , w - 5 , INPUT_COLOR , 2 , " " , 0 ) ) ;
run_dlg ( raw_dlg ) ;
w = raw_dlg - > ret_value ;
destroy_dlg ( raw_dlg ) ;
if ( cancel )
if ( w = = XCTRL ( ' g ' ) | | w = = XCTRL ( ' c ' ) | | w = = ESC_CHAR | | w = = B_CANCEL )
return 0 ;
/* hence ctrl-a (=B_CANCEL), ctrl-g, ctrl-c, and Esc are cannot returned */
return w ;
}
2000-09-07 21:18:32 +04:00
# else /* MIDNIGHT */
1998-09-15 00:18:54 +04:00
int edit_raw_key_query ( char * heading , char * query , int cancel )
{
# ifdef GTK
/* *** */
return 0 ;
# else
return CKeySymMod ( CRawkeyQuery ( 0 , 0 , 0 , heading , query ) ) ;
# endif
}
2000-09-07 21:18:32 +04:00
# endif /* MIDNIGHT */
1998-09-15 00:18:54 +04:00
/* creates a macro file if it doesn't exist */
static FILE * edit_open_macro_file ( const char * r )
{
char * filename ;
int file ;
filename = catstrs ( home_dir , MACRO_FILE , 0 ) ;
if ( ( file = open ( filename , O_CREAT | O_RDWR , S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH ) ) = = - 1 )
return 0 ;
close ( file ) ;
return fopen ( filename , r ) ;
}
# define MAX_MACROS 1024
static int saved_macro [ MAX_MACROS + 1 ] =
{ 0 , 0 } ;
static int saved_macros_loaded = 0 ;
/*
This is just to stop the macro file be loaded over and over for keys
that aren ' t defined to anything . On slow systems this could be annoying .
*/
int macro_exists ( int k )
{
int i ;
for ( i = 0 ; i < MAX_MACROS & & saved_macro [ i ] ; i + + )
if ( saved_macro [ i ] = = k )
return i ;
return - 1 ;
}
/* returns 1 on error */
int edit_delete_macro ( WEdit * edit , int k )
{
struct macro macro [ MAX_MACRO_LENGTH ] ;
FILE * f , * g ;
int s , i , n , j = 0 ;
if ( saved_macros_loaded )
if ( ( j = macro_exists ( k ) ) < 0 )
return 0 ;
g = fopen ( catstrs ( home_dir , TEMP_FILE , 0 ) , " w " ) ;
if ( ! g ) {
/* This heads the delete macro error dialog box */
edit_error_dialog ( _ ( " Delete macro " ) ,
/* 'Open' = load temp file */
get_sys_error ( _ ( " Error trying to open temp file " ) ) ) ;
return 1 ;
}
f = edit_open_macro_file ( " r " ) ;
if ( ! f ) {
/* This heads the delete macro error dialog box */
edit_error_dialog ( _ ( " Delete macro " ) ,
/* 'Open' = load temp file */
get_sys_error ( _ ( " Error trying to open macro file " ) ) ) ;
fclose ( g ) ;
return 1 ;
}
for ( ; ; ) {
2000-09-15 14:43:22 +04:00
n = fscanf ( f , ( " key '%d 0': " ) , & s ) ;
1998-09-15 00:18:54 +04:00
if ( ! n | | n = = EOF )
break ;
n = 0 ;
while ( fscanf ( f , " %hd %hd, " , & macro [ n ] . command , & macro [ n ] . ch ) )
n + + ;
fscanf ( f , " ; \n " ) ;
if ( s ! = k ) {
2000-09-15 14:43:22 +04:00
fprintf ( g , ( " key '%d 0': " ) , s ) ;
1998-09-15 00:18:54 +04:00
for ( i = 0 ; i < n ; i + + )
fprintf ( g , " %hd %hd, " , macro [ i ] . command , macro [ i ] . ch ) ;
fprintf ( g , " ; \n " ) ;
}
2000-09-07 21:18:32 +04:00
}
1998-09-15 00:18:54 +04:00
fclose ( f ) ;
fclose ( g ) ;
if ( rename ( catstrs ( home_dir , TEMP_FILE , 0 ) , catstrs ( home_dir , MACRO_FILE , 0 ) ) = = - 1 ) {
/* This heads the delete macro error dialog box */
edit_error_dialog ( _ ( " Delete macro " ) ,
get_sys_error ( _ ( " Error trying to overwrite macro file " ) ) ) ;
return 1 ;
}
if ( saved_macros_loaded )
memmove ( saved_macro + j , saved_macro + j + 1 , sizeof ( int ) * ( MAX_MACROS - j - 1 ) ) ;
return 0 ;
}
/* returns 0 on error */
int edit_save_macro_cmd ( WEdit * edit , struct macro macro [ ] , int n )
{
FILE * f ;
int s , i ;
edit_push_action ( edit , KEY_PRESS + edit - > start_display ) ;
/* This heads the 'Macro' dialog box */
s = edit_raw_key_query ( _ ( " Macro " ) ,
/* Input line for a single key press follows the ':' */
_ ( " Press the macro's new hotkey: " ) , 1 ) ;
1999-07-22 00:03:23 +04:00
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
if ( s ) {
if ( edit_delete_macro ( edit , s ) )
return 0 ;
f = edit_open_macro_file ( " a+ " ) ;
if ( f ) {
2000-09-15 14:43:22 +04:00
fprintf ( f , ( " key '%d 0': " ) , s ) ;
1998-09-15 00:18:54 +04:00
for ( i = 0 ; i < n ; i + + )
fprintf ( f , " %hd %hd, " , macro [ i ] . command , macro [ i ] . ch ) ;
fprintf ( f , " ; \n " ) ;
fclose ( f ) ;
if ( saved_macros_loaded ) {
for ( i = 0 ; i < MAX_MACROS & & saved_macro [ i ] ; i + + ) ;
saved_macro [ i ] = s ;
}
return 1 ;
} else
/* This heads the 'Save Macro' dialog box */
edit_error_dialog ( _ ( " Save macro " ) , get_sys_error ( _ ( " Error trying to open macro file " ) ) ) ;
}
return 0 ;
}
void edit_delete_macro_cmd ( WEdit * edit )
{
int command ;
# ifdef MIDNIGHT
2001-02-26 22:51:56 +03:00
command = edit_raw_key_query ( _ ( " Delete Macro " ) ,
_ ( " Press macro hotkey: " ) , 1 ) ;
1998-09-15 00:18:54 +04:00
# else
/* This heads the 'Delete Macro' dialog box */
# ifdef GTK
/* *** */
command = 0 ;
# else
1999-07-22 00:03:23 +04:00
command = CKeySymMod ( CRawkeyQuery ( 0 , 0 , 0 , _ ( " Delete Macro " ) ,
1998-09-15 00:18:54 +04:00
/* Input line for a single key press follows the ':' */
1999-07-22 00:03:23 +04:00
_ ( " Press macro hotkey: " ) ) ) ;
1998-09-15 00:18:54 +04:00
# endif
# endif
1999-07-22 00:03:23 +04:00
if ( ! command )
1998-09-15 00:18:54 +04:00
return ;
1999-07-22 00:03:23 +04:00
edit_delete_macro ( edit , command ) ;
1998-09-15 00:18:54 +04:00
}
/* return 0 on error */
int edit_load_macro_cmd ( WEdit * edit , struct macro macro [ ] , int * n , int k )
{
FILE * f ;
int s , i = 0 , found = 0 ;
if ( saved_macros_loaded )
if ( macro_exists ( k ) < 0 )
return 0 ;
if ( ( f = edit_open_macro_file ( " r " ) ) ) {
struct macro dummy ;
do {
int u ;
2000-09-15 14:43:22 +04:00
u = fscanf ( f , ( " key '%d 0': " ) , & s ) ;
1998-09-15 00:18:54 +04:00
if ( ! u | | u = = EOF )
break ;
if ( ! saved_macros_loaded )
saved_macro [ i + + ] = s ;
if ( ! found ) {
* n = 0 ;
while ( * n < MAX_MACRO_LENGTH & & 2 = = fscanf ( f , " %hd %hd, " , & macro [ * n ] . command , & macro [ * n ] . ch ) )
( * n ) + + ;
} else {
while ( 2 = = fscanf ( f , " %hd %hd, " , & dummy . command , & dummy . ch ) ) ;
}
fscanf ( f , " ; \n " ) ;
if ( s = = k )
found = 1 ;
} while ( ! found | | ! saved_macros_loaded ) ;
if ( ! saved_macros_loaded ) {
saved_macro [ i ] = 0 ;
saved_macros_loaded = 1 ;
}
fclose ( f ) ;
return found ;
} else
/* This heads the 'Load Macro' dialog box */
edit_error_dialog ( _ ( " Load macro " ) ,
get_sys_error ( _ ( " Error trying to open macro file " ) ) ) ;
return 0 ;
}
/* }}} Macro stuff starts here */
/* returns 1 on success */
int edit_save_confirm_cmd ( WEdit * edit )
{
char * f ;
if ( edit_confirm_save ) {
# ifdef MIDNIGHT
f = catstrs ( _ ( " Confirm save file? : " ) , edit - > filename , " " , 0 ) ;
# else
f = catstrs ( _ ( " Confirm save file? : " ) , edit - > dir , edit - > filename , " " , 0 ) ;
# endif
/* Buttons to 'Confirm save file' query */
if ( edit_query_dialog2 ( _ ( " Save file " ) , f , _ ( " Save " ) , _ ( " Cancel " ) ) )
return 0 ;
}
return edit_save_cmd ( edit ) ;
}
/* returns 1 on success */
int edit_save_cmd ( WEdit * edit )
{
if ( ! edit_save_file ( edit , catstrs ( edit - > dir , edit - > filename , 0 ) ) )
return edit_save_as_cmd ( edit ) ;
1999-07-22 00:03:23 +04:00
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
edit - > modified = 0 ;
# if defined(MIDNIGHT) || defined(GTK)
edit - > delete_file = 0 ;
# endif
return 1 ;
}
/* returns 1 on success */
int edit_new_cmd ( WEdit * edit )
{
1999-07-22 00:03:23 +04:00
if ( edit - > modified ) {
if ( edit_query_dialog2 ( _ ( " Warning " ) , _ ( " Current text was modified without a file save. \n Continue discards these changes. " ) , _ ( " Continue " ) , _ ( " Cancel " ) ) ) {
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
return 0 ;
1999-07-22 00:03:23 +04:00
}
}
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
edit - > modified = 0 ;
return edit_renew ( edit ) ; /* if this gives an error, something has really screwed up */
}
/* returns 1 on error */
2000-02-18 14:16:06 +03:00
int edit_load_file_from_filename ( WEdit * edit , char * exp )
1998-09-15 00:18:54 +04:00
{
2000-02-18 14:16:06 +03:00
if ( ! edit_reload ( edit , exp , 0 , " " , 0 ) )
return 1 ;
edit_split_filename ( edit , exp ) ;
edit - > modified = 0 ;
return 0 ;
1998-09-15 00:18:54 +04:00
}
int edit_load_cmd ( WEdit * edit )
{
char * exp ;
1999-07-22 00:03:23 +04:00
if ( edit - > modified ) {
if ( edit_query_dialog2 ( _ ( " Warning " ) , _ ( " Current text was modified without a file save. \n Continue discards these changes. " ) , _ ( " Continue " ) , _ ( " Cancel " ) ) ) {
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
return 0 ;
1999-07-22 00:03:23 +04:00
}
}
1998-09-15 00:18:54 +04:00
1999-03-21 04:56:20 +03:00
exp = edit_get_load_file ( edit - > dir , edit - > filename , _ ( " Load " ) ) ;
1998-09-15 00:18:54 +04:00
if ( exp ) {
if ( * exp )
edit_load_file_from_filename ( edit , exp ) ;
free ( exp ) ;
}
1999-07-22 00:03:23 +04:00
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
return 0 ;
}
/*
if mark2 is - 1 then marking is from mark1 to the cursor .
Otherwise its between the markers . This handles this .
Returns 1 if no text is marked .
*/
int eval_marks ( WEdit * edit , long * start_mark , long * end_mark )
{
if ( edit - > mark1 ! = edit - > mark2 ) {
if ( edit - > mark2 > = 0 ) {
* start_mark = min ( edit - > mark1 , edit - > mark2 ) ;
* end_mark = max ( edit - > mark1 , edit - > mark2 ) ;
} else {
* start_mark = min ( edit - > mark1 , edit - > curs1 ) ;
* end_mark = max ( edit - > mark1 , edit - > curs1 ) ;
edit - > column2 = edit - > curs_col ;
}
return 0 ;
} else {
* start_mark = * end_mark = 0 ;
edit - > column2 = edit - > column1 = 0 ;
return 1 ;
}
}
/*Block copy, move and delete commands */
extern int column_highlighting ;
# ifdef MIDNIGHT
# define space_width 1
# else
extern int space_width ;
# endif
void edit_insert_column_of_text ( WEdit * edit , unsigned char * data , int size , int width )
{
long cursor ;
int i , col ;
cursor = edit - > curs1 ;
col = edit_get_col ( edit ) ;
for ( i = 0 ; i < size ; i + + ) {
if ( data [ i ] = = ' \n ' ) { /* fill in and move to next line */
int l ;
long p ;
if ( edit_get_byte ( edit , edit - > curs1 ) ! = ' \n ' ) {
l = width - ( edit_get_col ( edit ) - col ) ;
while ( l > 0 ) {
edit_insert ( edit , ' ' ) ;
l - = space_width ;
}
}
for ( p = edit - > curs1 ; ; p + + ) {
if ( p = = edit - > last_byte )
edit_insert_ahead ( edit , ' \n ' ) ;
if ( edit_get_byte ( edit , p ) = = ' \n ' ) {
p + + ;
break ;
}
}
edit_cursor_move ( edit , edit_move_forward3 ( edit , p , col , 0 ) - edit - > curs1 ) ;
l = col - edit_get_col ( edit ) ;
while ( l > = space_width ) {
edit_insert ( edit , ' ' ) ;
l - = space_width ;
}
continue ;
}
edit_insert ( edit , data [ i ] ) ;
}
edit_cursor_move ( edit , cursor - edit - > curs1 ) ;
}
void edit_block_copy_cmd ( WEdit * edit )
{
long start_mark , end_mark , current = edit - > curs1 ;
int size , x ;
unsigned char * copy_buf ;
edit_update_curs_col ( edit ) ;
x = edit - > curs_col ;
if ( eval_marks ( edit , & start_mark , & end_mark ) )
return ;
if ( column_highlighting )
if ( ( x > = edit - > column1 & & x < edit - > column2 ) | | ( x > edit - > column2 & & x < = edit - > column1 ) )
return ;
copy_buf = edit_get_block ( edit , start_mark , end_mark , & size ) ;
/* all that gets pushed are deletes hence little space is used on the stack */
edit_push_markers ( edit ) ;
if ( column_highlighting ) {
edit_insert_column_of_text ( edit , copy_buf , size , abs ( edit - > column2 - edit - > column1 ) ) ;
} else {
while ( size - - )
edit_insert_ahead ( edit , copy_buf [ size ] ) ;
}
free ( copy_buf ) ;
edit_scroll_screen_over_cursor ( edit ) ;
if ( column_highlighting ) {
edit_set_markers ( edit , 0 , 0 , 0 , 0 ) ;
edit_push_action ( edit , COLUMN_ON ) ;
column_highlighting = 0 ;
} else if ( start_mark < current & & end_mark > current )
edit_set_markers ( edit , start_mark , end_mark + end_mark - start_mark , 0 , 0 ) ;
edit - > force | = REDRAW_PAGE ;
}
void edit_block_move_cmd ( WEdit * edit )
{
long count ;
long current ;
unsigned char * copy_buf ;
long start_mark , end_mark ;
int deleted = 0 ;
int x = 0 ;
if ( eval_marks ( edit , & start_mark , & end_mark ) )
return ;
if ( column_highlighting ) {
edit_update_curs_col ( edit ) ;
x = edit - > curs_col ;
if ( start_mark < = edit - > curs1 & & end_mark > = edit - > curs1 )
if ( ( x > edit - > column1 & & x < edit - > column2 ) | | ( x > edit - > column2 & & x < edit - > column1 ) )
return ;
} else if ( start_mark < = edit - > curs1 & & end_mark > = edit - > curs1 )
return ;
if ( ( end_mark - start_mark ) > option_max_undo / 2 )
1999-03-21 04:56:20 +03:00
if ( edit_query_dialog2 ( _ ( " Warning " ) , _ ( " Block is large, you may not be able to undo this action. " ) , _ ( " Continue " ) , _ ( " Cancel " ) ) )
1998-09-15 00:18:54 +04:00
return ;
edit_push_markers ( edit ) ;
current = edit - > curs1 ;
if ( column_highlighting ) {
int size , c1 , c2 , line ;
line = edit - > curs_line ;
if ( edit - > mark2 < 0 )
edit_mark_cmd ( edit , 0 ) ;
c1 = min ( edit - > column1 , edit - > column2 ) ;
c2 = max ( edit - > column1 , edit - > column2 ) ;
copy_buf = edit_get_block ( edit , start_mark , end_mark , & size ) ;
if ( x < c2 ) {
edit_block_delete_cmd ( edit ) ;
deleted = 1 ;
}
edit_move_to_line ( edit , line ) ;
edit_cursor_move ( edit , edit_move_forward3 ( edit , edit_bol ( edit , edit - > curs1 ) , x , 0 ) - edit - > curs1 ) ;
edit_insert_column_of_text ( edit , copy_buf , size , c2 - c1 ) ;
if ( ! deleted ) {
line = edit - > curs_line ;
edit_update_curs_col ( edit ) ;
x = edit - > curs_col ;
edit_block_delete_cmd ( edit ) ;
edit_move_to_line ( edit , line ) ;
edit_cursor_move ( edit , edit_move_forward3 ( edit , edit_bol ( edit , edit - > curs1 ) , x , 0 ) - edit - > curs1 ) ;
}
edit_set_markers ( edit , 0 , 0 , 0 , 0 ) ;
edit_push_action ( edit , COLUMN_ON ) ;
column_highlighting = 0 ;
} else {
copy_buf = malloc ( end_mark - start_mark ) ;
edit_cursor_move ( edit , start_mark - edit - > curs1 ) ;
edit_scroll_screen_over_cursor ( edit ) ;
count = start_mark ;
while ( count < end_mark ) {
copy_buf [ end_mark - count - 1 ] = edit_delete ( edit ) ;
count + + ;
}
edit_scroll_screen_over_cursor ( edit ) ;
edit_cursor_move ( edit , current - edit - > curs1 - ( ( ( current - edit - > curs1 ) > 0 ) ? end_mark - start_mark : 0 ) ) ;
edit_scroll_screen_over_cursor ( edit ) ;
while ( count - - > start_mark )
edit_insert_ahead ( edit , copy_buf [ end_mark - count - 1 ] ) ;
edit_set_markers ( edit , edit - > curs1 , edit - > curs1 + end_mark - start_mark , 0 , 0 ) ;
}
edit_scroll_screen_over_cursor ( edit ) ;
free ( copy_buf ) ;
edit - > force | = REDRAW_PAGE ;
}
void edit_cursor_to_bol ( WEdit * edit ) ;
void edit_delete_column_of_text ( WEdit * edit )
{
long p , q , r , m1 , m2 ;
int b , c , d ;
int n ;
eval_marks ( edit , & m1 , & m2 ) ;
n = edit_move_forward ( edit , m1 , 0 , m2 ) + 1 ;
c = edit_move_forward3 ( edit , edit_bol ( edit , m1 ) , 0 , m1 ) ;
d = edit_move_forward3 ( edit , edit_bol ( edit , m2 ) , 0 , m2 ) ;
b = min ( c , d ) ;
c = max ( c , d ) ;
while ( n - - ) {
r = edit_bol ( edit , edit - > curs1 ) ;
p = edit_move_forward3 ( edit , r , b , 0 ) ;
q = edit_move_forward3 ( edit , r , c , 0 ) ;
if ( p < m1 )
p = m1 ;
if ( q > m2 )
q = m2 ;
edit_cursor_move ( edit , p - edit - > curs1 ) ;
while ( q > p ) { /* delete line between margins */
if ( edit_get_byte ( edit , edit - > curs1 ) ! = ' \n ' )
edit_delete ( edit ) ;
q - - ;
}
if ( n ) /* move to next line except on the last delete */
edit_cursor_move ( edit , edit_move_forward ( edit , edit - > curs1 , 1 , 0 ) - edit - > curs1 ) ;
}
}
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
/* if success return 0 */
1998-09-15 00:18:54 +04:00
int edit_block_delete ( WEdit * edit )
{
long count ;
long start_mark , end_mark ;
if ( eval_marks ( edit , & start_mark , & end_mark ) )
return 0 ;
if ( column_highlighting & & edit - > mark2 < 0 )
edit_mark_cmd ( edit , 0 ) ;
if ( ( end_mark - start_mark ) > option_max_undo / 2 )
/* Warning message with a query to continue or cancel the operation */
1999-03-21 04:56:20 +03:00
if ( edit_query_dialog2 ( _ ( " Warning " ) , _ ( " Block is large, you may not be able to undo this action. " ) , _ ( " Continue " ) , _ ( " Cancel " ) ) )
1998-09-15 00:18:54 +04:00
return 1 ;
edit_push_markers ( edit ) ;
edit_cursor_move ( edit , start_mark - edit - > curs1 ) ;
edit_scroll_screen_over_cursor ( edit ) ;
count = start_mark ;
if ( start_mark < end_mark ) {
if ( column_highlighting ) {
if ( edit - > mark2 < 0 )
edit_mark_cmd ( edit , 0 ) ;
edit_delete_column_of_text ( edit ) ;
} else {
while ( count < end_mark ) {
edit_delete ( edit ) ;
count + + ;
}
}
}
edit_set_markers ( edit , 0 , 0 , 0 , 0 ) ;
edit - > force | = REDRAW_PAGE ;
return 0 ;
}
/* returns 1 if canceelled by user */
int edit_block_delete_cmd ( WEdit * edit )
{
long start_mark , end_mark ;
if ( eval_marks ( edit , & start_mark , & end_mark ) ) {
edit_delete_line ( edit ) ;
return 0 ;
}
return edit_block_delete ( edit ) ;
}
# ifdef MIDNIGHT
# define INPUT_INDEX 9
1999-02-27 00:14:52 +03:00
# define SEARCH_DLG_WIDTH 58
1998-09-15 00:18:54 +04:00
# define SEARCH_DLG_HEIGHT 10
1999-02-27 00:14:52 +03:00
# define REPLACE_DLG_WIDTH 58
1998-09-15 00:18:54 +04:00
# define REPLACE_DLG_HEIGHT 15
1999-07-22 00:03:23 +04:00
# define CONFIRM_DLG_WIDTH 79
1999-03-11 00:56:08 +03:00
# define CONFIRM_DLG_HEIGTH 6
1998-09-15 00:18:54 +04:00
# define B_REPLACE_ALL B_USER+1
1999-07-22 00:03:23 +04:00
# define B_REPLACE_ONE B_USER+2
# define B_SKIP_REPLACE B_USER+3
1998-09-15 00:18:54 +04:00
int edit_replace_prompt ( WEdit * edit , char * replace_text , int xpos , int ypos )
{
2000-02-18 14:16:06 +03:00
QuickWidget quick_widgets [ ] =
{
{ quick_button , 63 , CONFIRM_DLG_WIDTH , 3 , CONFIRM_DLG_HEIGTH , N_ ( " &Cancel " ) ,
2001-04-07 01:48:11 +04:00
0 , B_CANCEL , 0 , 0 , NULL } ,
2000-02-18 14:16:06 +03:00
{ quick_button , 50 , CONFIRM_DLG_WIDTH , 3 , CONFIRM_DLG_HEIGTH , N_ ( " o&Ne " ) ,
2001-04-07 01:48:11 +04:00
0 , B_REPLACE_ONE , 0 , 0 , NULL } ,
2000-02-18 14:16:06 +03:00
{ quick_button , 37 , CONFIRM_DLG_WIDTH , 3 , CONFIRM_DLG_HEIGTH , N_ ( " al&L " ) ,
2001-04-07 01:48:11 +04:00
0 , B_REPLACE_ALL , 0 , 0 , NULL } ,
2000-02-18 14:16:06 +03:00
{ quick_button , 21 , CONFIRM_DLG_WIDTH , 3 , CONFIRM_DLG_HEIGTH , N_ ( " &Skip " ) ,
2001-04-07 01:48:11 +04:00
0 , B_SKIP_REPLACE , 0 , 0 , NULL } ,
2000-02-18 14:16:06 +03:00
{ quick_button , 4 , CONFIRM_DLG_WIDTH , 3 , CONFIRM_DLG_HEIGTH , N_ ( " &Replace " ) ,
2001-04-07 01:48:11 +04:00
0 , B_ENTER , 0 , 0 , NULL } ,
2000-02-18 14:16:06 +03:00
{ quick_label , 2 , CONFIRM_DLG_WIDTH , 2 , CONFIRM_DLG_HEIGTH , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , 0 , 0 , 0 } ,
2000-02-18 14:16:06 +03:00
{ 0 } } ;
2001-06-06 03:02:08 +04:00
# ifndef HAVE_CHARSET
2000-03-02 03:49:16 +03:00
quick_widgets [ 5 ] . text = catstrs ( _ ( " Replace with: " ) , replace_text , 0 ) ;
2001-06-06 03:02:08 +04:00
# else
char * msg ;
quick_widgets [ 5 ] . text = catstrs ( msg = _ ( " Replace with: " ) , replace_text , 0 ) ;
if ( * replace_text )
convert_to_display ( quick_widgets [ 5 ] . text + strlen ( msg ) ) ;
# endif
2000-02-18 14:16:06 +03:00
{
QuickDialog Quick_input =
{ CONFIRM_DLG_WIDTH , CONFIRM_DLG_HEIGTH , 0 , 0 , N_ ( " Confirm replace " ) ,
" [Input Line Keys] " , " quick_input " , 0 /*quick_widgets */ } ;
Quick_input . widgets = quick_widgets ;
Quick_input . xpos = xpos ;
2000-09-15 14:10:18 +04:00
/* Sometimes menu can hide replaced text. I don't like it */
2001-08-06 19:27:47 +04:00
if ( ( edit - > curs_row > = ypos - 1 ) & & ( edit - > curs_row < = ypos + CONFIRM_DLG_HEIGTH - 1 ) )
2000-09-15 14:10:18 +04:00
ypos - = CONFIRM_DLG_HEIGTH ;
2000-02-18 14:16:06 +03:00
Quick_input . ypos = ypos ;
return quick_dialog ( & Quick_input ) ;
}
1998-09-15 00:18:54 +04:00
}
void edit_replace_dialog ( WEdit * edit , char * * search_text , char * * replace_text , char * * arg_order )
{
int treplace_scanf = replace_scanf ;
int treplace_regexp = replace_regexp ;
int treplace_all = replace_all ;
int treplace_prompt = replace_prompt ;
int treplace_backwards = replace_backwards ;
int treplace_whole = replace_whole ;
int treplace_case = replace_case ;
char * tsearch_text ;
char * treplace_text ;
char * targ_order ;
QuickWidget quick_widgets [ ] =
{
1999-02-27 00:14:52 +03:00
{ quick_button , 6 , 10 , 12 , REPLACE_DLG_HEIGHT , N_ ( " &Cancel " ) , 0 , B_CANCEL , 0 ,
2001-04-07 01:48:11 +04:00
0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_button , 2 , 10 , 12 , REPLACE_DLG_HEIGHT , N_ ( " &Ok " ) , 0 , B_ENTER , 0 ,
2001-04-07 01:48:11 +04:00
0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 33 , REPLACE_DLG_WIDTH , 11 , REPLACE_DLG_HEIGHT , N_ ( " scanf &Expression " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 33 , REPLACE_DLG_WIDTH , 10 , REPLACE_DLG_HEIGHT , N_ ( " replace &All " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 33 , REPLACE_DLG_WIDTH , 9 , REPLACE_DLG_HEIGHT , N_ ( " pr&Ompt on replace " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 4 , REPLACE_DLG_WIDTH , 11 , REPLACE_DLG_HEIGHT , N_ ( " &Backwards " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 4 , REPLACE_DLG_WIDTH , 10 , REPLACE_DLG_HEIGHT , N_ ( " &Regular expression " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 4 , REPLACE_DLG_WIDTH , 9 , REPLACE_DLG_HEIGHT , N_ ( " &Whole words only " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 4 , REPLACE_DLG_WIDTH , 8 , REPLACE_DLG_HEIGHT , N_ ( " case &Sensitive " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_input , 3 , REPLACE_DLG_WIDTH , 7 , REPLACE_DLG_HEIGHT , " " , 52 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , " edit-argord " } ,
1999-02-27 00:14:52 +03:00
{ quick_label , 2 , REPLACE_DLG_WIDTH , 6 , REPLACE_DLG_HEIGHT , N_ ( " Enter replacement argument order eg. 3,2,1,4 " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , 0 } ,
1999-02-27 00:14:52 +03:00
{ quick_input , 3 , REPLACE_DLG_WIDTH , 5 , REPLACE_DLG_HEIGHT , " " , 52 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , " edit-replace " } ,
1999-02-27 00:14:52 +03:00
{ quick_label , 2 , REPLACE_DLG_WIDTH , 4 , REPLACE_DLG_HEIGHT , N_ ( " Enter replacement string: " ) , 0 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 } ,
1999-02-27 00:14:52 +03:00
{ quick_input , 3 , REPLACE_DLG_WIDTH , 3 , REPLACE_DLG_HEIGHT , " " , 52 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , " edit-search " } ,
1999-02-27 00:14:52 +03:00
{ quick_label , 2 , REPLACE_DLG_WIDTH , 2 , REPLACE_DLG_HEIGHT , N_ ( " Enter search string: " ) , 0 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 } ,
1998-09-15 00:18:54 +04:00
{ 0 } } ;
quick_widgets [ 2 ] . result = & treplace_scanf ;
quick_widgets [ 3 ] . result = & treplace_all ;
quick_widgets [ 4 ] . result = & treplace_prompt ;
quick_widgets [ 5 ] . result = & treplace_backwards ;
quick_widgets [ 6 ] . result = & treplace_regexp ;
quick_widgets [ 7 ] . result = & treplace_whole ;
quick_widgets [ 8 ] . result = & treplace_case ;
quick_widgets [ 9 ] . str_result = & targ_order ;
quick_widgets [ 9 ] . text = * arg_order ;
quick_widgets [ 11 ] . str_result = & treplace_text ;
quick_widgets [ 11 ] . text = * replace_text ;
quick_widgets [ 13 ] . str_result = & tsearch_text ;
quick_widgets [ 13 ] . text = * search_text ;
{
QuickDialog Quick_input =
1999-02-27 00:14:52 +03:00
{ REPLACE_DLG_WIDTH , REPLACE_DLG_HEIGHT , - 1 , 0 , N_ ( " Replace " ) ,
1998-09-15 00:18:54 +04:00
" [Input Line Keys] " , " quick_input " , 0 /*quick_widgets */ } ;
Quick_input . widgets = quick_widgets ;
if ( quick_dialog ( & Quick_input ) ! = B_CANCEL ) {
* arg_order = * ( quick_widgets [ INPUT_INDEX ] . str_result ) ;
* replace_text = * ( quick_widgets [ INPUT_INDEX + 2 ] . str_result ) ;
* search_text = * ( quick_widgets [ INPUT_INDEX + 4 ] . str_result ) ;
replace_scanf = treplace_scanf ;
replace_backwards = treplace_backwards ;
replace_regexp = treplace_regexp ;
replace_all = treplace_all ;
replace_prompt = treplace_prompt ;
replace_whole = treplace_whole ;
replace_case = treplace_case ;
return ;
} else {
* arg_order = NULL ;
* replace_text = NULL ;
* search_text = NULL ;
return ;
}
}
}
void edit_search_dialog ( WEdit * edit , char * * search_text )
{
int treplace_scanf = replace_scanf ;
int treplace_regexp = replace_regexp ;
int treplace_whole = replace_whole ;
int treplace_case = replace_case ;
int treplace_backwards = replace_backwards ;
char * tsearch_text ;
QuickWidget quick_widgets [ ] =
{
1999-02-27 00:14:52 +03:00
{ quick_button , 6 , 10 , 7 , SEARCH_DLG_HEIGHT , N_ ( " &Cancel " ) , 0 , B_CANCEL , 0 ,
2001-04-07 01:48:11 +04:00
0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_button , 2 , 10 , 7 , SEARCH_DLG_HEIGHT , N_ ( " &Ok " ) , 0 , B_ENTER , 0 ,
2001-04-07 01:48:11 +04:00
0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 33 , SEARCH_DLG_WIDTH , 6 , SEARCH_DLG_HEIGHT , N_ ( " scanf &Expression " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 33 , SEARCH_DLG_WIDTH , 5 , SEARCH_DLG_HEIGHT , N_ ( " &Backwards " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 4 , SEARCH_DLG_WIDTH , 6 , SEARCH_DLG_HEIGHT , N_ ( " &Regular expression " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 4 , SEARCH_DLG_WIDTH , 5 , SEARCH_DLG_HEIGHT , N_ ( " &Whole words only " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_checkbox , 4 , SEARCH_DLG_WIDTH , 4 , SEARCH_DLG_HEIGHT , N_ ( " case &Sensitive " ) , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 , NULL } ,
1999-02-27 00:14:52 +03:00
{ quick_input , 3 , SEARCH_DLG_WIDTH , 3 , SEARCH_DLG_HEIGHT , " " , 52 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , " edit-search " } ,
1999-02-27 00:14:52 +03:00
{ quick_label , 2 , SEARCH_DLG_WIDTH , 2 , SEARCH_DLG_HEIGHT , N_ ( " Enter search string: " ) , 0 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 } ,
1998-09-15 00:18:54 +04:00
{ 0 } } ;
quick_widgets [ 2 ] . result = & treplace_scanf ;
quick_widgets [ 3 ] . result = & treplace_backwards ;
quick_widgets [ 4 ] . result = & treplace_regexp ;
quick_widgets [ 5 ] . result = & treplace_whole ;
quick_widgets [ 6 ] . result = & treplace_case ;
quick_widgets [ 7 ] . str_result = & tsearch_text ;
quick_widgets [ 7 ] . text = * search_text ;
{
QuickDialog Quick_input =
1999-02-27 00:14:52 +03:00
{ SEARCH_DLG_WIDTH , SEARCH_DLG_HEIGHT , - 1 , 0 , N_ ( " Search " ) ,
1998-09-15 00:18:54 +04:00
" [Input Line Keys] " , " quick_input " , 0 /*quick_widgets */ } ;
Quick_input . widgets = quick_widgets ;
if ( quick_dialog ( & Quick_input ) ! = B_CANCEL ) {
* search_text = * ( quick_widgets [ 7 ] . str_result ) ;
replace_scanf = treplace_scanf ;
replace_backwards = treplace_backwards ;
replace_regexp = treplace_regexp ;
replace_whole = treplace_whole ;
replace_case = treplace_case ;
return ;
} else {
* search_text = NULL ;
return ;
}
}
}
# else
2001-08-19 21:26:03 +04:00
# undef B_ENTER
# undef B_CANCEL
1998-09-15 00:18:54 +04:00
# define B_ENTER 0
# define B_SKIP_REPLACE 1
# define B_REPLACE_ALL 2
1999-07-22 00:03:23 +04:00
# define B_REPLACE_ONE 3
# define B_CANCEL 4
1998-09-15 00:18:54 +04:00
extern CWidget * wedit ;
# ifndef GTK
void edit_search_replace_dialog ( Window parent , int x , int y , char * * search_text , char * * replace_text , char * * arg_order , char * heading , int option )
{
Window win ;
XEvent xev ;
CEvent cev ;
CState s ;
int xh , yh , h , xb , ys , yc , yb , yr ;
CWidget * m ;
2000-02-18 14:16:06 +03:00
int text_input_width ;
1998-09-15 00:18:54 +04:00
CBackupState ( & s ) ;
CDisable ( " * " ) ;
win = CDrawHeadedDialog ( " replace " , parent , x , y , heading ) ;
CGetHintPos ( & xh , & h ) ;
2000-02-18 14:16:06 +03:00
# ifdef NEXT_LOOK
xh + = NEXT_SPACING ;
# endif
1998-09-15 00:18:54 +04:00
/* NLS hotkey ? */
CIdent ( " replace " ) - > position = WINDOW_ALWAYS_RAISED ;
/* An input line comes after the ':' */
( CDrawText ( " replace.t1 " , win , xh , h , _ ( " Enter search text : " ) ) ) - > hotkey = ' E ' ;
CGetHintPos ( 0 , & yh ) ;
1999-07-22 00:03:23 +04:00
( m = CDrawTextInput ( " replace.sinp " , win , xh , yh , 10 , AUTO_HEIGHT , 8192 , * search_text ) ) - > hotkey = ' E ' ;
1998-09-15 00:18:54 +04:00
if ( replace_text ) {
CGetHintPos ( 0 , & yh ) ;
( CDrawText ( " replace.t2 " , win , xh , yh , _ ( " Enter replace text : " ) ) ) - > hotkey = ' n ' ;
CGetHintPos ( 0 , & yh ) ;
1999-07-22 00:03:23 +04:00
( CDrawTextInput ( " replace.rinp " , win , xh , yh , 10 , AUTO_HEIGHT , 8192 , * replace_text ) ) - > hotkey = ' n ' ;
CSetToolHint ( " replace.t2 " , _ ( " You can enter regexp substrings with %s \n (not \\ 1, \\ 2 like sed) then use \" Enter...order \" " ) ) ;
CSetToolHint ( " replace.rinp " , _ ( " You can enter regexp substrings with %s \n (not \\ 1, \\ 2 like sed) then use \" Enter...order \" " ) ) ;
1998-09-15 00:18:54 +04:00
CGetHintPos ( 0 , & yh ) ;
1999-03-21 04:56:20 +03:00
( CDrawText ( " replace.t3 " , win , xh , yh , _ ( " Enter argument (or substring) order : " ) ) ) - > hotkey = ' o ' ;
1998-09-15 00:18:54 +04:00
CGetHintPos ( 0 , & yh ) ;
( CDrawTextInput ( " replace.ainp " , win , xh , yh , 10 , AUTO_HEIGHT , 256 , * arg_order ) ) - > hotkey = ' o ' ;
/* Tool hint */
1999-07-22 00:03:23 +04:00
CSetToolHint ( " replace.ainp " , _ ( " Enter the order of replacement of your scanf \n format specifiers or regexp substrings, eg 3,1,2 " ) ) ;
CSetToolHint ( " replace.t3 " , _ ( " Enter the order of replacement of your scanf \n format specifiers or regexp substrings, eg 3,1,2 " ) ) ;
1998-09-15 00:18:54 +04:00
}
CGetHintPos ( 0 , & yh ) ;
ys = yh ;
/* The following are check boxes */
CDrawSwitch ( " replace.ww " , win , xh , yh , replace_whole , _ ( " Whole words only " ) , 0 ) ;
CGetHintPos ( 0 , & yh ) ;
CDrawSwitch ( " replace.case " , win , xh , yh , replace_case , _ ( " Case sensitive " ) , 0 ) ;
yc = yh ;
CGetHintPos ( 0 , & yh ) ;
CDrawSwitch ( " replace.reg " , win , xh , yh , replace_regexp , _ ( " Regular expression " ) , 1 ) ;
1999-07-22 00:03:23 +04:00
CSetToolHint ( " replace.reg " , _ ( " See the regex man page for how \n to compose a regular expression " ) ) ;
CSetToolHint ( " replace.reg.label " , _ ( " See the regex man page for how \n to compose a regular expression " ) ) ;
1998-09-15 00:18:54 +04:00
yb = yh ;
CGetHintPos ( 0 , & yh ) ;
CGetHintPos ( & xb , 0 ) ;
2000-02-18 14:16:06 +03:00
# ifdef NEXT_LOOK
xb + = NEXT_SPACING ;
# endif
1998-09-15 00:18:54 +04:00
if ( option & SEARCH_DIALOG_OPTION_BACKWARDS ) {
CDrawSwitch ( " replace.bkwd " , win , xh , yh , replace_backwards , _ ( " Backwards " ) , 0 ) ;
/* Tool hint */
CSetToolHint ( " replace.bkwd " , _ ( " Warning: Searching backward can be slow " ) ) ;
CSetToolHint ( " replace.bkwd.label " , _ ( " Warning: Searching backward can be slow " ) ) ;
}
if ( replace_text ) {
2000-02-18 14:16:06 +03:00
yr = ys ;
1998-09-15 00:18:54 +04:00
if ( option & SEARCH_DIALOG_OPTION_BACKWARDS )
yr = yc ;
} else {
2000-02-18 14:16:06 +03:00
if ( option & SEARCH_DIALOG_OPTION_BACKWARDS ) {
if ( option & SEARCH_DIALOG_OPTION_BOOKMARK )
yr = yb ;
else
yr = yh ;
} else {
if ( option & SEARCH_DIALOG_OPTION_BOOKMARK )
yr = yc ;
else
yr = yb ;
}
1998-09-15 00:18:54 +04:00
}
if ( replace_text ) {
CDrawSwitch ( " replace.pr " , win , xb , yr , replace_prompt , _ ( " Prompt on replace " ) , 0 ) ;
/* Tool hint */
CSetToolHint ( " replace.pr " , _ ( " Ask before making each replacement " ) ) ;
CGetHintPos ( 0 , & yr ) ;
CDrawSwitch ( " replace.all " , win , xb , yr , replace_all , _ ( " Replace all " ) , 0 ) ;
2000-02-18 14:16:06 +03:00
/* Tool hint */
CSetToolHint ( " replace.all " , _ ( " Replace repeatedly " ) ) ;
CGetHintPos ( 0 , & yr ) ;
}
if ( option & SEARCH_DIALOG_OPTION_BOOKMARK ) {
CDrawSwitch ( " replace.bkmk " , win , xb , yr , search_create_bookmark , _ ( " Bookmarks " ) , 0 ) ;
/* Tool hint */
CSetToolHint ( " replace.bkmk " , _ ( " Create bookmarks at all lines found " ) ) ;
CSetToolHint ( " replace.bkmk.label " , _ ( " Create bookmarks at all lines found " ) ) ;
1998-09-15 00:18:54 +04:00
CGetHintPos ( 0 , & yr ) ;
}
CDrawSwitch ( " replace.scanf " , win , xb , yr , replace_scanf , _ ( " Scanf expression " ) , 1 ) ;
/* Tool hint */
1999-07-22 00:03:23 +04:00
CSetToolHint ( " replace.scanf " , _ ( " Allows entering of a C format string, \n see the scanf man page " ) ) ;
1998-09-15 00:18:54 +04:00
get_hint_limits ( & x , & y ) ;
2000-02-18 14:16:06 +03:00
# ifdef NEXT_LOOK
{
int btn_width , x , y ;
CGetHintPos ( & x , & y ) ;
y + = NEXT_SPACING * 2 ;
x + = NEXT_SPACING * 2 ;
CTextSize ( & btn_width , 0 , " Cancel " ) ;
btn_width + = 4 + BUTTON_RELIEF * 2 ;
x - = ( btn_width + NEXT_SPACING ) * 2 + NEXT_SPACING ;
CDrawButton ( " replace.ok " , win , x + btn_width + NEXT_SPACING * 2 , y , AUTO_WIDTH , AUTO_HEIGHT , " Ok " ) ;
CDrawButton ( " replace.cancel " , win , x , y , AUTO_WIDTH , AUTO_HEIGHT , " Cancel " ) ;
CGetHintPos ( 0 , & y ) ;
x + = ( btn_width + NEXT_SPACING ) * 2 + NEXT_SPACING ;
reset_hint_pos ( x , y + NEXT_SPACING * 2 ) ;
}
# else
1998-09-15 00:18:54 +04:00
CDrawPixmapButton ( " replace.ok " , win , x - WIDGET_SPACING - TICK_BUTTON_WIDTH , h , PIXMAP_BUTTON_TICK ) ;
CDrawPixmapButton ( " replace.cancel " , win , x - WIDGET_SPACING - TICK_BUTTON_WIDTH , h + WIDGET_SPACING + TICK_BUTTON_WIDTH , PIXMAP_BUTTON_CROSS ) ;
2000-02-18 14:16:06 +03:00
# endif
1998-09-15 00:18:54 +04:00
/* Tool hint */
2000-02-18 14:16:06 +03:00
CSetToolHint ( " replace.ok " , _ ( " Begin search, Enter " ) ) ;
1998-09-15 00:18:54 +04:00
CSetToolHint ( " replace.cancel " , _ ( " Abort this dialog, Esc " ) ) ;
CSetSizeHintPos ( " replace " ) ;
CMapDialog ( " replace " ) ;
m = CIdent ( " replace " ) ;
2000-02-18 14:16:06 +03:00
# ifdef NEXT_LOOK
text_input_width = m - > width - WIDGET_SPACING * 3 - 4 - NEXT_SPACING * 2 ;
# else
text_input_width = m - > width - WIDGET_SPACING * 3 - 4 - TICK_BUTTON_WIDTH ;
# endif
CSetWidgetSize ( " replace.sinp " , text_input_width , ( CIdent ( " replace.sinp " ) ) - > height ) ;
1998-09-15 00:18:54 +04:00
if ( replace_text ) {
2000-02-18 14:16:06 +03:00
CSetWidgetSize ( " replace.rinp " , text_input_width , ( CIdent ( " replace.rinp " ) ) - > height ) ;
CSetWidgetSize ( " replace.ainp " , text_input_width , ( CIdent ( " replace.ainp " ) ) - > height ) ;
1998-09-15 00:18:54 +04:00
}
CFocus ( CIdent ( " replace.sinp " ) ) ;
for ( ; ; ) {
CNextEvent ( & xev , & cev ) ;
if ( ! CIdent ( " replace " ) ) {
* search_text = 0 ;
break ;
}
if ( ! strcmp ( cev . ident , " replace.cancel " ) | | cev . command = = CK_Cancel ) {
* search_text = 0 ;
break ;
}
if ( ! strcmp ( cev . ident , " replace.reg " ) | | ! strcmp ( cev . ident , " replace.scanf " ) ) {
if ( CIdent ( " replace.reg " ) - > keypressed | | CIdent ( " replace.scanf " ) - > keypressed ) {
if ( ! ( CIdent ( " replace.case " ) - > keypressed ) ) {
CIdent ( " replace.case " ) - > keypressed = 1 ;
CExpose ( " replace.case " ) ;
}
}
}
if ( ! strcmp ( cev . ident , " replace.ok " ) | | cev . command = = CK_Enter ) {
if ( replace_text ) {
replace_all = CIdent ( " replace.all " ) - > keypressed ;
replace_prompt = CIdent ( " replace.pr " ) - > keypressed ;
1999-07-22 00:03:23 +04:00
* replace_text = ( char * ) strdup ( CIdent ( " replace.rinp " ) - > text ) ;
* arg_order = ( char * ) strdup ( CIdent ( " replace.ainp " ) - > text ) ;
1998-09-15 00:18:54 +04:00
}
1999-07-22 00:03:23 +04:00
* search_text = ( char * ) strdup ( CIdent ( " replace.sinp " ) - > text ) ;
1998-09-15 00:18:54 +04:00
replace_whole = CIdent ( " replace.ww " ) - > keypressed ;
replace_case = CIdent ( " replace.case " ) - > keypressed ;
replace_scanf = CIdent ( " replace.scanf " ) - > keypressed ;
replace_regexp = CIdent ( " replace.reg " ) - > keypressed ;
if ( option & SEARCH_DIALOG_OPTION_BACKWARDS ) {
replace_backwards = CIdent ( " replace.bkwd " ) - > keypressed ;
} else {
replace_backwards = 0 ;
}
2000-02-18 14:16:06 +03:00
if ( option & SEARCH_DIALOG_OPTION_BOOKMARK ) {
search_create_bookmark = CIdent ( " replace.bkmk " ) - > keypressed ;
} else {
search_create_bookmark = 0 ;
}
1998-09-15 00:18:54 +04:00
break ;
}
}
CDestroyWidget ( " replace " ) ;
CRestoreState ( & s ) ;
}
void edit_search_dialog ( WEdit * edit , char * * search_text )
{
/* Heads the 'Search' dialog box */
2000-02-18 14:16:06 +03:00
edit_search_replace_dialog ( WIN_MESSAGES , search_text , 0 , 0 , _ ( " Search " ) , SEARCH_DIALOG_OPTION_BACKWARDS | SEARCH_DIALOG_OPTION_BOOKMARK ) ;
1998-09-15 00:18:54 +04:00
}
void edit_replace_dialog ( WEdit * edit , char * * search_text , char * * replace_text , char * * arg_order )
{
/* Heads the 'Replace' dialog box */
edit_search_replace_dialog ( WIN_MESSAGES , search_text , replace_text , arg_order , _ ( " Replace " ) , SEARCH_DIALOG_OPTION_BACKWARDS ) ;
}
# else
# include <libgnomeui/gtkcauldron.h>
# include <libgnomeui/gnome-stock.h>
void edit_search_dialog ( WEdit * edit , char * * search_text )
{
char * s ;
s = gtk_dialog_cauldron (
1998-10-27 22:53:38 +03:00
" Search " , GTK_CAULDRON_TOPLEVEL | GTK_CAULDRON_GRAB ,
1998-10-02 20:24:12 +04:00
" ( (Enter search text)d | %Eogxf )xf / ( ( %Cd // %Cd // %Cd ) || ( %Cd // %Cd )xf )xf / ( %Bxfgrq || %Bxfgq )f " ,
1998-09-15 00:18:54 +04:00
search_text , " search " ,
1998-10-02 20:24:12 +04:00
" &Whole word " , & replace_whole ,
" Case &sensitive " , & replace_case ,
" &Regular expression " , & replace_regexp ,
" &Backwards " , & replace_backwards ,
" Scanf &expression " , & replace_scanf ,
1998-09-15 00:18:54 +04:00
GNOME_STOCK_BUTTON_OK ,
GNOME_STOCK_BUTTON_CANCEL
) ;
if ( s = = GTK_CAULDRON_ESCAPE | | ! s | | s = = GNOME_STOCK_BUTTON_CANCEL )
* search_text = 0 ;
return ;
}
void edit_replace_dialog ( WEdit * edit , char * * search_text , char * * replace_text , char * * arg_order )
{
char * s ;
s = gtk_dialog_cauldron (
1998-10-27 22:53:38 +03:00
" Search " , GTK_CAULDRON_TOPLEVEL | GTK_CAULDRON_GRAB ,
1998-10-02 20:24:12 +04:00
" ( (Enter search text)d | %Eogxf )xf / ( (Enter replace text)d | %Egxf )xf / ( (Enter argument order)d | %Egxf )xf / ( ( %Cd // %Cd // %Cd // %Cd ) || ( %Cd // %Cd // %Cd )xf )xf / ( %Bxfgrq || %Bxfgq )f " ,
1998-09-15 00:18:54 +04:00
search_text , " search " ,
replace_text , " replace " ,
arg_order , " arg_order " ,
1998-10-02 20:24:12 +04:00
" &Whole word " , & replace_whole ,
" Case &sensitive " , & replace_case ,
" &Regular expression " , & replace_regexp ,
" &Backwards " , & replace_backwards ,
" Pr&ompt on replace " , & replace_prompt ,
" Replace &all " , & replace_all ,
" Scanf &expression " , & replace_scanf ,
1998-09-15 00:18:54 +04:00
GNOME_STOCK_BUTTON_OK ,
GNOME_STOCK_BUTTON_CANCEL
) ;
if ( s = = GTK_CAULDRON_ESCAPE | | ! s | | s = = GNOME_STOCK_BUTTON_CANCEL )
* search_text = 0 ;
return ;
}
# endif
# ifdef GTK
int edit_replace_prompt ( WEdit * edit , char * replace_text , int xpos , int ypos )
{
2000-02-18 14:16:06 +03:00
char * s ;
s = gtk_dialog_cauldron (
" Replace " , GTK_CAULDRON_TOPLEVEL | GTK_CAULDRON_GRAB ,
" ( (Replace with:)d %Ld )xf / ( %Bxfrq || %Bxfq || %Bxfq || %Bxfq || %Bxfgq )f " ,
replace_text ,
" Replace " , " Skip " , " Replace all " , " Replace one " ,
GNOME_STOCK_BUTTON_CANCEL
) ;
if ( s = = GTK_CAULDRON_ESCAPE | | ! s | | s = = GNOME_STOCK_BUTTON_CANCEL )
return B_CANCEL ;
if ( ! strcmp ( s , " Replace all " ) )
return B_REPLACE_ALL ;
if ( ! strcmp ( s , " Replace one " ) )
return B_REPLACE_ONE ;
if ( ! strcmp ( s , " Skip " ) )
return B_SKIP_REPLACE ;
if ( ! strcmp ( s , " Replace " ) )
return B_ENTER ;
2001-05-18 23:25:23 +04:00
/* Shouldn't ever reach this point */
return B_CANCEL ;
1998-09-15 00:18:54 +04:00
}
# else
int edit_replace_prompt ( WEdit * edit , char * replace_text , int xpos , int ypos )
{
2000-02-18 14:16:06 +03:00
int q , x [ ] =
{
B_CANCEL , B_ENTER , B_SKIP_REPLACE , B_REPLACE_ALL , B_REPLACE_ONE , B_CANCEL
} ;
q = CQueryDialog ( WIN_MESSAGES + ( edit - > curs_line < 8 ? edit - > num_widget_lines / 2 * FONT_PIX_PER_LINE + CYof ( edit - > widget ) : 0 ) ,
_ ( " Replace " ) , catstrs ( _ ( " Replace with: " ) , replace_text , 0 ) , _ ( " Replace " ) , _ ( " Skip " ) , _ ( " Replace all " ) , _ ( " Replace one " ) , _ ( " Cancel " ) , 0 ) ;
edit - > force | = REDRAW_COMPLETELY ;
return x [ q + 1 ] ;
1998-09-15 00:18:54 +04:00
}
# endif
# endif
long sargs [ NUM_REPL_ARGS ] [ 256 / sizeof ( long ) ] ;
# define SCANF_ARGS sargs[0], sargs[1], sargs[2], sargs[3], \
sargs [ 4 ] , sargs [ 5 ] , sargs [ 6 ] , sargs [ 7 ] , \
sargs [ 8 ] , sargs [ 9 ] , sargs [ 10 ] , sargs [ 11 ] , \
sargs [ 12 ] , sargs [ 13 ] , sargs [ 14 ] , sargs [ 15 ]
# define PRINTF_ARGS sargs[argord[0]], sargs[argord[1]], sargs[argord[2]], sargs[argord[3]], \
sargs [ argord [ 4 ] ] , sargs [ argord [ 5 ] ] , sargs [ argord [ 6 ] ] , sargs [ argord [ 7 ] ] , \
sargs [ argord [ 8 ] ] , sargs [ argord [ 9 ] ] , sargs [ argord [ 10 ] ] , sargs [ argord [ 11 ] ] , \
sargs [ argord [ 12 ] ] , sargs [ argord [ 13 ] ] , sargs [ argord [ 14 ] ] , sargs [ argord [ 15 ] ]
1999-03-21 04:56:20 +03:00
1998-09-15 00:18:54 +04:00
/* This function is a modification of mc-3.2.10/src/view.c:regexp_view_search() */
/* returns -3 on error in pattern, -1 on not found, found_len = 0 if either */
1999-03-21 04:56:20 +03:00
int string_regexp_search ( char * pattern , char * string , int len , int match_type , int match_bol , int icase , int * found_len , void * d )
1998-09-15 00:18:54 +04:00
{
static regex_t r ;
static char * old_pattern = NULL ;
static int old_type , old_icase ;
1999-03-21 04:56:20 +03:00
regmatch_t * pmatch ;
static regmatch_t s [ 1 ] ;
pmatch = ( regmatch_t * ) d ;
if ( ! pmatch )
pmatch = s ;
1998-09-15 00:18:54 +04:00
if ( ! old_pattern | | strcmp ( old_pattern , pattern ) | | old_type ! = match_type | | old_icase ! = icase ) {
if ( old_pattern ) {
regfree ( & r ) ;
free ( old_pattern ) ;
old_pattern = 0 ;
}
if ( regcomp ( & r , pattern , REG_EXTENDED | ( icase ? REG_ICASE : 0 ) ) ) {
* found_len = 0 ;
return - 3 ;
}
1999-07-22 00:03:23 +04:00
old_pattern = ( char * ) strdup ( pattern ) ;
1998-09-15 00:18:54 +04:00
old_type = match_type ;
old_icase = icase ;
}
1999-03-21 04:56:20 +03:00
if ( regexec ( & r , string , d ? NUM_REPL_ARGS : 1 , pmatch , ( ( match_bol | | match_type ! = match_normal ) ? 0 : REG_NOTBOL ) ) ! = 0 ) {
1998-09-15 00:18:54 +04:00
* found_len = 0 ;
return - 1 ;
}
* found_len = pmatch [ 0 ] . rm_eo - pmatch [ 0 ] . rm_so ;
return ( pmatch [ 0 ] . rm_so ) ;
}
/* thanks to Liviu Daia <daia@stoilow.imar.ro> for getting this
( and the above ) routines to work properly - paul */
1999-03-21 04:56:20 +03:00
long edit_find_string ( long start , unsigned char * exp , int * len , long last_byte , int ( * get_byte ) ( void * , long ) , void * data , int once_only , void * d )
1998-09-15 00:18:54 +04:00
{
long p , q = 0 ;
long l = strlen ( ( char * ) exp ) , f = 0 ;
int n = 0 ;
for ( p = 0 ; p < l ; p + + ) /* count conversions... */
if ( exp [ p ] = = ' % ' )
if ( exp [ + + p ] ! = ' % ' ) /* ...except for "%%" */
n + + ;
if ( replace_scanf | | replace_regexp ) {
int c ;
unsigned char * buf ;
unsigned char mbuf [ MAX_REPL_LEN * 2 + 3 ] ;
replace_scanf = ( ! replace_regexp ) ; /* can't have both */
buf = mbuf ;
if ( replace_scanf ) {
unsigned char e [ MAX_REPL_LEN ] ;
if ( n > = NUM_REPL_ARGS )
return - 3 ;
if ( replace_case ) {
for ( p = start ; p < last_byte & & p < start + MAX_REPL_LEN ; p + + )
buf [ p - start ] = ( * get_byte ) ( data , p ) ;
} else {
for ( p = 0 ; exp [ p ] ! = 0 ; p + + )
exp [ p ] = my_lower_case ( exp [ p ] ) ;
for ( p = start ; p < last_byte & & p < start + MAX_REPL_LEN ; p + + ) {
c = ( * get_byte ) ( data , p ) ;
buf [ p - start ] = my_lower_case ( c ) ;
}
}
buf [ ( q = p - start ) ] = 0 ;
strcpy ( ( char * ) e , ( char * ) exp ) ;
strcat ( ( char * ) e , " %n " ) ;
exp = e ;
while ( q ) {
* ( ( int * ) sargs [ n ] ) = 0 ; /* --> here was the problem - now fixed: good */
if ( n = = sscanf ( ( char * ) buf , ( char * ) exp , SCANF_ARGS ) ) {
if ( * ( ( int * ) sargs [ n ] ) ) {
* len = * ( ( int * ) sargs [ n ] ) ;
return start ;
}
}
if ( once_only )
return - 2 ;
if ( q + start < last_byte ) {
if ( replace_case ) {
buf [ q ] = ( * get_byte ) ( data , q + start ) ;
} else {
c = ( * get_byte ) ( data , q + start ) ;
buf [ q ] = my_lower_case ( c ) ;
}
q + + ;
}
buf [ q ] = 0 ;
start + + ;
buf + + ; /* move the window along */
if ( buf = = mbuf + MAX_REPL_LEN ) { /* the window is about to go past the end of array, so... */
memmove ( mbuf , buf , strlen ( ( char * ) buf ) + 1 ) ; /* reset it */
buf = mbuf ;
}
q - - ;
}
} else { /* regexp matching */
long offset = 0 ;
int found_start , match_bol , move_win = 0 ;
while ( start + offset < last_byte ) {
match_bol = ( offset = = 0 | | ( * get_byte ) ( data , start + offset - 1 ) = = ' \n ' ) ;
if ( ! move_win ) {
p = start + offset ;
q = 0 ;
}
for ( ; p < last_byte & & q < MAX_REPL_LEN ; p + + , q + + ) {
mbuf [ q ] = ( * get_byte ) ( data , p ) ;
if ( mbuf [ q ] = = ' \n ' )
break ;
}
q + + ;
offset + = q ;
mbuf [ q ] = 0 ;
buf = mbuf ;
while ( q ) {
1999-03-21 04:56:20 +03:00
found_start = string_regexp_search ( ( char * ) exp , ( char * ) buf , q , match_normal , match_bol , ! replace_case , len , d ) ;
1998-09-15 00:18:54 +04:00
if ( found_start < = - 2 ) { /* regcomp/regexec error */
* len = 0 ;
return - 3 ;
}
else if ( found_start = = - 1 ) /* not found: try next line */
break ;
else if ( * len = = 0 ) { /* null pattern: try again at next character */
q - - ;
buf + + ;
match_bol = 0 ;
continue ;
}
else /* found */
return ( start + offset - q + found_start ) ;
}
if ( once_only )
return - 2 ;
if ( buf [ q - 1 ] ! = ' \n ' ) { /* incomplete line: try to recover */
buf = mbuf + MAX_REPL_LEN / 2 ;
q = strlen ( ( char * ) buf ) ;
memmove ( mbuf , buf , q ) ;
p = start + q ;
move_win = 1 ;
}
else
move_win = 0 ;
}
}
} else {
* len = strlen ( ( char * ) exp ) ;
if ( replace_case ) {
for ( p = start ; p < = last_byte - l ; p + + ) {
if ( ( * get_byte ) ( data , p ) = = ( unsigned char ) exp [ 0 ] ) { /* check if first char matches */
for ( f = 0 , q = 0 ; q < l & & f < 1 ; q + + )
if ( ( * get_byte ) ( data , q + p ) ! = ( unsigned char ) exp [ q ] )
f = 1 ;
if ( f = = 0 )
return p ;
}
if ( once_only )
return - 2 ;
}
} else {
for ( p = 0 ; exp [ p ] ! = 0 ; p + + )
exp [ p ] = my_lower_case ( exp [ p ] ) ;
for ( p = start ; p < = last_byte - l ; p + + ) {
if ( my_lower_case ( ( * get_byte ) ( data , p ) ) = = ( unsigned char ) exp [ 0 ] ) {
for ( f = 0 , q = 0 ; q < l & & f < 1 ; q + + )
if ( my_lower_case ( ( * get_byte ) ( data , q + p ) ) ! = ( unsigned char ) exp [ q ] )
f = 1 ;
if ( f = = 0 )
return p ;
}
if ( once_only )
return - 2 ;
}
}
}
return - 2 ;
}
1999-03-21 04:56:20 +03:00
long edit_find_forwards ( long search_start , unsigned char * exp , int * len , long last_byte , int ( * get_byte ) ( void * , long ) , void * data , int once_only , void * d )
1998-09-15 00:18:54 +04:00
{ /*front end to find_string to check for
whole words */
long p ;
p = search_start ;
1999-03-21 04:56:20 +03:00
while ( ( p = edit_find_string ( p , exp , len , last_byte , get_byte , data , once_only , d ) ) > = 0 ) {
1998-09-15 00:18:54 +04:00
if ( replace_whole ) {
/*If the bordering chars are not in option_whole_chars_search then word is whole */
if ( ! strcasechr ( option_whole_chars_search , ( * get_byte ) ( data , p - 1 ) )
& & ! strcasechr ( option_whole_chars_search , ( * get_byte ) ( data , p + * len ) ) )
return p ;
if ( once_only )
return - 2 ;
} else
return p ;
if ( once_only )
break ;
p + + ; /*not a whole word so continue search. */
}
return p ;
}
1999-03-21 04:56:20 +03:00
long edit_find ( long search_start , unsigned char * exp , int * len , long last_byte , int ( * get_byte ) ( void * , long ) , void * data , void * d )
1998-09-15 00:18:54 +04:00
{
long p ;
if ( replace_backwards ) {
while ( search_start > = 0 ) {
1999-03-21 04:56:20 +03:00
p = edit_find_forwards ( search_start , exp , len , last_byte , get_byte , data , 1 , d ) ;
1998-09-15 00:18:54 +04:00
if ( p = = search_start )
return p ;
search_start - - ;
}
} else {
1999-03-21 04:56:20 +03:00
return edit_find_forwards ( search_start , exp , len , last_byte , get_byte , data , 0 , d ) ;
1998-09-15 00:18:54 +04:00
}
return - 2 ;
}
# define is_digit(x) ((x) >= '0' && (x) <= '9')
# define snprintf(v) { \
* p1 + + = * p + + ; \
* p1 + + = ' % ' ; \
* p1 + + = ' n ' ; \
* p1 = ' \0 ' ; \
sprintf ( s , q1 , v , & n ) ; \
s + = n ; \
}
/* this function uses the sprintf command to do a vprintf */
/* it takes pointers to arguments instead of the arguments themselves */
int sprintf_p ( char * str , const char * fmt , . . . )
{
va_list ap ;
int n ;
char * q , * p , * s = str ;
char q1 [ 32 ] ;
char * p1 ;
va_start ( ap , fmt ) ;
p = q = ( char * ) fmt ;
while ( ( p = strchr ( p , ' % ' ) ) ) {
n = ( int ) ( ( unsigned long ) p - ( unsigned long ) q ) ;
strncpy ( s , q , n ) ; /* copy stuff between format specifiers */
s + = n ;
* s = 0 ;
q = p ;
p1 = q1 ;
* p1 + + = * p + + ;
if ( * p = = ' % ' ) {
p + + ;
* s + + = ' % ' ;
q = p ;
continue ;
}
if ( * p = = ' n ' ) {
p + + ;
/* do nothing */
q = p ;
continue ;
}
if ( * p = = ' # ' )
* p1 + + = * p + + ;
if ( * p = = ' 0 ' )
* p1 + + = * p + + ;
if ( * p = = ' - ' )
* p1 + + = * p + + ;
if ( * p = = ' + ' )
* p1 + + = * p + + ;
if ( * p = = ' * ' ) {
p + + ;
strcpy ( p1 , itoa ( * va_arg ( ap , int * ) ) ) ; /* replace field width with a number */
p1 + = strlen ( p1 ) ;
} else {
while ( is_digit ( * p ) )
* p1 + + = * p + + ;
}
if ( * p = = ' . ' )
* p1 + + = * p + + ;
if ( * p = = ' * ' ) {
p + + ;
strcpy ( p1 , itoa ( * va_arg ( ap , int * ) ) ) ; /* replace precision with a number */
p1 + = strlen ( p1 ) ;
} else {
while ( is_digit ( * p ) )
* p1 + + = * p + + ;
}
/* flags done, now get argument */
if ( * p = = ' s ' ) {
snprintf ( va_arg ( ap , char * ) ) ;
} else if ( * p = = ' h ' ) {
if ( strchr ( " diouxX " , * p ) )
snprintf ( * va_arg ( ap , short * ) ) ;
} else if ( * p = = ' l ' ) {
* p1 + + = * p + + ;
if ( strchr ( " diouxX " , * p ) )
snprintf ( * va_arg ( ap , long * ) ) ;
} else if ( strchr ( " cdiouxX " , * p ) ) {
snprintf ( * va_arg ( ap , int * ) ) ;
} else if ( * p = = ' L ' ) {
* p1 + + = * p + + ;
if ( strchr ( " EefgG " , * p ) )
snprintf ( * va_arg ( ap , double * ) ) ; /* should be long double */
} else if ( strchr ( " EefgG " , * p ) ) {
snprintf ( * va_arg ( ap , double * ) ) ;
} else if ( strchr ( " DOU " , * p ) ) {
snprintf ( * va_arg ( ap , long * ) ) ;
} else if ( * p = = ' p ' ) {
snprintf ( * va_arg ( ap , void * * ) ) ;
}
q = p ;
}
va_end ( ap ) ;
sprintf ( s , q ) ; /* print trailing leftover */
return ( unsigned long ) s - ( unsigned long ) str + strlen ( s ) ;
}
static void regexp_error ( WEdit * edit )
{
/* "Error: Syntax error in regular expression, or scanf expression contained too many %'s */
edit_error_dialog ( _ ( " Error " ) , _ ( " Invalid regular expression, or scanf expression with to many conversions " ) ) ;
}
/* call with edit = 0 before shutdown to close memory leaks */
void edit_replace_cmd ( WEdit * edit , int again )
{
1999-03-21 04:56:20 +03:00
static regmatch_t pmatch [ NUM_REPL_ARGS ] ;
1998-09-15 00:18:54 +04:00
static char * old1 = NULL ;
static char * old2 = NULL ;
static char * old3 = NULL ;
char * exp1 = " " ;
char * exp2 = " " ;
char * exp3 = " " ;
int replace_yes ;
int replace_continue ;
2000-02-18 14:16:06 +03:00
int treplace_prompt = 0 ;
1998-09-15 00:18:54 +04:00
int i = 0 ;
long times_replaced = 0 , last_search ;
2000-02-18 14:16:06 +03:00
char fin_string [ 64 ] ;
1998-09-15 00:18:54 +04:00
int argord [ NUM_REPL_ARGS ] ;
if ( ! edit ) {
if ( old1 ) {
free ( old1 ) ;
old1 = 0 ;
}
if ( old2 ) {
free ( old2 ) ;
old2 = 0 ;
}
if ( old3 ) {
free ( old3 ) ;
old3 = 0 ;
}
return ;
}
last_search = edit - > last_byte ;
edit - > force | = REDRAW_COMPLETELY ;
exp1 = old1 ? old1 : exp1 ;
exp2 = old2 ? old2 : exp2 ;
exp3 = old3 ? old3 : exp3 ;
if ( again ) {
if ( ! old1 | | ! old2 )
return ;
1999-07-22 00:03:23 +04:00
exp1 = ( char * ) strdup ( old1 ) ;
exp2 = ( char * ) strdup ( old2 ) ;
exp3 = ( char * ) strdup ( old3 ) ;
1998-09-15 00:18:54 +04:00
} else {
edit_push_action ( edit , KEY_PRESS + edit - > start_display ) ;
2001-06-06 03:02:08 +04:00
# ifdef HAVE_CHARSET
if ( exp1 & & * exp1 )
convert_to_display ( exp1 ) ;
if ( exp2 & & * exp2 )
convert_to_display ( exp2 ) ;
# endif
1998-09-15 00:18:54 +04:00
edit_replace_dialog ( edit , & exp1 , & exp2 , & exp3 ) ;
2001-06-06 03:02:08 +04:00
# ifdef HAVE_CHARSET
if ( exp1 & & * exp1 )
convert_from_input ( exp1 ) ;
if ( exp2 & & * exp2 )
convert_from_input ( exp2 ) ;
# endif
2000-02-18 14:16:06 +03:00
treplace_prompt = replace_prompt ;
1998-09-15 00:18:54 +04:00
}
if ( ! exp1 | | ! * exp1 ) {
edit - > force = REDRAW_COMPLETELY ;
if ( exp1 ) {
free ( exp1 ) ;
free ( exp2 ) ;
free ( exp3 ) ;
}
return ;
}
if ( old1 )
free ( old1 ) ;
if ( old2 )
free ( old2 ) ;
if ( old3 )
free ( old3 ) ;
1999-07-22 00:03:23 +04:00
old1 = ( char * ) strdup ( exp1 ) ;
old2 = ( char * ) strdup ( exp2 ) ;
old3 = ( char * ) strdup ( exp3 ) ;
1998-09-15 00:18:54 +04:00
{
char * s ;
int ord ;
while ( ( s = strchr ( exp3 , ' ' ) ) )
memmove ( s , s + 1 , strlen ( s ) ) ;
s = exp3 ;
for ( i = 0 ; i < NUM_REPL_ARGS ; i + + ) {
if ( ( unsigned long ) s ! = 1 & & s < exp3 + strlen ( exp3 ) ) {
if ( ( ord = atoi ( s ) ) )
argord [ i ] = ord - 1 ;
else
argord [ i ] = i ;
s = strchr ( s , ' , ' ) + 1 ;
} else
argord [ i ] = i ;
}
}
replace_continue = replace_all ;
if ( edit - > found_len & & edit - > search_start = = edit - > found_start + 1 & & replace_backwards )
edit - > search_start - - ;
if ( edit - > found_len & & edit - > search_start = = edit - > found_start - 1 & & ! replace_backwards )
edit - > search_start + + ;
do {
int len = 0 ;
long new_start ;
new_start = edit_find ( edit - > search_start , ( unsigned char * ) exp1 , & len , last_search ,
1999-03-21 04:56:20 +03:00
( int ( * ) ( void * , long ) ) edit_get_byte , ( void * ) edit , pmatch ) ;
1998-09-15 00:18:54 +04:00
if ( new_start = = - 3 ) {
regexp_error ( edit ) ;
break ;
}
edit - > search_start = new_start ;
/*returns negative on not found or error in pattern */
if ( edit - > search_start > = 0 ) {
edit - > found_start = edit - > search_start ;
i = edit - > found_len = len ;
edit_cursor_move ( edit , edit - > search_start - edit - > curs1 ) ;
edit_scroll_screen_over_cursor ( edit ) ;
replace_yes = 1 ;
1999-09-12 04:29:20 +04:00
if ( treplace_prompt ) {
1998-09-15 00:18:54 +04:00
int l ;
l = edit - > curs_row - edit - > num_widget_lines / 3 ;
if ( l > 0 )
edit_scroll_downward ( edit , l ) ;
if ( l < 0 )
edit_scroll_upward ( edit , - l ) ;
edit_scroll_screen_over_cursor ( edit ) ;
edit - > force | = REDRAW_PAGE ;
edit_render_keypress ( edit ) ;
/*so that undo stops at each query */
edit_push_key_press ( edit ) ;
switch ( edit_replace_prompt ( edit , exp2 , /*and prompt 2/3 down */
2000-09-15 14:10:18 +04:00
# ifdef MIDNIGHT
( edit - > num_widget_columns - CONFIRM_DLG_WIDTH ) / 2 , edit - > num_widget_lines * 2 / 3 ) ) {
# else
2000-02-18 14:16:06 +03:00
edit - > num_widget_columns / 2 - 33 , edit - > num_widget_lines * 2 / 3 ) ) {
2000-09-15 14:10:18 +04:00
# endif
1998-09-15 00:18:54 +04:00
case B_ENTER :
break ;
case B_SKIP_REPLACE :
replace_yes = 0 ;
break ;
case B_REPLACE_ALL :
1999-09-12 04:29:20 +04:00
treplace_prompt = 0 ;
1998-09-15 00:18:54 +04:00
replace_continue = 1 ;
break ;
1999-07-22 00:03:23 +04:00
case B_REPLACE_ONE :
replace_continue = 0 ;
break ;
1998-09-15 00:18:54 +04:00
case B_CANCEL :
replace_yes = 0 ;
replace_continue = 0 ;
break ;
}
}
if ( replace_yes ) { /* delete then insert new */
1999-03-21 04:56:20 +03:00
if ( replace_scanf | | replace_regexp ) {
1998-09-15 00:18:54 +04:00
char repl_str [ MAX_REPL_LEN + 2 ] ;
1999-03-21 04:56:20 +03:00
if ( replace_regexp ) { /* we need to fill in sargs just like with scanf */
int k , j ;
for ( k = 1 ; k < NUM_REPL_ARGS & & pmatch [ k ] . rm_eo > = 0 ; k + + ) {
unsigned char * t ;
t = ( unsigned char * ) & sargs [ k - 1 ] [ 0 ] ;
for ( j = 0 ; j < pmatch [ k ] . rm_eo - pmatch [ k ] . rm_so & & j < 255 ; j + + , t + + )
* t = ( unsigned char ) edit_get_byte ( edit , edit - > search_start - pmatch [ 0 ] . rm_so + pmatch [ k ] . rm_so + j ) ;
* t = ' \0 ' ;
}
for ( ; k < = NUM_REPL_ARGS ; k + + )
sargs [ k - 1 ] [ 0 ] = 0 ;
}
1998-09-15 00:18:54 +04:00
if ( sprintf_p ( repl_str , exp2 , PRINTF_ARGS ) > = 0 ) {
times_replaced + + ;
while ( i - - )
edit_delete ( edit ) ;
while ( repl_str [ + + i ] )
edit_insert ( edit , repl_str [ i ] ) ;
} else {
1999-03-21 04:56:20 +03:00
edit_error_dialog ( _ ( " Replace " ) ,
1998-09-15 00:18:54 +04:00
/* "Invalid regexp string or scanf string" */
1999-03-21 04:56:20 +03:00
_ ( " Error in replacement format string. " ) ) ;
1998-09-15 00:18:54 +04:00
replace_continue = 0 ;
}
} else {
times_replaced + + ;
while ( i - - )
edit_delete ( edit ) ;
while ( exp2 [ + + i ] )
edit_insert ( edit , exp2 [ i ] ) ;
}
edit - > found_len = i ;
}
/* so that we don't find the same string again */
if ( replace_backwards ) {
last_search = edit - > search_start ;
edit - > search_start - - ;
} else {
edit - > search_start + = i ;
last_search = edit - > last_byte ;
}
edit_scroll_screen_over_cursor ( edit ) ;
} else {
edit - > search_start = edit - > curs1 ; /* try and find from right here for next search */
edit_update_curs_col ( edit ) ;
edit - > force | = REDRAW_PAGE ;
edit_render_keypress ( edit ) ;
if ( times_replaced ) {
1999-03-21 04:56:20 +03:00
sprintf ( fin_string , _ ( " %ld replacements made. " ) , times_replaced ) ;
edit_message_dialog ( _ ( " Replace " ) , fin_string ) ;
1998-09-15 00:18:54 +04:00
} else
1999-03-21 04:56:20 +03:00
edit_message_dialog ( _ ( " Replace " ) , _ ( " Search string not found. " ) ) ;
1998-09-15 00:18:54 +04:00
replace_continue = 0 ;
}
} while ( replace_continue ) ;
free ( exp1 ) ;
free ( exp2 ) ;
free ( exp3 ) ;
edit - > force = REDRAW_COMPLETELY ;
edit_scroll_screen_over_cursor ( edit ) ;
}
void edit_search_cmd ( WEdit * edit , int again )
{
static char * old = NULL ;
char * exp = " " ;
if ( ! edit ) {
if ( old ) {
free ( old ) ;
old = 0 ;
}
return ;
}
exp = old ? old : exp ;
if ( again ) { /*ctrl-hotkey for search again. */
if ( ! old )
return ;
1999-07-22 00:03:23 +04:00
exp = ( char * ) strdup ( old ) ;
1998-09-15 00:18:54 +04:00
} else {
2001-06-06 03:02:08 +04:00
# ifdef HAVE_CHARSET
if ( exp & & * exp )
convert_to_display ( exp ) ;
# endif
1998-09-15 00:18:54 +04:00
edit_search_dialog ( edit , & exp ) ;
2001-06-06 03:02:08 +04:00
# ifdef HAVE_CHARSET
if ( exp & & * exp )
convert_from_input ( exp ) ;
# endif
1998-09-15 00:18:54 +04:00
edit_push_action ( edit , KEY_PRESS + edit - > start_display ) ;
}
if ( exp ) {
if ( * exp ) {
int len = 0 ;
if ( old )
free ( old ) ;
1999-07-22 00:03:23 +04:00
old = ( char * ) strdup ( exp ) ;
1998-09-15 00:18:54 +04:00
2000-02-18 14:16:06 +03:00
if ( search_create_bookmark ) {
int found = 0 , books = 0 ;
int l = 0 , l_last = - 1 ;
long p , q = 0 ;
for ( ; ; ) {
p = edit_find ( q , ( unsigned char * ) exp , & len , edit - > last_byte ,
( int ( * ) ( void * , long ) ) edit_get_byte , ( void * ) edit , 0 ) ;
if ( p < 0 )
break ;
found + + ;
l + = edit_count_lines ( edit , q , p ) ;
if ( l ! = l_last ) {
book_mark_insert ( edit , l , BOOK_MARK_FOUND_COLOR ) ;
books + + ;
}
l_last = l ;
q = p + 1 ;
}
if ( found ) {
char fin_string [ 64 ] ;
/* in response to number of bookmarks added because of string being found %d times */
sprintf ( fin_string , _ ( " %d finds made, %d bookmarks added " ) , found , books ) ;
edit_message_dialog ( _ ( " Search " ) , fin_string ) ;
} else {
edit_error_dialog ( _ ( " Search " ) , _ ( " Search string not found. " ) ) ;
}
} else {
1998-09-15 00:18:54 +04:00
2000-02-18 14:16:06 +03:00
if ( edit - > found_len & & edit - > search_start = = edit - > found_start + 1 & & replace_backwards )
1998-09-15 00:18:54 +04:00
edit - > search_start - - ;
2000-02-18 14:16:06 +03:00
if ( edit - > found_len & & edit - > search_start = = edit - > found_start - 1 & & ! replace_backwards )
1998-09-15 00:18:54 +04:00
edit - > search_start + + ;
2000-02-18 14:16:06 +03:00
edit - > search_start = edit_find ( edit - > search_start , ( unsigned char * ) exp , & len , edit - > last_byte ,
( int ( * ) ( void * , long ) ) edit_get_byte , ( void * ) edit , 0 ) ;
if ( edit - > search_start > = 0 ) {
edit - > found_start = edit - > search_start ;
edit - > found_len = len ;
edit_cursor_move ( edit , edit - > search_start - edit - > curs1 ) ;
edit_scroll_screen_over_cursor ( edit ) ;
if ( replace_backwards )
edit - > search_start - - ;
else
edit - > search_start + + ;
} else if ( edit - > search_start = = - 3 ) {
edit - > search_start = edit - > curs1 ;
regexp_error ( edit ) ;
} else {
edit - > search_start = edit - > curs1 ;
edit_error_dialog ( _ ( " Search " ) , _ ( " Search string not found. " ) ) ;
}
1998-09-15 00:18:54 +04:00
}
}
free ( exp ) ;
}
edit - > force | = REDRAW_COMPLETELY ;
edit_scroll_screen_over_cursor ( edit ) ;
}
/* Real edit only */
void edit_quit_cmd ( WEdit * edit )
{
edit_push_action ( edit , KEY_PRESS + edit - > start_display ) ;
# ifndef MIDNIGHT
if ( edit - > stopped )
return ;
# endif
edit - > force | = REDRAW_COMPLETELY ;
if ( edit - > modified ) {
# ifdef GTK
char * r ;
1999-07-22 00:03:23 +04:00
r = gtk_dialog_cauldron ( _ ( " Quit " ) , GTK_CAULDRON_TOPLEVEL | GTK_CAULDRON_GRAB , " [ ( %Lxf )xf ]xf / ( %Bgxfq || %Bgxfq || %Bgxfq ) " ,
_ ( " Current text was modified without a file save. \n Save with exit? " ) , GNOME_STOCK_BUTTON_CANCEL , GNOME_STOCK_BUTTON_YES , GNOME_STOCK_BUTTON_NO ) ;
2001-06-15 11:35:59 +04:00
if ( r = = GNOME_STOCK_BUTTON_YES ) {
1998-09-15 00:18:54 +04:00
edit_push_markers ( edit ) ;
edit_set_markers ( edit , 0 , 0 , 0 , 0 ) ;
if ( ! edit_save_cmd ( edit ) )
return ;
2001-06-15 11:35:59 +04:00
} else if ( r = = GNOME_STOCK_BUTTON_NO ) {
1998-09-15 00:18:54 +04:00
if ( edit - > delete_file )
unlink ( catstrs ( edit - > dir , edit - > filename , 0 ) ) ;
} else {
return ;
}
# else
# ifdef MIDNIGHT
1999-07-22 00:03:23 +04:00
switch ( edit_query_dialog3 ( _ ( " Quit " ) , _ ( " File was modified, Save with exit? " ) , _ ( " Cancel quit " ) , _ ( " &Yes " ) , _ ( " &No " ) ) ) {
1998-09-15 00:18:54 +04:00
# else
/* Confirm 'Quit' dialog box */
1999-07-22 00:03:23 +04:00
switch ( edit_query_dialog3 ( _ ( " Quit " ) ,
_ ( " Current text was modified without a file save. \n Save with exit? " ) , _ ( " &Cancel quit " ) , _ ( " &Yes " ) , _ ( " &No " ) ) ) {
1998-09-15 00:18:54 +04:00
# endif
case 1 :
edit_push_markers ( edit ) ;
edit_set_markers ( edit , 0 , 0 , 0 , 0 ) ;
if ( ! edit_save_cmd ( edit ) )
return ;
break ;
case 2 :
# ifdef MIDNIGHT
if ( edit - > delete_file )
unlink ( catstrs ( edit - > dir , edit - > filename , 0 ) ) ;
# endif
break ;
case 0 :
case - 1 :
return ;
}
# endif
}
# if defined(MIDNIGHT) || defined(GTK)
else if ( edit - > delete_file )
unlink ( catstrs ( edit - > dir , edit - > filename , 0 ) ) ;
# endif
# ifdef MIDNIGHT
1999-02-16 00:19:03 +03:00
dlg_stop ( edit - > widget . parent ) ;
1998-09-15 00:18:54 +04:00
# else
1999-02-16 00:19:03 +03:00
# ifdef GTK
{
1999-07-22 00:03:23 +04:00
extern char * edit_one_file ;
1999-02-16 00:19:03 +03:00
1999-07-22 00:03:23 +04:00
if ( edit_one_file )
gtk_main_quit ( ) ;
1999-02-16 00:19:03 +03:00
}
# endif
1998-09-15 00:18:54 +04:00
edit - > stopped = 1 ;
# endif
}
# define TEMP_BUF_LEN 1024
/* returns a null terminated length of text. Result must be free'd */
unsigned char * edit_get_block ( WEdit * edit , long start , long finish , int * l )
{
unsigned char * s , * r ;
r = s = malloc ( finish - start + 1 ) ;
if ( column_highlighting ) {
* l = 0 ;
while ( start < finish ) { /* copy from buffer, excluding chars that are out of the column 'margins' */
int c , x ;
x = edit_move_forward3 ( edit , edit_bol ( edit , start ) , 0 , start ) ;
c = edit_get_byte ( edit , start ) ;
if ( ( x > = edit - > column1 & & x < edit - > column2 )
| | ( x > = edit - > column2 & & x < edit - > column1 ) | | c = = ' \n ' ) {
* s + + = c ;
( * l ) + + ;
}
start + + ;
}
} else {
* l = finish - start ;
while ( start < finish )
* s + + = edit_get_byte ( edit , start + + ) ;
}
* s = 0 ;
return r ;
}
/* save block, returns 1 on success */
int edit_save_block ( WEdit * edit , const char * filename , long start , long finish )
{
int len , file ;
if ( ( file = open ( ( char * ) filename , O_CREAT | O_WRONLY | O_TRUNC , S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH ) ) = = - 1 )
return 0 ;
if ( column_highlighting ) {
unsigned char * block , * p ;
int r ;
p = block = edit_get_block ( edit , start , finish , & len ) ;
while ( len ) {
r = write ( file , p , len ) ;
if ( r < 0 )
break ;
p + = r ;
len - = r ;
}
free ( block ) ;
} else {
unsigned char * buf ;
int i = start , end ;
len = finish - start ;
buf = malloc ( TEMP_BUF_LEN ) ;
while ( start ! = finish ) {
end = min ( finish , start + TEMP_BUF_LEN ) ;
for ( ; i < end ; i + + )
buf [ i - start ] = edit_get_byte ( edit , i ) ;
len - = write ( file , ( char * ) buf , end - start ) ;
start = end ;
}
free ( buf ) ;
}
close ( file ) ;
if ( len )
return 0 ;
return 1 ;
}
/* copies a block to clipboard file */
static int edit_save_block_to_clip_file ( WEdit * edit , long start , long finish )
{
return edit_save_block ( edit , catstrs ( home_dir , CLIP_FILE , 0 ) , start , finish ) ;
}
# ifndef MIDNIGHT
void paste_text ( WEdit * edit , unsigned char * data , unsigned int nitems )
{
if ( data ) {
data + = nitems - 1 ;
while ( nitems - - )
edit_insert_ahead ( edit , * data - - ) ;
}
edit - > force | = REDRAW_COMPLETELY ;
}
char * selection_get_line ( void * data , int line )
{
static unsigned char t [ 1024 ] ;
struct selection * s ;
int i = 0 ;
s = ( struct selection * ) data ;
line = ( current_selection + line + 1 ) % NUM_SELECTION_HISTORY ;
if ( s [ line ] . text ) {
unsigned char * p = s [ line ] . text ;
int c , j ;
for ( j = 0 ; j < s [ line ] . len ; j + + ) {
c = * p + + ;
1999-07-22 00:03:23 +04:00
if ( ! isprint ( c ) ) {
t [ i + + ] = ' _ ' ;
1998-09-15 00:18:54 +04:00
t [ i + + ] = ' \b ' ;
1999-07-22 00:03:23 +04:00
t [ i + + ] = ' \\ ' ;
t [ i + + ] = ' _ ' ;
t [ i + + ] = ' \b ' ;
switch ( c ) {
case ' \a ' :
t [ i + + ] = ' a ' ;
break ;
case ' \b ' :
t [ i + + ] = ' b ' ;
break ;
case ' \t ' :
t [ i + + ] = ' t ' ;
break ;
case ' \n ' :
t [ i + + ] = ' n ' ;
break ;
case ' \v ' :
t [ i + + ] = ' v ' ;
break ;
case ' \f ' :
t [ i + + ] = ' f ' ;
break ;
case ' \r ' :
t [ i + + ] = ' r ' ;
break ;
default :
i - = 3 ;
t [ i + + ] = ' . ' ;
break ;
}
1998-09-15 00:18:54 +04:00
} else
t [ i + + ] = c ;
1999-07-22 00:03:23 +04:00
if ( i > 1000 )
1998-09-15 00:18:54 +04:00
break ;
}
}
t [ i ] = 0 ;
return ( char * ) t ;
}
void edit_paste_from_history ( WEdit * edit )
{
int i , c ;
edit_update_curs_col ( edit ) ;
edit_update_curs_row ( edit ) ;
c = max ( 20 , edit - > num_widget_columns - 5 ) ;
# ifdef GTK
#if 0
/* *** */
i = gtk_edit_list_box_dialog ( c , 10 ,
0 , NUM_SELECTION_HISTORY - 10 , NUM_SELECTION_HISTORY - 1 , NUM_SELECTION_HISTORY ,
selection_get_line , ( void * ) selection_history ) ;
# else
i = - 1 ;
# endif
# else
i = CListboxDialog ( WIN_MESSAGES , c , 10 ,
0 , NUM_SELECTION_HISTORY - 10 , NUM_SELECTION_HISTORY - 1 , NUM_SELECTION_HISTORY ,
selection_get_line , ( void * ) selection_history ) ;
# endif
if ( i < 0 )
return ;
i = ( current_selection + i + 1 ) % NUM_SELECTION_HISTORY ;
paste_text ( edit , selection_history [ i ] . text , selection_history [ i ] . len ) ;
edit - > force | = REDRAW_COMPLETELY ;
}
/* copies a block to the XWindows buffer */
static int edit_XStore_block ( WEdit * edit , long start , long finish )
{
edit_get_selection ( edit ) ;
if ( selection . len < = 512 * 1024 ) { /* we don't want to fill up the server */
XStoreBytes ( CDisplay , ( char * ) selection . text , ( int ) selection . len ) ;
return 0 ;
} else
return 1 ;
}
int edit_copy_to_X_buf_cmd ( WEdit * edit )
{
long start_mark , end_mark ;
if ( eval_marks ( edit , & start_mark , & end_mark ) )
return 0 ;
edit_XStore_block ( edit , start_mark , end_mark ) ;
if ( ! edit_save_block_to_clip_file ( edit , start_mark , end_mark ) ) {
edit_error_dialog ( _ ( " Copy to clipboard " ) , get_sys_error ( _ ( " Unable to save to file. " ) ) ) ;
return 1 ;
}
# ifdef GTK
1998-12-16 15:35:43 +03:00
gtk_selection_owner_set ( GTK_WIDGET ( edit - > widget ) , GDK_SELECTION_PRIMARY , GDK_CURRENT_TIME ) ;
edit - > widget - > editable . selection_start_pos = start_mark ;
edit - > widget - > editable . selection_end_pos = end_mark ;
edit - > widget - > editable . has_selection = TRUE ;
1998-09-15 00:18:54 +04:00
# else
XSetSelectionOwner ( CDisplay , XA_PRIMARY , CWindowOf ( edit - > widget ) , CurrentTime ) ;
# endif
edit_mark_cmd ( edit , 1 ) ;
return 0 ;
}
int edit_cut_to_X_buf_cmd ( WEdit * edit )
{
long start_mark , end_mark ;
if ( eval_marks ( edit , & start_mark , & end_mark ) )
return 0 ;
edit_XStore_block ( edit , start_mark , end_mark ) ;
if ( ! edit_save_block_to_clip_file ( edit , start_mark , end_mark ) ) {
1999-03-11 00:56:08 +03:00
edit_error_dialog ( _ ( " Cut to clipboard " ) , _ ( " Unable to save to file. " ) ) ;
1998-09-15 00:18:54 +04:00
return 1 ;
}
edit_block_delete_cmd ( edit ) ;
# ifdef GTK
1998-12-16 15:35:43 +03:00
gtk_selection_owner_set ( GTK_WIDGET ( edit - > widget ) , GDK_SELECTION_PRIMARY , GDK_CURRENT_TIME ) ;
edit - > widget - > editable . selection_start_pos = start_mark ;
edit - > widget - > editable . selection_end_pos = end_mark ;
edit - > widget - > editable . has_selection = TRUE ;
1998-09-15 00:18:54 +04:00
# else
XSetSelectionOwner ( CDisplay , XA_PRIMARY , CWindowOf ( edit - > widget ) , CurrentTime ) ;
# endif
edit_mark_cmd ( edit , 1 ) ;
return 0 ;
}
void selection_paste ( WEdit * edit , Window win , unsigned prop , int delete ) ;
void edit_paste_from_X_buf_cmd ( WEdit * edit )
{
if ( selection . text )
paste_text ( edit , selection . text , selection . len ) ;
else if ( ! XGetSelectionOwner ( CDisplay , XA_PRIMARY ) )
# ifdef GTK
/* *** */
;
# else
selection_paste ( edit , CRoot , XA_CUT_BUFFER0 , False ) ;
# endif
else
# ifdef GTK
1999-07-22 00:03:23 +04:00
gtk_selection_convert ( GTK_WIDGET ( edit - > widget ) , GDK_SELECTION_PRIMARY ,
gdk_atom_intern ( " COMPOUND_TEXT " , FALSE ) , GDK_CURRENT_TIME ) ;
1998-09-15 00:18:54 +04:00
# else
XConvertSelection ( CDisplay , XA_PRIMARY , XA_STRING ,
XInternAtom ( CDisplay , " VT_SELECTION " , False ) ,
CWindowOf ( edit - > widget ) , CurrentTime ) ;
# endif
edit - > force | = REDRAW_PAGE ;
}
# else /* MIDNIGHT */
void edit_paste_from_history ( WEdit * edit )
{
}
int edit_copy_to_X_buf_cmd ( WEdit * edit )
{
long start_mark , end_mark ;
if ( eval_marks ( edit , & start_mark , & end_mark ) )
return 0 ;
if ( ! edit_save_block_to_clip_file ( edit , start_mark , end_mark ) ) {
edit_error_dialog ( _ ( " Copy to clipboard " ) , get_sys_error ( _ ( " Unable to save to file. " ) ) ) ;
return 1 ;
}
edit_mark_cmd ( edit , 1 ) ;
return 0 ;
}
int edit_cut_to_X_buf_cmd ( WEdit * edit )
{
long start_mark , end_mark ;
if ( eval_marks ( edit , & start_mark , & end_mark ) )
return 0 ;
if ( ! edit_save_block_to_clip_file ( edit , start_mark , end_mark ) ) {
edit_error_dialog ( _ ( " Cut to clipboard " ) , _ ( " Unable to save to file. " ) ) ;
return 1 ;
}
edit_block_delete_cmd ( edit ) ;
edit_mark_cmd ( edit , 1 ) ;
return 0 ;
}
void edit_paste_from_X_buf_cmd ( WEdit * edit )
{
edit_insert_file ( edit , catstrs ( home_dir , CLIP_FILE , 0 ) ) ;
}
2001-07-10 18:33:59 +04:00
# endif /* MIDNIGHT */
1998-09-15 00:18:54 +04:00
void edit_goto_cmd ( WEdit * edit )
{
char * f ;
static int l = 0 ;
# ifdef MIDNIGHT
char s [ 12 ] ;
sprintf ( s , " %d " , l ) ;
f = input_dialog ( _ ( " Goto line " ) , _ ( " Enter line: " ) , l ? s : " " ) ;
# else
# ifdef GTK
#if 0
f = gtk_edit_dialog_input ( " goto " , 150 , l ? itoa ( l ) : " " , _ ( " Goto line " ) , _ ( " Enter line: " ) ) ;
# else
1999-01-02 10:53:00 +03:00
char s [ 12 ] ;
sprintf ( s , " %d " , l ) ;
1999-07-22 00:03:23 +04:00
f = ( char * ) input_dialog ( _ ( " Goto line " ) , _ ( " Enter line: " ) , l ? s : " " ) ;
1998-09-15 00:18:54 +04:00
# endif
# else
f = CInputDialog ( " goto " , WIN_MESSAGES , 150 , l ? itoa ( l ) : " " , _ ( " Goto line " ) , _ ( " Enter line: " ) ) ;
# endif
# endif
if ( f ) {
if ( * f ) {
l = atoi ( f ) ;
edit_move_display ( edit , l - edit - > num_widget_lines / 2 - 1 ) ;
edit_move_to_line ( edit , l - 1 ) ;
edit - > force | = REDRAW_COMPLETELY ;
}
2000-09-15 14:10:18 +04:00
free ( f ) ;
1998-09-15 00:18:54 +04:00
}
}
/*returns 1 on success */
1999-07-22 00:03:23 +04:00
int edit_save_block_cmd ( WEdit * edit )
{
1998-09-15 00:18:54 +04:00
long start_mark , end_mark ;
char * exp ;
if ( eval_marks ( edit , & start_mark , & end_mark ) )
return 1 ;
1999-07-22 00:03:23 +04:00
exp = edit_get_save_file ( edit - > dir , catstrs ( home_dir , CLIP_FILE , 0 ) , _ ( " Save Block " ) ) ;
1998-09-15 00:18:54 +04:00
edit_push_action ( edit , KEY_PRESS + edit - > start_display ) ;
if ( exp ) {
if ( ! * exp ) {
free ( exp ) ;
return 0 ;
} else {
if ( edit_save_block ( edit , exp , start_mark , end_mark ) ) {
free ( exp ) ;
edit - > force | = REDRAW_COMPLETELY ;
return 1 ;
} else {
free ( exp ) ;
1999-07-22 00:03:23 +04:00
edit_error_dialog ( _ ( " Save Block " ) , get_sys_error ( _ ( " Error trying to save file. " ) ) ) ;
1998-09-15 00:18:54 +04:00
}
}
1999-07-22 00:03:23 +04:00
}
edit - > force | = REDRAW_COMPLETELY ;
return 0 ;
1998-09-15 00:18:54 +04:00
}
/* returns 1 on success */
1999-07-22 00:03:23 +04:00
int edit_insert_file_cmd ( WEdit * edit )
{
char * exp = edit_get_load_file ( edit - > dir , catstrs ( home_dir , CLIP_FILE , 0 ) , _ ( " Insert File " ) ) ;
1998-09-15 00:18:54 +04:00
edit_push_action ( edit , KEY_PRESS + edit - > start_display ) ;
if ( exp ) {
if ( ! * exp ) {
free ( exp ) ;
return 0 ;
} else {
if ( edit_insert_file ( edit , exp ) ) {
free ( exp ) ;
1999-07-22 00:03:23 +04:00
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
return 1 ;
} else {
free ( exp ) ;
1999-07-22 00:03:23 +04:00
edit_error_dialog ( _ ( " Insert file " ) , get_sys_error ( _ ( " Error trying to insert file. " ) ) ) ;
1998-09-15 00:18:54 +04:00
}
}
1999-07-22 00:03:23 +04:00
}
edit - > force | = REDRAW_COMPLETELY ;
return 0 ;
1998-09-15 00:18:54 +04:00
}
# ifdef MIDNIGHT
/* sorts a block, returns -1 on system fail, 1 on cancel and 0 on success */
int edit_sort_cmd ( WEdit * edit )
{
static char * old = 0 ;
char * exp ;
long start_mark , end_mark ;
int e ;
if ( eval_marks ( edit , & start_mark , & end_mark ) ) {
edit_error_dialog ( _ ( " Sort block " ) , _ ( " You must first highlight a block of text. " ) ) ;
return 0 ;
}
edit_save_block ( edit , catstrs ( home_dir , BLOCK_FILE , 0 ) , start_mark , end_mark ) ;
2000-10-30 21:07:19 +03:00
exp = old ? old : " " ;
1998-09-15 00:18:54 +04:00
exp = input_dialog ( _ ( " Run Sort " ) ,
2000-10-30 21:07:19 +03:00
_ ( " Enter sort options (see manpage) separated by whitespace: " ) , exp ) ;
1998-09-15 00:18:54 +04:00
if ( ! exp )
return 1 ;
if ( old )
free ( old ) ;
old = exp ;
e = system ( catstrs ( " sort " , exp , " " , home_dir , BLOCK_FILE , " > " , home_dir , TEMP_FILE , 0 ) ) ;
if ( e ) {
if ( e = = - 1 | | e = = 127 ) {
edit_error_dialog ( _ ( " Sort " ) ,
get_sys_error ( _ ( " Error trying to execute sort command " ) ) ) ;
} else {
char q [ 8 ] ;
sprintf ( q , " %d " , e ) ;
edit_error_dialog ( _ ( " Sort " ) ,
catstrs ( _ ( " Sort returned non-zero: " ) , q , 0 ) ) ;
}
return - 1 ;
}
edit - > force | = REDRAW_COMPLETELY ;
if ( edit_block_delete_cmd ( edit ) )
return 1 ;
edit_insert_file ( edit , catstrs ( home_dir , TEMP_FILE , 0 ) ) ;
return 0 ;
}
/* if block is 1, a block must be highlighted and the shell command
processes it . If block is 0 the shell command is a straight system
command , that just produces some output which is to be inserted */
void edit_block_process_cmd ( WEdit * edit , const char * shell_cmd , int block )
{
long start_mark , end_mark ;
struct stat s ;
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
char buf [ BUFSIZ ] ;
FILE * script_home = NULL ;
FILE * script_src = NULL ;
FILE * block_file = NULL ;
char * o = catstrs ( mc_home , shell_cmd , 0 ) ; /* original source script */
char * h = catstrs ( home_dir , EDIT_DIR , shell_cmd , 0 ) ; /* home script */
char * b = catstrs ( home_dir , BLOCK_FILE , 0 ) ; /* block file */
char * e = catstrs ( home_dir , ERROR_FILE , 0 ) ; /* error file */
if ( ! ( script_home = fopen ( h , " r " ) ) ) {
if ( ! ( script_home = fopen ( h , " w " ) ) ) {
2000-07-20 02:23:58 +04:00
edit_error_dialog ( " " ,
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
get_sys_error ( catstrs ( _ ( " Error create script: " ) , h , 0 ) ) ) ;
return ;
} else {
if ( ! ( script_src = fopen ( o , " r " ) ) ) {
fclose ( script_home ) ; unlink ( h ) ;
2000-07-20 02:23:58 +04:00
edit_error_dialog ( " " ,
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
get_sys_error ( catstrs ( _ ( " Error read script: " ) , o , 0 ) ) ) ;
return ;
} else {
while ( fgets ( buf , sizeof ( buf ) , script_src ) )
2000-09-07 21:18:32 +04:00
fputs ( buf , script_home ) ;
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
if ( fclose ( script_home ) ) {
2000-07-20 02:23:58 +04:00
edit_error_dialog ( " " ,
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
get_sys_error ( catstrs ( _ ( " Error close script: " ) , h , 0 ) ) ) ;
return ;
} else {
chmod ( h , 0700 ) ;
2000-07-20 02:23:58 +04:00
edit_error_dialog ( " " ,
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
get_sys_error ( catstrs ( _ ( " Script created: " ) , h , 0 ) ) ) ;
}
}
}
}
if ( block ) { /* for marked block run indent formatter */
1998-09-15 00:18:54 +04:00
if ( eval_marks ( edit , & start_mark , & end_mark ) ) {
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
edit_error_dialog ( _ ( " Process block " ) ,
1998-09-15 00:18:54 +04:00
_ ( " You must first highlight a block of text. " ) ) ;
return ;
}
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
edit_save_block ( edit , b , start_mark , end_mark ) ;
/* run your script */
my_system ( EXECUTE_AS_SHELL , shell ,
catstrs ( home_dir , EDIT_DIR , shell_cmd , " " ,
edit - > filename , " " , home_dir , BLOCK_FILE , " " ,
home_dir , ERROR_FILE , 0 ) ) ;
1998-09-15 00:18:54 +04:00
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
} else { /* for missing marked block run ... */
my_system ( 0 , shell , catstrs ( EDIT_DIR , shell_cmd ) ) ;
}
2000-10-30 21:07:19 +03:00
edit_refresh_cmd ( edit ) ;
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
edit - > force | = REDRAW_COMPLETELY ;
2000-10-30 21:07:19 +03:00
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
/* insert result block */
1998-09-15 00:18:54 +04:00
if ( block ) {
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
if ( stat ( e , & s ) = = 0 ) {
1998-09-15 00:18:54 +04:00
if ( ! s . st_size ) { /* no error messages */
if ( edit_block_delete_cmd ( edit ) )
return ;
edit_insert_file ( edit , b ) ;
} else {
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
edit_insert_file ( edit , e ) ;
1998-09-15 00:18:54 +04:00
}
} else {
2000-07-20 02:23:58 +04:00
edit_error_dialog ( " " ,
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
get_sys_error ( catstrs ( _ ( " Error trying to stat file: " ) , e , 0 ) ) ) ;
1999-07-22 00:03:23 +04:00
edit - > force | = REDRAW_COMPLETELY ;
1998-09-15 00:18:54 +04:00
}
2000-07-20 02:23:58 +04:00
if ( ( block_file = fopen ( b , " w " ) ) )
fclose ( block_file ) ;
return ;
1998-09-15 00:18:54 +04:00
}
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add macro %k it is block file name
Add macro %e it is error file name
Add macro %i it is cursor column indent of spaces, only for edit
Add macro %y, it is syntax of current file in editor, only for edit
Add condition y , it is syntax pattern of current file in edit
Add macro %x it is extension of current file
Add macro %m it is current menu filename
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editcmd.c: Modify External Formatter (was C indent formatter) .
Autocreate a scripts in home, from templates /usr/lib/mc/edit.indent.rc,
edit.ispell.rc, etc. Remove leading and trailing spaces into _(""),
(the message of David H. Martin <dmartina@usa.net>)
2000-05-05 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* src/user.c: Add condition (x filename) into mc.menu .
for "Open next a free console" and like.
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
src/user.c: fix segfault in chunk_alloc of glibc, when into condition
of .mnu we have quoted space. (~.mc/menu: + f \.\ test$).
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/edit.c:
Add ability user edit menus: system: /usr/lib/mc/cedit.menu,
* gtkedit/editmenu.c: home: ~/.cedit.menu, local: .cedit.menu
Marked block is access now from an user edit menu
Access ~/.cedit/cooledit.block for insert to cursor place from
user edit menu.
Created system cedit.menu
2000-05-04 Valery Kornienkov <vlk@dimavb.st.simbirsk.su>
* gtkedit/editdraw.c:
Improved a status string of cool editor for best understand,
and to add char,hex view.
2000-05-04 Richard Hestilow <hestgray@ionet.net>
* gnome/gdesktop.c: Fixes snap to grid.
2000-05-09 05:18:27 +04:00
return ;
1998-09-15 00:18:54 +04:00
}
2000-09-07 21:18:32 +04:00
# endif /* MIDNIGHT */
1998-09-15 00:18:54 +04:00
int edit_execute_cmd ( WEdit * edit , int command , int char_for_insertion ) ;
/* prints at the cursor */
/* returns the number of chars printed */
int edit_print_string ( WEdit * e , const char * s )
{
int i = 0 ;
while ( s [ i ] )
1999-09-20 03:09:07 +04:00
edit_execute_cmd ( e , - 1 , ( unsigned char ) s [ i + + ] ) ;
1998-09-15 00:18:54 +04:00
e - > force | = REDRAW_COMPLETELY ;
edit_update_screen ( e ) ;
return i ;
}
int edit_printf ( WEdit * e , const char * fmt , . . . )
{
int i ;
va_list pa ;
char s [ 1024 ] ;
va_start ( pa , fmt ) ;
sprintf ( s , fmt , pa ) ;
i = edit_print_string ( e , s ) ;
va_end ( pa ) ;
return i ;
}
# ifdef MIDNIGHT
/* FIXME: does this function break NT_OS2 ? */
static void pipe_mail ( WEdit * edit , char * to , char * subject , char * cc )
{
2000-09-07 21:18:32 +04:00
FILE * p = 0 ;
1998-09-15 00:18:54 +04:00
char * s ;
2000-09-07 21:18:32 +04:00
s = g_strdup_printf ( " mail -s \" %s \" -c \" %s \" \" %s \" " , subject , cc , to ) ;
if ( s ) {
p = popen ( s , " w " ) ;
g_free ( s ) ;
}
if ( p ) {
1998-09-15 00:18:54 +04:00
long i ;
for ( i = 0 ; i < edit - > last_byte ; i + + )
fputc ( edit_get_byte ( edit , i ) , p ) ;
pclose ( p ) ;
}
}
# define MAIL_DLG_HEIGHT 12
void edit_mail_dialog ( WEdit * edit )
{
char * tmail_to ;
char * tmail_subject ;
char * tmail_cc ;
static char * mail_cc_last = 0 ;
static char * mail_subject_last = 0 ;
static char * mail_to_last = 0 ;
QuickDialog Quick_input =
{ 50 , MAIL_DLG_HEIGHT , - 1 , 0 , N_ ( " Mail " ) ,
" [Input Line Keys] " , " quick_input " , 0 } ;
QuickWidget quick_widgets [ ] =
{
1999-03-11 00:56:08 +03:00
{ quick_button , 6 , 10 , 9 , MAIL_DLG_HEIGHT , N_ ( " &Cancel " ) , 0 , B_CANCEL , 0 ,
2001-04-07 01:48:11 +04:00
0 , NULL } ,
1999-03-11 00:56:08 +03:00
{ quick_button , 2 , 10 , 9 , MAIL_DLG_HEIGHT , N_ ( " &Ok " ) , 0 , B_ENTER , 0 ,
2001-04-07 01:48:11 +04:00
0 , NULL } ,
1998-09-15 00:18:54 +04:00
{ quick_input , 3 , 50 , 8 , MAIL_DLG_HEIGHT , " " , 44 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , " mail-dlg-input " } ,
1999-03-11 00:56:08 +03:00
{ quick_label , 2 , 50 , 7 , MAIL_DLG_HEIGHT , N_ ( " Copies to " ) , 0 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 } ,
1998-09-15 00:18:54 +04:00
{ quick_input , 3 , 50 , 6 , MAIL_DLG_HEIGHT , " " , 44 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , " mail-dlg-input-2 " } ,
1999-03-11 00:56:08 +03:00
{ quick_label , 2 , 50 , 5 , MAIL_DLG_HEIGHT , N_ ( " Subject " ) , 0 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 } ,
1998-09-15 00:18:54 +04:00
{ quick_input , 3 , 50 , 4 , MAIL_DLG_HEIGHT , " " , 44 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , " mail-dlg-input-3 " } ,
1999-03-11 00:56:08 +03:00
{ quick_label , 2 , 50 , 3 , MAIL_DLG_HEIGHT , N_ ( " To " ) , 0 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 } ,
1999-03-11 00:56:08 +03:00
{ quick_label , 2 , 50 , 2 , MAIL_DLG_HEIGHT , N_ ( " mail -s <subject> -c <cc> <to> " ) , 0 , 0 , 0 ,
2001-04-07 01:48:11 +04:00
0 , 0 } ,
1998-09-15 00:18:54 +04:00
{ 0 } } ;
quick_widgets [ 2 ] . str_result = & tmail_cc ;
quick_widgets [ 2 ] . text = mail_cc_last ? mail_cc_last : " " ;
quick_widgets [ 4 ] . str_result = & tmail_subject ;
quick_widgets [ 4 ] . text = mail_subject_last ? mail_subject_last : " " ;
quick_widgets [ 6 ] . str_result = & tmail_to ;
quick_widgets [ 6 ] . text = mail_to_last ? mail_to_last : " " ;
Quick_input . widgets = quick_widgets ;
if ( quick_dialog ( & Quick_input ) ! = B_CANCEL ) {
if ( mail_cc_last )
free ( mail_cc_last ) ;
if ( mail_subject_last )
free ( mail_subject_last ) ;
if ( mail_to_last )
free ( mail_to_last ) ;
mail_cc_last = * ( quick_widgets [ 2 ] . str_result ) ;
mail_subject_last = * ( quick_widgets [ 4 ] . str_result ) ;
mail_to_last = * ( quick_widgets [ 6 ] . str_result ) ;
pipe_mail ( edit , mail_to_last , mail_subject_last , mail_cc_last ) ;
}
}
2000-09-07 21:18:32 +04:00
# endif /* MIDNIGHT */
1998-09-15 00:18:54 +04:00