| /* |
| * Copyright (c) 2015-2016 Dmitry V. Levin <ldv@altlinux.org> |
| * Copyright (c) 2015-2018 The strace developers. |
| * All rights reserved. |
| * |
| * Redistribution and use in source and binary forms, with or without |
| * modification, are permitted provided that the following conditions |
| * are met: |
| * 1. Redistributions of source code must retain the above copyright |
| * notice, this list of conditions and the following disclaimer. |
| * 2. Redistributions in binary form must reproduce the above copyright |
| * notice, this list of conditions and the following disclaimer in the |
| * documentation and/or other materials provided with the distribution. |
| * 3. The name of the author may not be used to endorse or promote products |
| * derived from this software without specific prior written permission. |
| * |
| * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
| * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
| * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
| * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
| * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
| * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
| * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
| * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
| * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| */ |
| |
| #include <stdio.h> |
| #include <stdint.h> |
| #include <stdlib.h> |
| #include <string.h> |
| #include <unistd.h> |
| #include "flock.h" |
| |
| #define FILE_LEN 4096 |
| |
| #define TEST_FLOCK_EINVAL(cmd) test_flock_einval(cmd, #cmd) |
| #define TEST_FLOCK64_EINVAL(cmd) test_flock64_einval(cmd, #cmd) |
| |
| #ifdef HAVE_TYPEOF |
| # define TYPEOF_FLOCK_OFF_T typeof(((struct_kernel_flock *) NULL)->l_len) |
| #else |
| # define TYPEOF_FLOCK_OFF_T off_t |
| #endif |
| |
| static const char *errstr; |
| |
| static long |
| invoke_test_syscall(const unsigned int fd, const unsigned int cmd, void *const p) |
| { |
| const kernel_ulong_t kfd = F8ILL_KULONG_MASK | fd; |
| const kernel_ulong_t op = F8ILL_KULONG_MASK | cmd; |
| |
| long rc = syscall(TEST_SYSCALL_NR, kfd, op, (uintptr_t) p); |
| errstr = sprintrc(rc); |
| return rc; |
| } |
| |
| static void |
| test_flock_einval(const int cmd, const char *name) |
| { |
| TAIL_ALLOC_OBJECT_CONST_PTR(struct_kernel_flock, fl); |
| memset(fl, 0, sizeof(*fl)); |
| fl->l_type = F_RDLCK; |
| fl->l_start = (TYPEOF_FLOCK_OFF_T) 0xdefaced1facefeedULL; |
| fl->l_len = (TYPEOF_FLOCK_OFF_T) 0xdefaced2cafef00dULL; |
| |
| invoke_test_syscall(0, cmd, fl); |
| printf("%s(0, %s, {l_type=F_RDLCK, l_whence=SEEK_SET" |
| ", l_start=%jd, l_len=%jd}) = %s\n", TEST_SYSCALL_STR, name, |
| (intmax_t) fl->l_start, (intmax_t) fl->l_len, errstr); |
| |
| void *const bad_addr = (void *) fl + 1; |
| invoke_test_syscall(0, cmd, bad_addr); |
| printf("%s(0, %s, %p) = %s\n", |
| TEST_SYSCALL_STR, name, bad_addr, errstr); |
| } |
| |
| /* |
| * This function is not declared static to avoid potential |
| * "defined but not used" warning when included by fcntl.c |
| */ |
| void |
| test_flock64_einval(const int cmd, const char *name) |
| { |
| TAIL_ALLOC_OBJECT_CONST_PTR(struct_kernel_flock64, fl); |
| memset(fl, 0, sizeof(*fl)); |
| fl->l_type = F_RDLCK; |
| fl->l_start = (TYPEOF_FLOCK_OFF_T) 0xdefaced1facefeedULL; |
| fl->l_len = (TYPEOF_FLOCK_OFF_T) 0xdefaced2cafef00dULL; |
| |
| invoke_test_syscall(0, cmd, fl); |
| printf("%s(0, %s, {l_type=F_RDLCK, l_whence=SEEK_SET" |
| ", l_start=%jd, l_len=%jd}) = %s\n", TEST_SYSCALL_STR, name, |
| (intmax_t) fl->l_start, (intmax_t) fl->l_len, errstr); |
| |
| void *const bad_addr = (void *) fl + 1; |
| invoke_test_syscall(0, cmd, bad_addr); |
| printf("%s(0, %s, %p) = %s\n", |
| TEST_SYSCALL_STR, name, bad_addr, errstr); |
| } |
| |
| static void |
| test_flock(void) |
| { |
| TEST_FLOCK_EINVAL(F_SETLK); |
| TEST_FLOCK_EINVAL(F_SETLKW); |
| |
| TAIL_ALLOC_OBJECT_CONST_PTR(struct_kernel_flock, fl); |
| memset(fl, 0, sizeof(*fl)); |
| fl->l_type = F_RDLCK; |
| fl->l_len = FILE_LEN; |
| |
| long rc = invoke_test_syscall(0, F_SETLK, fl); |
| printf("%s(0, F_SETLK, {l_type=F_RDLCK, l_whence=SEEK_SET" |
| ", l_start=0, l_len=%d}) = %s\n", |
| TEST_SYSCALL_STR, FILE_LEN, errstr); |
| if (rc) |
| return; |
| |
| invoke_test_syscall(0, F_GETLK, fl); |
| printf("%s(0, F_GETLK, {l_type=F_UNLCK, l_whence=SEEK_SET" |
| ", l_start=0, l_len=%d, l_pid=0}) = 0\n", |
| TEST_SYSCALL_STR, FILE_LEN); |
| |
| invoke_test_syscall(0, F_SETLKW, fl); |
| printf("%s(0, F_SETLKW, {l_type=F_UNLCK, l_whence=SEEK_SET" |
| ", l_start=0, l_len=%d}) = 0\n", |
| TEST_SYSCALL_STR, FILE_LEN); |
| } |
| |
| static void |
| test_flock64_ofd(void) |
| { |
| #if defined F_OFD_GETLK && defined F_OFD_SETLK && defined F_OFD_SETLKW |
| TEST_FLOCK64_EINVAL(F_OFD_SETLK); |
| TEST_FLOCK64_EINVAL(F_OFD_SETLKW); |
| |
| TAIL_ALLOC_OBJECT_CONST_PTR(struct_kernel_flock64, fl); |
| memset(fl, 0, sizeof(*fl)); |
| fl->l_type = F_RDLCK; |
| fl->l_len = FILE_LEN; |
| |
| long rc = invoke_test_syscall(0, F_OFD_SETLK, fl); |
| printf("%s(0, F_OFD_SETLK, {l_type=F_RDLCK, l_whence=SEEK_SET" |
| ", l_start=0, l_len=%d}) = %s\n", |
| TEST_SYSCALL_STR, FILE_LEN, errstr); |
| if (rc) |
| return; |
| |
| invoke_test_syscall(0, F_OFD_GETLK, fl); |
| printf("%s(0, F_OFD_GETLK, {l_type=F_UNLCK, l_whence=SEEK_SET" |
| ", l_start=0, l_len=%d, l_pid=0}) = 0\n", |
| TEST_SYSCALL_STR, FILE_LEN); |
| |
| invoke_test_syscall(0, F_OFD_SETLKW, fl); |
| printf("%s(0, F_OFD_SETLKW, {l_type=F_UNLCK, l_whence=SEEK_SET" |
| ", l_start=0, l_len=%d}) = 0\n", |
| TEST_SYSCALL_STR, FILE_LEN); |
| #endif /* F_OFD_GETLK && F_OFD_SETLK && F_OFD_SETLKW */ |
| } |
| |
| static void test_flock64_lk64(void); |
| |
| static void |
| test_flock64(void) |
| { |
| test_flock64_ofd(); |
| test_flock64_lk64(); |
| } |
| |
| /* |
| * F_[GS]ETOWN_EX had conflicting values with F_[SG]ETLK64 |
| * in kernel revisions v2.6.32-rc1~96..v2.6.32-rc7~23. |
| */ |
| #undef TEST_F_OWNER_EX |
| #if defined F_GETOWN_EX && defined F_SETOWN_EX \ |
| && (F_GETOWN_EX != F_SETLK64) && (F_SETOWN_EX != F_GETLK64) |
| # define TEST_F_OWNER_EX |
| #endif |
| |
| #ifdef TEST_F_OWNER_EX |
| # include "f_owner_ex.h" |
| |
| static long |
| test_f_owner_ex_type_pid(const int cmd, const char *const cmd_name, |
| const int type, const char *const type_name, |
| pid_t pid) |
| { |
| TAIL_ALLOC_OBJECT_CONST_PTR(struct_kernel_f_owner_ex, fo); |
| |
| fo->type = type; |
| fo->pid = pid; |
| long rc = invoke_test_syscall(0, cmd, fo); |
| printf("%s(0, %s, {type=%s, pid=%d}) = %s\n", |
| TEST_SYSCALL_STR, cmd_name, type_name, fo->pid, errstr); |
| |
| void *bad_addr = (void *) fo + 1; |
| invoke_test_syscall(0, cmd, bad_addr); |
| printf("%s(0, %s, %p) = %s\n", |
| TEST_SYSCALL_STR, cmd_name, bad_addr, errstr); |
| |
| return rc; |
| } |
| |
| static void |
| test_f_owner_ex_umove_or_printaddr(const int type, const char *const type_name, |
| pid_t pid) |
| { |
| long rc = test_f_owner_ex_type_pid(ARG_STR(F_SETOWN_EX), |
| type, type_name, pid); |
| if (!rc) |
| test_f_owner_ex_type_pid(ARG_STR(F_GETOWN_EX), |
| type, type_name, pid); |
| } |
| |
| static void |
| test_f_owner_ex(void) |
| { |
| static const struct { |
| int type; |
| const char *type_name; |
| pid_t pid[2]; |
| } a[] = { |
| { ARG_STR(F_OWNER_TID), { 1234567890, 20 } }, |
| { ARG_STR(F_OWNER_PID), { 1298126790, 30 } }, |
| { ARG_STR(F_OWNER_PGRP), { 1294567890, 40 } } |
| }; |
| |
| for (unsigned int i = 0; i < ARRAY_SIZE(a); i++) { |
| for (unsigned int j = 0; j < ARRAY_SIZE(a[0].pid); j++) { |
| test_f_owner_ex_umove_or_printaddr(a[i].type, |
| a[i].type_name, |
| a[i].pid[j]); |
| } |
| } |
| } |
| #endif /* TEST_F_OWNER_EX */ |
| |
| static void |
| create_sample(void) |
| { |
| char fname[] = TEST_SYSCALL_STR "_XXXXXX"; |
| |
| (void) close(0); |
| if (mkstemp(fname)) |
| perror_msg_and_fail("mkstemp: %s", fname); |
| if (unlink(fname)) |
| perror_msg_and_fail("unlink: %s", fname); |
| if (ftruncate(0, FILE_LEN)) |
| perror_msg_and_fail("ftruncate"); |
| } |
| |
| int |
| main(void) |
| { |
| create_sample(); |
| test_flock(); |
| test_flock64(); |
| #ifdef TEST_F_OWNER_EX |
| test_f_owner_ex(); |
| #endif |
| |
| puts("+++ exited with 0 +++"); |
| return 0; |
| } |