1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21
22 /*
23 * Copyright 2009 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 /*
28 * Copyright (c) 1988 AT&T
29 * All Rights Reserved
30 */
31
32 #include <sys/mman.h>
33 #include <stdio.h>
34 #include <stdlib.h>
35 #include <unistd.h>
36 #include <libelf.h>
37 #include <errno.h>
38 #include "decl.h"
39 #include "msg.h"
40
41 /*
42 * File output
43 * These functions write output files.
44 * On SVR4 and newer systems use mmap(2). On older systems (or on
45 * file systems that don't support mmap), use write(2).
46 */
47
48
49 char *
_elf_outmap(int fd,size_t sz,unsigned int * pflag)50 _elf_outmap(int fd, size_t sz, unsigned int *pflag)
51 {
52 char *p;
53
54 /*
55 * Note: Some NFS implementations do not provide from enlarging a file
56 * via ftruncate(), thus this may fail with ENOSUP. In this case the
57 * fall through to the calloc() mechanism will occur.
58 */
59 if ((!*pflag) && (ftruncate(fd, (off_t)sz) == 0) &&
60 (p = mmap((char *)0, sz, PROT_READ+PROT_WRITE,
61 MAP_SHARED, fd, (off_t)0)) != (char *)-1) {
62 *pflag = 1;
63 return (p);
64 }
65
66 *pflag = 0;
67
68 /*
69 * If mmap fails, try calloc. Some file systems don't mmap. Note, we
70 * use calloc rather than malloc, as ld(1) assumes that the backing
71 * storage it is working with is zero filled.
72 */
73 if ((p = (char *)calloc(1, sz)) == 0)
74 _elf_seterr(EMEM_OUT, errno);
75 return (p);
76 }
77
78
79 size_t
_elf_outsync(int fd,char * p,size_t sz,unsigned int flag)80 _elf_outsync(int fd, char *p, size_t sz, unsigned int flag)
81 {
82 if (flag != 0) {
83 int err;
84
85 if ((fd = msync(p, sz, MS_ASYNC)) == -1)
86 err = errno;
87 (void) munmap(p, sz);
88 if (fd == 0)
89 return (sz);
90 _elf_seterr(EIO_SYNC, err);
91 return (0);
92 }
93 if ((lseek(fd, 0L, SEEK_SET) == 0) &&
94 (write(fd, p, sz) == sz)) {
95 (void) free(p);
96 return (sz);
97 }
98 _elf_seterr(EIO_WRITE, errno);
99 return (0);
100 }
101