Mercurial > vim
annotate src/memfile.c @ 32503:5d07e7e9580f v9.0.1583
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Commit: https://github.com/vim/vim/commit/3a2a60ce4a8e73594bca16814672fcc243d093ac
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat May 27 18:02:55 2023 +0100
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Problem: Get E304 when using 'cryptmethod' "xchacha20v2". (Steve Mynott)
Solution: Add 4th crypt method to block zero ID check. Avoid syncing a swap
file before reading the file. (closes #12433)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sat, 27 May 2023 19:15:04 +0200 |
parents | 9b0c304500cc |
children | bb5458706799 |
rev | line source |
---|---|
10042
4aead6a9b7a9
commit https://github.com/vim/vim/commit/edf3f97ae2af024708ebb4ac614227327033ca47
Christian Brabandt <cb@256bit.org>
parents:
9649
diff
changeset
|
1 /* vi:set ts=8 sts=4 sw=4 noet: |
7 | 2 * |
3 * VIM - Vi IMproved by Bram Moolenaar | |
4 * | |
5 * Do ":help uganda" in Vim to read copying and usage conditions. | |
6 * Do ":help credits" in Vim to see a list of people who contributed. | |
7 * See README.txt for an overview of the Vim source code. | |
8 */ | |
9 | |
10 /* | |
11 * memfile.c: Contains the functions for handling blocks of memory which can | |
12 * be stored in a file. This is the implementation of a sort of virtual memory. | |
13 * | |
14 * A memfile consists of a sequence of blocks. The blocks numbered from 0 | |
15 * upwards have been assigned a place in the actual file. The block number | |
16 * is equal to the page number in the file. The | |
17 * blocks with negative numbers are currently in memory only. They can be | |
18 * assigned a place in the file when too much memory is being used. At that | |
19 * moment they get a new, positive, number. A list is used for translation of | |
20 * negative to positive numbers. | |
21 * | |
22 * The size of a block is a multiple of a page size, normally the page size of | |
23 * the device the file is on. Most blocks are 1 page long. A Block of multiple | |
24 * pages is used for a line that does not fit in a single page. | |
25 * | |
26 * Each block can be in memory and/or in a file. The block stays in memory | |
27 * as long as it is locked. If it is no longer locked it can be swapped out to | |
28 * the file. It is only written to the file if it has been changed. | |
29 * | |
30 * Under normal operation the file is created when opening the memory file and | |
31 * deleted when closing the memory file. Only with recovery an existing memory | |
32 * file is opened. | |
33 */ | |
34 | |
35 #include "vim.h" | |
36 | |
37 /* | |
38 * Some systems have the page size in statfs.f_bsize, some in stat.st_blksize | |
39 */ | |
40 #ifdef HAVE_ST_BLKSIZE | |
41 # define STATFS stat | |
42 # define F_BSIZE st_blksize | |
43 # define fstatfs(fd, buf, len, nul) mch_fstat((fd), (buf)) | |
44 #else | |
45 # ifdef HAVE_SYS_STATFS_H | |
46 # include <sys/statfs.h> | |
47 # define STATFS statfs | |
48 # define F_BSIZE f_bsize | |
49 # endif | |
50 #endif | |
51 | |
52 /* | |
53 * for Amiga Dos 2.0x we use Flush | |
54 */ | |
55 #ifdef AMIGA | |
56 # ifdef FEAT_ARP | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
57 extern int dos2; // this is in os_amiga.c |
7 | 58 # endif |
59 # ifdef SASC | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
60 # include <ios1.h> // for chkufb() |
7 | 61 # endif |
62 #endif | |
63 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
64 #define MEMFILE_PAGE_SIZE 4096 // default page size |
7 | 65 |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
66 static long_u total_mem_used = 0; // total memory used for memfiles |
7 | 67 |
7803
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
68 static void mf_ins_hash(memfile_T *, bhdr_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
69 static void mf_rem_hash(memfile_T *, bhdr_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
70 static bhdr_T *mf_find_hash(memfile_T *, blocknr_T); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
71 static void mf_ins_used(memfile_T *, bhdr_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
72 static void mf_rem_used(memfile_T *, bhdr_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
73 static bhdr_T *mf_release(memfile_T *, int); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
74 static bhdr_T *mf_alloc_bhdr(memfile_T *, int); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
75 static void mf_free_bhdr(bhdr_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
76 static void mf_ins_free(memfile_T *, bhdr_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
77 static bhdr_T *mf_rem_free(memfile_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
78 static int mf_read(memfile_T *, bhdr_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
79 static int mf_write(memfile_T *, bhdr_T *); |
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
80 static int mf_write_block(memfile_T *mfp, bhdr_T *hp, off_T offset, unsigned size); |
7803
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
81 static int mf_trans_add(memfile_T *, bhdr_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
82 static void mf_do_open(memfile_T *, char_u *, int); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
83 static void mf_hash_init(mf_hashtab_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
84 static void mf_hash_free(mf_hashtab_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
85 static void mf_hash_free_all(mf_hashtab_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
86 static mf_hashitem_T *mf_hash_find(mf_hashtab_T *, blocknr_T); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
87 static void mf_hash_add_item(mf_hashtab_T *, mf_hashitem_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
88 static void mf_hash_rem_item(mf_hashtab_T *, mf_hashitem_T *); |
37c929c4a073
commit https://github.com/vim/vim/commit/92b8b2d307e34117f146319872010b0ccc9d2713
Christian Brabandt <cb@256bit.org>
parents:
7347
diff
changeset
|
89 static int mf_hash_grow(mf_hashtab_T *); |
7 | 90 |
91 /* | |
92 * The functions for using a memfile: | |
93 * | |
94 * mf_open() open a new or existing memfile | |
95 * mf_open_file() open a swap file for an existing memfile | |
96 * mf_close() close (and delete) a memfile | |
97 * mf_new() create a new block in a memfile and lock it | |
98 * mf_get() get an existing block and lock it | |
99 * mf_put() unlock a block, may be marked for writing | |
100 * mf_free() remove a block | |
101 * mf_sync() sync changed parts of memfile to disk | |
102 * mf_release_all() release as much memory as possible | |
103 * mf_trans_del() may translate negative to positive block number | |
104 * mf_fullname() make file name full path (use before first :cd) | |
105 */ | |
106 | |
107 /* | |
108 * Open an existing or new memory block file. | |
109 * | |
110 * fname: name of file to use (NULL means no file at all) | |
111 * Note: fname must have been allocated, it is not copied! | |
112 * If opening the file fails, fname is freed. | |
113 * flags: flags for open() call | |
114 * | |
115 * If fname != NULL and file cannot be opened, fail. | |
116 * | |
117 * return value: identifier for this memory block file. | |
118 */ | |
119 memfile_T * | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
120 mf_open(char_u *fname, int flags) |
7 | 121 { |
122 memfile_T *mfp; | |
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
123 off_T size; |
4519
fba9c0f86f77
updated for version 7.3.1007
Bram Moolenaar <bram@vim.org>
parents:
4352
diff
changeset
|
124 #if defined(STATFS) && defined(UNIX) && !defined(__QNX__) && !defined(__minix) |
7 | 125 # define USE_FSTATFS |
126 struct STATFS stf; | |
127 #endif | |
128 | |
16825
ce04ebdf26b8
patch 8.1.1414: alloc() returning "char_u *" causes a lot of type casts
Bram Moolenaar <Bram@vim.org>
parents:
16823
diff
changeset
|
129 if ((mfp = ALLOC_ONE(memfile_T)) == NULL) |
7 | 130 return NULL; |
131 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
132 if (fname == NULL) // no file for this memfile, use memory only |
7 | 133 { |
134 mfp->mf_fname = NULL; | |
135 mfp->mf_ffname = NULL; | |
136 mfp->mf_fd = -1; | |
137 } | |
138 else | |
139 { | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
140 mf_do_open(mfp, fname, flags); // try to open the file |
7 | 141 |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
142 // if the file cannot be opened, return here |
7 | 143 if (mfp->mf_fd < 0) |
144 { | |
145 vim_free(mfp); | |
146 return NULL; | |
147 } | |
148 } | |
149 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
150 mfp->mf_free_first = NULL; // free list is empty |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
151 mfp->mf_used_first = NULL; // used list is empty |
7 | 152 mfp->mf_used_last = NULL; |
32503
5d07e7e9580f
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Bram Moolenaar <Bram@vim.org>
parents:
32290
diff
changeset
|
153 mfp->mf_dirty = MF_DIRTY_NO; |
7 | 154 mfp->mf_used_count = 0; |
2730 | 155 mf_hash_init(&mfp->mf_hash); |
156 mf_hash_init(&mfp->mf_trans); | |
7 | 157 mfp->mf_page_size = MEMFILE_PAGE_SIZE; |
2267 | 158 #ifdef FEAT_CRYPT |
159 mfp->mf_old_key = NULL; | |
160 #endif | |
7 | 161 |
162 #ifdef USE_FSTATFS | |
163 /* | |
164 * Try to set the page size equal to the block size of the device. | |
165 * Speeds up I/O a lot. | |
166 * When recovering, the actual block size will be retrieved from block 0 | |
167 * in ml_recover(). The size used here may be wrong, therefore | |
168 * mf_blocknr_max must be rounded up. | |
169 */ | |
170 if (mfp->mf_fd >= 0 | |
171 && fstatfs(mfp->mf_fd, &stf, sizeof(struct statfs), 0) == 0 | |
172 && stf.F_BSIZE >= MIN_SWAP_PAGE_SIZE | |
173 && stf.F_BSIZE <= MAX_SWAP_PAGE_SIZE) | |
174 mfp->mf_page_size = stf.F_BSIZE; | |
175 #endif | |
176 | |
177 if (mfp->mf_fd < 0 || (flags & (O_TRUNC|O_EXCL)) | |
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
178 || (size = vim_lseek(mfp->mf_fd, (off_T)0L, SEEK_END)) <= 0) |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
179 mfp->mf_blocknr_max = 0; // no file or empty file |
7 | 180 else |
181 mfp->mf_blocknr_max = (blocknr_T)((size + mfp->mf_page_size - 1) | |
182 / mfp->mf_page_size); | |
183 mfp->mf_blocknr_min = -1; | |
184 mfp->mf_neg_count = 0; | |
185 mfp->mf_infile_count = mfp->mf_blocknr_max; | |
1230 | 186 |
187 /* | |
188 * Compute maximum number of pages ('maxmem' is in Kbyte): | |
189 * 'mammem' * 1Kbyte / page-size-in-bytes. | |
190 * Avoid overflow by first reducing page size as much as possible. | |
191 */ | |
192 { | |
193 int shift = 10; | |
194 unsigned page_size = mfp->mf_page_size; | |
195 | |
196 while (shift > 0 && (page_size & 1) == 0) | |
197 { | |
198 page_size = page_size >> 1; | |
199 --shift; | |
200 } | |
201 mfp->mf_used_count_max = (p_mm << shift) / page_size; | |
202 if (mfp->mf_used_count_max < 10) | |
203 mfp->mf_used_count_max = 10; | |
204 } | |
7 | 205 |
206 return mfp; | |
207 } | |
208 | |
209 /* | |
210 * Open a file for an existing memfile. Used when updatecount set from 0 to | |
211 * some value. | |
212 * If the file already exists, this fails. | |
213 * "fname" is the name of file to use (NULL means no file at all) | |
214 * Note: "fname" must have been allocated, it is not copied! If opening the | |
215 * file fails, "fname" is freed. | |
216 * | |
217 * return value: FAIL if file could not be opened, OK otherwise | |
218 */ | |
219 int | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
220 mf_open_file(memfile_T *mfp, char_u *fname) |
7 | 221 { |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
222 mf_do_open(mfp, fname, O_RDWR|O_CREAT|O_EXCL); // try to open the file |
7 | 223 |
224 if (mfp->mf_fd < 0) | |
225 return FAIL; | |
226 | |
32503
5d07e7e9580f
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Bram Moolenaar <Bram@vim.org>
parents:
32290
diff
changeset
|
227 mfp->mf_dirty = MF_DIRTY_YES; |
7 | 228 return OK; |
229 } | |
230 | |
231 /* | |
2249
6d3d35ff2c2b
Use full path in undofile(). Updated docs.
Bram Moolenaar <bram@vim.org>
parents:
2003
diff
changeset
|
232 * Close a memory file and delete the associated file if 'del_file' is TRUE. |
7 | 233 */ |
234 void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
235 mf_close(memfile_T *mfp, int del_file) |
7 | 236 { |
237 bhdr_T *hp, *nextp; | |
238 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
239 if (mfp == NULL) // safety check |
7 | 240 return; |
241 if (mfp->mf_fd >= 0) | |
242 { | |
243 if (close(mfp->mf_fd) < 0) | |
26436
ef0c07cbf53f
patch 8.2.3749: error messages are everywhere
Bram Moolenaar <Bram@vim.org>
parents:
23005
diff
changeset
|
244 emsg(_(e_close_error_on_swap_file)); |
7 | 245 } |
246 if (del_file && mfp->mf_fname != NULL) | |
247 mch_remove(mfp->mf_fname); | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
248 // free entries in used list |
7 | 249 for (hp = mfp->mf_used_first; hp != NULL; hp = nextp) |
250 { | |
27453
c7f614c9ceb3
patch 8.2.4255: theoretical computation overflow
Bram Moolenaar <Bram@vim.org>
parents:
26909
diff
changeset
|
251 total_mem_used -= (long_u)hp->bh_page_count * mfp->mf_page_size; |
7 | 252 nextp = hp->bh_next; |
253 mf_free_bhdr(hp); | |
254 } | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
255 while (mfp->mf_free_first != NULL) // free entries in free list |
7 | 256 vim_free(mf_rem_free(mfp)); |
2730 | 257 mf_hash_free(&mfp->mf_hash); |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
258 mf_hash_free_all(&mfp->mf_trans); // free hashtable and its items |
7 | 259 vim_free(mfp->mf_fname); |
260 vim_free(mfp->mf_ffname); | |
261 vim_free(mfp); | |
262 } | |
263 | |
264 /* | |
265 * Close the swap file for a memfile. Used when 'swapfile' is reset. | |
266 */ | |
267 void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
268 mf_close_file( |
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
269 buf_T *buf, |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
270 int getlines) // get all lines into memory? |
7 | 271 { |
272 memfile_T *mfp; | |
273 linenr_T lnum; | |
274 | |
275 mfp = buf->b_ml.ml_mfp; | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
276 if (mfp == NULL || mfp->mf_fd < 0) // nothing to close |
7 | 277 return; |
278 | |
279 if (getlines) | |
280 { | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
281 // get all blocks in memory by accessing all lines (clumsy!) |
1066 | 282 mf_dont_release = TRUE; |
7 | 283 for (lnum = 1; lnum <= buf->b_ml.ml_line_count; ++lnum) |
284 (void)ml_get_buf(buf, lnum, FALSE); | |
1066 | 285 mf_dont_release = FALSE; |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
286 // TODO: should check if all blocks are really in core |
7 | 287 } |
288 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
289 if (close(mfp->mf_fd) < 0) // close the file |
26436
ef0c07cbf53f
patch 8.2.3749: error messages are everywhere
Bram Moolenaar <Bram@vim.org>
parents:
23005
diff
changeset
|
290 emsg(_(e_close_error_on_swap_file)); |
7 | 291 mfp->mf_fd = -1; |
292 | |
293 if (mfp->mf_fname != NULL) | |
294 { | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
295 mch_remove(mfp->mf_fname); // delete the swap file |
13244
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
10359
diff
changeset
|
296 VIM_CLEAR(mfp->mf_fname); |
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
10359
diff
changeset
|
297 VIM_CLEAR(mfp->mf_ffname); |
7 | 298 } |
299 } | |
300 | |
301 /* | |
302 * Set new size for a memfile. Used when block 0 of a swapfile has been read | |
303 * and the size it indicates differs from what was guessed. | |
304 */ | |
305 void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
306 mf_new_page_size(memfile_T *mfp, unsigned new_size) |
7 | 307 { |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
308 // Correct the memory used for block 0 to the new size, because it will be |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
309 // freed with that size later on. |
7 | 310 total_mem_used += new_size - mfp->mf_page_size; |
311 mfp->mf_page_size = new_size; | |
312 } | |
313 | |
314 /* | |
315 * get a new block | |
316 * | |
317 * negative: TRUE if negative block number desired (data block) | |
318 */ | |
319 bhdr_T * | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
320 mf_new(memfile_T *mfp, int negative, int page_count) |
7 | 321 { |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
322 bhdr_T *hp; // new bhdr_T |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
323 bhdr_T *freep; // first block in free list |
1166 | 324 char_u *p; |
7 | 325 |
326 /* | |
327 * If we reached the maximum size for the used memory blocks, release one | |
328 * If a bhdr_T is returned, use it and adjust the page_count if necessary. | |
329 */ | |
330 hp = mf_release(mfp, page_count); | |
331 | |
332 /* | |
333 * Decide on the number to use: | |
334 * If there is a free block, use its number. | |
335 * Otherwise use mf_block_min for a negative number, mf_block_max for | |
336 * a positive number. | |
337 */ | |
338 freep = mfp->mf_free_first; | |
339 if (!negative && freep != NULL && freep->bh_page_count >= page_count) | |
340 { | |
341 /* | |
342 * If the block in the free list has more pages, take only the number | |
343 * of pages needed and allocate a new bhdr_T with data | |
344 * | |
1166 | 345 * If the number of pages matches and mf_release() did not return a |
346 * bhdr_T, use the bhdr_T from the free list and allocate the data | |
7 | 347 * |
1166 | 348 * If the number of pages matches and mf_release() returned a bhdr_T, |
7 | 349 * just use the number and free the bhdr_T from the free list |
350 */ | |
351 if (freep->bh_page_count > page_count) | |
352 { | |
353 if (hp == NULL && (hp = mf_alloc_bhdr(mfp, page_count)) == NULL) | |
354 return NULL; | |
355 hp->bh_bnum = freep->bh_bnum; | |
356 freep->bh_bnum += page_count; | |
357 freep->bh_page_count -= page_count; | |
358 } | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
359 else if (hp == NULL) // need to allocate memory for this block |
7 | 360 { |
27453
c7f614c9ceb3
patch 8.2.4255: theoretical computation overflow
Bram Moolenaar <Bram@vim.org>
parents:
26909
diff
changeset
|
361 if ((p = alloc((size_t)mfp->mf_page_size * page_count)) == NULL) |
7 | 362 return NULL; |
363 hp = mf_rem_free(mfp); | |
364 hp->bh_data = p; | |
365 } | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
366 else // use the number, remove entry from free list |
7 | 367 { |
368 freep = mf_rem_free(mfp); | |
369 hp->bh_bnum = freep->bh_bnum; | |
370 vim_free(freep); | |
371 } | |
372 } | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
373 else // get a new number |
7 | 374 { |
375 if (hp == NULL && (hp = mf_alloc_bhdr(mfp, page_count)) == NULL) | |
376 return NULL; | |
377 if (negative) | |
378 { | |
379 hp->bh_bnum = mfp->mf_blocknr_min--; | |
380 mfp->mf_neg_count++; | |
381 } | |
382 else | |
383 { | |
384 hp->bh_bnum = mfp->mf_blocknr_max; | |
385 mfp->mf_blocknr_max += page_count; | |
386 } | |
387 } | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
388 hp->bh_flags = BH_LOCKED | BH_DIRTY; // new block is always dirty |
32503
5d07e7e9580f
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Bram Moolenaar <Bram@vim.org>
parents:
32290
diff
changeset
|
389 mfp->mf_dirty = MF_DIRTY_YES; |
7 | 390 hp->bh_page_count = page_count; |
391 mf_ins_used(mfp, hp); | |
392 mf_ins_hash(mfp, hp); | |
393 | |
394 /* | |
395 * Init the data to all zero, to avoid reading uninitialized data. | |
396 * This also avoids that the passwd file ends up in the swap file! | |
397 */ | |
2249
6d3d35ff2c2b
Use full path in undofile(). Updated docs.
Bram Moolenaar <bram@vim.org>
parents:
2003
diff
changeset
|
398 (void)vim_memset((char *)(hp->bh_data), 0, |
6d3d35ff2c2b
Use full path in undofile(). Updated docs.
Bram Moolenaar <bram@vim.org>
parents:
2003
diff
changeset
|
399 (size_t)mfp->mf_page_size * page_count); |
7 | 400 |
401 return hp; | |
402 } | |
403 | |
404 /* | |
2267 | 405 * Get existing block "nr" with "page_count" pages. |
7 | 406 * |
407 * Note: The caller should first check a negative nr with mf_trans_del() | |
408 */ | |
409 bhdr_T * | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
410 mf_get(memfile_T *mfp, blocknr_T nr, int page_count) |
7 | 411 { |
412 bhdr_T *hp; | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
413 // doesn't exist |
7 | 414 if (nr >= mfp->mf_blocknr_max || nr <= mfp->mf_blocknr_min) |
415 return NULL; | |
416 | |
417 /* | |
418 * see if it is in the cache | |
419 */ | |
420 hp = mf_find_hash(mfp, nr); | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
421 if (hp == NULL) // not in the hash list |
7 | 422 { |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
423 if (nr < 0 || nr >= mfp->mf_infile_count) // can't be in the file |
7 | 424 return NULL; |
425 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
426 // could check here if the block is in the free list |
7 | 427 |
428 /* | |
429 * Check if we need to flush an existing block. | |
430 * If so, use that block. | |
431 * If not, allocate a new block. | |
432 */ | |
433 hp = mf_release(mfp, page_count); | |
32290
9b0c304500cc
patch 9.0.1477: crash when recovering from corrupted swap file
Bram Moolenaar <Bram@vim.org>
parents:
31728
diff
changeset
|
434 if (hp == NULL && page_count > 0) |
9b0c304500cc
patch 9.0.1477: crash when recovering from corrupted swap file
Bram Moolenaar <Bram@vim.org>
parents:
31728
diff
changeset
|
435 hp = mf_alloc_bhdr(mfp, page_count); |
9b0c304500cc
patch 9.0.1477: crash when recovering from corrupted swap file
Bram Moolenaar <Bram@vim.org>
parents:
31728
diff
changeset
|
436 if (hp == NULL) |
7 | 437 return NULL; |
438 | |
439 hp->bh_bnum = nr; | |
440 hp->bh_flags = 0; | |
441 hp->bh_page_count = page_count; | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
442 if (mf_read(mfp, hp) == FAIL) // cannot read the block! |
7 | 443 { |
444 mf_free_bhdr(hp); | |
445 return NULL; | |
446 } | |
447 } | |
448 else | |
449 { | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
450 mf_rem_used(mfp, hp); // remove from list, insert in front below |
7 | 451 mf_rem_hash(mfp, hp); |
452 } | |
453 | |
454 hp->bh_flags |= BH_LOCKED; | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
455 mf_ins_used(mfp, hp); // put in front of used list |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
456 mf_ins_hash(mfp, hp); // put in front of hash list |
7 | 457 |
458 return hp; | |
459 } | |
460 | |
461 /* | |
462 * release the block *hp | |
463 * | |
464 * dirty: Block must be written to file later | |
465 * infile: Block should be in file (needed for recovery) | |
466 * | |
467 * no return value, function cannot fail | |
468 */ | |
469 void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
470 mf_put( |
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
471 memfile_T *mfp, |
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
472 bhdr_T *hp, |
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
473 int dirty, |
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
474 int infile) |
7 | 475 { |
476 int flags; | |
477 | |
478 flags = hp->bh_flags; | |
479 | |
480 if ((flags & BH_LOCKED) == 0) | |
26897
d02d40f0261c
patch 8.2.3977: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26436
diff
changeset
|
481 iemsg(_(e_block_was_not_locked)); |
7 | 482 flags &= ~BH_LOCKED; |
483 if (dirty) | |
484 { | |
485 flags |= BH_DIRTY; | |
32503
5d07e7e9580f
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Bram Moolenaar <Bram@vim.org>
parents:
32290
diff
changeset
|
486 if (mfp->mf_dirty != MF_DIRTY_YES_NOSYNC) |
5d07e7e9580f
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Bram Moolenaar <Bram@vim.org>
parents:
32290
diff
changeset
|
487 mfp->mf_dirty = MF_DIRTY_YES; |
7 | 488 } |
489 hp->bh_flags = flags; | |
490 if (infile) | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
491 mf_trans_add(mfp, hp); // may translate negative in positive nr |
7 | 492 } |
493 | |
494 /* | |
495 * block *hp is no longer in used, may put it in the free list of memfile *mfp | |
496 */ | |
497 void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
498 mf_free(memfile_T *mfp, bhdr_T *hp) |
7 | 499 { |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
500 vim_free(hp->bh_data); // free the memory |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
501 mf_rem_hash(mfp, hp); // get *hp out of the hash list |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
502 mf_rem_used(mfp, hp); // get *hp out of the used list |
7 | 503 if (hp->bh_bnum < 0) |
504 { | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
505 vim_free(hp); // don't want negative numbers in free list |
7 | 506 mfp->mf_neg_count--; |
507 } | |
508 else | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
509 mf_ins_free(mfp, hp); // put *hp in the free list |
7 | 510 } |
511 | |
512 /* | |
513 * Sync the memory file *mfp to disk. | |
514 * Flags: | |
515 * MFS_ALL If not given, blocks with negative numbers are not synced, | |
516 * even when they are dirty! | |
517 * MFS_STOP Stop syncing when a character becomes available, but sync at | |
518 * least one block. | |
519 * MFS_FLUSH Make sure buffers are flushed to disk, so they will survive a | |
520 * system crash. | |
521 * MFS_ZERO Only write block 0. | |
522 * | |
523 * Return FAIL for failure, OK otherwise | |
524 */ | |
525 int | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
526 mf_sync(memfile_T *mfp, int flags) |
7 | 527 { |
528 int status; | |
529 bhdr_T *hp; | |
530 int got_int_save = got_int; | |
531 | |
32503
5d07e7e9580f
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Bram Moolenaar <Bram@vim.org>
parents:
32290
diff
changeset
|
532 if (mfp->mf_fd < 0) |
7 | 533 { |
32503
5d07e7e9580f
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Bram Moolenaar <Bram@vim.org>
parents:
32290
diff
changeset
|
534 // there is no file, nothing to do |
5d07e7e9580f
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Bram Moolenaar <Bram@vim.org>
parents:
32290
diff
changeset
|
535 mfp->mf_dirty = MF_DIRTY_NO; |
7 | 536 return FAIL; |
537 } | |
538 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
539 // Only a CTRL-C while writing will break us here, not one typed |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
540 // previously. |
7 | 541 got_int = FALSE; |
542 | |
543 /* | |
544 * sync from last to first (may reduce the probability of an inconsistent | |
545 * file) If a write fails, it is very likely caused by a full filesystem. | |
546 * Then we only try to write blocks within the existing file. If that also | |
547 * fails then we give up. | |
548 */ | |
549 status = OK; | |
550 for (hp = mfp->mf_used_last; hp != NULL; hp = hp->bh_prev) | |
551 if (((flags & MFS_ALL) || hp->bh_bnum >= 0) | |
552 && (hp->bh_flags & BH_DIRTY) | |
553 && (status == OK || (hp->bh_bnum >= 0 | |
554 && hp->bh_bnum < mfp->mf_infile_count))) | |
555 { | |
556 if ((flags & MFS_ZERO) && hp->bh_bnum != 0) | |
557 continue; | |
558 if (mf_write(mfp, hp) == FAIL) | |
559 { | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
560 if (status == FAIL) // double error: quit syncing |
7 | 561 break; |
562 status = FAIL; | |
563 } | |
564 if (flags & MFS_STOP) | |
565 { | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
566 // Stop when char available now. |
7 | 567 if (ui_char_avail()) |
568 break; | |
569 } | |
570 else | |
571 ui_breakcheck(); | |
572 if (got_int) | |
573 break; | |
574 } | |
575 | |
576 /* | |
577 * If the whole list is flushed, the memfile is not dirty anymore. | |
578 * In case of an error this flag is also set, to avoid trying all the time. | |
579 */ | |
580 if (hp == NULL || status == FAIL) | |
32503
5d07e7e9580f
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Bram Moolenaar <Bram@vim.org>
parents:
32290
diff
changeset
|
581 mfp->mf_dirty = MF_DIRTY_NO; |
7 | 582 |
583 if ((flags & MFS_FLUSH) && *p_sws != NUL) | |
584 { | |
585 #if defined(UNIX) | |
586 # ifdef HAVE_FSYNC | |
587 /* | |
588 * most Unixes have the very useful fsync() function, just what we need. | |
589 */ | |
590 if (STRCMP(p_sws, "fsync") == 0) | |
591 { | |
15816
40336d427dd2
patch 8.1.0915: fsync() may not work properly on Mac
Bram Moolenaar <Bram@vim.org>
parents:
15470
diff
changeset
|
592 if (vim_fsync(mfp->mf_fd)) |
7 | 593 status = FAIL; |
594 } | |
595 else | |
596 # endif | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
597 // OpenNT is strictly POSIX (Benzinger) |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
598 // Tandem/Himalaya NSK-OSS doesn't have sync() |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
599 // No sync() on Stratus VOS |
6637 | 600 # if defined(__OPENNT) || defined(__TANDEM) || defined(__VOS__) |
7 | 601 fflush(NULL); |
602 # else | |
603 sync(); | |
604 # endif | |
605 #endif | |
606 #ifdef VMS | |
607 if (STRCMP(p_sws, "fsync") == 0) | |
608 { | |
15816
40336d427dd2
patch 8.1.0915: fsync() may not work properly on Mac
Bram Moolenaar <Bram@vim.org>
parents:
15470
diff
changeset
|
609 if (vim_fsync(mfp->mf_fd)) |
7 | 610 status = FAIL; |
611 } | |
612 #endif | |
15868
7fad90423bd2
patch 8.1.0941: macros for MS-Windows are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15816
diff
changeset
|
613 #ifdef MSWIN |
14822
aa9c7588d30a
patch 8.1.0423: MS-Windows: using dup-close for flushing a file
Christian Brabandt <cb@256bit.org>
parents:
13244
diff
changeset
|
614 if (_commit(mfp->mf_fd)) |
aa9c7588d30a
patch 8.1.0423: MS-Windows: using dup-close for flushing a file
Christian Brabandt <cb@256bit.org>
parents:
13244
diff
changeset
|
615 status = FAIL; |
7 | 616 #endif |
617 #ifdef AMIGA | |
1030 | 618 # if defined(__AROS__) || defined(__amigaos4__) |
15816
40336d427dd2
patch 8.1.0915: fsync() may not work properly on Mac
Bram Moolenaar <Bram@vim.org>
parents:
15470
diff
changeset
|
619 if (vim_fsync(mfp->mf_fd) != 0) |
7 | 620 status = FAIL; |
621 # else | |
622 /* | |
623 * Flush() only exists for AmigaDos 2.0. | |
624 * For 1.3 it should be done with close() + open(), but then the risk | |
625 * is that the open() may fail and lose the file.... | |
626 */ | |
627 # ifdef FEAT_ARP | |
628 if (dos2) | |
629 # endif | |
630 # ifdef SASC | |
631 { | |
632 struct UFB *fp = chkufb(mfp->mf_fd); | |
633 | |
634 if (fp != NULL) | |
635 Flush(fp->ufbfh); | |
636 } | |
637 # else | |
638 # if defined(_DCC) || defined(__GNUC__) || defined(__MORPHOS__) | |
639 { | |
984 | 640 # if defined(__GNUC__) && !defined(__MORPHOS__) && defined(__libnix__) |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
641 // Have function (in libnix at least), |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
642 // but ain't got no prototype anywhere. |
7 | 643 extern unsigned long fdtofh(int filedescriptor); |
644 # endif | |
984 | 645 # if !defined(__libnix__) |
646 fflush(NULL); | |
647 # else | |
7 | 648 BPTR fh = (BPTR)fdtofh(mfp->mf_fd); |
649 | |
650 if (fh != 0) | |
651 Flush(fh); | |
984 | 652 # endif |
7 | 653 } |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
654 # else // assume Manx |
7 | 655 Flush(_devtab[mfp->mf_fd].fd); |
656 # endif | |
657 # endif | |
658 # endif | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
659 #endif // AMIGA |
7 | 660 } |
661 | |
662 got_int |= got_int_save; | |
663 | |
664 return status; | |
665 } | |
666 | |
667 /* | |
630 | 668 * For all blocks in memory file *mfp that have a positive block number set |
669 * the dirty flag. These are blocks that need to be written to a newly | |
670 * created swapfile. | |
671 */ | |
672 void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
673 mf_set_dirty(memfile_T *mfp) |
630 | 674 { |
675 bhdr_T *hp; | |
676 | |
677 for (hp = mfp->mf_used_last; hp != NULL; hp = hp->bh_prev) | |
678 if (hp->bh_bnum > 0) | |
679 hp->bh_flags |= BH_DIRTY; | |
32503
5d07e7e9580f
patch 9.0.1583: get E304 when using 'cryptmethod' "xchacha20v2"
Bram Moolenaar <Bram@vim.org>
parents:
32290
diff
changeset
|
680 mfp->mf_dirty = MF_DIRTY_YES; |
630 | 681 } |
682 | |
683 /* | |
7 | 684 * insert block *hp in front of hashlist of memfile *mfp |
685 */ | |
686 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
687 mf_ins_hash(memfile_T *mfp, bhdr_T *hp) |
7 | 688 { |
2730 | 689 mf_hash_add_item(&mfp->mf_hash, (mf_hashitem_T *)hp); |
7 | 690 } |
691 | |
692 /* | |
693 * remove block *hp from hashlist of memfile list *mfp | |
694 */ | |
695 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
696 mf_rem_hash(memfile_T *mfp, bhdr_T *hp) |
7 | 697 { |
2730 | 698 mf_hash_rem_item(&mfp->mf_hash, (mf_hashitem_T *)hp); |
7 | 699 } |
700 | |
701 /* | |
702 * look in hash lists of memfile *mfp for block header with number 'nr' | |
703 */ | |
704 static bhdr_T * | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
705 mf_find_hash(memfile_T *mfp, blocknr_T nr) |
7 | 706 { |
2730 | 707 return (bhdr_T *)mf_hash_find(&mfp->mf_hash, nr); |
7 | 708 } |
709 | |
710 /* | |
711 * insert block *hp in front of used list of memfile *mfp | |
712 */ | |
713 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
714 mf_ins_used(memfile_T *mfp, bhdr_T *hp) |
7 | 715 { |
716 hp->bh_next = mfp->mf_used_first; | |
717 mfp->mf_used_first = hp; | |
718 hp->bh_prev = NULL; | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
719 if (hp->bh_next == NULL) // list was empty, adjust last pointer |
7 | 720 mfp->mf_used_last = hp; |
721 else | |
722 hp->bh_next->bh_prev = hp; | |
723 mfp->mf_used_count += hp->bh_page_count; | |
27453
c7f614c9ceb3
patch 8.2.4255: theoretical computation overflow
Bram Moolenaar <Bram@vim.org>
parents:
26909
diff
changeset
|
724 total_mem_used += (long_u)hp->bh_page_count * mfp->mf_page_size; |
7 | 725 } |
726 | |
727 /* | |
728 * remove block *hp from used list of memfile *mfp | |
729 */ | |
730 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
731 mf_rem_used(memfile_T *mfp, bhdr_T *hp) |
7 | 732 { |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
733 if (hp->bh_next == NULL) // last block in used list |
7 | 734 mfp->mf_used_last = hp->bh_prev; |
735 else | |
736 hp->bh_next->bh_prev = hp->bh_prev; | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
737 if (hp->bh_prev == NULL) // first block in used list |
7 | 738 mfp->mf_used_first = hp->bh_next; |
739 else | |
740 hp->bh_prev->bh_next = hp->bh_next; | |
741 mfp->mf_used_count -= hp->bh_page_count; | |
27453
c7f614c9ceb3
patch 8.2.4255: theoretical computation overflow
Bram Moolenaar <Bram@vim.org>
parents:
26909
diff
changeset
|
742 total_mem_used -= (long_u)hp->bh_page_count * mfp->mf_page_size; |
7 | 743 } |
744 | |
745 /* | |
746 * Release the least recently used block from the used list if the number | |
747 * of used memory blocks gets to big. | |
748 * | |
749 * Return the block header to the caller, including the memory block, so | |
750 * it can be re-used. Make sure the page_count is right. | |
6817 | 751 * |
752 * Returns NULL if no block is released. | |
7 | 753 */ |
754 static bhdr_T * | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
755 mf_release(memfile_T *mfp, int page_count) |
7 | 756 { |
757 bhdr_T *hp; | |
758 int need_release; | |
759 buf_T *buf; | |
760 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
761 // don't release while in mf_close_file() |
1066 | 762 if (mf_dont_release) |
7 | 763 return NULL; |
764 | |
765 /* | |
766 * Need to release a block if the number of blocks for this memfile is | |
767 * higher than the maximum or total memory used is over 'maxmemtot' | |
768 */ | |
769 need_release = ((mfp->mf_used_count >= mfp->mf_used_count_max) | |
770 || (total_mem_used >> 10) >= (long_u)p_mmt); | |
771 | |
772 /* | |
773 * Try to create a swap file if the amount of memory used is getting too | |
774 * high. | |
775 */ | |
776 if (mfp->mf_fd < 0 && need_release && p_uc) | |
777 { | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
778 // find for which buffer this memfile is |
9649
fd9727ae3c49
commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07
Christian Brabandt <cb@256bit.org>
parents:
9536
diff
changeset
|
779 FOR_ALL_BUFFERS(buf) |
7 | 780 if (buf->b_ml.ml_mfp == mfp) |
781 break; | |
782 if (buf != NULL && buf->b_may_swap) | |
783 ml_open_file(buf); | |
784 } | |
785 | |
786 /* | |
787 * don't release a block if | |
788 * there is no file for this memfile | |
789 * or | |
790 * the number of blocks for this memfile is lower than the maximum | |
791 * and | |
792 * total memory used is not up to 'maxmemtot' | |
793 */ | |
794 if (mfp->mf_fd < 0 || !need_release) | |
795 return NULL; | |
796 | |
797 for (hp = mfp->mf_used_last; hp != NULL; hp = hp->bh_prev) | |
798 if (!(hp->bh_flags & BH_LOCKED)) | |
799 break; | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
800 if (hp == NULL) // not a single one that can be released |
7 | 801 return NULL; |
802 | |
803 /* | |
804 * If the block is dirty, write it. | |
805 * If the write fails we don't free it. | |
806 */ | |
807 if ((hp->bh_flags & BH_DIRTY) && mf_write(mfp, hp) == FAIL) | |
808 return NULL; | |
809 | |
810 mf_rem_used(mfp, hp); | |
811 mf_rem_hash(mfp, hp); | |
812 | |
813 /* | |
814 * If a bhdr_T is returned, make sure that the page_count of bh_data is | |
815 * right | |
816 */ | |
817 if (hp->bh_page_count != page_count) | |
818 { | |
32290
9b0c304500cc
patch 9.0.1477: crash when recovering from corrupted swap file
Bram Moolenaar <Bram@vim.org>
parents:
31728
diff
changeset
|
819 VIM_CLEAR(hp->bh_data); |
9b0c304500cc
patch 9.0.1477: crash when recovering from corrupted swap file
Bram Moolenaar <Bram@vim.org>
parents:
31728
diff
changeset
|
820 if (page_count > 0) |
9b0c304500cc
patch 9.0.1477: crash when recovering from corrupted swap file
Bram Moolenaar <Bram@vim.org>
parents:
31728
diff
changeset
|
821 hp->bh_data = alloc((size_t)mfp->mf_page_size * page_count); |
9b0c304500cc
patch 9.0.1477: crash when recovering from corrupted swap file
Bram Moolenaar <Bram@vim.org>
parents:
31728
diff
changeset
|
822 if (hp->bh_data == NULL) |
7 | 823 { |
824 vim_free(hp); | |
825 return NULL; | |
826 } | |
827 hp->bh_page_count = page_count; | |
828 } | |
829 return hp; | |
830 } | |
831 | |
832 /* | |
833 * release as many blocks as possible | |
834 * Used in case of out of memory | |
835 * | |
836 * return TRUE if any memory was released | |
837 */ | |
838 int | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
839 mf_release_all(void) |
7 | 840 { |
841 buf_T *buf; | |
842 memfile_T *mfp; | |
843 bhdr_T *hp; | |
844 int retval = FALSE; | |
845 | |
9649
fd9727ae3c49
commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07
Christian Brabandt <cb@256bit.org>
parents:
9536
diff
changeset
|
846 FOR_ALL_BUFFERS(buf) |
7 | 847 { |
848 mfp = buf->b_ml.ml_mfp; | |
849 if (mfp != NULL) | |
850 { | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
851 // If no swap file yet, may open one |
7 | 852 if (mfp->mf_fd < 0 && buf->b_may_swap) |
853 ml_open_file(buf); | |
854 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
855 // only if there is a swapfile |
7 | 856 if (mfp->mf_fd >= 0) |
857 { | |
858 for (hp = mfp->mf_used_last; hp != NULL; ) | |
859 { | |
860 if (!(hp->bh_flags & BH_LOCKED) | |
861 && (!(hp->bh_flags & BH_DIRTY) | |
862 || mf_write(mfp, hp) != FAIL)) | |
863 { | |
864 mf_rem_used(mfp, hp); | |
865 mf_rem_hash(mfp, hp); | |
866 mf_free_bhdr(hp); | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
867 hp = mfp->mf_used_last; // re-start, list was changed |
7 | 868 retval = TRUE; |
869 } | |
870 else | |
871 hp = hp->bh_prev; | |
872 } | |
873 } | |
874 } | |
875 } | |
876 return retval; | |
877 } | |
878 | |
879 /* | |
32290
9b0c304500cc
patch 9.0.1477: crash when recovering from corrupted swap file
Bram Moolenaar <Bram@vim.org>
parents:
31728
diff
changeset
|
880 * Allocate a block header and a block of memory for it. |
7 | 881 */ |
882 static bhdr_T * | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
883 mf_alloc_bhdr(memfile_T *mfp, int page_count) |
7 | 884 { |
885 bhdr_T *hp; | |
886 | |
31728
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
887 if ((hp = ALLOC_ONE(bhdr_T)) == NULL) |
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
888 return NULL; |
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
889 |
32290
9b0c304500cc
patch 9.0.1477: crash when recovering from corrupted swap file
Bram Moolenaar <Bram@vim.org>
parents:
31728
diff
changeset
|
890 if ((hp->bh_data = alloc((size_t)mfp->mf_page_size * page_count)) == NULL) |
7 | 891 { |
31728
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
892 vim_free(hp); // not enough memory |
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
893 return NULL; |
7 | 894 } |
31728
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
895 hp->bh_page_count = page_count; |
7 | 896 return hp; |
897 } | |
898 | |
899 /* | |
32290
9b0c304500cc
patch 9.0.1477: crash when recovering from corrupted swap file
Bram Moolenaar <Bram@vim.org>
parents:
31728
diff
changeset
|
900 * Free a block header and the block of memory for it. |
7 | 901 */ |
902 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
903 mf_free_bhdr(bhdr_T *hp) |
7 | 904 { |
905 vim_free(hp->bh_data); | |
906 vim_free(hp); | |
907 } | |
908 | |
909 /* | |
32290
9b0c304500cc
patch 9.0.1477: crash when recovering from corrupted swap file
Bram Moolenaar <Bram@vim.org>
parents:
31728
diff
changeset
|
910 * Insert entry *hp in the free list. |
7 | 911 */ |
912 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
913 mf_ins_free(memfile_T *mfp, bhdr_T *hp) |
7 | 914 { |
915 hp->bh_next = mfp->mf_free_first; | |
916 mfp->mf_free_first = hp; | |
917 } | |
918 | |
919 /* | |
920 * remove the first entry from the free list and return a pointer to it | |
921 * Note: caller must check that mfp->mf_free_first is not NULL! | |
922 */ | |
923 static bhdr_T * | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
924 mf_rem_free(memfile_T *mfp) |
7 | 925 { |
926 bhdr_T *hp; | |
927 | |
928 hp = mfp->mf_free_first; | |
929 mfp->mf_free_first = hp->bh_next; | |
930 return hp; | |
931 } | |
932 | |
933 /* | |
934 * read a block from disk | |
935 * | |
936 * Return FAIL for failure, OK otherwise | |
937 */ | |
938 static int | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
939 mf_read(memfile_T *mfp, bhdr_T *hp) |
7 | 940 { |
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
941 off_T offset; |
7 | 942 unsigned page_size; |
943 unsigned size; | |
944 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
945 if (mfp->mf_fd < 0) // there is no file, can't read |
7 | 946 return FAIL; |
947 | |
948 page_size = mfp->mf_page_size; | |
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
949 offset = (off_T)page_size * hp->bh_bnum; |
7 | 950 size = page_size * hp->bh_page_count; |
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
951 if (vim_lseek(mfp->mf_fd, offset, SEEK_SET) != offset) |
7 | 952 { |
26897
d02d40f0261c
patch 8.2.3977: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26436
diff
changeset
|
953 PERROR(_(e_seek_error_in_swap_file_read)); |
7 | 954 return FAIL; |
955 } | |
2664 | 956 if ((unsigned)read_eintr(mfp->mf_fd, hp->bh_data, size) != size) |
7 | 957 { |
26897
d02d40f0261c
patch 8.2.3977: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26436
diff
changeset
|
958 PERROR(_(e_read_error_in_swap_file)); |
7 | 959 return FAIL; |
960 } | |
2267 | 961 |
962 #ifdef FEAT_CRYPT | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
963 // Decrypt if 'key' is set and this is a data block. And when changing the |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
964 // key. |
7347
8977b399cf55
commit https://github.com/vim/vim/commit/4a8c2cfc56b9affc36934aa0f20d8cfd2b1511c8
Christian Brabandt <cb@256bit.org>
parents:
6817
diff
changeset
|
965 if (*mfp->mf_buffer->b_p_key != NUL || mfp->mf_old_key != NULL) |
2267 | 966 ml_decrypt_data(mfp, hp->bh_data, offset, size); |
967 #endif | |
968 | |
7 | 969 return OK; |
970 } | |
971 | |
972 /* | |
973 * write a block to disk | |
974 * | |
975 * Return FAIL for failure, OK otherwise | |
976 */ | |
977 static int | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
978 mf_write(memfile_T *mfp, bhdr_T *hp) |
7 | 979 { |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
980 off_T offset; // offset in the file |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
981 blocknr_T nr; // block nr which is being written |
7 | 982 bhdr_T *hp2; |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
983 unsigned page_size; // number of bytes in a page |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
984 unsigned page_count; // number of pages written |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
985 unsigned size; // number of bytes written |
7 | 986 |
16823
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
987 if (mfp->mf_fd < 0 && !mfp->mf_reopen) |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
988 // there is no file and there was no file, can't write |
7 | 989 return FAIL; |
990 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
991 if (hp->bh_bnum < 0) // must assign file block number |
7 | 992 if (mf_trans_add(mfp, hp) == FAIL) |
993 return FAIL; | |
994 | |
995 page_size = mfp->mf_page_size; | |
996 | |
997 /* | |
998 * We don't want gaps in the file. Write the blocks in front of *hp | |
999 * to extend the file. | |
1000 * If block 'mf_infile_count' is not in the hash list, it has been | |
1001 * freed. Fill the space in the file with data from the current block. | |
1002 */ | |
1003 for (;;) | |
1004 { | |
16823
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1005 int attempt; |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1006 |
7 | 1007 nr = hp->bh_bnum; |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1008 if (nr > mfp->mf_infile_count) // beyond end of file |
7 | 1009 { |
1010 nr = mfp->mf_infile_count; | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1011 hp2 = mf_find_hash(mfp, nr); // NULL caught below |
7 | 1012 } |
1013 else | |
1014 hp2 = hp; | |
1015 | |
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
1016 offset = (off_T)page_size * nr; |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1017 if (hp2 == NULL) // freed block, fill with dummy data |
7 | 1018 page_count = 1; |
1019 else | |
1020 page_count = hp2->bh_page_count; | |
1021 size = page_size * page_count; | |
16823
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1022 |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1023 for (attempt = 1; attempt <= 2; ++attempt) |
7 | 1024 { |
16823
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1025 if (mfp->mf_fd >= 0) |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1026 { |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1027 if (vim_lseek(mfp->mf_fd, offset, SEEK_SET) != offset) |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1028 { |
26897
d02d40f0261c
patch 8.2.3977: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26436
diff
changeset
|
1029 PERROR(_(e_seek_error_in_swap_file_write)); |
16823
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1030 return FAIL; |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1031 } |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1032 if (mf_write_block(mfp, |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1033 hp2 == NULL ? hp : hp2, offset, size) == OK) |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1034 break; |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1035 } |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1036 |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1037 if (attempt == 1) |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1038 { |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1039 // If the swap file is on a network drive, and the network |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1040 // gets disconnected and then re-connected, we can maybe fix it |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1041 // by closing and then re-opening the file. |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1042 if (mfp->mf_fd >= 0) |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1043 close(mfp->mf_fd); |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1044 mfp->mf_fd = mch_open_rw((char *)mfp->mf_fname, mfp->mf_flags); |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1045 mfp->mf_reopen = (mfp->mf_fd < 0); |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1046 } |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1047 if (attempt == 2 || mfp->mf_fd < 0) |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1048 { |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1049 // Avoid repeating the error message, this mostly happens when |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1050 // the disk is full. We give the message again only after a |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1051 // successful write or when hitting a key. We keep on trying, |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1052 // in case some space becomes available. |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1053 if (!did_swapwrite_msg) |
26897
d02d40f0261c
patch 8.2.3977: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26436
diff
changeset
|
1054 emsg(_(e_write_error_in_swap_file)); |
16823
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1055 did_swapwrite_msg = TRUE; |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1056 return FAIL; |
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1057 } |
7 | 1058 } |
16823
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1059 |
7 | 1060 did_swapwrite_msg = FALSE; |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1061 if (hp2 != NULL) // written a non-dummy block |
7 | 1062 hp2->bh_flags &= ~BH_DIRTY; |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1063 // appended to the file |
7 | 1064 if (nr + (blocknr_T)page_count > mfp->mf_infile_count) |
1065 mfp->mf_infile_count = nr + page_count; | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1066 if (nr == hp->bh_bnum) // written the desired block |
7 | 1067 break; |
1068 } | |
1069 return OK; | |
1070 } | |
1071 | |
1072 /* | |
2267 | 1073 * Write block "hp" with data size "size" to file "mfp->mf_fd". |
1074 * Takes care of encryption. | |
1075 * Return FAIL or OK. | |
1076 */ | |
1077 static int | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1078 mf_write_block( |
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1079 memfile_T *mfp, |
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1080 bhdr_T *hp, |
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
1081 off_T offset UNUSED, |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1082 unsigned size) |
2267 | 1083 { |
1084 char_u *data = hp->bh_data; | |
1085 int result = OK; | |
1086 | |
1087 #ifdef FEAT_CRYPT | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1088 // Encrypt if 'key' is set and this is a data block. |
2267 | 1089 if (*mfp->mf_buffer->b_p_key != NUL) |
1090 { | |
1091 data = ml_encrypt_data(mfp, data, offset, size); | |
1092 if (data == NULL) | |
1093 return FAIL; | |
1094 } | |
1095 #endif | |
1096 | |
2664 | 1097 if ((unsigned)write_eintr(mfp->mf_fd, data, size) != size) |
2267 | 1098 result = FAIL; |
1099 | |
1100 #ifdef FEAT_CRYPT | |
1101 if (data != hp->bh_data) | |
1102 vim_free(data); | |
1103 #endif | |
1104 | |
1105 return result; | |
1106 } | |
1107 | |
1108 /* | |
7 | 1109 * Make block number for *hp positive and add it to the translation list |
1110 * | |
1111 * Return FAIL for failure, OK otherwise | |
1112 */ | |
1113 static int | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1114 mf_trans_add(memfile_T *mfp, bhdr_T *hp) |
7 | 1115 { |
1116 bhdr_T *freep; | |
1117 blocknr_T new_bnum; | |
1118 NR_TRANS *np; | |
1119 int page_count; | |
1120 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1121 if (hp->bh_bnum >= 0) // it's already positive |
7 | 1122 return OK; |
1123 | |
16825
ce04ebdf26b8
patch 8.1.1414: alloc() returning "char_u *" causes a lot of type casts
Bram Moolenaar <Bram@vim.org>
parents:
16823
diff
changeset
|
1124 if ((np = ALLOC_ONE(NR_TRANS)) == NULL) |
7 | 1125 return FAIL; |
1126 | |
1127 /* | |
2267 | 1128 * Get a new number for the block. |
7 | 1129 * If the first item in the free list has sufficient pages, use its number |
1130 * Otherwise use mf_blocknr_max. | |
1131 */ | |
1132 freep = mfp->mf_free_first; | |
1133 page_count = hp->bh_page_count; | |
1134 if (freep != NULL && freep->bh_page_count >= page_count) | |
1135 { | |
1136 new_bnum = freep->bh_bnum; | |
1137 /* | |
4352 | 1138 * If the page count of the free block was larger, reduce it. |
7 | 1139 * If the page count matches, remove the block from the free list |
1140 */ | |
1141 if (freep->bh_page_count > page_count) | |
1142 { | |
1143 freep->bh_bnum += page_count; | |
1144 freep->bh_page_count -= page_count; | |
1145 } | |
1146 else | |
1147 { | |
1148 freep = mf_rem_free(mfp); | |
1149 vim_free(freep); | |
1150 } | |
1151 } | |
1152 else | |
1153 { | |
1154 new_bnum = mfp->mf_blocknr_max; | |
1155 mfp->mf_blocknr_max += page_count; | |
1156 } | |
1157 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1158 np->nt_old_bnum = hp->bh_bnum; // adjust number |
7 | 1159 np->nt_new_bnum = new_bnum; |
1160 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1161 mf_rem_hash(mfp, hp); // remove from old hash list |
7 | 1162 hp->bh_bnum = new_bnum; |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1163 mf_ins_hash(mfp, hp); // insert in new hash list |
7 | 1164 |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1165 // Insert "np" into "mf_trans" hashtable with key "np->nt_old_bnum" |
2730 | 1166 mf_hash_add_item(&mfp->mf_trans, (mf_hashitem_T *)np); |
7 | 1167 |
1168 return OK; | |
1169 } | |
1170 | |
1171 /* | |
6817 | 1172 * Lookup a translation from the trans lists and delete the entry. |
7 | 1173 * |
1174 * Return the positive new number when found, the old number when not found | |
1175 */ | |
1176 blocknr_T | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1177 mf_trans_del(memfile_T *mfp, blocknr_T old_nr) |
7 | 1178 { |
1179 NR_TRANS *np; | |
1180 blocknr_T new_bnum; | |
1181 | |
2730 | 1182 np = (NR_TRANS *)mf_hash_find(&mfp->mf_trans, old_nr); |
1183 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1184 if (np == NULL) // not found |
7 | 1185 return old_nr; |
1186 | |
1187 mfp->mf_neg_count--; | |
1188 new_bnum = np->nt_new_bnum; | |
2730 | 1189 |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1190 // remove entry from the trans list |
2730 | 1191 mf_hash_rem_item(&mfp->mf_trans, (mf_hashitem_T *)np); |
1192 | |
7 | 1193 vim_free(np); |
1194 | |
1195 return new_bnum; | |
1196 } | |
1197 | |
1198 /* | |
1199 * Set mfp->mf_ffname according to mfp->mf_fname and some other things. | |
1200 * Only called when creating or renaming the swapfile. Either way it's a new | |
1201 * name so we must work out the full path name. | |
1202 */ | |
1203 void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1204 mf_set_ffname(memfile_T *mfp) |
7 | 1205 { |
1206 mfp->mf_ffname = FullName_save(mfp->mf_fname, FALSE); | |
1207 } | |
1208 | |
1209 /* | |
1210 * Make the name of the file used for the memfile a full path. | |
1211 * Used before doing a :cd | |
1212 */ | |
1213 void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1214 mf_fullname(memfile_T *mfp) |
7 | 1215 { |
31728
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
1216 if (mfp == NULL || mfp->mf_fname == NULL || mfp->mf_ffname == NULL) |
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
1217 return; |
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
1218 |
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
1219 vim_free(mfp->mf_fname); |
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
1220 mfp->mf_fname = mfp->mf_ffname; |
238ca27dbfd2
patch 9.0.1196: code is indented more than necessary
Bram Moolenaar <Bram@vim.org>
parents:
27637
diff
changeset
|
1221 mfp->mf_ffname = NULL; |
7 | 1222 } |
1223 | |
1224 /* | |
1225 * return TRUE if there are any translations pending for 'mfp' | |
1226 */ | |
1227 int | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1228 mf_need_trans(memfile_T *mfp) |
7 | 1229 { |
1230 return (mfp->mf_fname != NULL && mfp->mf_neg_count > 0); | |
1231 } | |
1232 | |
1233 /* | |
1234 * Open a swap file for a memfile. | |
1235 * The "fname" must be in allocated memory, and is consumed (also when an | |
1236 * error occurs). | |
1237 */ | |
1238 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1239 mf_do_open( |
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1240 memfile_T *mfp, |
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1241 char_u *fname, |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1242 int flags) // flags for open() |
7 | 1243 { |
1244 #ifdef HAVE_LSTAT | |
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
8212
diff
changeset
|
1245 stat_T sb; |
7 | 1246 #endif |
1247 | |
1248 mfp->mf_fname = fname; | |
1249 | |
1250 /* | |
1251 * Get the full path name before the open, because this is | |
1252 * not possible after the open on the Amiga. | |
1253 * fname cannot be NameBuff, because it must have been allocated. | |
1254 */ | |
1255 mf_set_ffname(mfp); | |
8212
05b88224cea1
commit https://github.com/vim/vim/commit/48e330aff911be1c798c88a973af6437a8141fce
Christian Brabandt <cb@256bit.org>
parents:
7961
diff
changeset
|
1256 #if defined(MSWIN) |
7 | 1257 /* |
4352 | 1258 * A ":!cd e:xxx" may change the directory without us knowing, use the |
7 | 1259 * full pathname always. Careful: This frees fname! |
1260 */ | |
1261 mf_fullname(mfp); | |
1262 #endif | |
1263 | |
1264 #ifdef HAVE_LSTAT | |
1265 /* | |
1266 * Extra security check: When creating a swap file it really shouldn't | |
1267 * exist yet. If there is a symbolic link, this is most likely an attack. | |
1268 */ | |
1269 if ((flags & O_CREAT) && mch_lstat((char *)mfp->mf_fname, &sb) >= 0) | |
1270 { | |
1271 mfp->mf_fd = -1; | |
26909
aa65d1808bd0
patch 8.2.3983: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents:
26897
diff
changeset
|
1272 emsg(_(e_swap_file_already_exists_symlink_attack)); |
7 | 1273 } |
1274 else | |
1275 #endif | |
1276 { | |
1277 /* | |
1278 * try to open the file | |
1279 */ | |
557 | 1280 flags |= O_EXTRA | O_NOFOLLOW; |
15868
7fad90423bd2
patch 8.1.0941: macros for MS-Windows are inconsistent
Bram Moolenaar <Bram@vim.org>
parents:
15816
diff
changeset
|
1281 #ifdef MSWIN |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1282 // Prevent handle inheritance that cause problems with Cscope |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1283 // (swap file may not be deleted if cscope connection was open after |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1284 // the file) |
7 | 1285 flags |= O_NOINHERIT; |
1286 #endif | |
16823
b1b7c7a31679
patch 8.1.1413: error when the drive of the swap file was disconnected
Bram Moolenaar <Bram@vim.org>
parents:
16764
diff
changeset
|
1287 mfp->mf_flags = flags; |
7 | 1288 mfp->mf_fd = mch_open_rw((char *)mfp->mf_fname, flags); |
1289 } | |
1290 | |
1291 /* | |
1292 * If the file cannot be opened, use memory only | |
1293 */ | |
1294 if (mfp->mf_fd < 0) | |
1295 { | |
13244
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
10359
diff
changeset
|
1296 VIM_CLEAR(mfp->mf_fname); |
ac42c4b11dbc
patch 8.0.1496: clearing a pointer takes two lines
Christian Brabandt <cb@256bit.org>
parents:
10359
diff
changeset
|
1297 VIM_CLEAR(mfp->mf_ffname); |
7 | 1298 } |
1299 else | |
1583 | 1300 { |
2003 | 1301 #ifdef HAVE_FD_CLOEXEC |
1302 int fdflags = fcntl(mfp->mf_fd, F_GETFD); | |
1303 if (fdflags >= 0 && (fdflags & FD_CLOEXEC) == 0) | |
7961
a7e58c6e4e9a
commit https://github.com/vim/vim/commit/fbc4b4db3a9690906a96e16724350a6241cf32a5
Christian Brabandt <cb@256bit.org>
parents:
7827
diff
changeset
|
1304 (void)fcntl(mfp->mf_fd, F_SETFD, fdflags | FD_CLOEXEC); |
2003 | 1305 #endif |
5788 | 1306 #if defined(HAVE_SELINUX) || defined(HAVE_SMACK) |
1583 | 1307 mch_copy_sec(fname, mfp->mf_fname); |
1308 #endif | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1309 mch_hide(mfp->mf_fname); // try setting the 'hidden' flag |
1583 | 1310 } |
7 | 1311 } |
2730 | 1312 |
1313 /* | |
1314 * Implementation of mf_hashtab_T follows. | |
1315 */ | |
1316 | |
1317 /* | |
1318 * The number of buckets in the hashtable is increased by a factor of | |
1319 * MHT_GROWTH_FACTOR when the average number of items per bucket | |
1320 * exceeds 2 ^ MHT_LOG_LOAD_FACTOR. | |
1321 */ | |
1322 #define MHT_LOG_LOAD_FACTOR 6 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1323 #define MHT_GROWTH_FACTOR 2 // must be a power of two |
2730 | 1324 |
1325 /* | |
1326 * Initialize an empty hash table. | |
1327 */ | |
1328 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1329 mf_hash_init(mf_hashtab_T *mht) |
2730 | 1330 { |
20007
aadd1cae2ff5
patch 8.2.0559: clearing a struct is verbose
Bram Moolenaar <Bram@vim.org>
parents:
18800
diff
changeset
|
1331 CLEAR_POINTER(mht); |
2730 | 1332 mht->mht_buckets = mht->mht_small_buckets; |
1333 mht->mht_mask = MHT_INIT_SIZE - 1; | |
1334 } | |
1335 | |
1336 /* | |
1337 * Free the array of a hash table. Does not free the items it contains! | |
1338 * The hash table must not be used again without another mf_hash_init() call. | |
1339 */ | |
1340 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1341 mf_hash_free(mf_hashtab_T *mht) |
2730 | 1342 { |
1343 if (mht->mht_buckets != mht->mht_small_buckets) | |
1344 vim_free(mht->mht_buckets); | |
1345 } | |
1346 | |
1347 /* | |
1348 * Free the array of a hash table and all the items it contains. | |
1349 */ | |
1350 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1351 mf_hash_free_all(mf_hashtab_T *mht) |
2730 | 1352 { |
1353 long_u idx; | |
1354 mf_hashitem_T *mhi; | |
1355 mf_hashitem_T *next; | |
1356 | |
1357 for (idx = 0; idx <= mht->mht_mask; idx++) | |
1358 for (mhi = mht->mht_buckets[idx]; mhi != NULL; mhi = next) | |
1359 { | |
1360 next = mhi->mhi_next; | |
1361 vim_free(mhi); | |
1362 } | |
1363 | |
1364 mf_hash_free(mht); | |
1365 } | |
1366 | |
1367 /* | |
1368 * Find "key" in hashtable "mht". | |
1369 * Returns a pointer to a mf_hashitem_T or NULL if the item was not found. | |
1370 */ | |
1371 static mf_hashitem_T * | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1372 mf_hash_find(mf_hashtab_T *mht, blocknr_T key) |
2730 | 1373 { |
1374 mf_hashitem_T *mhi; | |
1375 | |
1376 mhi = mht->mht_buckets[key & mht->mht_mask]; | |
1377 while (mhi != NULL && mhi->mhi_key != key) | |
1378 mhi = mhi->mhi_next; | |
1379 | |
1380 return mhi; | |
1381 } | |
1382 | |
1383 /* | |
1384 * Add item "mhi" to hashtable "mht". | |
1385 * "mhi" must not be NULL. | |
1386 */ | |
1387 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1388 mf_hash_add_item(mf_hashtab_T *mht, mf_hashitem_T *mhi) |
2730 | 1389 { |
1390 long_u idx; | |
1391 | |
1392 idx = mhi->mhi_key & mht->mht_mask; | |
1393 mhi->mhi_next = mht->mht_buckets[idx]; | |
1394 mhi->mhi_prev = NULL; | |
1395 if (mhi->mhi_next != NULL) | |
1396 mhi->mhi_next->mhi_prev = mhi; | |
1397 mht->mht_buckets[idx] = mhi; | |
1398 | |
1399 mht->mht_count++; | |
1400 | |
1401 /* | |
1402 * Grow hashtable when we have more thank 2^MHT_LOG_LOAD_FACTOR | |
1403 * items per bucket on average | |
1404 */ | |
1405 if (mht->mht_fixed == 0 | |
1406 && (mht->mht_count >> MHT_LOG_LOAD_FACTOR) > mht->mht_mask) | |
1407 { | |
1408 if (mf_hash_grow(mht) == FAIL) | |
1409 { | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1410 // stop trying to grow after first failure to allocate memory |
2730 | 1411 mht->mht_fixed = 1; |
1412 } | |
1413 } | |
1414 } | |
1415 | |
1416 /* | |
1417 * Remove item "mhi" from hashtable "mht". | |
1418 * "mhi" must not be NULL and must have been inserted into "mht". | |
1419 */ | |
1420 static void | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1421 mf_hash_rem_item(mf_hashtab_T *mht, mf_hashitem_T *mhi) |
2730 | 1422 { |
1423 if (mhi->mhi_prev == NULL) | |
1424 mht->mht_buckets[mhi->mhi_key & mht->mht_mask] = mhi->mhi_next; | |
1425 else | |
1426 mhi->mhi_prev->mhi_next = mhi->mhi_next; | |
1427 | |
1428 if (mhi->mhi_next != NULL) | |
1429 mhi->mhi_next->mhi_prev = mhi->mhi_prev; | |
1430 | |
1431 mht->mht_count--; | |
1432 | |
18800
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1433 // We could shrink the table here, but it typically takes little memory, |
f41b55f9357c
patch 8.1.2388: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
16825
diff
changeset
|
1434 // so why bother? |
2730 | 1435 } |
1436 | |
1437 /* | |
1438 * Increase number of buckets in the hashtable by MHT_GROWTH_FACTOR and | |
1439 * rehash items. | |
1440 * Returns FAIL when out of memory. | |
1441 */ | |
1442 static int | |
7827
41789f16d6b2
commit https://github.com/vim/vim/commit/52ea13da0fe86df1abf34de52841e367035170c0
Christian Brabandt <cb@256bit.org>
parents:
7803
diff
changeset
|
1443 mf_hash_grow(mf_hashtab_T *mht) |
2730 | 1444 { |
1445 long_u i, j; | |
1446 int shift; | |
1447 mf_hashitem_T *mhi; | |
1448 mf_hashitem_T *tails[MHT_GROWTH_FACTOR]; | |
1449 mf_hashitem_T **buckets; | |
1450 size_t size; | |
1451 | |
1452 size = (mht->mht_mask + 1) * MHT_GROWTH_FACTOR * sizeof(void *); | |
16825
ce04ebdf26b8
patch 8.1.1414: alloc() returning "char_u *" causes a lot of type casts
Bram Moolenaar <Bram@vim.org>
parents:
16823
diff
changeset
|
1453 buckets = lalloc_clear(size, FALSE); |
2730 | 1454 if (buckets == NULL) |
1455 return FAIL; | |
1456 | |
1457 shift = 0; | |
1458 while ((mht->mht_mask >> shift) != 0) | |
1459 shift++; | |
1460 | |
1461 for (i = 0; i <= mht->mht_mask; i++) | |
1462 { | |
1463 /* | |
1464 * Traverse the items in the i-th original bucket and move them into | |
1465 * MHT_GROWTH_FACTOR new buckets, preserving their relative order | |
1466 * within each new bucket. Preserving the order is important because | |
1467 * mf_get() tries to keep most recently used items at the front of | |
1468 * each bucket. | |
1469 * | |
1470 * Here we strongly rely on the fact the hashes are computed modulo | |
1471 * a power of two. | |
1472 */ | |
1473 | |
20007
aadd1cae2ff5
patch 8.2.0559: clearing a struct is verbose
Bram Moolenaar <Bram@vim.org>
parents:
18800
diff
changeset
|
1474 CLEAR_FIELD(tails); |
2730 | 1475 |
1476 for (mhi = mht->mht_buckets[i]; mhi != NULL; mhi = mhi->mhi_next) | |
1477 { | |
1478 j = (mhi->mhi_key >> shift) & (MHT_GROWTH_FACTOR - 1); | |
1479 if (tails[j] == NULL) | |
1480 { | |
1481 buckets[i + (j << shift)] = mhi; | |
1482 tails[j] = mhi; | |
1483 mhi->mhi_prev = NULL; | |
1484 } | |
1485 else | |
1486 { | |
1487 tails[j]->mhi_next = mhi; | |
1488 mhi->mhi_prev = tails[j]; | |
1489 tails[j] = mhi; | |
1490 } | |
1491 } | |
1492 | |
1493 for (j = 0; j < MHT_GROWTH_FACTOR; j++) | |
1494 if (tails[j] != NULL) | |
1495 tails[j]->mhi_next = NULL; | |
1496 } | |
1497 | |
1498 if (mht->mht_buckets != mht->mht_small_buckets) | |
1499 vim_free(mht->mht_buckets); | |
1500 | |
1501 mht->mht_buckets = buckets; | |
1502 mht->mht_mask = (mht->mht_mask + 1) * MHT_GROWTH_FACTOR - 1; | |
1503 | |
1504 return OK; | |
1505 } |