|  | /* | 
|  | * This application is Copyright 2012 Red Hat, Inc. | 
|  | *	Doug Ledford <dledford@redhat.com> | 
|  | * | 
|  | * mq_perf_tests is free software: you can redistribute it and/or modify | 
|  | * it under the terms of the GNU General Public License as published by | 
|  | * the Free Software Foundation, version 3. | 
|  | * | 
|  | * mq_perf_tests 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 General Public License for more details. | 
|  | * | 
|  | * For the full text of the license, see <http://www.gnu.org/licenses/>. | 
|  | * | 
|  | * mq_perf_tests.c | 
|  | *   Tests various types of message queue workloads, concentrating on those | 
|  | *   situations that invole large message sizes, large message queue depths, | 
|  | *   or both, and reports back useful metrics about kernel message queue | 
|  | *   performance. | 
|  | * | 
|  | */ | 
|  | #define _GNU_SOURCE | 
|  | #include <stdio.h> | 
|  | #include <stdlib.h> | 
|  | #include <unistd.h> | 
|  | #include <fcntl.h> | 
|  | #include <string.h> | 
|  | #include <limits.h> | 
|  | #include <errno.h> | 
|  | #include <signal.h> | 
|  | #include <pthread.h> | 
|  | #include <sched.h> | 
|  | #include <sys/types.h> | 
|  | #include <sys/time.h> | 
|  | #include <sys/resource.h> | 
|  | #include <sys/stat.h> | 
|  | #include <mqueue.h> | 
|  | #include <popt.h> | 
|  | #include <error.h> | 
|  |  | 
|  | static char *usage = | 
|  | "Usage:\n" | 
|  | "  %s [-c #[,#..] -f] path\n" | 
|  | "\n" | 
|  | "	-c #	Skip most tests and go straight to a high queue depth test\n" | 
|  | "		and then run that test continuously (useful for running at\n" | 
|  | "		the same time as some other workload to see how much the\n" | 
|  | "		cache thrashing caused by adding messages to a very deep\n" | 
|  | "		queue impacts the performance of other programs).  The number\n" | 
|  | "		indicates which CPU core we should bind the process to during\n" | 
|  | "		the run.  If you have more than one physical CPU, then you\n" | 
|  | "		will need one copy per physical CPU package, and you should\n" | 
|  | "		specify the CPU cores to pin ourself to via a comma separated\n" | 
|  | "		list of CPU values.\n" | 
|  | "	-f	Only usable with continuous mode.  Pin ourself to the CPUs\n" | 
|  | "		as requested, then instead of looping doing a high mq\n" | 
|  | "		workload, just busy loop.  This will allow us to lock up a\n" | 
|  | "		single CPU just like we normally would, but without actually\n" | 
|  | "		thrashing the CPU cache.  This is to make it easier to get\n" | 
|  | "		comparable numbers from some other workload running on the\n" | 
|  | "		other CPUs.  One set of numbers with # CPUs locked up running\n" | 
|  | "		an mq workload, and another set of numbers with those same\n" | 
|  | "		CPUs locked away from the test workload, but not doing\n" | 
|  | "		anything to trash the cache like the mq workload might.\n" | 
|  | "	path	Path name of the message queue to create\n" | 
|  | "\n" | 
|  | "	Note: this program must be run as root in order to enable all tests\n" | 
|  | "\n"; | 
|  |  | 
|  | char *MAX_MSGS = "/proc/sys/fs/mqueue/msg_max"; | 
|  | char *MAX_MSGSIZE = "/proc/sys/fs/mqueue/msgsize_max"; | 
|  |  | 
|  | #define min(a, b) ((a) < (b) ? (a) : (b)) | 
|  | #define MAX_CPUS 64 | 
|  | char *cpu_option_string; | 
|  | int cpus_to_pin[MAX_CPUS]; | 
|  | int num_cpus_to_pin; | 
|  | pthread_t cpu_threads[MAX_CPUS]; | 
|  | pthread_t main_thread; | 
|  | cpu_set_t *cpu_set; | 
|  | int cpu_set_size; | 
|  | int cpus_online; | 
|  |  | 
|  | #define MSG_SIZE 16 | 
|  | #define TEST1_LOOPS 10000000 | 
|  | #define TEST2_LOOPS 100000 | 
|  | int continuous_mode; | 
|  | int continuous_mode_fake; | 
|  |  | 
|  | struct rlimit saved_limits, cur_limits; | 
|  | int saved_max_msgs, saved_max_msgsize; | 
|  | int cur_max_msgs, cur_max_msgsize; | 
|  | FILE *max_msgs, *max_msgsize; | 
|  | int cur_nice; | 
|  | char *queue_path = "/mq_perf_tests"; | 
|  | mqd_t queue = -1; | 
|  | struct mq_attr result; | 
|  | int mq_prio_max; | 
|  |  | 
|  | const struct poptOption options[] = { | 
|  | { | 
|  | .longName = "continuous", | 
|  | .shortName = 'c', | 
|  | .argInfo = POPT_ARG_STRING, | 
|  | .arg = &cpu_option_string, | 
|  | .val = 'c', | 
|  | .descrip = "Run continuous tests at a high queue depth in " | 
|  | "order to test the effects of cache thrashing on " | 
|  | "other tasks on the system.  This test is intended " | 
|  | "to be run on one core of each physical CPU while " | 
|  | "some other CPU intensive task is run on all the other " | 
|  | "cores of that same physical CPU and the other task " | 
|  | "is timed.  It is assumed that the process of adding " | 
|  | "messages to the message queue in a tight loop will " | 
|  | "impact that other task to some degree.  Once the " | 
|  | "tests are performed in this way, you should then " | 
|  | "re-run the tests using fake mode in order to check " | 
|  | "the difference in time required to perform the CPU " | 
|  | "intensive task", | 
|  | .argDescrip = "cpu[,cpu]", | 
|  | }, | 
|  | { | 
|  | .longName = "fake", | 
|  | .shortName = 'f', | 
|  | .argInfo = POPT_ARG_NONE, | 
|  | .arg = &continuous_mode_fake, | 
|  | .val = 0, | 
|  | .descrip = "Tie up the CPUs that we would normally tie up in" | 
|  | "continuous mode, but don't actually do any mq stuff, " | 
|  | "just keep the CPU busy so it can't be used to process " | 
|  | "system level tasks as this would free up resources on " | 
|  | "the other CPU cores and skew the comparison between " | 
|  | "the no-mqueue work and mqueue work tests", | 
|  | .argDescrip = NULL, | 
|  | }, | 
|  | { | 
|  | .longName = "path", | 
|  | .shortName = 'p', | 
|  | .argInfo = POPT_ARG_STRING | POPT_ARGFLAG_SHOW_DEFAULT, | 
|  | .arg = &queue_path, | 
|  | .val = 'p', | 
|  | .descrip = "The name of the path to use in the mqueue " | 
|  | "filesystem for our tests", | 
|  | .argDescrip = "pathname", | 
|  | }, | 
|  | POPT_AUTOHELP | 
|  | POPT_TABLEEND | 
|  | }; | 
|  |  | 
|  | static inline void __set(FILE *stream, int value, char *err_msg); | 
|  | void shutdown(int exit_val, char *err_cause, int line_no); | 
|  | void sig_action_SIGUSR1(int signum, siginfo_t *info, void *context); | 
|  | void sig_action(int signum, siginfo_t *info, void *context); | 
|  | static inline int get(FILE *stream); | 
|  | static inline void set(FILE *stream, int value); | 
|  | static inline int try_set(FILE *stream, int value); | 
|  | static inline void getr(int type, struct rlimit *rlim); | 
|  | static inline void setr(int type, struct rlimit *rlim); | 
|  | static inline void open_queue(struct mq_attr *attr); | 
|  | void increase_limits(void); | 
|  |  | 
|  | static inline void __set(FILE *stream, int value, char *err_msg) | 
|  | { | 
|  | rewind(stream); | 
|  | if (fprintf(stream, "%d", value) < 0) | 
|  | perror(err_msg); | 
|  | } | 
|  |  | 
|  |  | 
|  | void shutdown(int exit_val, char *err_cause, int line_no) | 
|  | { | 
|  | static int in_shutdown = 0; | 
|  | int errno_at_shutdown = errno; | 
|  | int i; | 
|  |  | 
|  | /* In case we get called by multiple threads or from an sighandler */ | 
|  | if (in_shutdown++) | 
|  | return; | 
|  |  | 
|  | for (i = 0; i < num_cpus_to_pin; i++) | 
|  | if (cpu_threads[i]) { | 
|  | pthread_kill(cpu_threads[i], SIGUSR1); | 
|  | pthread_join(cpu_threads[i], NULL); | 
|  | } | 
|  |  | 
|  | if (queue != -1) | 
|  | if (mq_close(queue)) | 
|  | perror("mq_close() during shutdown"); | 
|  | if (queue_path) | 
|  | /* | 
|  | * Be silent if this fails, if we cleaned up already it's | 
|  | * expected to fail | 
|  | */ | 
|  | mq_unlink(queue_path); | 
|  | if (saved_max_msgs) | 
|  | __set(max_msgs, saved_max_msgs, | 
|  | "failed to restore saved_max_msgs"); | 
|  | if (saved_max_msgsize) | 
|  | __set(max_msgsize, saved_max_msgsize, | 
|  | "failed to restore saved_max_msgsize"); | 
|  | if (exit_val) | 
|  | error(exit_val, errno_at_shutdown, "%s at %d", | 
|  | err_cause, line_no); | 
|  | exit(0); | 
|  | } | 
|  |  | 
|  | void sig_action_SIGUSR1(int signum, siginfo_t *info, void *context) | 
|  | { | 
|  | if (pthread_self() != main_thread) | 
|  | pthread_exit(0); | 
|  | else { | 
|  | fprintf(stderr, "Caught signal %d in SIGUSR1 handler, " | 
|  | "exiting\n", signum); | 
|  | shutdown(0, "", 0); | 
|  | fprintf(stderr, "\n\nReturned from shutdown?!?!\n\n"); | 
|  | exit(0); | 
|  | } | 
|  | } | 
|  |  | 
|  | void sig_action(int signum, siginfo_t *info, void *context) | 
|  | { | 
|  | if (pthread_self() != main_thread) | 
|  | pthread_kill(main_thread, signum); | 
|  | else { | 
|  | fprintf(stderr, "Caught signal %d, exiting\n", signum); | 
|  | shutdown(0, "", 0); | 
|  | fprintf(stderr, "\n\nReturned from shutdown?!?!\n\n"); | 
|  | exit(0); | 
|  | } | 
|  | } | 
|  |  | 
|  | static inline int get(FILE *stream) | 
|  | { | 
|  | int value; | 
|  | rewind(stream); | 
|  | if (fscanf(stream, "%d", &value) != 1) | 
|  | shutdown(4, "Error reading /proc entry", __LINE__); | 
|  | return value; | 
|  | } | 
|  |  | 
|  | static inline void set(FILE *stream, int value) | 
|  | { | 
|  | int new_value; | 
|  |  | 
|  | rewind(stream); | 
|  | if (fprintf(stream, "%d", value) < 0) | 
|  | return shutdown(5, "Failed writing to /proc file", __LINE__); | 
|  | new_value = get(stream); | 
|  | if (new_value != value) | 
|  | return shutdown(5, "We didn't get what we wrote to /proc back", | 
|  | __LINE__); | 
|  | } | 
|  |  | 
|  | static inline int try_set(FILE *stream, int value) | 
|  | { | 
|  | int new_value; | 
|  |  | 
|  | rewind(stream); | 
|  | fprintf(stream, "%d", value); | 
|  | new_value = get(stream); | 
|  | return new_value == value; | 
|  | } | 
|  |  | 
|  | static inline void getr(int type, struct rlimit *rlim) | 
|  | { | 
|  | if (getrlimit(type, rlim)) | 
|  | shutdown(6, "getrlimit()", __LINE__); | 
|  | } | 
|  |  | 
|  | static inline void setr(int type, struct rlimit *rlim) | 
|  | { | 
|  | if (setrlimit(type, rlim)) | 
|  | shutdown(7, "setrlimit()", __LINE__); | 
|  | } | 
|  |  | 
|  | /** | 
|  | * open_queue - open the global queue for testing | 
|  | * @attr - An attr struct specifying the desired queue traits | 
|  | * @result - An attr struct that lists the actual traits the queue has | 
|  | * | 
|  | * This open is not allowed to fail, failure will result in an orderly | 
|  | * shutdown of the program.  The global queue_path is used to set what | 
|  | * queue to open, the queue descriptor is saved in the global queue | 
|  | * variable. | 
|  | */ | 
|  | static inline void open_queue(struct mq_attr *attr) | 
|  | { | 
|  | int flags = O_RDWR | O_EXCL | O_CREAT | O_NONBLOCK; | 
|  | int perms = DEFFILEMODE; | 
|  |  | 
|  | queue = mq_open(queue_path, flags, perms, attr); | 
|  | if (queue == -1) | 
|  | shutdown(1, "mq_open()", __LINE__); | 
|  | if (mq_getattr(queue, &result)) | 
|  | shutdown(1, "mq_getattr()", __LINE__); | 
|  | printf("\n\tQueue %s created:\n", queue_path); | 
|  | printf("\t\tmq_flags:\t\t\t%s\n", result.mq_flags & O_NONBLOCK ? | 
|  | "O_NONBLOCK" : "(null)"); | 
|  | printf("\t\tmq_maxmsg:\t\t\t%lu\n", result.mq_maxmsg); | 
|  | printf("\t\tmq_msgsize:\t\t\t%lu\n", result.mq_msgsize); | 
|  | printf("\t\tmq_curmsgs:\t\t\t%lu\n", result.mq_curmsgs); | 
|  | } | 
|  |  | 
|  | void *fake_cont_thread(void *arg) | 
|  | { | 
|  | int i; | 
|  |  | 
|  | for (i = 0; i < num_cpus_to_pin; i++) | 
|  | if (cpu_threads[i] == pthread_self()) | 
|  | break; | 
|  | printf("\tStarted fake continuous mode thread %d on CPU %d\n", i, | 
|  | cpus_to_pin[i]); | 
|  | while (1) | 
|  | ; | 
|  | } | 
|  |  | 
|  | void *cont_thread(void *arg) | 
|  | { | 
|  | char buff[MSG_SIZE]; | 
|  | int i, priority; | 
|  |  | 
|  | for (i = 0; i < num_cpus_to_pin; i++) | 
|  | if (cpu_threads[i] == pthread_self()) | 
|  | break; | 
|  | printf("\tStarted continuous mode thread %d on CPU %d\n", i, | 
|  | cpus_to_pin[i]); | 
|  | while (1) { | 
|  | while (mq_send(queue, buff, sizeof(buff), 0) == 0) | 
|  | ; | 
|  | mq_receive(queue, buff, sizeof(buff), &priority); | 
|  | } | 
|  | } | 
|  |  | 
|  | #define drain_queue() \ | 
|  | while (mq_receive(queue, buff, MSG_SIZE, &prio_in) == MSG_SIZE) | 
|  |  | 
|  | #define do_untimed_send() \ | 
|  | do { \ | 
|  | if (mq_send(queue, buff, MSG_SIZE, prio_out)) \ | 
|  | shutdown(3, "Test send failure", __LINE__); \ | 
|  | } while (0) | 
|  |  | 
|  | #define do_send_recv() \ | 
|  | do { \ | 
|  | clock_gettime(clock, &start); \ | 
|  | if (mq_send(queue, buff, MSG_SIZE, prio_out)) \ | 
|  | shutdown(3, "Test send failure", __LINE__); \ | 
|  | clock_gettime(clock, &middle); \ | 
|  | if (mq_receive(queue, buff, MSG_SIZE, &prio_in) != MSG_SIZE) \ | 
|  | shutdown(3, "Test receive failure", __LINE__); \ | 
|  | clock_gettime(clock, &end); \ | 
|  | nsec = ((middle.tv_sec - start.tv_sec) * 1000000000) + \ | 
|  | (middle.tv_nsec - start.tv_nsec); \ | 
|  | send_total.tv_nsec += nsec; \ | 
|  | if (send_total.tv_nsec >= 1000000000) { \ | 
|  | send_total.tv_sec++; \ | 
|  | send_total.tv_nsec -= 1000000000; \ | 
|  | } \ | 
|  | nsec = ((end.tv_sec - middle.tv_sec) * 1000000000) + \ | 
|  | (end.tv_nsec - middle.tv_nsec); \ | 
|  | recv_total.tv_nsec += nsec; \ | 
|  | if (recv_total.tv_nsec >= 1000000000) { \ | 
|  | recv_total.tv_sec++; \ | 
|  | recv_total.tv_nsec -= 1000000000; \ | 
|  | } \ | 
|  | } while (0) | 
|  |  | 
|  | struct test { | 
|  | char *desc; | 
|  | void (*func)(int *); | 
|  | }; | 
|  |  | 
|  | void const_prio(int *prio) | 
|  | { | 
|  | return; | 
|  | } | 
|  |  | 
|  | void inc_prio(int *prio) | 
|  | { | 
|  | if (++*prio == mq_prio_max) | 
|  | *prio = 0; | 
|  | } | 
|  |  | 
|  | void dec_prio(int *prio) | 
|  | { | 
|  | if (--*prio < 0) | 
|  | *prio = mq_prio_max - 1; | 
|  | } | 
|  |  | 
|  | void random_prio(int *prio) | 
|  | { | 
|  | *prio = random() % mq_prio_max; | 
|  | } | 
|  |  | 
|  | struct test test2[] = { | 
|  | {"\n\tTest #2a: Time send/recv message, queue full, constant prio\n", | 
|  | const_prio}, | 
|  | {"\n\tTest #2b: Time send/recv message, queue full, increasing prio\n", | 
|  | inc_prio}, | 
|  | {"\n\tTest #2c: Time send/recv message, queue full, decreasing prio\n", | 
|  | dec_prio}, | 
|  | {"\n\tTest #2d: Time send/recv message, queue full, random prio\n", | 
|  | random_prio}, | 
|  | {NULL, NULL} | 
|  | }; | 
|  |  | 
|  | /** | 
|  | * Tests to perform (all done with MSG_SIZE messages): | 
|  | * | 
|  | * 1) Time to add/remove message with 0 messages on queue | 
|  | * 1a) with constant prio | 
|  | * 2) Time to add/remove message when queue close to capacity: | 
|  | * 2a) with constant prio | 
|  | * 2b) with increasing prio | 
|  | * 2c) with decreasing prio | 
|  | * 2d) with random prio | 
|  | * 3) Test limits of priorities honored (double check _SC_MQ_PRIO_MAX) | 
|  | */ | 
|  | void *perf_test_thread(void *arg) | 
|  | { | 
|  | char buff[MSG_SIZE]; | 
|  | int prio_out, prio_in; | 
|  | int i; | 
|  | clockid_t clock; | 
|  | pthread_t *t; | 
|  | struct timespec res, start, middle, end, send_total, recv_total; | 
|  | unsigned long long nsec; | 
|  | struct test *cur_test; | 
|  |  | 
|  | t = &cpu_threads[0]; | 
|  | printf("\n\tStarted mqueue performance test thread on CPU %d\n", | 
|  | cpus_to_pin[0]); | 
|  | mq_prio_max = sysconf(_SC_MQ_PRIO_MAX); | 
|  | if (mq_prio_max == -1) | 
|  | shutdown(2, "sysconf(_SC_MQ_PRIO_MAX)", __LINE__); | 
|  | if (pthread_getcpuclockid(cpu_threads[0], &clock) != 0) | 
|  | shutdown(2, "pthread_getcpuclockid", __LINE__); | 
|  |  | 
|  | if (clock_getres(clock, &res)) | 
|  | shutdown(2, "clock_getres()", __LINE__); | 
|  |  | 
|  | printf("\t\tMax priorities:\t\t\t%d\n", mq_prio_max); | 
|  | printf("\t\tClock resolution:\t\t%lu nsec%s\n", res.tv_nsec, | 
|  | res.tv_nsec > 1 ? "s" : ""); | 
|  |  | 
|  |  | 
|  |  | 
|  | printf("\n\tTest #1: Time send/recv message, queue empty\n"); | 
|  | printf("\t\t(%d iterations)\n", TEST1_LOOPS); | 
|  | prio_out = 0; | 
|  | send_total.tv_sec = 0; | 
|  | send_total.tv_nsec = 0; | 
|  | recv_total.tv_sec = 0; | 
|  | recv_total.tv_nsec = 0; | 
|  | for (i = 0; i < TEST1_LOOPS; i++) | 
|  | do_send_recv(); | 
|  | printf("\t\tSend msg:\t\t\t%ld.%lus total time\n", | 
|  | send_total.tv_sec, send_total.tv_nsec); | 
|  | nsec = ((unsigned long long)send_total.tv_sec * 1000000000 + | 
|  | send_total.tv_nsec) / TEST1_LOOPS; | 
|  | printf("\t\t\t\t\t\t%lld nsec/msg\n", nsec); | 
|  | printf("\t\tRecv msg:\t\t\t%ld.%lus total time\n", | 
|  | recv_total.tv_sec, recv_total.tv_nsec); | 
|  | nsec = ((unsigned long long)recv_total.tv_sec * 1000000000 + | 
|  | recv_total.tv_nsec) / TEST1_LOOPS; | 
|  | printf("\t\t\t\t\t\t%lld nsec/msg\n", nsec); | 
|  |  | 
|  |  | 
|  | for (cur_test = test2; cur_test->desc != NULL; cur_test++) { | 
|  | printf("%s:\n", cur_test->desc); | 
|  | printf("\t\t(%d iterations)\n", TEST2_LOOPS); | 
|  | prio_out = 0; | 
|  | send_total.tv_sec = 0; | 
|  | send_total.tv_nsec = 0; | 
|  | recv_total.tv_sec = 0; | 
|  | recv_total.tv_nsec = 0; | 
|  | printf("\t\tFilling queue..."); | 
|  | fflush(stdout); | 
|  | clock_gettime(clock, &start); | 
|  | for (i = 0; i < result.mq_maxmsg - 1; i++) { | 
|  | do_untimed_send(); | 
|  | cur_test->func(&prio_out); | 
|  | } | 
|  | clock_gettime(clock, &end); | 
|  | nsec = ((unsigned long long)(end.tv_sec - start.tv_sec) * | 
|  | 1000000000) + (end.tv_nsec - start.tv_nsec); | 
|  | printf("done.\t\t%lld.%llds\n", nsec / 1000000000, | 
|  | nsec % 1000000000); | 
|  | printf("\t\tTesting..."); | 
|  | fflush(stdout); | 
|  | for (i = 0; i < TEST2_LOOPS; i++) { | 
|  | do_send_recv(); | 
|  | cur_test->func(&prio_out); | 
|  | } | 
|  | printf("done.\n"); | 
|  | printf("\t\tSend msg:\t\t\t%ld.%lus total time\n", | 
|  | send_total.tv_sec, send_total.tv_nsec); | 
|  | nsec = ((unsigned long long)send_total.tv_sec * 1000000000 + | 
|  | send_total.tv_nsec) / TEST2_LOOPS; | 
|  | printf("\t\t\t\t\t\t%lld nsec/msg\n", nsec); | 
|  | printf("\t\tRecv msg:\t\t\t%ld.%lus total time\n", | 
|  | recv_total.tv_sec, recv_total.tv_nsec); | 
|  | nsec = ((unsigned long long)recv_total.tv_sec * 1000000000 + | 
|  | recv_total.tv_nsec) / TEST2_LOOPS; | 
|  | printf("\t\t\t\t\t\t%lld nsec/msg\n", nsec); | 
|  | printf("\t\tDraining queue..."); | 
|  | fflush(stdout); | 
|  | clock_gettime(clock, &start); | 
|  | drain_queue(); | 
|  | clock_gettime(clock, &end); | 
|  | nsec = ((unsigned long long)(end.tv_sec - start.tv_sec) * | 
|  | 1000000000) + (end.tv_nsec - start.tv_nsec); | 
|  | printf("done.\t\t%lld.%llds\n", nsec / 1000000000, | 
|  | nsec % 1000000000); | 
|  | } | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | void increase_limits(void) | 
|  | { | 
|  | cur_limits.rlim_cur = RLIM_INFINITY; | 
|  | cur_limits.rlim_max = RLIM_INFINITY; | 
|  | setr(RLIMIT_MSGQUEUE, &cur_limits); | 
|  | while (try_set(max_msgs, cur_max_msgs += 10)) | 
|  | ; | 
|  | cur_max_msgs = get(max_msgs); | 
|  | while (try_set(max_msgsize, cur_max_msgsize += 1024)) | 
|  | ; | 
|  | cur_max_msgsize = get(max_msgsize); | 
|  | if (setpriority(PRIO_PROCESS, 0, -20) != 0) | 
|  | shutdown(2, "setpriority()", __LINE__); | 
|  | cur_nice = -20; | 
|  | } | 
|  |  | 
|  | int main(int argc, char *argv[]) | 
|  | { | 
|  | struct mq_attr attr; | 
|  | char *option, *next_option; | 
|  | int i, cpu, rc; | 
|  | struct sigaction sa; | 
|  | poptContext popt_context; | 
|  | void *retval; | 
|  |  | 
|  | main_thread = pthread_self(); | 
|  | num_cpus_to_pin = 0; | 
|  |  | 
|  | if (sysconf(_SC_NPROCESSORS_ONLN) == -1) { | 
|  | perror("sysconf(_SC_NPROCESSORS_ONLN)"); | 
|  | exit(1); | 
|  | } | 
|  | cpus_online = min(MAX_CPUS, sysconf(_SC_NPROCESSORS_ONLN)); | 
|  | cpu_set = CPU_ALLOC(cpus_online); | 
|  | if (cpu_set == NULL) { | 
|  | perror("CPU_ALLOC()"); | 
|  | exit(1); | 
|  | } | 
|  | cpu_set_size = CPU_ALLOC_SIZE(cpus_online); | 
|  | CPU_ZERO_S(cpu_set_size, cpu_set); | 
|  |  | 
|  | popt_context = poptGetContext(NULL, argc, (const char **)argv, | 
|  | options, 0); | 
|  |  | 
|  | while ((rc = poptGetNextOpt(popt_context)) > 0) { | 
|  | switch (rc) { | 
|  | case 'c': | 
|  | continuous_mode = 1; | 
|  | option = cpu_option_string; | 
|  | do { | 
|  | next_option = strchr(option, ','); | 
|  | if (next_option) | 
|  | *next_option = '\0'; | 
|  | cpu = atoi(option); | 
|  | if (cpu >= cpus_online) | 
|  | fprintf(stderr, "CPU %d exceeds " | 
|  | "cpus online, ignoring.\n", | 
|  | cpu); | 
|  | else | 
|  | cpus_to_pin[num_cpus_to_pin++] = cpu; | 
|  | if (next_option) | 
|  | option = ++next_option; | 
|  | } while (next_option && num_cpus_to_pin < MAX_CPUS); | 
|  | /* Double check that they didn't give us the same CPU | 
|  | * more than once */ | 
|  | for (cpu = 0; cpu < num_cpus_to_pin; cpu++) { | 
|  | if (CPU_ISSET_S(cpus_to_pin[cpu], cpu_set_size, | 
|  | cpu_set)) { | 
|  | fprintf(stderr, "Any given CPU may " | 
|  | "only be given once.\n"); | 
|  | exit(1); | 
|  | } else | 
|  | CPU_SET_S(cpus_to_pin[cpu], | 
|  | cpu_set_size, cpu_set); | 
|  | } | 
|  | break; | 
|  | case 'p': | 
|  | /* | 
|  | * Although we can create a msg queue with a | 
|  | * non-absolute path name, unlink will fail.  So, | 
|  | * if the name doesn't start with a /, add one | 
|  | * when we save it. | 
|  | */ | 
|  | option = queue_path; | 
|  | if (*option != '/') { | 
|  | queue_path = malloc(strlen(option) + 2); | 
|  | if (!queue_path) { | 
|  | perror("malloc()"); | 
|  | exit(1); | 
|  | } | 
|  | queue_path[0] = '/'; | 
|  | queue_path[1] = 0; | 
|  | strcat(queue_path, option); | 
|  | free(option); | 
|  | } | 
|  | break; | 
|  | } | 
|  | } | 
|  |  | 
|  | if (continuous_mode && num_cpus_to_pin == 0) { | 
|  | fprintf(stderr, "Must pass at least one CPU to continuous " | 
|  | "mode.\n"); | 
|  | poptPrintUsage(popt_context, stderr, 0); | 
|  | exit(1); | 
|  | } else if (!continuous_mode) { | 
|  | num_cpus_to_pin = 1; | 
|  | cpus_to_pin[0] = cpus_online - 1; | 
|  | } | 
|  |  | 
|  | if (getuid() != 0) { | 
|  | fprintf(stderr, "Not running as root, but almost all tests " | 
|  | "require root in order to modify\nsystem settings.  " | 
|  | "Exiting.\n"); | 
|  | exit(1); | 
|  | } | 
|  |  | 
|  | max_msgs = fopen(MAX_MSGS, "r+"); | 
|  | max_msgsize = fopen(MAX_MSGSIZE, "r+"); | 
|  | if (!max_msgs) | 
|  | shutdown(2, "Failed to open msg_max", __LINE__); | 
|  | if (!max_msgsize) | 
|  | shutdown(2, "Failed to open msgsize_max", __LINE__); | 
|  |  | 
|  | /* Load up the current system values for everything we can */ | 
|  | getr(RLIMIT_MSGQUEUE, &saved_limits); | 
|  | cur_limits = saved_limits; | 
|  | saved_max_msgs = cur_max_msgs = get(max_msgs); | 
|  | saved_max_msgsize = cur_max_msgsize = get(max_msgsize); | 
|  | errno = 0; | 
|  | cur_nice = getpriority(PRIO_PROCESS, 0); | 
|  | if (errno) | 
|  | shutdown(2, "getpriority()", __LINE__); | 
|  |  | 
|  | /* Tell the user our initial state */ | 
|  | printf("\nInitial system state:\n"); | 
|  | printf("\tUsing queue path:\t\t\t%s\n", queue_path); | 
|  | printf("\tRLIMIT_MSGQUEUE(soft):\t\t\t%ld\n", | 
|  | (long) saved_limits.rlim_cur); | 
|  | printf("\tRLIMIT_MSGQUEUE(hard):\t\t\t%ld\n", | 
|  | (long) saved_limits.rlim_max); | 
|  | printf("\tMaximum Message Size:\t\t\t%d\n", saved_max_msgsize); | 
|  | printf("\tMaximum Queue Size:\t\t\t%d\n", saved_max_msgs); | 
|  | printf("\tNice value:\t\t\t\t%d\n", cur_nice); | 
|  | printf("\n"); | 
|  |  | 
|  | increase_limits(); | 
|  |  | 
|  | printf("Adjusted system state for testing:\n"); | 
|  | if (cur_limits.rlim_cur == RLIM_INFINITY) { | 
|  | printf("\tRLIMIT_MSGQUEUE(soft):\t\t\t(unlimited)\n"); | 
|  | printf("\tRLIMIT_MSGQUEUE(hard):\t\t\t(unlimited)\n"); | 
|  | } else { | 
|  | printf("\tRLIMIT_MSGQUEUE(soft):\t\t\t%ld\n", | 
|  | (long) cur_limits.rlim_cur); | 
|  | printf("\tRLIMIT_MSGQUEUE(hard):\t\t\t%ld\n", | 
|  | (long) cur_limits.rlim_max); | 
|  | } | 
|  | printf("\tMaximum Message Size:\t\t\t%d\n", cur_max_msgsize); | 
|  | printf("\tMaximum Queue Size:\t\t\t%d\n", cur_max_msgs); | 
|  | printf("\tNice value:\t\t\t\t%d\n", cur_nice); | 
|  | printf("\tContinuous mode:\t\t\t(%s)\n", continuous_mode ? | 
|  | (continuous_mode_fake ? "fake mode" : "enabled") : | 
|  | "disabled"); | 
|  | printf("\tCPUs to pin:\t\t\t\t%d", cpus_to_pin[0]); | 
|  | for (cpu = 1; cpu < num_cpus_to_pin; cpu++) | 
|  | printf(",%d", cpus_to_pin[cpu]); | 
|  | printf("\n"); | 
|  |  | 
|  | sa.sa_sigaction = sig_action_SIGUSR1; | 
|  | sigemptyset(&sa.sa_mask); | 
|  | sigaddset(&sa.sa_mask, SIGHUP); | 
|  | sigaddset(&sa.sa_mask, SIGINT); | 
|  | sigaddset(&sa.sa_mask, SIGQUIT); | 
|  | sigaddset(&sa.sa_mask, SIGTERM); | 
|  | sa.sa_flags = SA_SIGINFO; | 
|  | if (sigaction(SIGUSR1, &sa, NULL) == -1) | 
|  | shutdown(1, "sigaction(SIGUSR1)", __LINE__); | 
|  | sa.sa_sigaction = sig_action; | 
|  | if (sigaction(SIGHUP, &sa, NULL) == -1) | 
|  | shutdown(1, "sigaction(SIGHUP)", __LINE__); | 
|  | if (sigaction(SIGINT, &sa, NULL) == -1) | 
|  | shutdown(1, "sigaction(SIGINT)", __LINE__); | 
|  | if (sigaction(SIGQUIT, &sa, NULL) == -1) | 
|  | shutdown(1, "sigaction(SIGQUIT)", __LINE__); | 
|  | if (sigaction(SIGTERM, &sa, NULL) == -1) | 
|  | shutdown(1, "sigaction(SIGTERM)", __LINE__); | 
|  |  | 
|  | if (!continuous_mode_fake) { | 
|  | attr.mq_flags = O_NONBLOCK; | 
|  | attr.mq_maxmsg = cur_max_msgs; | 
|  | attr.mq_msgsize = MSG_SIZE; | 
|  | open_queue(&attr); | 
|  | } | 
|  | for (i = 0; i < num_cpus_to_pin; i++) { | 
|  | pthread_attr_t thread_attr; | 
|  | void *thread_func; | 
|  |  | 
|  | if (continuous_mode_fake) | 
|  | thread_func = &fake_cont_thread; | 
|  | else if (continuous_mode) | 
|  | thread_func = &cont_thread; | 
|  | else | 
|  | thread_func = &perf_test_thread; | 
|  |  | 
|  | CPU_ZERO_S(cpu_set_size, cpu_set); | 
|  | CPU_SET_S(cpus_to_pin[i], cpu_set_size, cpu_set); | 
|  | pthread_attr_init(&thread_attr); | 
|  | pthread_attr_setaffinity_np(&thread_attr, cpu_set_size, | 
|  | cpu_set); | 
|  | if (pthread_create(&cpu_threads[i], &thread_attr, thread_func, | 
|  | NULL)) | 
|  | shutdown(1, "pthread_create()", __LINE__); | 
|  | pthread_attr_destroy(&thread_attr); | 
|  | } | 
|  |  | 
|  | if (!continuous_mode) { | 
|  | pthread_join(cpu_threads[0], &retval); | 
|  | shutdown((long)retval, "perf_test_thread()", __LINE__); | 
|  | } else { | 
|  | while (1) | 
|  | sleep(1); | 
|  | } | 
|  | shutdown(0, "", 0); | 
|  | } |