#include <assert.h>
#include <stdlib.h>
+#include <unistd.h>
#include <string.h>
#include <errno.h>
+#ifndef __GNUC__
+# if HAVE_ALLOCA_H
+# include <alloca.h>
+# else
+# ifdef _AIX
+ #pragma alloca
+# endif
+# endif
+#endif
+
#include "xcb.h"
#include "xcbext.h"
#include "xcbint.h"
return ret;
}
+static int _xcb_writev(const int fd, struct iovec *vec, int count)
+{
+ int n = writev(fd, vec, count);
+ if(n > 0)
+ {
+ int rem = n;
+ for(; count; --count, ++vec)
+ {
+ int cur = vec->iov_len;
+ if(cur > rem)
+ cur = rem;
+ vec->iov_len -= cur;
+ vec->iov_base = (char *) vec->iov_base + cur;
+ rem -= cur;
+ if(vec->iov_len)
+ break;
+ }
+ assert(rem == 0);
+ }
+ return n;
+}
+
/* Public interface */
CARD32 XCBGetMaximumRequestLength(XCBConnection *c)
int XCBSendRequest(XCBConnection *c, unsigned int *request, struct iovec *vector, const XCBProtocolRequest *req)
{
+ static const char pad[3];
int ret;
int i;
- struct iovec prefix[2];
+ struct iovec *padded;
+ int padlen = 0;
CARD16 shortlen = 0;
CARD32 longlen = 0;
enum workarounds workaround = WORKAROUND_NONE;
assert(vector != 0);
assert(req->count > 0);
+ /* set the major opcode, and the minor opcode for extensions */
+ if(req->ext)
+ {
+ const XCBQueryExtensionRep *extension = XCBGetExtensionData(c, req->ext);
+ /* TODO: better error handling here, please! */
+ assert(extension && extension->present);
+ ((CARD8 *) vector[0].iov_base)[0] = extension->major_opcode;
+ ((CARD8 *) vector[0].iov_base)[1] = req->opcode;
+
+ /* do we need to work around the X server bug described in glx.xml? */
+ if(strcmp(req->ext->name, "GLX") &&
+ ((req->opcode == 17 && ((CARD32 *) vector[0].iov_base)[0] == 0x10004) ||
+ req->opcode == 21))
+ workaround = WORKAROUND_GLX_GET_FB_CONFIGS_BUG;
+ }
+ else
+ ((CARD8 *) vector[0].iov_base)[0] = req->opcode;
+
/* put together the length field, possibly using BIGREQUESTS */
for(i = 0; i < req->count; ++i)
longlen += XCB_CEIL(vector[i].iov_len) >> 2;
longlen = 0;
}
+ padded =
+#ifdef HAVE_ALLOCA
+ alloca
+#else
+ malloc
+#endif
+ ((req->count * 2 + 3) * sizeof(struct iovec));
/* set the length field. */
- i = 0;
- prefix[i].iov_base = vector[0].iov_base;
- prefix[i].iov_len = sizeof(CARD32);
- vector[0].iov_base = ((char *) vector[0].iov_base) + sizeof(CARD32);
- vector[0].iov_len -= sizeof(CARD32);
- ((CARD16 *) prefix[i].iov_base)[1] = shortlen;
- ++i;
+ ((CARD16 *) vector[0].iov_base)[1] = shortlen;
if(!shortlen)
{
+ padded[0].iov_base = vector[0].iov_base;
+ padded[0].iov_len = sizeof(CARD32);
+ vector[0].iov_base = ((char *) vector[0].iov_base) + sizeof(CARD32);
+ vector[0].iov_len -= sizeof(CARD32);
++longlen;
- prefix[i].iov_base = &longlen;
- prefix[i].iov_len = sizeof(CARD32);
- ++i;
+ padded[1].iov_base = &longlen;
+ padded[1].iov_len = sizeof(CARD32);
+ padlen = 2;
}
- /* set the major opcode, and the minor opcode for extensions */
- if(req->ext)
+ for(i = 0; i < req->count; ++i)
{
- const XCBQueryExtensionRep *extension = XCBGetExtensionData(c, req->ext);
- /* TODO: better error handling here, please! */
- assert(extension && extension->present);
- ((CARD8 *) prefix[0].iov_base)[0] = extension->major_opcode;
- ((CARD8 *) prefix[0].iov_base)[1] = req->opcode;
-
- /* do we need to work around the X server bug described in glx.xml? */
- if(strcmp(req->ext->name, "GLX") &&
- ((req->opcode == 17 && ((CARD32 *) vector[0].iov_base)[0] == 0x10004) ||
- req->opcode == 21))
- workaround = WORKAROUND_GLX_GET_FB_CONFIGS_BUG;
+ if(!vector[i].iov_len)
+ continue;
+ padded[padlen].iov_base = vector[i].iov_base;
+ padded[padlen++].iov_len = vector[i].iov_len;
+ if(!XCB_PAD(vector[i].iov_len))
+ continue;
+ padded[padlen].iov_base = (caddr_t) pad;
+ padded[padlen++].iov_len = XCB_PAD(vector[i].iov_len);
}
- else
- ((CARD8 *) prefix[0].iov_base)[0] = req->opcode;
/* get a sequence number and arrange for delivery. */
pthread_mutex_lock(&c->iolock);
if(req->isvoid && !force_sequence_wrap(c))
{
pthread_mutex_unlock(&c->iolock);
+#ifndef HAVE_ALLOCA
+ free(padded);
+#endif
return -1;
}
if(!req->isvoid)
_xcb_in_expect_reply(c, *request, workaround);
- ret = _xcb_out_write_block(c, prefix, i);
- if(ret > 0)
- ret = _xcb_out_write_block(c, vector, req->count);
+ ret = _xcb_out_write_block(c, padded, padlen);
pthread_mutex_unlock(&c->iolock);
+#ifndef HAVE_ALLOCA
+ free(padded);
+#endif
return ret;
}
{
pthread_cond_destroy(&out->cond);
pthread_mutex_destroy(&out->reqlenlock);
- free(out->vec);
}
+/* precondition: there must be something for us to write. */
int _xcb_out_write(XCBConnection *c)
{
int n;
- if(c->out.vec_len)
- n = _xcb_writev(c->fd, c->out.vec, c->out.vec_len);
- else
- n = _xcb_write(c->fd, &c->out.queue, &c->out.queue_len);
-
- if(n < 0 && errno == EAGAIN)
- n = 1;
-
- if(c->out.vec_len)
- {
- int i;
- for(i = 0; i < c->out.vec_len; ++i)
- if(c->out.vec[i].iov_len)
- return n;
- c->out.vec_len = 0;
- }
- return n;
+ assert(!c->out.queue_len);
+ n = _xcb_writev(c->fd, c->out.vec, c->out.vec_len);
+ while(c->out.vec_len && !c->out.vec[0].iov_len)
+ ++c->out.vec, --c->out.vec_len;
+ if(!c->out.vec_len)
+ c->out.vec = 0;
+ return (n > 0) || (n < 0 && errno == EAGAIN);
}
int _xcb_out_write_block(XCBConnection *c, struct iovec *vector, size_t count)
{
- static const char pad[3];
- int i;
- int len = 0;
-
- for(i = 0; i < count; ++i)
- len += XCB_CEIL(vector[i].iov_len);
-
- /* Is the queue about to overflow? */
- if(c->out.queue_len + len < sizeof(c->out.queue))
+ while(c->out.writing)
+ pthread_cond_wait(&c->out.cond, &c->iolock);
+ assert(!c->out.vec && !c->out.vec_len);
+ while(count && c->out.queue_len + vector[0].iov_len < sizeof(c->out.queue))
{
- /* No, this will fit. */
- for(i = 0; i < count; ++i)
- {
- memcpy(c->out.queue + c->out.queue_len, vector[i].iov_base, vector[i].iov_len);
- if(vector[i].iov_len & 3)
- memset(c->out.queue + c->out.queue_len + vector[i].iov_len, 0, XCB_PAD(vector[i].iov_len));
- c->out.queue_len += XCB_CEIL(vector[i].iov_len);
- }
- return len;
+ memcpy(c->out.queue + c->out.queue_len, vector[0].iov_base, vector[0].iov_len);
+ c->out.queue_len += vector[0].iov_len;
+ ++vector, --count;
}
+ if(!count)
+ return 1;
- assert(!c->out.vec_len);
- assert(!c->out.vec);
- c->out.vec = malloc(sizeof(struct iovec) * (1 + count * 2));
- if(!c->out.vec)
- return -1;
- if(c->out.queue_len)
- {
- c->out.vec[c->out.vec_len].iov_base = c->out.queue;
- c->out.vec[c->out.vec_len++].iov_len = c->out.queue_len;
- c->out.queue_len = 0;
- }
- for(i = 0; i < count; ++i)
- {
- if(!vector[i].iov_len)
- continue;
- c->out.vec[c->out.vec_len].iov_base = vector[i].iov_base;
- c->out.vec[c->out.vec_len++].iov_len = vector[i].iov_len;
- if(!XCB_PAD(vector[i].iov_len))
- continue;
- c->out.vec[c->out.vec_len].iov_base = (void *) pad;
- c->out.vec[c->out.vec_len++].iov_len = XCB_PAD(vector[i].iov_len);
- }
- if(_xcb_out_flush(c) <= 0)
- len = -1;
- free(c->out.vec);
- c->out.vec = 0;
+ memmove(vector + 1, vector, count++ * sizeof(struct iovec));
+ vector[0].iov_base = c->out.queue;
+ vector[0].iov_len = c->out.queue_len;
+ c->out.queue_len = 0;
- return len;
+ c->out.vec_len = count;
+ c->out.vec = vector;
+ return _xcb_out_flush(c);
}
int _xcb_out_flush(XCBConnection *c)
{
int ret = 1;
- while(ret > 0 && (c->out.queue_len || c->out.vec_len))
+ struct iovec vec;
+ if(c->out.queue_len)
+ {
+ assert(!c->out.vec && !c->out.vec_len);
+ vec.iov_base = c->out.queue;
+ vec.iov_len = c->out.queue_len;
+ c->out.vec = &vec;
+ c->out.vec_len = 1;
+ c->out.queue_len = 0;
+ }
+ while(ret && c->out.vec_len)
ret = _xcb_conn_wait(c, /*should_write*/ 1, &c->out.cond);
c->out.request_written = c->out.request;
pthread_cond_broadcast(&c->out.cond);