annotate src/ndir.h @ 97055:bf2d011df79a

* trampver.texi: Update release number.
author Michael Albinus <michael.albinus@gmx.de>
date Mon, 28 Jul 2008 04:00:07 +0000
parents 9511dc88835c
children 52a7f3f50b89 c3512b2085a0
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
484
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1 /*
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
2 <dir.h> -- definitions for 4.2BSD-compatible directory access
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
3
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
4 last edit: 09-Jul-1983 D A Gwyn
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
5
75764
9511dc88835c Add legal comment on copyright issue.
Glenn Morris <rgm@gnu.org>
parents: 52401
diff changeset
6 * The code here is forced by the interface, and is not subject to
9511dc88835c Add legal comment on copyright issue.
Glenn Morris <rgm@gnu.org>
parents: 52401
diff changeset
7 * copyright, constituting the only possible expression of the
9511dc88835c Add legal comment on copyright issue.
Glenn Morris <rgm@gnu.org>
parents: 52401
diff changeset
8 * algorithm in this format.
9511dc88835c Add legal comment on copyright issue.
Glenn Morris <rgm@gnu.org>
parents: 52401
diff changeset
9 */
484
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
10 #ifdef VMS
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
11 #ifndef FAB$C_BID
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
12 #include <fab.h>
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
13 #endif
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
14 #ifndef NAM$C_BID
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
15 #include <nam.h>
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
16 #endif
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
17 #ifndef RMS$_SUC
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
18 #include <rmsdef.h>
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
19 #endif
5877
321b22a46f7a Use new name vmsdir.h.
Richard M. Stallman <rms@gnu.org>
parents: 484
diff changeset
20 #include "vmsdir.h"
484
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
21 #endif /* VMS */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
22
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
23 #define DIRBLKSIZ 512 /* size of directory block */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
24 #ifdef VMS
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
25 #define MAXNAMLEN (DIR$S_NAME + 7) /* 80 plus room for version #. */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
26 #define MAXFULLSPEC NAM$C_MAXRSS /* Maximum full spec */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
27 #else
9792
b8fc349121d1 (MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents: 5877
diff changeset
28 #ifdef WINDOWSNT
b8fc349121d1 (MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents: 5877
diff changeset
29 #define MAXNAMLEN 255
b8fc349121d1 (MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents: 5877
diff changeset
30 #else /* not WINDOWSNT */
484
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
31 #define MAXNAMLEN 15 /* maximum filename length */
9792
b8fc349121d1 (MAXNAMLEN) [WINDOWSNT]: Define as 255.
Richard M. Stallman <rms@gnu.org>
parents: 5877
diff changeset
32 #endif /* not WINDOWSNT */
484
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
33 #endif /* VMS */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
34 /* NOTE: MAXNAMLEN must be one less than a multiple of 4 */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
35
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
36 struct direct /* data from readdir() */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
37 {
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
38 long d_ino; /* inode number of entry */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
39 unsigned short d_reclen; /* length of this record */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
40 unsigned short d_namlen; /* length of string in d_name */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
41 char d_name[MAXNAMLEN+1]; /* name of file */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
42 };
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
43
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
44 typedef struct
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
45 {
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
46 int dd_fd; /* file descriptor */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
47 int dd_loc; /* offset in block */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
48 int dd_size; /* amount of valid data */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
49 char dd_buf[DIRBLKSIZ]; /* directory block */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
50 } DIR; /* stream data from opendir() */
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
51
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
52 extern DIR *opendir();
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
53 extern struct direct *readdir();
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
54 extern long telldir();
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
55 extern void seekdir();
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
56 extern void closedir();
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
57
3165b2697c78 entered into RCS
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
58 #define rewinddir( dirp ) seekdir( dirp, 0L )
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 9792
diff changeset
59
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 9792
diff changeset
60 /* arch-tag: aea50570-ffb7-43fd-b423-7743b10fbe6e
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 9792
diff changeset
61 (do not change this comment) */