queue_err_t queue_open(void *p, const char *filename, int flags)
{
int omask;
mode_t oldmask;
posix_queue_t *q;
q = (posix_queue_t *) p;
if (HAS_FLAG(flags, QUEUE_FL_SENDER)) {
omask = O_WRONLY;
} else {
omask = O_RDONLY;
}
if (HAS_FLAG(flags, QUEUE_FL_OWNER)) {
omask |= O_CREAT | O_EXCL;
oldmask = umask(0);
if (NULL == (q->filename = strdup(filename))) {
// TODO: error
return QUEUE_ERR_GENERAL_FAILURE;
}
}
if (NOT_MQD_T == (q->mq = mq_open(filename, omask, 0660, &q->attr))) {
if (HAS_FLAG(flags, QUEUE_FL_OWNER)) {
umask(oldmask);
#ifdef __FreeBSD__
if (ENOSYS == errno) {
// please load mqueuefs module with kldload or recompile your kernel to include "options P1003_1B_MQUEUE"
}
#endif
}
// TODO: error
return QUEUE_ERR_GENERAL_FAILURE;
}
if (!HAS_FLAG(flags, QUEUE_FL_SENDER)) {
// mq_setattr implies CAP_EVENT?
CAP_RIGHTS_LIMIT(__mq_oshandle(q->mq), CAP_READ, CAP_EVENT);
#if 0
} else {
CAP_RIGHTS_LIMIT(__mq_oshandle(q->mq), CAP_WRITE, CAP_EVENT);
#endif
}
if (HAS_FLAG(flags, QUEUE_FL_OWNER)) {
umask(oldmask);
} else {
if (0 != mq_getattr(q->mq, &q->attr)) {
// TODO: error
return QUEUE_ERR_GENERAL_FAILURE;
}
}
return QUEUE_ERR_OK;
}
int main()
{
mqd_t mq;
int status;
struct mq_attr attr;
int pid;
fd_set set;
int kq;
struct kevent kev;
mq_unlink(MQNAME);
attr.mq_maxmsg = 5;
attr.mq_msgsize = 128;
mq = mq_open(MQNAME, O_CREAT | O_RDWR | O_EXCL, 0666, &attr);
if (mq == (mqd_t) -1)
err(1, "mq_open()");
status = mq_getattr(mq, &attr);
if (status)
err(1, "mq_getattr()");
pid = fork();
if (pid == 0) { /* child */
int prio, j, i;
char *buf;
mq_close(mq);
kq = kqueue();
mq = mq_open(MQNAME, O_RDWR);
if (mq == (mqd_t)-1)
err(1, "child: mq_open");
EV_SET(&kev, __mq_oshandle(mq), EVFILT_READ, EV_ADD, 0, 0, 0);
status = kevent(kq, &kev, 1, NULL, 0, NULL);
if (status == -1)
err(1, "child: kevent");
buf = malloc(attr.mq_msgsize);
for (j = 0; j < LOOPS; ++j) {
alarm(3);
status = kevent(kq, NULL, 0, &kev, 1, NULL);
if (status != 1)
err(1, "child: kevent 2");
status = mq_receive(mq, buf, attr.mq_msgsize, &prio);
if (status == -1)
err(2, "child: mq_receive");
for (i = 0; i < attr.mq_msgsize; ++i)
if (buf[i] != i)
err(3, "child: message data corrupted");
if (prio != PRIO)
err(4, "child: priority is incorrect: %d",
prio);
}
alarm(0);
free(buf);
mq_close(mq);
return (0);
} else if (pid == -1) {
err(1, "fork()");
} else {
char *buf;
int i, j, prio;
signal(SIGALRM, sighandler);
kq = kqueue();
EV_SET(&kev, __mq_oshandle(mq), EVFILT_WRITE, EV_ADD, 0, 0, 0);
status = kevent(kq, &kev, 1, NULL, 0, NULL);
if (status == -1)
err(1, "kevent");
buf = malloc(attr.mq_msgsize);
for (j = 0; j < LOOPS; ++j) {
for (i = 0; i < attr.mq_msgsize; ++i) {
buf[i] = i;
}
alarm(3);
status = kevent(kq, NULL, 0, &kev, 1, NULL);
if (status != 1)
err(1, "child: kevent 2");
status = mq_send(mq, buf, attr.mq_msgsize, PRIO);
if (status) {
err(2, "mq_send()");
}
}
free(buf);
alarm(3);
wait(&status);
alarm(0);
}
status = mq_close(mq);
if (status)
err(1, "mq_close");
mq_unlink(MQNAME);
return (0);
}
int main()
{
mqd_t mq;
int status;
struct mq_attr attr;
int pid;
fd_set set;
mq_unlink(MQNAME);
attr.mq_maxmsg = 5;
attr.mq_msgsize = 128;
mq = mq_open(MQNAME, O_CREAT | O_RDWR | O_EXCL, 0666, &attr);
if (mq == (mqd_t)-1)
err(1, "mq_open()");
status = mq_getattr(mq, &attr);
if (status)
err(1, "mq_getattr()");
pid = fork();
if (pid == 0) { /* child */
int prio, j, i;
char *buf;
mq_close(mq);
signal(SIGALRM, sighandler);
mq = mq_open(MQNAME, O_RDWR);
if (mq == (mqd_t)-1)
err(1, "child process: mq_open");
buf = malloc(attr.mq_msgsize);
for (j = 0; j < LOOPS; ++j) {
FD_ZERO(&set);
FD_SET(__mq_oshandle(mq), &set);
alarm(3);
status = select(__mq_oshandle(mq)+1, &set, NULL, NULL, NULL);
if (status != 1)
err(1, "child process: select()");
status = mq_receive(mq, buf, attr.mq_msgsize, &prio);
if (status == -1)
err(2, "child process: mq_receive");
for (i = 0; i < attr.mq_msgsize; ++i)
if (buf[i] != i)
err(3, "message data corrupted");
if (prio != PRIO)
err(4, "priority is incorrect: %d", prio);
}
alarm(0);
free(buf);
mq_close(mq);
return (0);
} else if (pid == -1) {
err(1, "fork()");
} else {
char *buf;
int i, j, prio;
signal(SIGALRM, sighandler);
buf = malloc(attr.mq_msgsize);
for (j = 0; j < LOOPS; ++j) {
for (i = 0; i < attr.mq_msgsize; ++i) {
buf[i] = i;
}
alarm(3);
FD_ZERO(&set);
FD_SET(__mq_oshandle(mq), &set);
status = select(__mq_oshandle(mq)+1, NULL, &set, NULL, NULL);
if (status != 1)
err(1, "select()");
status = mq_send(mq, buf, attr.mq_msgsize, PRIO);
if (status) {
kill(pid, SIGKILL);
err(2, "mq_send()");
}
}
alarm(3);
wait(&status);
alarm(0);
}
status = mq_close(mq);
if (status)
err(1, "mq_close");
mq_unlink(MQNAME);
return (0);
}
