| 1 | /* GNU Emacs VMS directory definition file. |
| 2 | Copyright (C) 1986 Free Software Foundation, Inc. |
| 3 | |
| 4 | This file is part of GNU Emacs. |
| 5 | |
| 6 | GNU Emacs is free software; you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation; either version 1, or (at your option) |
| 9 | any later version. |
| 10 | |
| 11 | GNU Emacs is distributed in the hope that it will be useful, |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 14 | GNU General Public License for more details. |
| 15 | |
| 16 | You should have received a copy of the GNU General Public License |
| 17 | along with GNU Emacs; see the file COPYING. If not, write to |
| 18 | the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ |
| 19 | |
| 20 | /* |
| 21 | * Files-11 Ver. 2 directory structure (VMS V4.x - long names) |
| 22 | */ |
| 23 | #ifndef DIR$K_LENGTH |
| 24 | |
| 25 | #define DIR$C_FID 0 |
| 26 | #define DIR$C_LINKNAME 1 |
| 27 | #define DIR$K_LENGTH 6 |
| 28 | #define DIR$C_LENGTH 6 |
| 29 | #define DIR$S_DIRDEF 6 |
| 30 | #define DIR$W_SIZE 0 |
| 31 | #define DIR$W_VERLIMIT 2 |
| 32 | #define DIR$B_FLAGS 4 |
| 33 | #define DIR$S_TYPE 3 |
| 34 | #define DIR$V_TYPE 0 |
| 35 | #define DIR$V_NEXTREC 6 |
| 36 | #define DIR$V_PREVREC 7 |
| 37 | #define DIR$B_NAMECOUNT 5 |
| 38 | #define DIR$S_NAME 80 |
| 39 | #define DIR$T_NAME 6 |
| 40 | |
| 41 | #define DIR$K_VERSION 8 |
| 42 | #define DIR$C_VERSION 8 |
| 43 | #define DIR$S_DIRDEF1 8 |
| 44 | #define DIR$W_VERSION 0 |
| 45 | #define DIR$S_FID 6 |
| 46 | #define DIR$W_FID 2 |
| 47 | #define DIR$W_FID_NUM 2 |
| 48 | #define DIR$W_FID_SEQ 4 |
| 49 | #define DIR$W_FID_RVN 6 |
| 50 | #define DIR$B_FID_RVN 6 |
| 51 | #define DIR$B_FID_NMX 7 |
| 52 | |
| 53 | #define DIR$S_DIRDEF2 1 |
| 54 | #define DIR$T_LINKNAME 0 |
| 55 | |
| 56 | typedef struct dir$_name { |
| 57 | /* short dir$w_size; /* if you read with RMS, it eats this... */ |
| 58 | short dir$w_verlimit; /* maximum number of versions */ |
| 59 | union { |
| 60 | unsigned char dir_b_flags; |
| 61 | #define dir$b_flags dir__b_flags.dir_b_flags |
| 62 | struct { |
| 63 | unsigned char dir_v_type: DIR$S_TYPE; |
| 64 | #define dir$v_type dir__b_flags.dir___b_flags.dir_v_type |
| 65 | unsigned char: 3; |
| 66 | unsigned char dir_v_nextrec: 1; |
| 67 | #define dir$v_nextrec dir__b_flags.dir___b_flags.dir_v_nextrec |
| 68 | unsigned char dir_v_prevrec: 1; |
| 69 | #define dir$v_prevrec dir__b_flags.dir___b_flags.dir_v_prevrec |
| 70 | } dir___b_flags; |
| 71 | } dir__b_flags; |
| 72 | unsigned char dir$b_namecount; |
| 73 | char dir$t_name[]; |
| 74 | } dir$_dirdef; /* only the fixed first part */ |
| 75 | |
| 76 | typedef struct dir$_version { |
| 77 | short dir$w_version; |
| 78 | short dir$w_fid_num; |
| 79 | short dir$w_fid_seq; |
| 80 | union { |
| 81 | short dir_w_fid_rvn; |
| 82 | #define dir$w_fid_rvn dir__w_fid_rvn.dir_w_fid_rvn |
| 83 | struct { |
| 84 | char dir_b_fid_rvn; |
| 85 | #define dir$b_fid_rvn dir__w_fid_rvn.dir___w_fid_rvn.dir_b_fid_rvn |
| 86 | char dir_b_fid_nmx; |
| 87 | #define dir$b_fid_nmx dir__w_fid_rvn.dir___w_fid_rvn.dir_b_fid_nmx |
| 88 | } dir___w_fid_rvn; |
| 89 | } dir__w_fid_rvn; |
| 90 | } dir$_dirdef1; /* one for each version of the file */ |
| 91 | |
| 92 | typedef |
| 93 | struct dir$_linkname { |
| 94 | char dir$t_linkname[]; |
| 95 | } dir$_dirdef2; |
| 96 | |
| 97 | #endif |