1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
/*-
* See the file LICENSE for redistribution information.
*
* Copyright (c) 2004, 2012 Oracle and/or its affiliates. All rights reserved.
*
* $Id$
*/
#include "db_config.h"
#include "db_int.h"
/*
* __os_truncate --
* Truncate the file.
*
* PUBLIC: int __os_truncate __P((ENV *, DB_FH *, db_pgno_t, u_int32_t));
*/
int
__os_truncate(env, fhp, pgno, pgsize)
ENV *env;
DB_FH *fhp;
db_pgno_t pgno;
u_int32_t pgsize;
{
DB_ENV *dbenv;
off_t offset;
int ret;
dbenv = env == NULL ? NULL : env->dbenv;
/*
* Truncate a file so that "pgno" is discarded from the end of the
* file.
*/
offset = (off_t)pgsize * pgno;
if (dbenv != NULL &&
FLD_ISSET(dbenv->verbose, DB_VERB_FILEOPS | DB_VERB_FILEOPS_ALL))
__db_msg(env, DB_STR_A("0141",
"fileops: truncate %s to %lu", "%s %lu"),
fhp->name, (u_long)offset);
LAST_PANIC_CHECK_BEFORE_IO(env);
if (DB_GLOBAL(j_ftruncate) != NULL)
ret = DB_GLOBAL(j_ftruncate)(fhp->fd, offset);
else {
#ifdef HAVE_FTRUNCATE
RETRY_CHK((ftruncate(fhp->fd, offset)), ret);
#else
ret = DB_OPNOTSUP;
#endif
}
if (ret != 0) {
__db_syserr(env, ret, DB_STR_A("0142",
"ftruncate: %lu", "%lu"), (u_long)offset);
ret = __os_posix_err(ret);
}
return (ret);
}
|