123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364 |
- /* -*- mode:c; c-file-style:"k&r"; c-basic-offset: 4; tab-width:4; indent-tabs-mode:nil; mode:auto-fill; fill-column:78; -*- */
- /* vim: set ts=4 sw=4 et tw=78 fo=cqt wm=0: */
- /* Copyright (C) 2014 Stony Brook University
- This file is part of Graphene Library OS.
- Graphene Library OS is free software: you can redistribute it and/or
- modify it under the terms of the GNU Lesser General Public License
- as published by the Free Software Foundation, either version 3 of the
- License, or (at your option) any later version.
- Graphene Library OS is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU Lesser General Public License for more details.
- You should have received a copy of the GNU Lesser General Public License
- along with this program. If not, see <http://www.gnu.org/licenses/>. */
- /*
- * db_stream.c
- *
- * This file contains APIs to open, read, write and get attribute of
- * streams.
- */
- #include "pal_defs.h"
- #include "pal_linux_defs.h"
- #include "pal.h"
- #include "pal_internal.h"
- #include "pal_linux.h"
- #include "pal_debug.h"
- #include "pal_error.h"
- #include "api.h"
- #include <linux/types.h>
- typedef __kernel_pid_t pid_t;
- #include <linux/stat.h>
- #include <linux/msg.h>
- #include <linux/socket.h>
- #include <linux/wait.h>
- #include <linux/in.h>
- #include <linux/in6.h>
- #include <asm/fcntl.h>
- #include <asm/stat.h>
- #include <asm/socket.h>
- #include <asm/poll.h>
- #include "enclave_pages.h"
- void _DkPrintConsole (const void * buf, int size)
- {
- ocall_print_string(buf, size);
- }
- bool stataccess (struct stat * stat, int acc)
- {
- unsigned int mode = stat->st_mode;
- if (linux_state.uid && linux_state.uid == stat->st_uid) {
- mode >>= 6;
- goto out;
- }
- if (linux_state.gid && linux_state.gid == stat->st_gid) {
- mode >>= 3;
- goto out;
- }
- if (!linux_state.uid)
- mode >>= 6;
- out:
- return (mode & acc);
- }
- int handle_set_cloexec (PAL_HANDLE handle, bool enable)
- {
- return -PAL_ERROR_NOTIMPLEMENTED;
- }
- /* _DkStreamUnmap for internal use. Unmap stream at certain memory address.
- The memory is unmapped as a whole.*/
- int _DkStreamUnmap (void * addr, uint64_t size)
- {
- /* Just let the kernel tell us if the mapping isn't good. */
- free_pages(addr, size);
- return 0;
- }
- #define addr_size(addr) \
- ({ int _size = 0; \
- switch (((struct sockaddr *) addr)->sa_family) { \
- case AF_INET: \
- _size = sizeof(struct sockaddr_in); break; \
- case AF_INET6: \
- _size = sizeof(struct sockaddr_in6); break; \
- default: break; \
- } _size; \
- })
- int handle_serialize (PAL_HANDLE handle, void ** data)
- {
- int hdlsz = handle_size(handle);
- const void * d1, * d2;
- int dsz1 = 0, dsz2 = 0;
- // ~ Check cargo PAL_HANDLE - is allowed to be sent (White List checking
- // of cargo type)
- // ~ Also, Initialize common parameter formessage passing
- // Channel between parent and child
- switch(PAL_GET_TYPE(handle)) {
- case pal_type_file:
- d1 = handle->file.realpath;
- dsz1 = strlen(handle->file.realpath) + 1;
- break;
- case pal_type_pipe:
- case pal_type_pipesrv:
- case pal_type_pipecli:
- case pal_type_pipeprv:
- break;
- case pal_type_dev:
- if (handle->dev.realpath) {
- d1 = handle->dev.realpath;
- dsz1 = strlen(handle->dev.realpath) + 1;
- }
- break;
- case pal_type_dir:
- if (handle->dir.realpath) {
- d1 = handle->dir.realpath;
- dsz1 = strlen(handle->dir.realpath) + 1;
- }
- break;
- case pal_type_tcp:
- case pal_type_tcpsrv:
- case pal_type_udp:
- case pal_type_udpsrv:
- if (handle->sock.bind) {
- d1 = (const void *) handle->sock.bind;
- dsz1 = addr_size(handle->sock.bind);
- }
- if (handle->sock.conn) {
- d2 = (const void *) handle->sock.conn;
- dsz2 = addr_size(handle->sock.conn);
- }
- break;
- case pal_type_gipc:
- case pal_type_process:
- break;
- default:
- return -PAL_ERROR_INVAL;
- }
- void * buffer = malloc(hdlsz + dsz1 + dsz2);
- if (!buffer)
- return -PAL_ERROR_NOMEM;
- memcpy(buffer, handle, hdlsz);
- if (dsz1)
- memcpy(buffer + hdlsz, d1, dsz1);
- if (dsz2)
- memcpy(buffer + hdlsz + dsz1, d2, dsz2);
- *data = buffer;
- return hdlsz + dsz1 + dsz2;
- }
- #ifndef SEEK_SET
- # define SEEK_SET 0
- #endif
- int handle_deserialize (PAL_HANDLE * handle, const void * data, int size)
- {
- PAL_HANDLE hdl_data = (void *) data, hdl = NULL;
- int hdlsz = handle_size(hdl_data), ret = -PAL_ERROR_NOMEM;
- data += hdlsz;
- size -= hdlsz;
- // recreate PAL_HANDLE based on type
- switch(PAL_GET_TYPE(hdl_data)) {
- case pal_type_file: {
- int l = strlen((const char *) data) + 1;
- hdl = malloc(hdlsz + l);
- if (!hdl)
- break;
- memcpy(hdl, hdl_data, hdlsz);
- memcpy((void *) hdl + hdlsz, data, l);
- hdl->file.realpath = (PAL_STR) hdl + hdlsz;
- hdl->file.stubs = (PAL_PTR) NULL;
- break;
- }
- case pal_type_pipe:
- case pal_type_pipesrv:
- case pal_type_pipecli:
- case pal_type_pipeprv:
- hdl = remalloc(hdl_data, hdlsz);
- break;
- case pal_type_dev: {
- int l = hdl_data->dev.realpath ? strlen((const char *) data) + 1 : 0;
- hdl = malloc(hdlsz + l);
- if (!hdl)
- break;
- memcpy(hdl, hdl_data, hdlsz);
- if (l) {
- memcpy((void *) hdl + hdlsz, data, l);
- hdl->dev.realpath = (void *) hdl + hdlsz;
- }
- break;
- }
- case pal_type_dir: {
- int l = hdl_data->dir.realpath ? strlen((const char *) data) + 1 : 0;
- hdl = malloc(hdlsz + l);
- if (!hdl)
- break;
- memcpy(hdl, hdl_data, hdlsz);
- if (l) {
- memcpy((void *) hdl + hdlsz, data, l);
- hdl->dir.realpath = (void *) hdl + hdlsz;
- }
- break;
- }
- case pal_type_tcp:
- case pal_type_tcpsrv:
- case pal_type_udp:
- case pal_type_udpsrv: {
- int s1 = 0, s2 = 0;
- if (hdl_data->sock.bind)
- s1 = addr_size(data);
- if (hdl_data->sock.conn)
- s2 = addr_size(data + s1);
- hdl = malloc(hdlsz + s1 + s2);
- if (!hdl)
- break;
- memcpy(hdl, hdl_data, hdlsz);
- if (s1) {
- memcpy((void *) hdl + hdlsz, data, s1);
- hdl->sock.bind = (PAL_PTR) hdl + hdlsz;
- }
- if (s2) {
- memcpy((void *) hdl + hdlsz + s1, data + s1, s2);
- hdl->sock.conn = (PAL_PTR) hdl + hdlsz + s2;
- }
- break;
- }
- case pal_type_gipc:
- case pal_type_process:
- hdl = remalloc(hdl_data, hdlsz);
- break;
- default :
- return -PAL_ERROR_BADHANDLE;
- }
- if (!hdl)
- return ret;
- *handle = hdl;
- return 0;
- }
- // Header for DkSendHandle and DkRecvHandle
- struct hdl_header {
- unsigned short fds:(MAX_FDS);
- unsigned short data_size:(16-(MAX_FDS));
- };
- /* _DkSendHandle for internal use. Send a Pal Handle over the given
- process handle. Return 1 if success else return negative error code */
- int _DkSendHandle (PAL_HANDLE hdl, PAL_HANDLE cargo)
- {
- struct hdl_header hdl_hdr;
- void * hdl_data;
- int ret = handle_serialize(cargo, &hdl_data);
- if (ret < 0)
- return ret;
- hdl_hdr.data_size = ret;
- unsigned int fds[MAX_FDS];
- unsigned int nfds = 0;
- for (int i = 0 ; i < MAX_FDS ; i++)
- if (HANDLE_HDR(cargo)->flags & (RFD(i)|WFD(1))) {
- hdl_hdr.fds |= 1U << i;
- fds[nfds++] = cargo->generic.fds[i];
- }
- // ~ Initialize common parameter formessage passing
- // Channel between parent and child
- int ch = hdl->process.cargo;
- ret = ocall_sock_send(ch, &hdl_hdr, sizeof(struct hdl_header), NULL, 0);
- // Unlock is error
- if (ret < 0) {
- free(hdl_data);
- return ret;
- }
- // Send message
- ret = ocall_sock_send_fd(ch, hdl_data, hdl_hdr.data_size,
- fds, nfds);
- free(hdl_data);
- return (ret < 0) ? -PAL_ERROR_DENIED : 0;
- }
- /* _DkRecvHandle for internal use. Receive and return a PAL_HANDLE over the
- given PAL_HANDLE else return negative value. */
- int _DkReceiveHandle(PAL_HANDLE hdl, PAL_HANDLE * cargo)
- {
- struct hdl_header hdl_hdr;
- // ~ Check connection PAL_HANDLE - is of process type for sending handle
- // else fail
- if (!IS_HANDLE_TYPE(hdl, process))
- return -PAL_ERROR_BADHANDLE;
- // ~ Initialize common parameter for message passing
- // Channel between parent and child
- int ch = hdl->process.cargo;
- int ret = ocall_sock_recv(ch, &hdl_hdr, sizeof(struct hdl_header), NULL,
- NULL);
- if (ret < 0 || ret < sizeof(struct hdl_header)) {
- if (!ret)
- return -PAL_ERROR_TRYAGAIN;
- if (ret != -PAL_ERROR_INTERRUPTED)
- return ret;
- }
- // initialize variables to get body
- void * buffer = __alloca(hdl_hdr.data_size);
- unsigned int nfds = 0;
- for (int i = 0 ; i < MAX_FDS ; i++)
- if (hdl_hdr.fds & (1U << i))
- nfds++;
- unsigned int * fds = __alloca(sizeof(unsigned int) * nfds);
- ret = ocall_sock_recv_fd(ch, buffer, hdl_hdr.data_size,
- fds, &nfds);
- if (ret < 0)
- return ret;
- PAL_HANDLE handle = NULL;
- ret = handle_deserialize(&handle, buffer, hdl_hdr.data_size);
- if (ret < 0)
- return ret;
- int n = 0;
- for (int i = 0 ; i < MAX_FDS ; i++)
- if (hdl_hdr.fds & (1U << i)) {
- if (n < nfds) {
- handle->generic.fds[i] = fds[n++];
- } else {
- HANDLE_HDR(handle)->flags &= ~(RFD(i)|WFD(i));
- }
- }
- *cargo = handle;
- return 0;
- }
|