mirror of
https://github.com/rfivet/uemacs.git
synced 2025-04-22 02:42:18 -04:00
Increase maximum file name length to 255 (Windows & Linux).
This commit is contained in:
parent
187b0ce4a3
commit
a0ea6d07e6
2
buffer.h
2
buffer.h
@ -4,7 +4,7 @@
|
|||||||
#include "crypt.h"
|
#include "crypt.h"
|
||||||
#include "line.h"
|
#include "line.h"
|
||||||
|
|
||||||
typedef char fname_t[ 80] ; /* file name type */
|
typedef char fname_t[ 256] ; /* file name type */
|
||||||
typedef char bname_t[ 16] ; /* buffer name type */
|
typedef char bname_t[ 16] ; /* buffer name type */
|
||||||
#define NBUFN sizeof( bname_t)
|
#define NBUFN sizeof( bname_t)
|
||||||
|
|
||||||
|
7
file.c
7
file.c
@ -537,12 +537,14 @@ int filewrite( int f, int n) {
|
|||||||
|
|
||||||
status = newmlarg( &fname, "Write file: ", sizeof( fname_t)) ;
|
status = newmlarg( &fname, "Write file: ", sizeof( fname_t)) ;
|
||||||
if( status == TRUE) {
|
if( status == TRUE) {
|
||||||
|
if( strlen( fname) > sizeof( fname_t) - 1)
|
||||||
|
status = FALSE ;
|
||||||
|
else {
|
||||||
status = writeout( fname) ;
|
status = writeout( fname) ;
|
||||||
if( status == TRUE) {
|
if( status == TRUE) {
|
||||||
struct window *wp ;
|
struct window *wp ;
|
||||||
|
|
||||||
strncpy( curbp->b_fname, fname, sizeof( fname_t) - 1) ;
|
strcpy( curbp->b_fname, fname) ;
|
||||||
curbp->b_fname[ sizeof( fname_t) - 1] = '\0' ;
|
|
||||||
curbp->b_flag &= ~BFCHG ;
|
curbp->b_flag &= ~BFCHG ;
|
||||||
wp = wheadp ; /* Update mode lines. */
|
wp = wheadp ; /* Update mode lines. */
|
||||||
while( wp != NULL) {
|
while( wp != NULL) {
|
||||||
@ -552,6 +554,7 @@ int filewrite( int f, int n) {
|
|||||||
wp = wp->w_wndp ;
|
wp = wp->w_wndp ;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
}
|
||||||
|
|
||||||
free( fname) ;
|
free( fname) ;
|
||||||
}
|
}
|
||||||
|
@ -28,17 +28,14 @@ insert-string 123456789012345678901234567890123456789012345678901234567890123456
|
|||||||
next-line
|
next-line
|
||||||
insert-string _________1_________2_________3_________4_________5_________6_________7_________8_________9_________0_________1_________2_________3
|
insert-string _________1_________2_________3_________4_________5_________6_________7_________8_________9_________0_________1_________2_________3
|
||||||
next-line
|
next-line
|
||||||
; Create and insert string variable until size exceed string limit [will be truncated to NSTRING - 1 (127)
|
; Create and insert string variable until size exceed 1024 characters or variable get truncated
|
||||||
set %nam 123
|
set %nam 123
|
||||||
set %expect &len %nam
|
set %expect &len %nam
|
||||||
!while &equ &len %nam %expect
|
!while &and &les %expect 1024 &equ &len %nam %expect
|
||||||
insert-string %nam
|
insert-string %nam
|
||||||
newline
|
newline
|
||||||
set %nam &cat %nam %nam
|
set %nam &cat %nam %nam
|
||||||
set %expect &tim %expect 2
|
set %expect &tim %expect 2
|
||||||
!if ¬ &les %expect 1024
|
|
||||||
!break
|
|
||||||
!endif
|
|
||||||
!endwhile
|
!endwhile
|
||||||
insert-string %nam
|
insert-string %nam
|
||||||
newline
|
newline
|
||||||
@ -47,6 +44,7 @@ newline
|
|||||||
insert-string &cat "Expected: " %expect
|
insert-string &cat "Expected: " %expect
|
||||||
newline
|
newline
|
||||||
; Use the variable as filename [will be truncated to NFILEN - 1 (79)]
|
; Use the variable as filename [will be truncated to NFILEN - 1 (79)]
|
||||||
|
set %nam &mid %nam 1 255
|
||||||
write-file %nam
|
write-file %nam
|
||||||
insert-string &cat "Filename: " $cfname
|
insert-string &cat "Filename: " $cfname
|
||||||
newline
|
newline
|
||||||
@ -71,3 +69,4 @@ set-mark
|
|||||||
end-of-file
|
end-of-file
|
||||||
copy-region
|
copy-region
|
||||||
insert-string $kill
|
insert-string $kill
|
||||||
|
redraw-display
|
||||||
|
Loading…
x
Reference in New Issue
Block a user