1/*
2 * Copyright (c) 2003-2005 The Regents of The University of Michigan
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions are
7 * met: redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer;
9 * redistributions in binary form must reproduce the above copyright
10 * notice, this list of conditions and the following disclaimer in the
11 * documentation and/or other materials provided with the distribution;
12 * neither the name of the copyright holders nor the names of its
13 * contributors may be used to endorse or promote products derived from
14 * this software without specific prior written permission.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
17 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
18 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
19 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
20 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
21 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
22 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 *
28 * Authors: Steve Reinhardt
29 * Ali Saidi
30 */
31
32#include "sim/syscall_emul.hh"
33
34#include <fcntl.h>
35#include <sys/syscall.h>
36#include <unistd.h>
37
38#include <csignal>
39#include <iostream>
40#include <mutex>
41#include <string>
42
43#include "arch/utility.hh"
44#include "base/chunk_generator.hh"
45#include "base/trace.hh"
46#include "config/the_isa.hh"
47#include "cpu/thread_context.hh"
48#include "dev/net/dist_iface.hh"
49#include "mem/page_table.hh"
50#include "sim/byteswap.hh"
51#include "sim/process.hh"
52#include "sim/sim_exit.hh"
53#include "sim/syscall_debug_macros.hh"
54#include "sim/syscall_desc.hh"
55#include "sim/system.hh"
56
57using namespace std;
58using namespace TheISA;
59
60SyscallReturn
61unimplementedFunc(SyscallDesc *desc, int callnum, Process *process,
62 ThreadContext *tc)
63{
64 fatal("syscall %s (#%d) unimplemented.", desc->name(), callnum);
65
66 return 1;
67}
68
69
70SyscallReturn
71ignoreFunc(SyscallDesc *desc, int callnum, Process *process,
72 ThreadContext *tc)
73{
74 if (desc->needWarning()) {
75 warn("ignoring syscall %s(...)%s", desc->name(), desc->warnOnce() ?
76 "\n (further warnings will be suppressed)" : "");
77 }
78
79 return 0;
80}
81
82static void
83exitFutexWake(ThreadContext *tc, Addr addr, uint64_t tgid)
84{
85 // Clear value at address pointed to by thread's childClearTID field.
86 BufferArg ctidBuf(addr, sizeof(long));
87 long *ctid = (long *)ctidBuf.bufferPtr();
88 *ctid = 0;
89 ctidBuf.copyOut(tc->getMemProxy());
90
91 FutexMap &futex_map = tc->getSystemPtr()->futexMap;
92 // Wake one of the waiting threads.
93 futex_map.wakeup(addr, tgid, 1);
94}
95
96static SyscallReturn
97exitImpl(SyscallDesc *desc, int callnum, Process *p, ThreadContext *tc,
98 bool group)
99{
100 int index = 0;
101 int status = p->getSyscallArg(tc, index);
102
103 System *sys = tc->getSystemPtr();
104
105 int activeContexts = 0;
106 for (auto &system: sys->systemList)
107 activeContexts += system->numRunningContexts();
108 if (activeContexts == 1) {
109 /**
110 * Even though we are terminating the final thread context, dist-gem5
111 * requires the simulation to remain active and provide
112 * synchronization messages to the switch process. So we just halt
113 * the last thread context and return. The simulation will be
114 * terminated by dist-gem5 in a coordinated manner once all nodes
115 * have signaled their readiness to exit. For non dist-gem5
116 * simulations, readyToExit() always returns true.
117 */
118 if (!DistIface::readyToExit(0)) {
119 tc->halt();
120 return status;
121 }
122
123 exitSimLoop("exiting with last active thread context", status & 0xff);
124 return status;
125 }
126
127 if (group)
128 *p->exitGroup = true;
129
130 if (p->childClearTID)
131 exitFutexWake(tc, p->childClearTID, p->tgid());
132
133 bool last_thread = true;
134 Process *parent = nullptr, *tg_lead = nullptr;
135 for (int i = 0; last_thread && i < sys->numContexts(); i++) {
136 Process *walk;
137 if (!(walk = sys->threadContexts[i]->getProcessPtr()))
138 continue;
139
140 /**
141 * Threads in a thread group require special handing. For instance,
142 * we send the SIGCHLD signal so that it appears that it came from
143 * the head of the group. We also only delete file descriptors if
144 * we are the last thread in the thread group.
145 */
146 if (walk->pid() == p->tgid())
147 tg_lead = walk;
148
149 if ((sys->threadContexts[i]->status() != ThreadContext::Halted)
150 && (walk != p)) {
151 /**
152 * Check if we share thread group with the pointer; this denotes
153 * that we are not the last thread active in the thread group.
154 * Note that setting this to false also prevents further
155 * iterations of the loop.
156 */
157 if (walk->tgid() == p->tgid())
158 last_thread = false;
159
160 /**
161 * A corner case exists which involves execve(). After execve(),
162 * the execve will enable SIGCHLD in the process. The problem
163 * occurs when the exiting process is the root process in the
164 * system; there is no parent to receive the signal. We obviate
165 * this problem by setting the root process' ppid to zero in the
166 * Python configuration files. We really should handle the
167 * root/execve specific case more gracefully.
168 */
169 if (*p->sigchld && (p->ppid() != 0) && (walk->pid() == p->ppid()))
170 parent = walk;
171 }
172 }
173
174 if (last_thread) {
175 if (parent) {
176 assert(tg_lead);
177 sys->signalList.push_back(BasicSignal(tg_lead, parent, SIGCHLD));
178 }
179
180 /**
181 * Run though FD array of the exiting process and close all file
182 * descriptors except for the standard file descriptors.
183 * (The standard file descriptors are shared with gem5.)
184 */
185 for (int i = 0; i < p->fds->getSize(); i++) {
186 if ((*p->fds)[i])
187 p->fds->closeFDEntry(i);
188 }
189 }
190
191 tc->halt();
192 return status;
193}
194
195SyscallReturn
196exitFunc(SyscallDesc *desc, int callnum, Process *p, ThreadContext *tc)
197{
198 return exitImpl(desc, callnum, p, tc, false);
199}
200
201SyscallReturn
202exitGroupFunc(SyscallDesc *desc, int callnum, Process *p, ThreadContext *tc)
203{
204 return exitImpl(desc, callnum, p, tc, true);
205}
206
207SyscallReturn
208getpagesizeFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
209{
210 return (int)PageBytes;
211}
212
213
214SyscallReturn
215brkFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
216{
217 // change brk addr to first arg
218 int index = 0;
219 Addr new_brk = p->getSyscallArg(tc, index);
220
221 std::shared_ptr<MemState> mem_state = p->memState;
222 Addr brk_point = mem_state->getBrkPoint();
223
224 // in Linux at least, brk(0) returns the current break value
225 // (note that the syscall and the glibc function have different behavior)
226 if (new_brk == 0)
227 return brk_point;
228
229 if (new_brk > brk_point) {
230 // might need to allocate some new pages
231 for (ChunkGenerator gen(brk_point,
232 new_brk - brk_point,
233 PageBytes); !gen.done(); gen.next()) {
234 if (!p->pTable->translate(gen.addr()))
235 p->allocateMem(roundDown(gen.addr(), PageBytes), PageBytes);
236
237 // if the address is already there, zero it out
238 else {
239 uint8_t zero = 0;
240 SETranslatingPortProxy &tp = tc->getMemProxy();
241
242 // split non-page aligned accesses
243 Addr next_page = roundUp(gen.addr(), PageBytes);
244 uint32_t size_needed = next_page - gen.addr();
245 tp.memsetBlob(gen.addr(), zero, size_needed);
246 if (gen.addr() + PageBytes > next_page &&
247 next_page < new_brk &&
248 p->pTable->translate(next_page)) {
249 size_needed = PageBytes - size_needed;
250 tp.memsetBlob(next_page, zero, size_needed);
251 }
252 }
253 }
254 }
255
256 mem_state->setBrkPoint(new_brk);
257 DPRINTF_SYSCALL(Verbose, "brk: break point changed to: %#X\n",
258 mem_state->getBrkPoint());
259 return mem_state->getBrkPoint();
260}
261
262SyscallReturn
263setTidAddressFunc(SyscallDesc *desc, int callnum, Process *process,
264 ThreadContext *tc)
265{
266 int index = 0;
267 uint64_t tidPtr = process->getSyscallArg(tc, index);
268
269 process->childClearTID = tidPtr;
270 return process->pid();
271}
272
273SyscallReturn
274closeFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
275{
276 int index = 0;
277 int tgt_fd = p->getSyscallArg(tc, index);
278
279 return p->fds->closeFDEntry(tgt_fd);
280}
281
282
283SyscallReturn
284readFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
285{
286 int index = 0;
287 int tgt_fd = p->getSyscallArg(tc, index);
288 Addr buf_ptr = p->getSyscallArg(tc, index);
289 int nbytes = p->getSyscallArg(tc, index);
290
291 auto hbfdp = std::dynamic_pointer_cast<HBFDEntry>((*p->fds)[tgt_fd]);
292 if (!hbfdp)
293 return -EBADF;
294 int sim_fd = hbfdp->getSimFD();
295
296 BufferArg bufArg(buf_ptr, nbytes);
297 int bytes_read = read(sim_fd, bufArg.bufferPtr(), nbytes);
298
299 if (bytes_read > 0)
300 bufArg.copyOut(tc->getMemProxy());
301
302 return bytes_read;
303}
304
305SyscallReturn
306writeFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
307{
308 int index = 0;
309 int tgt_fd = p->getSyscallArg(tc, index);
310 Addr buf_ptr = p->getSyscallArg(tc, index);
311 int nbytes = p->getSyscallArg(tc, index);
312
313 auto hbfdp = std::dynamic_pointer_cast<HBFDEntry>((*p->fds)[tgt_fd]);
314 if (!hbfdp)
315 return -EBADF;
316 int sim_fd = hbfdp->getSimFD();
317
318 BufferArg bufArg(buf_ptr, nbytes);
319 bufArg.copyIn(tc->getMemProxy());
320
321 int bytes_written = write(sim_fd, bufArg.bufferPtr(), nbytes);
322
323 fsync(sim_fd);
324
325 return bytes_written;
326}
327
328
329SyscallReturn
330lseekFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
331{
332 int index = 0;
333 int tgt_fd = p->getSyscallArg(tc, index);
334 uint64_t offs = p->getSyscallArg(tc, index);
335 int whence = p->getSyscallArg(tc, index);
336
337 auto ffdp = std::dynamic_pointer_cast<FileFDEntry>((*p->fds)[tgt_fd]);
338 if (!ffdp)
339 return -EBADF;
340 int sim_fd = ffdp->getSimFD();
341
342 off_t result = lseek(sim_fd, offs, whence);
343
344 return (result == (off_t)-1) ? -errno : result;
345}
346
347
348SyscallReturn
349_llseekFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
350{
351 int index = 0;
352 int tgt_fd = p->getSyscallArg(tc, index);
353 uint64_t offset_high = p->getSyscallArg(tc, index);
354 uint32_t offset_low = p->getSyscallArg(tc, index);
355 Addr result_ptr = p->getSyscallArg(tc, index);
356 int whence = p->getSyscallArg(tc, index);
357
358 auto ffdp = std::dynamic_pointer_cast<FileFDEntry>((*p->fds)[tgt_fd]);
359 if (!ffdp)
360 return -EBADF;
361 int sim_fd = ffdp->getSimFD();
362
363 uint64_t offset = (offset_high << 32) | offset_low;
364
365 uint64_t result = lseek(sim_fd, offset, whence);
366 result = TheISA::htog(result);
367
368 if (result == (off_t)-1)
369 return -errno;
370 // Assuming that the size of loff_t is 64 bits on the target platform
371 BufferArg result_buf(result_ptr, sizeof(result));
372 memcpy(result_buf.bufferPtr(), &result, sizeof(result));
373 result_buf.copyOut(tc->getMemProxy());
374 return 0;
375}
376
377
378SyscallReturn
379munmapFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
380{
381 // With mmap more fully implemented, it might be worthwhile to bite
382 // the bullet and implement munmap. Should allow us to reuse simulated
383 // memory.
384 return 0;
385}
386
387
388const char *hostname = "m5.eecs.umich.edu";
389
390SyscallReturn
391gethostnameFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
392{
393 int index = 0;
394 Addr buf_ptr = p->getSyscallArg(tc, index);
395 int name_len = p->getSyscallArg(tc, index);
396 BufferArg name(buf_ptr, name_len);
397
398 strncpy((char *)name.bufferPtr(), hostname, name_len);
399
400 name.copyOut(tc->getMemProxy());
401
402 return 0;
403}
404
405SyscallReturn
406getcwdFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
407{
408 int result = 0;
409 int index = 0;
410 Addr buf_ptr = p->getSyscallArg(tc, index);
411 unsigned long size = p->getSyscallArg(tc, index);
412 BufferArg buf(buf_ptr, size);
413
414 // Is current working directory defined?
415 string cwd = p->getcwd();
416 if (!cwd.empty()) {
417 if (cwd.length() >= size) {
418 // Buffer too small
419 return -ERANGE;
420 }
421 strncpy((char *)buf.bufferPtr(), cwd.c_str(), size);
422 result = cwd.length();
423 } else {
424 if (getcwd((char *)buf.bufferPtr(), size)) {
425 result = strlen((char *)buf.bufferPtr());
426 } else {
427 result = -1;
428 }
429 }
430
431 buf.copyOut(tc->getMemProxy());
432
433 return (result == -1) ? -errno : result;
434}
435
436SyscallReturn
437readlinkFunc(SyscallDesc *desc, int callnum, Process *process,
438 ThreadContext *tc)
439{
440 return readlinkFunc(desc, callnum, process, tc, 0);
441}
442
443SyscallReturn
444readlinkFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc,
445 int index)
446{
447 string path;
448
449 if (!tc->getMemProxy().tryReadString(path, p->getSyscallArg(tc, index)))
450 return -EFAULT;
451
452 // Adjust path for current working directory
453 path = p->fullPath(path);
454
455 Addr buf_ptr = p->getSyscallArg(tc, index);
456 size_t bufsiz = p->getSyscallArg(tc, index);
457
458 BufferArg buf(buf_ptr, bufsiz);
459
460 int result = -1;
461 if (path != "/proc/self/exe") {
462 result = readlink(path.c_str(), (char *)buf.bufferPtr(), bufsiz);
463 } else {
464 // Emulate readlink() called on '/proc/self/exe' should return the
465 // absolute path of the binary running in the simulated system (the
466 // Process' executable). It is possible that using this path in
467 // the simulated system will result in unexpected behavior if:
468 // 1) One binary runs another (e.g., -c time -o "my_binary"), and
469 // called binary calls readlink().
470 // 2) The host's full path to the running benchmark changes from one
471 // simulation to another. This can result in different simulated
472 // performance since the simulated system will process the binary
473 // path differently, even if the binary itself does not change.
474
475 // Get the absolute canonical path to the running application
476 char real_path[PATH_MAX];
477 char *check_real_path = realpath(p->progName(), real_path);
478 if (!check_real_path) {
479 fatal("readlink('/proc/self/exe') unable to resolve path to "
480 "executable: %s", p->progName());
481 }
482 strncpy((char*)buf.bufferPtr(), real_path, bufsiz);
483 size_t real_path_len = strlen(real_path);
484 if (real_path_len > bufsiz) {
485 // readlink will truncate the contents of the
486 // path to ensure it is no more than bufsiz
487 result = bufsiz;
488 } else {
489 result = real_path_len;
490 }
491
492 // Issue a warning about potential unexpected results
493 warn_once("readlink() called on '/proc/self/exe' may yield unexpected "
494 "results in various settings.\n Returning '%s'\n",
495 (char*)buf.bufferPtr());
496 }
497
498 buf.copyOut(tc->getMemProxy());
499
500 return (result == -1) ? -errno : result;
501}
502
503SyscallReturn
504unlinkFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
505{
506 return unlinkHelper(desc, num, p, tc, 0);
507}
508
509SyscallReturn
510unlinkHelper(SyscallDesc *desc, int num, Process *p, ThreadContext *tc,
511 int index)
512{
513 string path;
514
515 if (!tc->getMemProxy().tryReadString(path, p->getSyscallArg(tc, index)))
516 return -EFAULT;
517
518 path = p->fullPath(path);
519
520 int result = unlink(path.c_str());
521 return (result == -1) ? -errno : result;
522}
523
524SyscallReturn
525linkFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
526{
527 string path;
528 string new_path;
529
530 int index = 0;
531 auto &virt_mem = tc->getMemProxy();
532 if (!virt_mem.tryReadString(path, p->getSyscallArg(tc, index)))
533 return -EFAULT;
534 if (!virt_mem.tryReadString(new_path, p->getSyscallArg(tc, index)))
535 return -EFAULT;
536
537 path = p->fullPath(path);
538 new_path = p->fullPath(new_path);
539
540 int result = link(path.c_str(), new_path.c_str());
541 return (result == -1) ? -errno : result;
542}
543
544SyscallReturn
545symlinkFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
546{
547 string path;
548 string new_path;
549
550 int index = 0;
551 auto &virt_mem = tc->getMemProxy();
552 if (!virt_mem.tryReadString(path, p->getSyscallArg(tc, index)))
553 return -EFAULT;
554 if (!virt_mem.tryReadString(new_path, p->getSyscallArg(tc, index)))
555 return -EFAULT;
556
557 path = p->fullPath(path);
558 new_path = p->fullPath(new_path);
559
560 int result = symlink(path.c_str(), new_path.c_str());
561 return (result == -1) ? -errno : result;
562}
563
564SyscallReturn
565mkdirFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
566{
567 string path;
568
569 int index = 0;
570 if (!tc->getMemProxy().tryReadString(path, p->getSyscallArg(tc, index)))
571 return -EFAULT;
572
573 // Adjust path for current working directory
574 path = p->fullPath(path);
575
576 mode_t mode = p->getSyscallArg(tc, index);
577
578 int result = mkdir(path.c_str(), mode);
579 return (result == -1) ? -errno : result;
580}
581
582SyscallReturn
583renameFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
584{
585 string old_name;
586
587 int index = 0;
588 if (!tc->getMemProxy().tryReadString(old_name, p->getSyscallArg(tc, index)))
589 return -EFAULT;
590
591 string new_name;
592
593 if (!tc->getMemProxy().tryReadString(new_name, p->getSyscallArg(tc, index)))
594 return -EFAULT;
595
596 // Adjust path for current working directory
597 old_name = p->fullPath(old_name);
598 new_name = p->fullPath(new_name);
599
600 int64_t result = rename(old_name.c_str(), new_name.c_str());
601 return (result == -1) ? -errno : result;
602}
603
604SyscallReturn
605truncateFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
606{
607 string path;
608
609 int index = 0;
610 if (!tc->getMemProxy().tryReadString(path, p->getSyscallArg(tc, index)))
611 return -EFAULT;
612
613 off_t length = p->getSyscallArg(tc, index);
614
615 // Adjust path for current working directory
616 path = p->fullPath(path);
617
618 int result = truncate(path.c_str(), length);
619 return (result == -1) ? -errno : result;
620}
621
622SyscallReturn
623ftruncateFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
624{
625 int index = 0;
626 int tgt_fd = p->getSyscallArg(tc, index);
627 off_t length = p->getSyscallArg(tc, index);
628
629 auto ffdp = std::dynamic_pointer_cast<FileFDEntry>((*p->fds)[tgt_fd]);
630 if (!ffdp)
631 return -EBADF;
632 int sim_fd = ffdp->getSimFD();
633
634 int result = ftruncate(sim_fd, length);
635 return (result == -1) ? -errno : result;
636}
637
638SyscallReturn
639truncate64Func(SyscallDesc *desc, int num,
640 Process *process, ThreadContext *tc)
641{
642 int index = 0;
643 string path;
644
645 if (!tc->getMemProxy().tryReadString(path, process->getSyscallArg(tc, index)))
646 return -EFAULT;
647
648 int64_t length = process->getSyscallArg(tc, index, 64);
649
650 // Adjust path for current working directory
651 path = process->fullPath(path);
652
653#if NO_STAT64
654 int result = truncate(path.c_str(), length);
655#else
656 int result = truncate64(path.c_str(), length);
657#endif
658 return (result == -1) ? -errno : result;
659}
660
661SyscallReturn
662ftruncate64Func(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
663{
664 int index = 0;
665 int tgt_fd = p->getSyscallArg(tc, index);
666 int64_t length = p->getSyscallArg(tc, index, 64);
667
668 auto ffdp = std::dynamic_pointer_cast<FileFDEntry>((*p->fds)[tgt_fd]);
669 if (!ffdp)
670 return -EBADF;
671 int sim_fd = ffdp->getSimFD();
672
673#if NO_STAT64
674 int result = ftruncate(sim_fd, length);
675#else
676 int result = ftruncate64(sim_fd, length);
677#endif
678 return (result == -1) ? -errno : result;
679}
680
681SyscallReturn
682umaskFunc(SyscallDesc *desc, int num, Process *process, ThreadContext *tc)
683{
684 // Letting the simulated program change the simulator's umask seems like
685 // a bad idea. Compromise by just returning the current umask but not
686 // changing anything.
687 mode_t oldMask = umask(0);
688 umask(oldMask);
689 return (int)oldMask;
690}
691
692SyscallReturn
693chownFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
694{
695 string path;
696
697 int index = 0;
698 if (!tc->getMemProxy().tryReadString(path, p->getSyscallArg(tc, index)))
699 return -EFAULT;
700
701 /* XXX endianess */
702 uint32_t owner = p->getSyscallArg(tc, index);
703 uid_t hostOwner = owner;
704 uint32_t group = p->getSyscallArg(tc, index);
705 gid_t hostGroup = group;
706
707 // Adjust path for current working directory
708 path = p->fullPath(path);
709
710 int result = chown(path.c_str(), hostOwner, hostGroup);
711 return (result == -1) ? -errno : result;
712}
713
714SyscallReturn
715fchownFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
716{
717 int index = 0;
718 int tgt_fd = p->getSyscallArg(tc, index);
719
720 auto ffdp = std::dynamic_pointer_cast<FileFDEntry>((*p->fds)[tgt_fd]);
721 if (!ffdp)
722 return -EBADF;
723 int sim_fd = ffdp->getSimFD();
724
725 /* XXX endianess */
726 uint32_t owner = p->getSyscallArg(tc, index);
727 uid_t hostOwner = owner;
728 uint32_t group = p->getSyscallArg(tc, index);
729 gid_t hostGroup = group;
730
731 int result = fchown(sim_fd, hostOwner, hostGroup);
732 return (result == -1) ? -errno : result;
733}
734
735/**
736 * FIXME: The file description is not shared among file descriptors created
737 * with dup. Really, it's difficult to maintain fields like file offset or
738 * flags since an update to such a field won't be reflected in the metadata
739 * for the fd entries that we maintain for checkpoint restoration.
740 */
741SyscallReturn
742dupFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
743{
744 int index = 0;
745 int tgt_fd = p->getSyscallArg(tc, index);
746
747 auto old_hbfdp = std::dynamic_pointer_cast<HBFDEntry>((*p->fds)[tgt_fd]);
748 if (!old_hbfdp)
749 return -EBADF;
750 int sim_fd = old_hbfdp->getSimFD();
751
752 int result = dup(sim_fd);
753 if (result == -1)
754 return -errno;
755
756 auto new_hbfdp = std::dynamic_pointer_cast<HBFDEntry>(old_hbfdp->clone());
757 new_hbfdp->setSimFD(result);
758 new_hbfdp->setCOE(false);
759 return p->fds->allocFD(new_hbfdp);
760}
761
762SyscallReturn
763dup2Func(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
764{
765 int index = 0;
766
767 int old_tgt_fd = p->getSyscallArg(tc, index);
768 auto old_hbp = std::dynamic_pointer_cast<HBFDEntry>((*p->fds)[old_tgt_fd]);
769 if (!old_hbp)
770 return -EBADF;
771 int old_sim_fd = old_hbp->getSimFD();
772
773 /**
774 * We need a valid host file descriptor number to be able to pass into
775 * the second parameter for dup2 (newfd), but we don't know what the
776 * viable numbers are; we execute the open call to retrieve one.
777 */
778 int res_fd = dup2(old_sim_fd, open("/dev/null", O_RDONLY));
779 if (res_fd == -1)
780 return -errno;
781
782 int new_tgt_fd = p->getSyscallArg(tc, index);
783 auto new_hbp = std::dynamic_pointer_cast<HBFDEntry>((*p->fds)[new_tgt_fd]);
784 if (new_hbp)
785 p->fds->closeFDEntry(new_tgt_fd);
786 new_hbp = std::dynamic_pointer_cast<HBFDEntry>(old_hbp->clone());
787 new_hbp->setSimFD(res_fd);
788 new_hbp->setCOE(false);
789
790 return p->fds->allocFD(new_hbp);
791}
792
793SyscallReturn
794fcntlFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
795{
796 int arg;
797 int index = 0;
798 int tgt_fd = p->getSyscallArg(tc, index);
799 int cmd = p->getSyscallArg(tc, index);
800
801 auto hbfdp = std::dynamic_pointer_cast<HBFDEntry>((*p->fds)[tgt_fd]);
802 if (!hbfdp)
803 return -EBADF;
804 int sim_fd = hbfdp->getSimFD();
805
806 int coe = hbfdp->getCOE();
807
808 switch (cmd) {
809 case F_GETFD:
810 return coe & FD_CLOEXEC;
811
812 case F_SETFD: {
813 arg = p->getSyscallArg(tc, index);
814 arg ? hbfdp->setCOE(true) : hbfdp->setCOE(false);
815 return 0;
816 }
817
818 // Rely on the host to maintain the file status flags for this file
819 // description rather than maintain it ourselves. Admittedly, this
820 // is suboptimal (and possibly error prone), but it is difficult to
821 // maintain the flags by tracking them across the different descriptors
822 // (that refer to this file description) caused by clone, dup, and
823 // subsequent fcntls.
824 case F_GETFL:
825 case F_SETFL: {
826 arg = p->getSyscallArg(tc, index);
827 int rv = fcntl(sim_fd, cmd, arg);
828 return (rv == -1) ? -errno : rv;
829 }
830
831 default:
832 warn("fcntl: unsupported command %d\n", cmd);
833 return 0;
834 }
835}
836
837SyscallReturn
838fcntl64Func(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
839{
840 int index = 0;
841 int tgt_fd = p->getSyscallArg(tc, index);
842
843 auto hbfdp = std::dynamic_pointer_cast<HBFDEntry>((*p->fds)[tgt_fd]);
844 if (!hbfdp)
845 return -EBADF;
846 int sim_fd = hbfdp->getSimFD();
847
848 int cmd = p->getSyscallArg(tc, index);
849 switch (cmd) {
850 case 33: //F_GETLK64
851 warn("fcntl64(%d, F_GETLK64) not supported, error returned\n", tgt_fd);
852 return -EMFILE;
853
854 case 34: // F_SETLK64
855 case 35: // F_SETLKW64
856 warn("fcntl64(%d, F_SETLK(W)64) not supported, error returned\n",
857 tgt_fd);
858 return -EMFILE;
859
860 default:
861 // not sure if this is totally valid, but we'll pass it through
862 // to the underlying OS
863 warn("fcntl64(%d, %d) passed through to host\n", tgt_fd, cmd);
864 return fcntl(sim_fd, cmd);
865 }
866}
867
868SyscallReturn
869pipeImpl(SyscallDesc *desc, int callnum, Process *p, ThreadContext *tc,
870 bool pseudoPipe)
871{
872 Addr tgt_addr = 0;
873 if (!pseudoPipe) {
874 int index = 0;
875 tgt_addr = p->getSyscallArg(tc, index);
876 }
877
878 int sim_fds[2], tgt_fds[2];
879
880 int pipe_retval = pipe(sim_fds);
881 if (pipe_retval == -1)
882 return -errno;
883
884 auto rend = PipeFDEntry::EndType::read;
885 auto rpfd = std::make_shared<PipeFDEntry>(sim_fds[0], O_WRONLY, rend);
886 tgt_fds[0] = p->fds->allocFD(rpfd);
887
888 auto wend = PipeFDEntry::EndType::write;
889 auto wpfd = std::make_shared<PipeFDEntry>(sim_fds[1], O_RDONLY, wend);
890 tgt_fds[1] = p->fds->allocFD(wpfd);
891
892 /**
893 * Now patch the read object to record the target file descriptor chosen
894 * as the write end of the pipe.
895 */
896 rpfd->setPipeReadSource(tgt_fds[1]);
897
898 /**
899 * Alpha Linux convention for pipe() is that fd[0] is returned as
900 * the return value of the function, and fd[1] is returned in r20.
901 */
902 if (pseudoPipe) {
903 tc->setIntReg(SyscallPseudoReturnReg, tgt_fds[1]);
904 return tgt_fds[0];
905 }
906
907 /**
908 * Copy the target file descriptors into buffer space and then copy
909 * the buffer space back into the target address space.
910 */
911 BufferArg tgt_handle(tgt_addr, sizeof(int[2]));
912 int *buf_ptr = (int*)tgt_handle.bufferPtr();
913 buf_ptr[0] = tgt_fds[0];
914 buf_ptr[1] = tgt_fds[1];
915 tgt_handle.copyOut(tc->getMemProxy());
916 return 0;
917}
918
919SyscallReturn
920pipePseudoFunc(SyscallDesc *desc, int callnum, Process *process,
921 ThreadContext *tc)
922{
923 return pipeImpl(desc, callnum, process, tc, true);
924}
925
926SyscallReturn
927pipeFunc(SyscallDesc *desc, int callnum, Process *process, ThreadContext *tc)
928{
929 return pipeImpl(desc, callnum, process, tc, false);
930}
931
932SyscallReturn
933setpgidFunc(SyscallDesc *desc, int callnum, Process *process,
934 ThreadContext *tc)
935{
936 int index = 0;
937 int pid = process->getSyscallArg(tc, index);
938 int pgid = process->getSyscallArg(tc, index);
939
940 if (pgid < 0)
941 return -EINVAL;
942
943 if (pid == 0) {
944 process->setpgid(process->pid());
945 return 0;
946 }
947
948 Process *matched_ph = nullptr;
949 System *sysh = tc->getSystemPtr();
950
951 // Retrieves process pointer from active/suspended thread contexts.
952 for (int i = 0; i < sysh->numContexts(); i++) {
953 if (sysh->threadContexts[i]->status() != ThreadContext::Halted) {
954 Process *temp_h = sysh->threadContexts[i]->getProcessPtr();
955 Process *walk_ph = (Process*)temp_h;
956
957 if (walk_ph && walk_ph->pid() == process->pid())
958 matched_ph = walk_ph;
959 }
960 }
961
962 assert(matched_ph);
963 matched_ph->setpgid((pgid == 0) ? matched_ph->pid() : pgid);
964
965 return 0;
966}
967
968SyscallReturn
969getpidPseudoFunc(SyscallDesc *desc, int callnum, Process *process,
970 ThreadContext *tc)
971{
972 // Make up a PID. There's no interprocess communication in
973 // fake_syscall mode, so there's no way for a process to know it's
974 // not getting a unique value.
975
976 tc->setIntReg(SyscallPseudoReturnReg, process->ppid());
977 return process->pid();
978}
979
980
981SyscallReturn
982getuidPseudoFunc(SyscallDesc *desc, int callnum, Process *process,
983 ThreadContext *tc)
984{
985 // Make up a UID and EUID... it shouldn't matter, and we want the
986 // simulation to be deterministic.
987
988 // EUID goes in r20.
989 tc->setIntReg(SyscallPseudoReturnReg, process->euid()); // EUID
990 return process->uid(); // UID
991}
992
993
994SyscallReturn
995getgidPseudoFunc(SyscallDesc *desc, int callnum, Process *process,
996 ThreadContext *tc)
997{
998 // Get current group ID. EGID goes in r20.
999 tc->setIntReg(SyscallPseudoReturnReg, process->egid()); // EGID
1000 return process->gid();
1001}
1002
1003
1004SyscallReturn
1005setuidFunc(SyscallDesc *desc, int callnum, Process *process,
1006 ThreadContext *tc)
1007{
1008 // can't fathom why a benchmark would call this.
1009 int index = 0;
1010 warn("Ignoring call to setuid(%d)\n", process->getSyscallArg(tc, index));
1011 return 0;
1012}
1013
1014SyscallReturn
1015getpidFunc(SyscallDesc *desc, int callnum, Process *process,
1016 ThreadContext *tc)
1017{
1018 return process->tgid();
1019}
1020
1021SyscallReturn
1022gettidFunc(SyscallDesc *desc, int callnum, Process *process,
1023 ThreadContext *tc)
1024{
1025 return process->pid();
1026}
1027
1028SyscallReturn
1029getppidFunc(SyscallDesc *desc, int callnum, Process *process,
1030 ThreadContext *tc)
1031{
1032 return process->ppid();
1033}
1034
1035SyscallReturn
1036getuidFunc(SyscallDesc *desc, int callnum, Process *process,
1037 ThreadContext *tc)
1038{
1039 return process->uid(); // UID
1040}
1041
1042SyscallReturn
1043geteuidFunc(SyscallDesc *desc, int callnum, Process *process,
1044 ThreadContext *tc)
1045{
1046 return process->euid(); // UID
1047}
1048
1049SyscallReturn
1050getgidFunc(SyscallDesc *desc, int callnum, Process *process,
1051 ThreadContext *tc)
1052{
1053 return process->gid();
1054}
1055
1056SyscallReturn
1057getegidFunc(SyscallDesc *desc, int callnum, Process *process,
1058 ThreadContext *tc)
1059{
1060 return process->egid();
1061}
1062
1063SyscallReturn
1064fallocateFunc(SyscallDesc *desc, int callnum, Process *p, ThreadContext *tc)
1065{
1066#if NO_FALLOCATE
1067 warn("Host OS cannot support calls to fallocate. Ignoring syscall");
1068#else
1069 int index = 0;
1070 int tgt_fd = p->getSyscallArg(tc, index);
1071 int mode = p->getSyscallArg(tc, index);
1072 off_t offset = p->getSyscallArg(tc, index);
1073 off_t len = p->getSyscallArg(tc, index);
1074
1075 auto ffdp = std::dynamic_pointer_cast<FileFDEntry>((*p->fds)[tgt_fd]);
1076 if (!ffdp)
1077 return -EBADF;
1078 int sim_fd = ffdp->getSimFD();
1079
1080 int result = fallocate(sim_fd, mode, offset, len);
1081 if (result < 0)
1082 return -errno;
1083#endif
1084 return 0;
1085}
1086
1087SyscallReturn
1088accessFunc(SyscallDesc *desc, int callnum, Process *p, ThreadContext *tc,
1089 int index)
1090{
1091 string path;
1092 if (!tc->getMemProxy().tryReadString(path, p->getSyscallArg(tc, index)))
1093 return -EFAULT;
1094
1095 // Adjust path for current working directory
1096 path = p->fullPath(path);
1097
1098 mode_t mode = p->getSyscallArg(tc, index);
1099
1100 int result = access(path.c_str(), mode);
1101 return (result == -1) ? -errno : result;
1102}
1103
1104SyscallReturn
1105accessFunc(SyscallDesc *desc, int callnum, Process *p, ThreadContext *tc)
1106{
1107 return accessFunc(desc, callnum, p, tc, 0);
1108}
1109
1110SyscallReturn
1111mknodFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
1112{
1113 int index = 0;
1114 std::string path;
1115 if (!tc->getMemProxy().tryReadString(path, p->getSyscallArg(tc, index)))
1116 return -EFAULT;
1117
1118 path = p->fullPath(path);
1119 mode_t mode = p->getSyscallArg(tc, index);
1120 dev_t dev = p->getSyscallArg(tc, index);
1121
1122 auto result = mknod(path.c_str(), mode, dev);
1123 return (result == -1) ? -errno : result;
1124}
1125
1126SyscallReturn
1127chdirFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
1128{
1129 int index = 0;
1130 std::string path;
1131 if (!tc->getMemProxy().tryReadString(path, p->getSyscallArg(tc, index)))
1132 return -EFAULT;
1133
1134 path = p->fullPath(path);
1135
1136 auto result = chdir(path.c_str());
1137 return (result == -1) ? -errno : result;
1138}
1139
1140SyscallReturn
1141rmdirFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
1142{
1143 int index = 0;
1144 std::string path;
1145 if (!tc->getMemProxy().tryReadString(path, p->getSyscallArg(tc, index)))
1146 return -EFAULT;
1147
1148 path = p->fullPath(path);
1149
1150 auto result = rmdir(path.c_str());
1151 return (result == -1) ? -errno : result;
1152}
1153
1154#if defined(SYS_getdents) || defined(SYS_getdents64)
1155template<typename DE, int SYS_NUM>
1156static SyscallReturn
1157getdentsImpl(SyscallDesc *desc, int callnum, Process *p, ThreadContext *tc)
1158{
1159 int index = 0;
1160 int tgt_fd = p->getSyscallArg(tc, index);
1161 Addr buf_ptr = p->getSyscallArg(tc, index);
1162 unsigned count = p->getSyscallArg(tc, index);
1163
1164 auto hbfdp = std::dynamic_pointer_cast<HBFDEntry>((*p->fds)[tgt_fd]);
1165 if (!hbfdp)
1166 return -EBADF;
1167 int sim_fd = hbfdp->getSimFD();
1168
1169 BufferArg buf_arg(buf_ptr, count);
1170 auto status = syscall(SYS_NUM, sim_fd, buf_arg.bufferPtr(), count);
1171
1172 if (status == -1)
1173 return -errno;
1174
1175 unsigned traversed = 0;
1176 while (traversed < status) {
1177 DE *buffer = (DE*)((Addr)buf_arg.bufferPtr() + traversed);
1178
1179 auto host_reclen = buffer->d_reclen;
1180
1181 /**
1182 * Convert the byte ordering from the host to the target before
1183 * passing the data back into the target's address space to preserve
1184 * endianness.
1185 */
1186 buffer->d_ino = htog(buffer->d_ino);
1187 buffer->d_off = htog(buffer->d_off);
1188 buffer->d_reclen = htog(buffer->d_reclen);
1189
1190 traversed += host_reclen;
1191 }
1192
1193 buf_arg.copyOut(tc->getMemProxy());
1194 return status;
1195}
1196#endif
1197
1198#if defined(SYS_getdents)
1199SyscallReturn
1200getdentsFunc(SyscallDesc *desc, int callnum, Process *p, ThreadContext *tc)
1201{
1202 typedef struct linux_dirent {
1203 unsigned long d_ino;
1204 unsigned long d_off;
1205 unsigned short d_reclen;
1206 char dname[];
1207 } LinDent;
1208
1209 return getdentsImpl<LinDent, SYS_getdents>(desc, callnum, p, tc);
1210}
1211#endif
1212
1213#if defined(SYS_getdents64)
1214SyscallReturn
1215getdents64Func(SyscallDesc *desc, int callnum, Process *p, ThreadContext *tc)
1216{
1217 typedef struct linux_dirent64 {
1218 ino64_t d_ino;
1219 off64_t d_off;
1220 unsigned short d_reclen;
1221 char dname[];
1222 } LinDent64;
1223
1224 return getdentsImpl<LinDent64, SYS_getdents64>(desc, callnum, p, tc);
1225}
1226#endif
1227
1228SyscallReturn
1229shutdownFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
1230{
1231 int index = 0;
1232 int tgt_fd = p->getSyscallArg(tc, index);
1233 int how = p->getSyscallArg(tc, index);
1234
1235 auto sfdp = std::dynamic_pointer_cast<SocketFDEntry>((*p->fds)[tgt_fd]);
1236 if (!sfdp)
1237 return -EBADF;
1238 int sim_fd = sfdp->getSimFD();
1239
1240 int retval = shutdown(sim_fd, how);
1241
1242 return (retval == -1) ? -errno : retval;
1243}
1244
1245SyscallReturn
1246bindFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
1247{
1248 int index = 0;
1249 int tgt_fd = p->getSyscallArg(tc, index);
1250 Addr buf_ptr = p->getSyscallArg(tc, index);
1251 int addrlen = p->getSyscallArg(tc, index);
1252
1253 BufferArg bufSock(buf_ptr, addrlen);
1254 bufSock.copyIn(tc->getMemProxy());
1255
1256 auto sfdp = std::dynamic_pointer_cast<SocketFDEntry>((*p->fds)[tgt_fd]);
1257 if (!sfdp)
1258 return -EBADF;
1259 int sim_fd = sfdp->getSimFD();
1260
1261 int status = ::bind(sim_fd,
1262 (struct sockaddr *)bufSock.bufferPtr(),
1263 addrlen);
1264
1265 return (status == -1) ? -errno : status;
1266}
1267
1268SyscallReturn
1269listenFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
1270{
1271 int index = 0;
1272 int tgt_fd = p->getSyscallArg(tc, index);
1273 int backlog = p->getSyscallArg(tc, index);
1274
1275 auto sfdp = std::dynamic_pointer_cast<SocketFDEntry>((*p->fds)[tgt_fd]);
1276 if (!sfdp)
1277 return -EBADF;
1278 int sim_fd = sfdp->getSimFD();
1279
1280 int status = listen(sim_fd, backlog);
1281
1282 return (status == -1) ? -errno : status;
1283}
1284
1285SyscallReturn
1286connectFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
1287{
1288 int index = 0;
1289 int tgt_fd = p->getSyscallArg(tc, index);
1290 Addr buf_ptr = p->getSyscallArg(tc, index);
1291 int addrlen = p->getSyscallArg(tc, index);
1292
1293 BufferArg addr(buf_ptr, addrlen);
1294 addr.copyIn(tc->getMemProxy());
1295
1296 auto sfdp = std::dynamic_pointer_cast<SocketFDEntry>((*p->fds)[tgt_fd]);
1297 if (!sfdp)
1298 return -EBADF;
1299 int sim_fd = sfdp->getSimFD();
1300
1301 int status = connect(sim_fd,
1302 (struct sockaddr *)addr.bufferPtr(),
1303 (socklen_t)addrlen);
1304
1305 return (status == -1) ? -errno : status;
1306}
1307
1308SyscallReturn
1309recvfromFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
1310{
1311 int index = 0;
1312 int tgt_fd = p->getSyscallArg(tc, index);
1313 Addr bufrPtr = p->getSyscallArg(tc, index);
1314 size_t bufrLen = p->getSyscallArg(tc, index);
1315 int flags = p->getSyscallArg(tc, index);
1316 Addr addrPtr = p->getSyscallArg(tc, index);
1317 Addr addrlenPtr = p->getSyscallArg(tc, index);
1318
1319 auto sfdp = std::dynamic_pointer_cast<SocketFDEntry>((*p->fds)[tgt_fd]);
1320 if (!sfdp)
1321 return -EBADF;
1322 int sim_fd = sfdp->getSimFD();
1323
1324 // Reserve buffer space.
1325 BufferArg bufrBuf(bufrPtr, bufrLen);
1326
1327 // Get address length.
1328 socklen_t addrLen = 0;
1329 if (addrlenPtr != 0) {
1330 // Read address length parameter.
1331 BufferArg addrlenBuf(addrlenPtr, sizeof(socklen_t));
1332 addrlenBuf.copyIn(tc->getMemProxy());
1333 addrLen = *((socklen_t *)addrlenBuf.bufferPtr());
1334 }
1335
1336 struct sockaddr sa, *sap = NULL;
1337 if (addrLen != 0) {
1338 BufferArg addrBuf(addrPtr, addrLen);
1339 addrBuf.copyIn(tc->getMemProxy());
1340 memcpy(&sa, (struct sockaddr *)addrBuf.bufferPtr(),
1341 sizeof(struct sockaddr));
1342 sap = &sa;
1343 }
1344
1345 ssize_t recvd_size = recvfrom(sim_fd,
1346 (void *)bufrBuf.bufferPtr(),
1347 bufrLen, flags, sap, (socklen_t *)&addrLen);
1348
1349 if (recvd_size == -1)
1350 return -errno;
1351
1352 // Pass the received data out.
1353 bufrBuf.copyOut(tc->getMemProxy());
1354
1355 // Copy address to addrPtr and pass it on.
1356 if (sap != NULL) {
1357 BufferArg addrBuf(addrPtr, addrLen);
1358 memcpy(addrBuf.bufferPtr(), sap, sizeof(sa));
1359 addrBuf.copyOut(tc->getMemProxy());
1360 }
1361
1362 // Copy len to addrlenPtr and pass it on.
1363 if (addrLen != 0) {
1364 BufferArg addrlenBuf(addrlenPtr, sizeof(socklen_t));
1365 *(socklen_t *)addrlenBuf.bufferPtr() = addrLen;
1366 addrlenBuf.copyOut(tc->getMemProxy());
1367 }
1368
1369 return recvd_size;
1370}
1371
1372SyscallReturn
1373sendtoFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
1374{
1375 int index = 0;
1376 int tgt_fd = p->getSyscallArg(tc, index);
1377 Addr bufrPtr = p->getSyscallArg(tc, index);
1378 size_t bufrLen = p->getSyscallArg(tc, index);
1379 int flags = p->getSyscallArg(tc, index);
1380 Addr addrPtr = p->getSyscallArg(tc, index);
1381 socklen_t addrLen = p->getSyscallArg(tc, index);
1382
1383 auto sfdp = std::dynamic_pointer_cast<SocketFDEntry>((*p->fds)[tgt_fd]);
1384 if (!sfdp)
1385 return -EBADF;
1386 int sim_fd = sfdp->getSimFD();
1387
1388 // Reserve buffer space.
1389 BufferArg bufrBuf(bufrPtr, bufrLen);
1390 bufrBuf.copyIn(tc->getMemProxy());
1391
1392 struct sockaddr sa, *sap = nullptr;
1393 memset(&sa, 0, sizeof(sockaddr));
1394 if (addrLen != 0) {
1395 BufferArg addrBuf(addrPtr, addrLen);
1396 addrBuf.copyIn(tc->getMemProxy());
1397 memcpy(&sa, (sockaddr*)addrBuf.bufferPtr(), addrLen);
1398 sap = &sa;
1399 }
1400
1401 ssize_t sent_size = sendto(sim_fd,
1402 (void *)bufrBuf.bufferPtr(),
1403 bufrLen, flags, sap, (socklen_t)addrLen);
1404
1405 return (sent_size == -1) ? -errno : sent_size;
1406}
1407
1408SyscallReturn
1409recvmsgFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
1410{
1411 int index = 0;
1412 int tgt_fd = p->getSyscallArg(tc, index);
1413 Addr msgPtr = p->getSyscallArg(tc, index);
1414 int flags = p->getSyscallArg(tc, index);
1415
1416 auto sfdp = std::dynamic_pointer_cast<SocketFDEntry>((*p->fds)[tgt_fd]);
1417 if (!sfdp)
1418 return -EBADF;
1419 int sim_fd = sfdp->getSimFD();
1420
1421 /**
1422 * struct msghdr {
1423 * void *msg_name; // optional address
1424 * socklen_t msg_namelen; // size of address
1425 * struct iovec *msg_iov; // iovec array
1426 * size_t msg_iovlen; // number entries in msg_iov
1427 * i // entries correspond to buffer
1428 * void *msg_control; // ancillary data
1429 * size_t msg_controllen; // ancillary data buffer len
1430 * int msg_flags; // flags on received message
1431 * };
1432 *
1433 * struct iovec {
1434 * void *iov_base; // starting address
1435 * size_t iov_len; // number of bytes to transfer
1436 * };
1437 */
1438
1439 /**
1440 * The plan with this system call is to replace all of the pointers in the
1441 * structure and the substructure with BufferArg class pointers. We will
1442 * copy every field from the structures into our BufferArg classes.
1443 */
1444 BufferArg msgBuf(msgPtr, sizeof(struct msghdr));
1445 msgBuf.copyIn(tc->getMemProxy());
1446 struct msghdr *msgHdr = (struct msghdr *)msgBuf.bufferPtr();
1447
1448 /**
1449 * We will use these address place holders to retain the pointers which
1450 * we are going to replace with our own buffers in our simulator address
1451 * space.
1452 */
1453 Addr msg_name_phold = 0;
1454 Addr msg_iov_phold = 0;
1455 Addr iovec_base_phold[msgHdr->msg_iovlen];
1456 Addr msg_control_phold = 0;
1457
1458 /**
1459 * Record msg_name pointer then replace with buffer pointer.
1460 */
1461 BufferArg *nameBuf = NULL;
1462 if (msgHdr->msg_name) {
1463 /*1*/msg_name_phold = (Addr)msgHdr->msg_name;
1464 /*2*/nameBuf = new BufferArg(msg_name_phold, msgHdr->msg_namelen);
1465 /*3*/nameBuf->copyIn(tc->getMemProxy());
1466 /*4*/msgHdr->msg_name = nameBuf->bufferPtr();
1467 }
1468
1469 /**
1470 * Record msg_iov pointer then replace with buffer pointer. Also, setup
1471 * an array of buffer pointers for the iovec structs record and replace
1472 * their pointers with buffer pointers.
1473 */
1474 BufferArg *iovBuf = NULL;
1475 BufferArg *iovecBuf[msgHdr->msg_iovlen];
1476 for (int i = 0; i < msgHdr->msg_iovlen; i++) {
1477 iovec_base_phold[i] = 0;
1478 iovecBuf[i] = NULL;
1479 }
1480
1481 if (msgHdr->msg_iov) {
1482 /*1*/msg_iov_phold = (Addr)msgHdr->msg_iov;
1483 /*2*/iovBuf = new BufferArg(msg_iov_phold, msgHdr->msg_iovlen *
1484 sizeof(struct iovec));
1485 /*3*/iovBuf->copyIn(tc->getMemProxy());
1486 for (int i = 0; i < msgHdr->msg_iovlen; i++) {
1487 if (((struct iovec *)iovBuf->bufferPtr())[i].iov_base) {
1488 /*1*/iovec_base_phold[i] =
1489 (Addr)((struct iovec *)iovBuf->bufferPtr())[i].iov_base;
1490 /*2*/iovecBuf[i] = new BufferArg(iovec_base_phold[i],
1491 ((struct iovec *)iovBuf->bufferPtr())[i].iov_len);
1492 /*3*/iovecBuf[i]->copyIn(tc->getMemProxy());
1493 /*4*/((struct iovec *)iovBuf->bufferPtr())[i].iov_base =
1494 iovecBuf[i]->bufferPtr();
1495 }
1496 }
1497 /*4*/msgHdr->msg_iov = (struct iovec *)iovBuf->bufferPtr();
1498 }
1499
1500 /**
1501 * Record msg_control pointer then replace with buffer pointer.
1502 */
1503 BufferArg *controlBuf = NULL;
1504 if (msgHdr->msg_control) {
1505 /*1*/msg_control_phold = (Addr)msgHdr->msg_control;
1506 /*2*/controlBuf = new BufferArg(msg_control_phold,
1507 CMSG_ALIGN(msgHdr->msg_controllen));
1508 /*3*/controlBuf->copyIn(tc->getMemProxy());
1509 /*4*/msgHdr->msg_control = controlBuf->bufferPtr();
1510 }
1511
1512 ssize_t recvd_size = recvmsg(sim_fd, msgHdr, flags);
1513
1514 if (recvd_size < 0)
1515 return -errno;
1516
1517 if (msgHdr->msg_name) {
1518 nameBuf->copyOut(tc->getMemProxy());
1519 delete(nameBuf);
1520 msgHdr->msg_name = (void *)msg_name_phold;
1521 }
1522
1523 if (msgHdr->msg_iov) {
1524 for (int i = 0; i< msgHdr->msg_iovlen; i++) {
1525 if (((struct iovec *)iovBuf->bufferPtr())[i].iov_base) {
1526 iovecBuf[i]->copyOut(tc->getMemProxy());
1527 delete iovecBuf[i];
1528 ((struct iovec *)iovBuf->bufferPtr())[i].iov_base =
1529 (void *)iovec_base_phold[i];
1530 }
1531 }
1532 iovBuf->copyOut(tc->getMemProxy());
1533 delete iovBuf;
1534 msgHdr->msg_iov = (struct iovec *)msg_iov_phold;
1535 }
1536
1537 if (msgHdr->msg_control) {
1538 controlBuf->copyOut(tc->getMemProxy());
1539 delete(controlBuf);
1540 msgHdr->msg_control = (void *)msg_control_phold;
1541 }
1542
1543 msgBuf.copyOut(tc->getMemProxy());
1544
1545 return recvd_size;
1546}
1547
1548SyscallReturn
1549sendmsgFunc(SyscallDesc *desc, int num, Process *p, ThreadContext *tc)
1550{
1551 int index = 0;
1552 int tgt_fd = p->getSyscallArg(tc, index);
1553 Addr msgPtr = p->getSyscallArg(tc, index);
1554 int flags = p->getSyscallArg(tc, index);
1555
1556 auto sfdp = std::dynamic_pointer_cast<SocketFDEntry>((*p->fds)[tgt_fd]);
1557 if (!sfdp)
1558 return -EBADF;
1559 int sim_fd = sfdp->getSimFD();
1560
1561 /**
1562 * Reserve buffer space.
1563 */
1564 BufferArg msgBuf(msgPtr, sizeof(struct msghdr));
1565 msgBuf.copyIn(tc->getMemProxy());
1566 struct msghdr msgHdr = *((struct msghdr *)msgBuf.bufferPtr());
1567
1568 /**
1569 * Assuming msgHdr.msg_iovlen >= 1, then there is no point calling
1570 * recvmsg without a buffer.
1571 */
1572 struct iovec *iovPtr = msgHdr.msg_iov;
1573 BufferArg iovBuf((Addr)iovPtr, sizeof(struct iovec) * msgHdr.msg_iovlen);
1574 iovBuf.copyIn(tc->getMemProxy());
1575 struct iovec *iov = (struct iovec *)iovBuf.bufferPtr();
1576 msgHdr.msg_iov = iov;
1577
1578 /**
1579 * Cannot instantiate buffers till inside the loop.
1580 * Create array to hold buffer addresses, to be used during copyIn of
1581 * send data.
1582 */
1583 BufferArg **bufferArray = (BufferArg **)malloc(msgHdr.msg_iovlen
1584 * sizeof(BufferArg *));
1585
1586 /**
1587 * Iterate through the iovec structures:
1588 * Get the base buffer addreses, reserve iov_len amount of space for each.
1589 * Put the buf address into the bufferArray for later retrieval.
1590 */
1591 for (int iovIndex = 0 ; iovIndex < msgHdr.msg_iovlen; iovIndex++) {
1592 Addr basePtr = (Addr) iov[iovIndex].iov_base;
1593 bufferArray[iovIndex] = new BufferArg(basePtr, iov[iovIndex].iov_len);
1594 bufferArray[iovIndex]->copyIn(tc->getMemProxy());
1595 iov[iovIndex].iov_base = bufferArray[iovIndex]->bufferPtr();
1596 }
1597
1598 ssize_t sent_size = sendmsg(sim_fd, &msgHdr, flags);
1599 int local_errno = errno;
1600
1601 /**
1602 * Free dynamically allocated memory.
1603 */
1604 for (int iovIndex = 0 ; iovIndex < msgHdr.msg_iovlen; iovIndex++) {
1605 BufferArg *baseBuf = ( BufferArg *)bufferArray[iovIndex];
1606 delete(baseBuf);
1607 }
1608
1609 /**
1610 * Malloced above.
1611 */
1612 free(bufferArray);
1613
1614 return (sent_size < 0) ? -local_errno : sent_size;
1615}
1616