Line data Source code
1 : /*
2 : * Copyright (c) 2015 Cisco and/or its affiliates.
3 : * Licensed under the Apache License, Version 2.0 (the "License");
4 : * you may not use this file except in compliance with the License.
5 : * You may obtain a copy of the License at:
6 : *
7 : * http://www.apache.org/licenses/LICENSE-2.0
8 : *
9 : * Unless required by applicable law or agreed to in writing, software
10 : * distributed under the License is distributed on an "AS IS" BASIS,
11 : * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 : * See the License for the specific language governing permissions and
13 : * limitations under the License.
14 : */
15 : /*
16 : Copyright (c) 2005 Eliot Dresselhaus
17 :
18 : Permission is hereby granted, free of charge, to any person obtaining
19 : a copy of this software and associated documentation files (the
20 : "Software"), to deal in the Software without restriction, including
21 : without limitation the rights to use, copy, modify, merge, publish,
22 : distribute, sublicense, and/or sell copies of the Software, and to
23 : permit persons to whom the Software is furnished to do so, subject to
24 : the following conditions:
25 :
26 : The above copyright notice and this permission notice shall be
27 : included in all copies or substantial portions of the Software.
28 :
29 : THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
30 : EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
31 : MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
32 : NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
33 : LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
34 : OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
35 : WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
36 : */
37 :
38 : #include <vppinfra/error.h>
39 : #include <vppinfra/os.h>
40 : #include <vppinfra/unix.h>
41 : #include <vppinfra/format.h>
42 :
43 : #include <sys/stat.h>
44 : #include <sys/types.h>
45 : #include <sys/uio.h> /* writev */
46 : #include <fcntl.h>
47 : #include <stdio.h> /* for sprintf */
48 : #include <limits.h>
49 :
50 : __clib_export __thread uword __os_thread_index = 0;
51 : __clib_export __thread uword __os_numa_index = 0;
52 :
53 : clib_error_t *
54 0 : clib_file_n_bytes (char *file, uword * result)
55 : {
56 : struct stat s;
57 :
58 0 : if (stat (file, &s) < 0)
59 0 : return clib_error_return_unix (0, "stat `%s'", file);
60 :
61 0 : if (S_ISREG (s.st_mode))
62 0 : *result = s.st_size;
63 : else
64 0 : *result = 0;
65 :
66 0 : return /* no error */ 0;
67 : }
68 :
69 : clib_error_t *
70 0 : clib_file_read_contents (char *file, u8 * result, uword n_bytes)
71 : {
72 0 : int fd = -1;
73 : uword n_done, n_left;
74 0 : clib_error_t *error = 0;
75 0 : u8 *v = result;
76 :
77 0 : if ((fd = open (file, 0)) < 0)
78 0 : return clib_error_return_unix (0, "open `%s'", file);
79 :
80 0 : n_left = n_bytes;
81 0 : n_done = 0;
82 0 : while (n_left > 0)
83 : {
84 : int n_read;
85 0 : if ((n_read = read (fd, v + n_done, n_left)) < 0)
86 : {
87 0 : error = clib_error_return_unix (0, "open `%s'", file);
88 0 : goto done;
89 : }
90 :
91 : /* End of file. */
92 0 : if (n_read == 0)
93 0 : break;
94 :
95 0 : n_left -= n_read;
96 0 : n_done += n_read;
97 : }
98 :
99 0 : if (n_left > 0)
100 : {
101 : error =
102 0 : clib_error_return (0,
103 : " `%s' expected to read %wd bytes; read only %wd",
104 : file, n_bytes, n_bytes - n_left);
105 0 : goto done;
106 : }
107 :
108 0 : done:
109 0 : close (fd);
110 0 : return error;
111 : }
112 :
113 : __clib_export clib_error_t *
114 0 : clib_file_contents (char *file, u8 ** result)
115 : {
116 : uword n_bytes;
117 0 : clib_error_t *error = 0;
118 : u8 *v;
119 :
120 0 : if ((error = clib_file_n_bytes (file, &n_bytes)))
121 0 : return error;
122 :
123 0 : v = 0;
124 0 : vec_resize (v, n_bytes);
125 :
126 0 : error = clib_file_read_contents (file, v, n_bytes);
127 :
128 0 : if (error)
129 0 : vec_free (v);
130 : else
131 0 : *result = v;
132 :
133 0 : return error;
134 : }
135 :
136 : __clib_export u8 *
137 341550 : clib_file_get_resolved_basename (char *fmt, ...)
138 : {
139 : va_list va;
140 : char *p, buffer[PATH_MAX];
141 341550 : u8 *link, *s = 0;
142 : int r;
143 :
144 341550 : va_start (va, fmt);
145 341550 : link = va_format (0, fmt, &va);
146 341550 : va_end (va);
147 341550 : vec_add1 (link, 0);
148 :
149 341550 : r = readlink ((char *) link, buffer, sizeof (buffer) - 1);
150 341550 : vec_free (link);
151 :
152 341550 : if (r < 1)
153 303025 : return 0;
154 :
155 38525 : buffer[r] = 0;
156 38525 : p = buffer + r - 1;
157 332350 : while (p > buffer && p[-1] != '/')
158 293825 : p--;
159 :
160 370875 : while (p[0])
161 332350 : vec_add1 (s, p++[0]);
162 :
163 38525 : vec_add1 (s, 0);
164 38525 : return s;
165 : }
166 :
167 : clib_error_t *
168 0 : unix_proc_file_contents (char *file, u8 ** result)
169 : {
170 0 : u8 *rv = 0;
171 : uword pos;
172 : int bytes, fd;
173 :
174 : /* Unfortunately, stat(/proc/XXX) returns zero... */
175 0 : fd = open (file, O_RDONLY);
176 :
177 0 : if (fd < 0)
178 0 : return clib_error_return_unix (0, "open `%s'", file);
179 :
180 0 : vec_validate (rv, 4095);
181 0 : pos = 0;
182 : while (1)
183 : {
184 0 : bytes = read (fd, rv + pos, 4096);
185 0 : if (bytes < 0)
186 : {
187 0 : close (fd);
188 0 : vec_free (rv);
189 0 : return clib_error_return_unix (0, "read '%s'", file);
190 : }
191 :
192 0 : if (bytes == 0)
193 : {
194 0 : vec_set_len (rv, pos);
195 0 : break;
196 : }
197 0 : pos += bytes;
198 0 : vec_validate (rv, pos + 4095);
199 : }
200 0 : *result = rv;
201 0 : close (fd);
202 0 : return 0;
203 : }
204 :
205 : void os_panic (void) __attribute__ ((weak));
206 :
207 : __clib_export void
208 0 : os_panic (void)
209 : {
210 0 : abort ();
211 : }
212 :
213 : void os_exit (int) __attribute__ ((weak));
214 :
215 : void
216 0 : os_exit (int code)
217 : {
218 0 : exit (code);
219 : }
220 :
221 : void os_puts (u8 * string, uword string_length, uword is_error)
222 : __attribute__ ((weak));
223 :
224 : void
225 546 : os_puts (u8 * string, uword string_length, uword is_error)
226 : {
227 546 : int cpu = os_get_thread_index ();
228 546 : int nthreads = os_get_nthreads ();
229 : char buf[64];
230 546 : int fd = is_error ? 2 : 1;
231 : struct iovec iovs[2];
232 546 : int n_iovs = 0;
233 :
234 546 : if (nthreads > 1)
235 : {
236 0 : snprintf (buf, sizeof (buf), "%d: ", cpu);
237 :
238 0 : iovs[n_iovs].iov_base = buf;
239 0 : iovs[n_iovs].iov_len = strlen (buf);
240 0 : n_iovs++;
241 : }
242 :
243 546 : iovs[n_iovs].iov_base = string;
244 546 : iovs[n_iovs].iov_len = string_length;
245 546 : n_iovs++;
246 :
247 546 : if (writev (fd, iovs, n_iovs) < 0)
248 : ;
249 546 : }
250 :
251 : __clib_export __clib_weak void
252 0 : os_out_of_memory (void)
253 : {
254 0 : os_panic ();
255 0 : }
256 :
257 : __clib_export __clib_weak uword
258 546 : os_get_nthreads (void)
259 : {
260 546 : return 1;
261 : }
262 :
263 : /*
264 : * fd.io coding-style-patch-verification: ON
265 : *
266 : * Local Variables:
267 : * eval: (c-set-style "gnu")
268 : * End:
269 : */
|