Mercurial > emacs
annotate src/ndir.h @ 49667:cbec1327e2f1
(QCfilter_multibyte): New variable.
(setup_process_coding_systems): New function.
(Fset_process_buffer, Fset_process_filter): Call
setup_process_coding_systems.
(Fstart_process): Initialize the member `filter_multibyte' of
struct Lisp_Process.
(create_process): Call setup_process_coding_systems.
(Fmake_network_process): New keyward `:filter-multibyte'.
Initialize the member `filter_multibyte' of struct Lisp_Process.
Call setup_process_coding_systems.
(server_accept_connection): Call setup_process_coding_systems.
(read_process_output): If the process has a filter, decide the
multibyteness of a string to given to the filter by
`filter_multibyte' member of the process. If the process doesn't
have a filter and the result of conversion is unibyte, use
Fstring_to_multibyte (not Fstring_make_multibyte) to get the
multibyte form.
(Fset_process_coding_system): Call setup_process_coding_systems.
(Fset_process_filter_multibyte): New function.
(Fprocess_filter_multibyte_p): New function.
(syms_of_process): Intern and staticpro QCfilter_multibyte.
Defsubr Sset_process_filter_multibyte and
Sprocess_filter_multibyte_p.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Mon, 10 Feb 2003 07:58:29 +0000 |
parents | b8fc349121d1 |
children | 695cf19ef79e |
rev | line source |
---|---|
484 | 1 /* |
2 <dir.h> -- definitions for 4.2BSD-compatible directory access | |
3 | |
4 last edit: 09-Jul-1983 D A Gwyn | |
5 */ | |
6 | |
7 #ifdef VMS | |
8 #ifndef FAB$C_BID | |
9 #include <fab.h> | |
10 #endif | |
11 #ifndef NAM$C_BID | |
12 #include <nam.h> | |
13 #endif | |
14 #ifndef RMS$_SUC | |
15 #include <rmsdef.h> | |
16 #endif | |
5877 | 17 #include "vmsdir.h" |
484 | 18 #endif /* VMS */ |
19 | |
20 #define DIRBLKSIZ 512 /* size of directory block */ | |
21 #ifdef VMS | |
22 #define MAXNAMLEN (DIR$S_NAME + 7) /* 80 plus room for version #. */ | |
23 #define MAXFULLSPEC NAM$C_MAXRSS /* Maximum full spec */ | |
24 #else | |
9792
b8fc349121d1
(MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents:
5877
diff
changeset
|
25 #ifdef WINDOWSNT |
b8fc349121d1
(MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents:
5877
diff
changeset
|
26 #define MAXNAMLEN 255 |
b8fc349121d1
(MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents:
5877
diff
changeset
|
27 #else /* not WINDOWSNT */ |
484 | 28 #define MAXNAMLEN 15 /* maximum filename length */ |
9792
b8fc349121d1
(MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents:
5877
diff
changeset
|
29 #endif /* not WINDOWSNT */ |
484 | 30 #endif /* VMS */ |
31 /* NOTE: MAXNAMLEN must be one less than a multiple of 4 */ | |
32 | |
33 struct direct /* data from readdir() */ | |
34 { | |
35 long d_ino; /* inode number of entry */ | |
36 unsigned short d_reclen; /* length of this record */ | |
37 unsigned short d_namlen; /* length of string in d_name */ | |
38 char d_name[MAXNAMLEN+1]; /* name of file */ | |
39 }; | |
40 | |
41 typedef struct | |
42 { | |
43 int dd_fd; /* file descriptor */ | |
44 int dd_loc; /* offset in block */ | |
45 int dd_size; /* amount of valid data */ | |
46 char dd_buf[DIRBLKSIZ]; /* directory block */ | |
47 } DIR; /* stream data from opendir() */ | |
48 | |
49 extern DIR *opendir(); | |
50 extern struct direct *readdir(); | |
51 extern long telldir(); | |
52 extern void seekdir(); | |
53 extern void closedir(); | |
54 | |
55 #define rewinddir( dirp ) seekdir( dirp, 0L ) |