1 /* Miscellaneous support functions for dynamic linker
2 Copyright (C) 1997,1998,1999,2000,2001,2002 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, write to the Free
17 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
30 #include <sys/param.h>
33 #include <stdio-common/_itoa.h>
36 /* This is the only dl-sysdep.c function that is actually needed at run-time
40 _dl_sysdep_open_zero_fill (void)
42 return __open ("/dev/zero", O_RDONLY
);
46 /* Read the whole contents of FILE into new mmap'd space with given
47 protections. *SIZEP gets the size of the file. On error MAP_FAILED
52 _dl_sysdep_read_whole_file (const char *file
, size_t *sizep
, int prot
)
54 void *result
= MAP_FAILED
;
56 int fd
= __open (file
, O_RDONLY
);
59 if (__fxstat64 (_STAT_VER
, fd
, &st
) >= 0)
63 /* No need to map the file if it is empty. */
65 /* Map a copy of the file contents. */
66 result
= __mmap (NULL
, *sizep
, prot
,
83 /* Bare-bone printf implementation. This function only knows about
84 the formats and flags needed and can handle only up to 64 stripes in
87 _dl_debug_vdprintf (int fd
, int tag_p
, const char *fmt
, va_list arg
)
89 const int niovmax
= 64;
90 struct iovec iov
[niovmax
];
97 const char *startp
= fmt
;
101 /* Generate the tag line once. It consists of the PID and a
102 colon followed by a tab. */
107 assert (pid
>= 0 && pid
< 100000);
108 p
= _itoa (pid
, &pidbuf
[5], 10, 0);
115 /* Append to the output. */
116 assert (niov
< niovmax
);
117 iov
[niov
].iov_len
= 7;
118 iov
[niov
++].iov_base
= pidbuf
;
120 /* No more tags until we see the next newline. */
124 /* Skip everything except % and \n (if tags are needed). */
125 while (*fmt
!= '\0' && *fmt
!= '%' && (! tag_p
|| *fmt
!= '\n'))
128 /* Append constant string. */
129 assert (niov
< niovmax
);
130 if ((iov
[niov
].iov_len
= fmt
- startp
) != 0)
131 iov
[niov
++].iov_base
= (char *) startp
;
135 /* It is a format specifier. */
139 #if LONG_MAX != INT_MAX
143 /* Recognize zero-digit fill flag. */
150 /* See whether with comes from a parameter. Note that no other
151 way to specify the width is implemented. */
154 width
= va_arg (arg
, int);
158 /* Handle precision. */
159 if (*fmt
== '.' && fmt
[1] == '*')
161 prec
= va_arg (arg
, int);
165 /* Recognize the l modifier. It is only important on some
166 platforms where long and int have a different size. We
167 can use the same code for size_t. */
168 if (*fmt
== 'l' || *fmt
== 'Z')
170 #if LONG_MAX != INT_MAX
178 /* Integer formatting. */
182 /* We have to make a difference if long and int have a
184 #if LONG_MAX != INT_MAX
185 unsigned long int num
= (long_mod
186 ? va_arg (arg
, unsigned long int)
187 : va_arg (arg
, unsigned int));
189 unsigned long int num
= va_arg (arg
, unsigned int);
191 /* We use alloca() to allocate the buffer with the most
192 pessimistic guess for the size. Using alloca() allows
193 having more than one integer formatting in a call. */
194 char *buf
= (char *) alloca (3 * sizeof (unsigned long int));
195 char *endp
= &buf
[3 * sizeof (unsigned long int)];
196 char *cp
= _itoa (num
, endp
, *fmt
== 'x' ? 16 : 10, 0);
198 /* Pad to the width the user specified. */
200 while (endp
- cp
< width
)
203 iov
[niov
].iov_base
= cp
;
204 iov
[niov
].iov_len
= endp
- cp
;
210 /* Get the string argument. */
211 iov
[niov
].iov_base
= va_arg (arg
, char *);
212 iov
[niov
].iov_len
= strlen (iov
[niov
].iov_base
);
214 iov
[niov
].iov_len
= MIN ((size_t) prec
, iov
[niov
].iov_len
);
219 iov
[niov
].iov_base
= (void *) fmt
;
220 iov
[niov
].iov_len
= 1;
225 assert (! "invalid format specifier");
229 else if (*fmt
== '\n')
231 /* See whether we have to print a single newline character. */
234 iov
[niov
].iov_base
= (char *) startp
;
235 iov
[niov
++].iov_len
= 1;
238 /* No, just add it to the rest of the string. */
239 ++iov
[niov
- 1].iov_len
;
241 /* Next line, print a tag again. */
247 /* Finally write the result. */
248 __writev (fd
, iov
, niov
);
252 /* Write to debug file. */
254 _dl_debug_printf (const char *fmt
, ...)
259 _dl_debug_vdprintf (GL(dl_debug_fd
), 1, fmt
, arg
);
262 INTDEF(_dl_debug_printf
)
265 /* Write to debug file but don't start with a tag. */
267 _dl_debug_printf_c (const char *fmt
, ...)
272 _dl_debug_vdprintf (GL(dl_debug_fd
), -1, fmt
, arg
);
277 /* Write the given file descriptor. */
279 _dl_dprintf (int fd
, const char *fmt
, ...)
284 _dl_debug_vdprintf (fd
, 0, fmt
, arg
);