Update copyright notices with scripts/update-copyrights
[glibc.git] / sysdeps / mach / hurd / symlink.c
blob25bb2044b432ee3ee6f28cbe466ca20c4364b390
1 /* Copyright (C) 1991-2014 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Lesser General Public
6 License as published by the Free Software Foundation; either
7 version 2.1 of the License, or (at your option) any later version.
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Lesser General Public License for more details.
14 You should have received a copy of the GNU Lesser General Public
15 License along with the GNU C Library; if not, see
16 <http://www.gnu.org/licenses/>. */
18 #include <string.h>
19 #include <unistd.h>
20 #include <hurd.h>
21 #include <hurd/paths.h>
22 #include <fcntl.h>
24 /* Make a link to FROM called TO. */
25 int
26 __symlink (from, to)
27 const char *from;
28 const char *to;
30 error_t err;
31 file_t dir, node;
32 char *name;
33 const size_t len = strlen (from) + 1;
34 char buf[sizeof (_HURD_SYMLINK) + len];
36 /* A symlink is a file whose translator is "/hurd/symlink\0target\0". */
38 memcpy (buf, _HURD_SYMLINK, sizeof (_HURD_SYMLINK));
39 memcpy (&buf[sizeof (_HURD_SYMLINK)], from, len);
41 dir = __file_name_split (to, &name);
42 if (dir == MACH_PORT_NULL)
43 return -1;
45 /* Create a new, unlinked node in the target directory. */
46 err = __dir_mkfile (dir, O_WRITE, 0777 & ~_hurd_umask, &node);
48 if (! err)
50 /* Set the node's translator to make it a symlink. */
51 err = __file_set_translator (node,
52 FS_TRANS_EXCL|FS_TRANS_SET,
53 FS_TRANS_EXCL|FS_TRANS_SET, 0,
54 buf, sizeof (_HURD_SYMLINK) + len,
55 MACH_PORT_NULL, MACH_MSG_TYPE_COPY_SEND);
57 if (! err)
58 /* Link the node, now a valid symlink, into the target directory. */
59 err = __dir_link (dir, node, name, 1);
61 __mach_port_deallocate (__mach_task_self (), node);
64 __mach_port_deallocate (__mach_task_self (), dir);
66 if (err)
67 return __hurd_fail (err);
68 return 0;
71 weak_alias (__symlink, symlink)