|  | /* | 
|  | * Copyright (C) 2000 Jeff Dike (jdike@karaya.com) | 
|  | * Licensed under the GPL | 
|  | */ | 
|  |  | 
|  | #include <unistd.h> | 
|  | #include <stdio.h> | 
|  | #include <fcntl.h> | 
|  | #include <dirent.h> | 
|  | #include <errno.h> | 
|  | #include <utime.h> | 
|  | #include <string.h> | 
|  | #include <sys/stat.h> | 
|  | #include <sys/time.h> | 
|  | #include <sys/vfs.h> | 
|  | #include "hostfs.h" | 
|  | #include "kern_util.h" | 
|  | #include "user.h" | 
|  |  | 
|  | int stat_file(const char *path, unsigned long long *inode_out, int *mode_out, | 
|  | int *nlink_out, int *uid_out, int *gid_out, | 
|  | unsigned long long *size_out, struct timespec *atime_out, | 
|  | struct timespec *mtime_out, struct timespec *ctime_out, | 
|  | int *blksize_out, unsigned long long *blocks_out) | 
|  | { | 
|  | struct stat64 buf; | 
|  |  | 
|  | if(lstat64(path, &buf) < 0) | 
|  | return(-errno); | 
|  |  | 
|  | if(inode_out != NULL) *inode_out = buf.st_ino; | 
|  | if(mode_out != NULL) *mode_out = buf.st_mode; | 
|  | if(nlink_out != NULL) *nlink_out = buf.st_nlink; | 
|  | if(uid_out != NULL) *uid_out = buf.st_uid; | 
|  | if(gid_out != NULL) *gid_out = buf.st_gid; | 
|  | if(size_out != NULL) *size_out = buf.st_size; | 
|  | if(atime_out != NULL) { | 
|  | atime_out->tv_sec = buf.st_atime; | 
|  | atime_out->tv_nsec = 0; | 
|  | } | 
|  | if(mtime_out != NULL) { | 
|  | mtime_out->tv_sec = buf.st_mtime; | 
|  | mtime_out->tv_nsec = 0; | 
|  | } | 
|  | if(ctime_out != NULL) { | 
|  | ctime_out->tv_sec = buf.st_ctime; | 
|  | ctime_out->tv_nsec = 0; | 
|  | } | 
|  | if(blksize_out != NULL) *blksize_out = buf.st_blksize; | 
|  | if(blocks_out != NULL) *blocks_out = buf.st_blocks; | 
|  | return(0); | 
|  | } | 
|  |  | 
|  | int file_type(const char *path, int *maj, int *min) | 
|  | { | 
|  | struct stat64 buf; | 
|  |  | 
|  | if(lstat64(path, &buf) < 0) | 
|  | return(-errno); | 
|  | /*We cannot pass rdev as is because glibc and the kernel disagree | 
|  | *about its definition.*/ | 
|  | if(maj != NULL) | 
|  | *maj = major(buf.st_rdev); | 
|  | if(min != NULL) | 
|  | *min = minor(buf.st_rdev); | 
|  |  | 
|  | if(S_ISDIR(buf.st_mode)) return(OS_TYPE_DIR); | 
|  | else if(S_ISLNK(buf.st_mode)) return(OS_TYPE_SYMLINK); | 
|  | else if(S_ISCHR(buf.st_mode)) return(OS_TYPE_CHARDEV); | 
|  | else if(S_ISBLK(buf.st_mode)) return(OS_TYPE_BLOCKDEV); | 
|  | else if(S_ISFIFO(buf.st_mode))return(OS_TYPE_FIFO); | 
|  | else if(S_ISSOCK(buf.st_mode))return(OS_TYPE_SOCK); | 
|  | else return(OS_TYPE_FILE); | 
|  | } | 
|  |  | 
|  | int access_file(char *path, int r, int w, int x) | 
|  | { | 
|  | int mode = 0; | 
|  |  | 
|  | if(r) mode = R_OK; | 
|  | if(w) mode |= W_OK; | 
|  | if(x) mode |= X_OK; | 
|  | if(access(path, mode) != 0) return(-errno); | 
|  | else return(0); | 
|  | } | 
|  |  | 
|  | int open_file(char *path, int r, int w, int append) | 
|  | { | 
|  | int mode = 0, fd; | 
|  |  | 
|  | if(r && !w) | 
|  | mode = O_RDONLY; | 
|  | else if(!r && w) | 
|  | mode = O_WRONLY; | 
|  | else if(r && w) | 
|  | mode = O_RDWR; | 
|  | else panic("Impossible mode in open_file"); | 
|  |  | 
|  | if(append) | 
|  | mode |= O_APPEND; | 
|  | fd = open64(path, mode); | 
|  | if(fd < 0) return(-errno); | 
|  | else return(fd); | 
|  | } | 
|  |  | 
|  | void *open_dir(char *path, int *err_out) | 
|  | { | 
|  | DIR *dir; | 
|  |  | 
|  | dir = opendir(path); | 
|  | *err_out = errno; | 
|  | if(dir == NULL) return(NULL); | 
|  | return(dir); | 
|  | } | 
|  |  | 
|  | char *read_dir(void *stream, unsigned long long *pos, | 
|  | unsigned long long *ino_out, int *len_out) | 
|  | { | 
|  | DIR *dir = stream; | 
|  | struct dirent *ent; | 
|  |  | 
|  | seekdir(dir, *pos); | 
|  | ent = readdir(dir); | 
|  | if(ent == NULL) return(NULL); | 
|  | *len_out = strlen(ent->d_name); | 
|  | *ino_out = ent->d_ino; | 
|  | *pos = telldir(dir); | 
|  | return(ent->d_name); | 
|  | } | 
|  |  | 
|  | int read_file(int fd, unsigned long long *offset, char *buf, int len) | 
|  | { | 
|  | int n; | 
|  |  | 
|  | n = pread64(fd, buf, len, *offset); | 
|  | if(n < 0) return(-errno); | 
|  | *offset += n; | 
|  | return(n); | 
|  | } | 
|  |  | 
|  | int write_file(int fd, unsigned long long *offset, const char *buf, int len) | 
|  | { | 
|  | int n; | 
|  |  | 
|  | n = pwrite64(fd, buf, len, *offset); | 
|  | if(n < 0) return(-errno); | 
|  | *offset += n; | 
|  | return(n); | 
|  | } | 
|  |  | 
|  | int lseek_file(int fd, long long offset, int whence) | 
|  | { | 
|  | int ret; | 
|  |  | 
|  | ret = lseek64(fd, offset, whence); | 
|  | if(ret < 0) | 
|  | return(-errno); | 
|  | return(0); | 
|  | } | 
|  |  | 
|  | int fsync_file(int fd, int datasync) | 
|  | { | 
|  | int ret; | 
|  | if (datasync) | 
|  | ret = fdatasync(fd); | 
|  | else | 
|  | ret = fsync(fd); | 
|  |  | 
|  | if (ret < 0) | 
|  | return -errno; | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | void close_file(void *stream) | 
|  | { | 
|  | close(*((int *) stream)); | 
|  | } | 
|  |  | 
|  | void close_dir(void *stream) | 
|  | { | 
|  | closedir(stream); | 
|  | } | 
|  |  | 
|  | int file_create(char *name, int ur, int uw, int ux, int gr, | 
|  | int gw, int gx, int or, int ow, int ox) | 
|  | { | 
|  | int mode, fd; | 
|  |  | 
|  | mode = 0; | 
|  | mode |= ur ? S_IRUSR : 0; | 
|  | mode |= uw ? S_IWUSR : 0; | 
|  | mode |= ux ? S_IXUSR : 0; | 
|  | mode |= gr ? S_IRGRP : 0; | 
|  | mode |= gw ? S_IWGRP : 0; | 
|  | mode |= gx ? S_IXGRP : 0; | 
|  | mode |= or ? S_IROTH : 0; | 
|  | mode |= ow ? S_IWOTH : 0; | 
|  | mode |= ox ? S_IXOTH : 0; | 
|  | fd = open64(name, O_CREAT | O_RDWR, mode); | 
|  | if(fd < 0) | 
|  | return(-errno); | 
|  | return(fd); | 
|  | } | 
|  |  | 
|  | int set_attr(const char *file, struct hostfs_iattr *attrs) | 
|  | { | 
|  | struct utimbuf buf; | 
|  | int err, ma; | 
|  |  | 
|  | if(attrs->ia_valid & HOSTFS_ATTR_MODE){ | 
|  | if(chmod(file, attrs->ia_mode) != 0) return(-errno); | 
|  | } | 
|  | if(attrs->ia_valid & HOSTFS_ATTR_UID){ | 
|  | if(chown(file, attrs->ia_uid, -1)) return(-errno); | 
|  | } | 
|  | if(attrs->ia_valid & HOSTFS_ATTR_GID){ | 
|  | if(chown(file, -1, attrs->ia_gid)) return(-errno); | 
|  | } | 
|  | if(attrs->ia_valid & HOSTFS_ATTR_SIZE){ | 
|  | if(truncate(file, attrs->ia_size)) return(-errno); | 
|  | } | 
|  | ma = HOSTFS_ATTR_ATIME_SET | HOSTFS_ATTR_MTIME_SET; | 
|  | if((attrs->ia_valid & ma) == ma){ | 
|  | buf.actime = attrs->ia_atime.tv_sec; | 
|  | buf.modtime = attrs->ia_mtime.tv_sec; | 
|  | if(utime(file, &buf) != 0) return(-errno); | 
|  | } | 
|  | else { | 
|  | struct timespec ts; | 
|  |  | 
|  | if(attrs->ia_valid & HOSTFS_ATTR_ATIME_SET){ | 
|  | err = stat_file(file, NULL, NULL, NULL, NULL, NULL, | 
|  | NULL, NULL, &ts, NULL, NULL, NULL); | 
|  | if(err != 0) | 
|  | return(err); | 
|  | buf.actime = attrs->ia_atime.tv_sec; | 
|  | buf.modtime = ts.tv_sec; | 
|  | if(utime(file, &buf) != 0) | 
|  | return(-errno); | 
|  | } | 
|  | if(attrs->ia_valid & HOSTFS_ATTR_MTIME_SET){ | 
|  | err = stat_file(file, NULL, NULL, NULL, NULL, NULL, | 
|  | NULL, &ts, NULL, NULL, NULL, NULL); | 
|  | if(err != 0) | 
|  | return(err); | 
|  | buf.actime = ts.tv_sec; | 
|  | buf.modtime = attrs->ia_mtime.tv_sec; | 
|  | if(utime(file, &buf) != 0) | 
|  | return(-errno); | 
|  | } | 
|  | } | 
|  | if(attrs->ia_valid & HOSTFS_ATTR_CTIME) ; | 
|  | if(attrs->ia_valid & (HOSTFS_ATTR_ATIME | HOSTFS_ATTR_MTIME)){ | 
|  | err = stat_file(file, NULL, NULL, NULL, NULL, NULL, NULL, | 
|  | &attrs->ia_atime, &attrs->ia_mtime, NULL, | 
|  | NULL, NULL); | 
|  | if(err != 0) return(err); | 
|  | } | 
|  | return(0); | 
|  | } | 
|  |  | 
|  | int make_symlink(const char *from, const char *to) | 
|  | { | 
|  | int err; | 
|  |  | 
|  | err = symlink(to, from); | 
|  | if(err) return(-errno); | 
|  | return(0); | 
|  | } | 
|  |  | 
|  | int unlink_file(const char *file) | 
|  | { | 
|  | int err; | 
|  |  | 
|  | err = unlink(file); | 
|  | if(err) return(-errno); | 
|  | return(0); | 
|  | } | 
|  |  | 
|  | int do_mkdir(const char *file, int mode) | 
|  | { | 
|  | int err; | 
|  |  | 
|  | err = mkdir(file, mode); | 
|  | if(err) return(-errno); | 
|  | return(0); | 
|  | } | 
|  |  | 
|  | int do_rmdir(const char *file) | 
|  | { | 
|  | int err; | 
|  |  | 
|  | err = rmdir(file); | 
|  | if(err) return(-errno); | 
|  | return(0); | 
|  | } | 
|  |  | 
|  | int do_mknod(const char *file, int mode, int dev) | 
|  | { | 
|  | int err; | 
|  |  | 
|  | err = mknod(file, mode, dev); | 
|  | if(err) return(-errno); | 
|  | return(0); | 
|  | } | 
|  |  | 
|  | int link_file(const char *to, const char *from) | 
|  | { | 
|  | int err; | 
|  |  | 
|  | err = link(to, from); | 
|  | if(err) return(-errno); | 
|  | return(0); | 
|  | } | 
|  |  | 
|  | int do_readlink(char *file, char *buf, int size) | 
|  | { | 
|  | int n; | 
|  |  | 
|  | n = readlink(file, buf, size); | 
|  | if(n < 0) | 
|  | return(-errno); | 
|  | if(n < size) | 
|  | buf[n] = '\0'; | 
|  | return(n); | 
|  | } | 
|  |  | 
|  | int rename_file(char *from, char *to) | 
|  | { | 
|  | int err; | 
|  |  | 
|  | err = rename(from, to); | 
|  | if(err < 0) return(-errno); | 
|  | return(0); | 
|  | } | 
|  |  | 
|  | int do_statfs(char *root, long *bsize_out, long long *blocks_out, | 
|  | long long *bfree_out, long long *bavail_out, | 
|  | long long *files_out, long long *ffree_out, | 
|  | void *fsid_out, int fsid_size, long *namelen_out, | 
|  | long *spare_out) | 
|  | { | 
|  | struct statfs64 buf; | 
|  | int err; | 
|  |  | 
|  | err = statfs64(root, &buf); | 
|  | if(err < 0) return(-errno); | 
|  | *bsize_out = buf.f_bsize; | 
|  | *blocks_out = buf.f_blocks; | 
|  | *bfree_out = buf.f_bfree; | 
|  | *bavail_out = buf.f_bavail; | 
|  | *files_out = buf.f_files; | 
|  | *ffree_out = buf.f_ffree; | 
|  | memcpy(fsid_out, &buf.f_fsid, | 
|  | sizeof(buf.f_fsid) > fsid_size ? fsid_size : | 
|  | sizeof(buf.f_fsid)); | 
|  | *namelen_out = buf.f_namelen; | 
|  | spare_out[0] = buf.f_spare[0]; | 
|  | spare_out[1] = buf.f_spare[1]; | 
|  | spare_out[2] = buf.f_spare[2]; | 
|  | spare_out[3] = buf.f_spare[3]; | 
|  | spare_out[4] = buf.f_spare[4]; | 
|  | return(0); | 
|  | } | 
|  |  | 
|  | /* | 
|  | * Overrides for Emacs so that we follow Linus's tabbing style. | 
|  | * Emacs will notice this stuff at the end of the file and automatically | 
|  | * adjust the settings for this buffer only.  This must remain at the end | 
|  | * of the file. | 
|  | * --------------------------------------------------------------------------- | 
|  | * Local variables: | 
|  | * c-file-style: "linux" | 
|  | * End: | 
|  | */ |