/* $Id: vboxhgcm.c 33595 2010-10-29 10:35:00Z vboxsync $ */ /** @file * VBox HGCM connection */ /* * Copyright (C) 2008 Oracle Corporation * * This file is part of VirtualBox Open Source Edition (OSE), as * available from http://www.virtualbox.org. This file is free software; * you can redistribute it and/or modify it under the terms of the GNU * General Public License (GPL) as published by the Free Software * Foundation, in version 2 as it comes in the "COPYING" file of the * VirtualBox OSE distribution. VirtualBox OSE is distributed in the * hope that it will be useful, but WITHOUT ANY WARRANTY of any kind. */ #ifdef RT_OS_WINDOWS #include #include #else #include #include #include #include #include #endif #include "cr_error.h" #include "cr_net.h" #include "cr_bufpool.h" #include "cr_mem.h" #include "cr_string.h" #include "cr_endian.h" #include "cr_threads.h" #include "net_internals.h" #include #if 1 /** @todo Try use the Vbgl interface instead of talking directly to the driver? */ # include #else # include #endif #include #if defined(VBOX_WITH_CRHGSMI) && defined(IN_GUEST) #include #endif //#define IN_GUEST //#if defined(IN_GUEST) //#define VBOX_WITH_CRHGSMIPROFILE //#endif #ifdef VBOX_WITH_CRHGSMIPROFILE #include #include typedef struct VBOXCRHGSMIPROFILE { uint64_t cStartTime; uint64_t cStepsTime; uint64_t cSteps; } VBOXCRHGSMIPROFILE, *PVBOXCRHGSMIPROFILE; #define VBOXCRHGSMIPROFILE_GET_TIME_NANO() RTTimeNanoTS() #define VBOXCRHGSMIPROFILE_GET_TIME_MILLI() RTTimeMilliTS() /* 10 sec */ #define VBOXCRHGSMIPROFILE_LOG_STEP_TIME (10000000000.) DECLINLINE(void) vboxCrHgsmiProfileStart(PVBOXCRHGSMIPROFILE pProfile) { pProfile->cStepsTime = 0; pProfile->cSteps = 0; pProfile->cStartTime = VBOXCRHGSMIPROFILE_GET_TIME_NANO(); } DECLINLINE(void) vboxCrHgsmiProfileStep(PVBOXCRHGSMIPROFILE pProfile, uint64_t cStepTime) { pProfile->cStepsTime += cStepTime; ++pProfile->cSteps; } typedef struct VBOXCRHGSMIPROFILE_SCOPE { uint64_t cStartTime; // bool bDisable; } VBOXCRHGSMIPROFILE_SCOPE, *PVBOXCRHGSMIPROFILE_SCOPE; static VBOXCRHGSMIPROFILE g_VBoxProfile; static void vboxCrHgsmiLog(char * szString, ...) { char szBuffer[4096] = {0}; va_list pArgList; va_start(pArgList, szString); _vsnprintf(szBuffer, sizeof(szBuffer) / sizeof(szBuffer[0]), szString, pArgList); va_end(pArgList); #ifdef VBOX_WITH_CRHGSMI VBoxCrHgsmiLog(szBuffer); #else OutputDebugString(szBuffer); #endif } DECLINLINE(void) vboxCrHgsmiProfileLog(PVBOXCRHGSMIPROFILE pProfile, uint64_t cTime) { uint64_t profileTime = cTime - pProfile->cStartTime; double percent = ((double)100.0) * pProfile->cStepsTime / profileTime; double cps = ((double)1000000000.) * pProfile->cSteps / profileTime; vboxCrHgsmiLog("hgcm: cps: %.1f, host %.1f%%\n", cps, percent); } DECLINLINE(void) vboxCrHgsmiProfileScopeEnter(PVBOXCRHGSMIPROFILE_SCOPE pScope) { // pScope->bDisable = false; pScope->cStartTime = VBOXCRHGSMIPROFILE_GET_TIME_NANO(); } DECLINLINE(void) vboxCrHgsmiProfileScopeExit(PVBOXCRHGSMIPROFILE_SCOPE pScope) { // if (!pScope->bDisable) { uint64_t cTime = VBOXCRHGSMIPROFILE_GET_TIME_NANO(); vboxCrHgsmiProfileStep(&g_VBoxProfile, cTime - pScope->cStartTime); if (VBOXCRHGSMIPROFILE_LOG_STEP_TIME < cTime - g_VBoxProfile.cStartTime) { vboxCrHgsmiProfileLog(&g_VBoxProfile, cTime); vboxCrHgsmiProfileStart(&g_VBoxProfile); } } } #define VBOXCRHGSMIPROFILE_INIT() vboxCrHgsmiProfileStart(&g_VBoxProfile) #define VBOXCRHGSMIPROFILE_TERM() do {} while (0) #define VBOXCRHGSMIPROFILE_FUNC_PROLOGUE() \ VBOXCRHGSMIPROFILE_SCOPE __vboxCrHgsmiProfileScope; \ vboxCrHgsmiProfileScopeEnter(&__vboxCrHgsmiProfileScope); #define VBOXCRHGSMIPROFILE_FUNC_EPILOGUE() \ vboxCrHgsmiProfileScopeExit(&__vboxCrHgsmiProfileScope); \ #else #define VBOXCRHGSMIPROFILE_INIT() do {} while (0) #define VBOXCRHGSMIPROFILE_TERM() do {} while (0) #define VBOXCRHGSMIPROFILE_FUNC_PROLOGUE() do {} while (0) #define VBOXCRHGSMIPROFILE_FUNC_EPILOGUE() do {} while (0) #endif typedef struct { int initialized; int num_conns; CRConnection **conns; CRBufferPool *bufpool; #ifdef CHROMIUM_THREADSAFE CRmutex mutex; CRmutex recvmutex; #endif CRNetReceiveFuncList *recv_list; CRNetCloseFuncList *close_list; #ifdef RT_OS_WINDOWS HANDLE hGuestDrv; LPDIRECTDRAW pDirectDraw; #else int iGuestDrv; #endif #if defined(VBOX_WITH_CRHGSMI) && defined(IN_GUEST) bool bHgsmiOn; #endif } CRVBOXHGCMDATA; static CRVBOXHGCMDATA g_crvboxhgcm = {0,}; typedef enum { CR_VBOXHGCM_USERALLOCATED, CR_VBOXHGCM_MEMORY, CR_VBOXHGCM_MEMORY_BIG #ifdef RT_OS_WINDOWS ,CR_VBOXHGCM_DDRAW_SURFACE #endif #if defined(VBOX_WITH_CRHGSMI) && defined(IN_GUEST) ,CR_VBOXHGCM_UHGSMI_BUFFER #endif } CRVBOXHGCMBUFFERKIND; #define CR_VBOXHGCM_BUFFER_MAGIC 0xABCDE321 typedef struct CRVBOXHGCMBUFFER { uint32_t magic; CRVBOXHGCMBUFFERKIND kind; union { struct { uint32_t len; uint32_t allocated; }; #if defined(VBOX_WITH_CRHGSMI) && defined(IN_GUEST) PVBOXUHGSMI_BUFFER pBuffer; #endif }; #ifdef RT_OS_WINDOWS LPDIRECTDRAWSURFACE pDDS; #endif } CRVBOXHGCMBUFFER; #ifndef RT_OS_WINDOWS #define TRUE true #define FALSE false #define INVALID_HANDLE_VALUE (-1) #endif #if defined(VBOX_WITH_CRHGSMI) && defined(IN_GUEST) typedef struct CRVBOXHGSMI_CLIENT { PVBOXUHGSMI pHgsmi; PVBOXUHGSMI_BUFFER pCmdBuffer; PVBOXUHGSMI_BUFFER pHGBuffer; void *pvHGBuffer; CRBufferPool *bufpool; } CRVBOXHGSMI_CLIENT, *PCRVBOXHGSMI_CLIENT; /* add sizeof header + page align */ #define CRVBOXHGSMI_PAGE_ALIGN(_s) (((_s) + 0xfff) & ~0xfff) #define CRVBOXHGSMI_BUF_HDR_SIZE() (sizeof (CRVBOXHGCMBUFFER)) #define CRVBOXHGSMI_BUF_SIZE(_s) CRVBOXHGSMI_PAGE_ALIGN((_s) + CRVBOXHGSMI_BUF_HDR_SIZE()) #define CRVBOXHGSMI_BUF_LOCK_SIZE(_s) ((_s) + CRVBOXHGSMI_BUF_HDR_SIZE()) #define CRVBOXHGSMI_BUF_DATA(_p) ((void*)(((CRVBOXHGCMBUFFER*)(_p)) + 1)) #define CRVBOXHGSMI_BUF_HDR(_p) (((CRVBOXHGCMBUFFER*)(_p)) - 1) #define CRVBOXHGSMI_BUF_OFFSET(_st2, _st1) ((uint32_t)(((uint8_t*)(_st2)) - ((uint8_t*)(_st1)))) DECLINLINE(PCRVBOXHGSMI_CLIENT) _crVBoxHGSMIClientGet(CRConnection *conn) { PCRVBOXHGSMI_CLIENT pClient = (PCRVBOXHGSMI_CLIENT)VBoxCrHgsmiQueryClient(); Assert(pClient); return pClient; } static PVBOXUHGSMI_BUFFER _crVBoxHGSMIBufAlloc(PCRVBOXHGSMI_CLIENT pClient, uint32_t cbSize) { PVBOXUHGSMI_BUFFER buf; int rc; buf = (PVBOXUHGSMI_BUFFER ) crBufferPoolPop(pClient->bufpool, cbSize); if (!buf) { crDebug("Buffer pool %p was empty; allocating new %d byte buffer.", (void *) pClient->bufpool, cbSize); rc = pClient->pHgsmi->pfnBufferCreate(pClient->pHgsmi, cbSize, VBOXUHGSMI_SYNCHOBJECT_TYPE_NONE, NULL, &buf); AssertRC(rc); if (RT_FAILURE(rc)) crWarning("Failed to Create a buffer of size(%d), rc(%d)\n", cbSize, rc); } return buf; } static PVBOXUHGSMI_BUFFER _crVBoxHGSMIBufFromHdr(CRVBOXHGCMBUFFER *pHdr) { PVBOXUHGSMI_BUFFER pBuf; int rc; CRASSERT(pHdr->magic == CR_VBOXHGCM_BUFFER_MAGIC); CRASSERT(pHdr->kind == CR_VBOXHGCM_UHGSMI_BUFFER); pBuf = pHdr->pBuffer; rc = pBuf->pfnUnlock(pBuf); AssertRC(rc); if (RT_FAILURE(rc)) { return NULL; } return pBuf; } static void _crVBoxHGSMIBufFree(PCRVBOXHGSMI_CLIENT pClient, PVBOXUHGSMI_BUFFER pBuf) { crBufferPoolPush(pClient->bufpool, pBuf, pBuf->cbBuffer); } static CRVBOXHGSMIHDR *_crVBoxHGSMICmdBufferLock(PCRVBOXHGSMI_CLIENT pClient, uint32_t cbBuffer) { /* in theory it is OK to use one cmd buffer for asynch cmd submission * because bDiscard flag should result in allocating a new memory backend if the * allocation is still in use. * However, NOTE: since one and the same semaphore synch event is used for completion notification, * for the notification mechanism working as expected * 1. host must complete commands in the same order as it receives them * (to avoid situation when guest receives notification for another command completion) * 2. guest must eventually wait for command completion unless he specified bDoNotSignalCompletion * 3. guest must wait for command completion in the same order as it submits them * in case we can not satisfy any of the above, we should introduce multiple command buffers */ CRVBOXHGSMIHDR * pHdr; VBOXUHGSMI_BUFFER_LOCK_FLAGS fFlags; int rc; fFlags.Value = 0; fFlags.bDiscard = 1; rc = pClient->pCmdBuffer->pfnLock(pClient->pCmdBuffer, 0, cbBuffer, fFlags, (void**)&pHdr); AssertRC(rc); if (RT_SUCCESS(rc)) return pHdr; crWarning("Failed to Lock the command buffer of size(%d), rc(%d)\n", cbBuffer, rc); return NULL; } static CRVBOXHGSMIHDR *_crVBoxHGSMICmdBufferLockRo(PCRVBOXHGSMI_CLIENT pClient, uint32_t cbBuffer) { /* in theory it is OK to use one cmd buffer for asynch cmd submission * because bDiscard flag should result in allocating a new memory backend if the * allocation is still in use. * However, NOTE: since one and the same semaphore synch event is used for completion notification, * for the notification mechanism working as expected * 1. host must complete commands in the same order as it receives them * (to avoid situation when guest receives notification for another command completion) * 2. guest must eventually wait for command completion unless he specified bDoNotSignalCompletion * 3. guest must wait for command completion in the same order as it submits them * in case we can not satisfy any of the above, we should introduce multiple command buffers */ CRVBOXHGSMIHDR * pHdr; VBOXUHGSMI_BUFFER_LOCK_FLAGS fFlags; int rc; fFlags.Value = 0; fFlags.bReadOnly = 1; rc = pClient->pCmdBuffer->pfnLock(pClient->pCmdBuffer, 0, cbBuffer, fFlags, (void**)&pHdr); AssertRC(rc); if (RT_FAILURE(rc)) crWarning("Failed to Lock the command buffer of size(%d), rc(%d)\n", cbBuffer, rc); return pHdr; } static void _crVBoxHGSMICmdBufferUnlock(PCRVBOXHGSMI_CLIENT pClient) { int rc = pClient->pCmdBuffer->pfnUnlock(pClient->pCmdBuffer); AssertRC(rc); if (RT_FAILURE(rc)) crWarning("Failed to Unlock the command buffer rc(%d)\n", rc); } static int32_t _crVBoxHGSMICmdBufferGetRc(PCRVBOXHGSMI_CLIENT pClient) { CRVBOXHGSMIHDR * pHdr; VBOXUHGSMI_BUFFER_LOCK_FLAGS fFlags; int rc; fFlags.Value = 0; fFlags.bReadOnly = 1; rc = pClient->pCmdBuffer->pfnLock(pClient->pCmdBuffer, 0, sizeof (*pHdr), fFlags, (void**)&pHdr); AssertRC(rc); if (RT_FAILURE(rc)) { crWarning("Failed to Lock the command buffer of size(%d), rc(%d)\n", sizeof (*pHdr), rc); return rc; } rc = pHdr->result; AssertRC(rc); pClient->pCmdBuffer->pfnUnlock(pClient->pCmdBuffer); return rc; } DECLINLINE(PVBOXUHGSMI_BUFFER) _crVBoxHGSMIRecvBufGet(PCRVBOXHGSMI_CLIENT pClient) { if (pClient->pvHGBuffer) { int rc = pClient->pHGBuffer->pfnUnlock(pClient->pHGBuffer); if (RT_FAILURE(rc)) { return NULL; } pClient->pvHGBuffer = NULL; } return pClient->pHGBuffer; } DECLINLINE(void*) _crVBoxHGSMIRecvBufData(PCRVBOXHGSMI_CLIENT pClient, uint32_t cbBuffer) { VBOXUHGSMI_BUFFER_LOCK_FLAGS fFlags; int rc; Assert(!pClient->pvHGBuffer); fFlags.Value = 0; rc = pClient->pHGBuffer->pfnLock(pClient->pHGBuffer, 0, cbBuffer, fFlags, &pClient->pvHGBuffer); AssertRC(rc); if (RT_SUCCESS(rc)) { return pClient->pvHGBuffer; } return NULL; } DECLINLINE(void) _crVBoxHGSMIFillCmd(VBOXUHGSMI_BUFFER_SUBMIT *pSubm, PCRVBOXHGSMI_CLIENT pClient, uint32_t cbData) { pSubm->pBuf = pClient->pCmdBuffer; pSubm->offData = 0; pSubm->cbData = cbData; pSubm->fFlags.Value = 0; pSubm->fFlags.bDoNotRetire = 1; // pSubm->fFlags.bDoNotSignalCompletion = 1; /* <- we do not need that actually since // * in case we want completion, // * we will block in _crVBoxHGSMICmdBufferGetRc (when locking the buffer) // * which is needed for getting the result */ } #ifdef RT_OS_WINDOWS #define CRVBOXHGSMI_BUF_WAIT(_pBub) WaitForSingleObject((_pBub)->hSynch, INFINITE); #else # error "Port Me!!" #endif DECLINLINE(void) _crVBoxHGSMIWaitCmd(PCRVBOXHGSMI_CLIENT pClient) { int rc = CRVBOXHGSMI_BUF_WAIT(pClient->pCmdBuffer); Assert(rc == 0); } #endif /* Some forward declarations */ static void _crVBoxHGCMReceiveMessage(CRConnection *conn); #ifndef IN_GUEST static bool _crVBoxHGCMReadBytes(CRConnection *conn, void *buf, uint32_t len) { CRASSERT(conn && buf); if (!conn->pBuffer || (conn->cbBufferpBuffer, len); conn->cbBuffer -= len; conn->pBuffer = conn->cbBuffer>0 ? (uint8_t*)conn->pBuffer+len : NULL; return TRUE; } #endif /*@todo get rid of it*/ static bool _crVBoxHGCMWriteBytes(CRConnection *conn, const void *buf, uint32_t len) { CRASSERT(conn && buf); /* make sure there's host buffer and it's clear */ CRASSERT(conn->pHostBuffer && !conn->cbHostBuffer); if (conn->cbHostBufferAllocated < len) { crDebug("Host buffer too small %d out of requested %d bytes, reallocating", conn->cbHostBufferAllocated, len); crFree(conn->pHostBuffer); conn->pHostBuffer = crAlloc(len); if (!conn->pHostBuffer) { conn->cbHostBufferAllocated = 0; crError("OUT_OF_MEMORY trying to allocate %d bytes", len); return FALSE; } conn->cbHostBufferAllocated = len; } crMemcpy(conn->pHostBuffer, buf, len); conn->cbHostBuffer = len; return TRUE; } /** * Send an HGCM request * * @return VBox status code * @param pvData Data pointer * @param cbData Data size */ /** @todo use vbglR3DoIOCtl here instead */ static int crVBoxHGCMCall(void *pvData, unsigned cbData) { #ifdef IN_GUEST # ifdef RT_OS_WINDOWS DWORD cbReturned; if (DeviceIoControl (g_crvboxhgcm.hGuestDrv, VBOXGUEST_IOCTL_HGCM_CALL(cbData), pvData, cbData, pvData, cbData, &cbReturned, NULL)) { return VINF_SUCCESS; } crDebug("vboxCall failed with %x\n", GetLastError()); return VERR_NOT_SUPPORTED; # else int rc; # if defined(RT_OS_SOLARIS) || defined(RT_OS_FREEBSD) VBGLBIGREQ Hdr; Hdr.u32Magic = VBGLBIGREQ_MAGIC; Hdr.cbData = cbData; Hdr.pvDataR3 = pvData; # if HC_ARCH_BITS == 32 Hdr.u32Padding = 0; # endif rc = ioctl(g_crvboxhgcm.iGuestDrv, VBOXGUEST_IOCTL_HGCM_CALL(cbData), &Hdr); # else rc = ioctl(g_crvboxhgcm.iGuestDrv, VBOXGUEST_IOCTL_HGCM_CALL(cbData), pvData); # endif # ifdef RT_OS_LINUX if (rc == 0) # else if (rc >= 0) # endif { return VINF_SUCCESS; } # ifdef RT_OS_LINUX if (rc >= 0) /* positive values are negated VBox error status codes. */ { crWarning("vboxCall failed with VBox status code %d\n", -rc); if (rc==VINF_INTERRUPTED) { RTMSINTERVAL sl; int i; for (i=0, sl=50; i<6; i++, sl=sl*2) { RTThreadSleep(sl); rc = ioctl(g_crvboxhgcm.iGuestDrv, VBOXGUEST_IOCTL_HGCM_CALL(cbData), pvData); if (rc==0) { crWarning("vboxCall retry(%i) succeeded", i+1); return VINF_SUCCESS; } else if (rc==VINF_INTERRUPTED) { continue; } else { crWarning("vboxCall retry(%i) failed with VBox status code %d", i+1, -rc); break; } } } } else # endif crWarning("vboxCall failed with %x\n", errno); return VERR_NOT_SUPPORTED; # endif /*#ifdef RT_OS_WINDOWS*/ #else /*#ifdef IN_GUEST*/ crError("crVBoxHGCMCall called on host side!"); CRASSERT(FALSE); return VERR_NOT_SUPPORTED; #endif } static void *_crVBoxHGCMAlloc(CRConnection *conn) { CRVBOXHGCMBUFFER *buf; #ifdef CHROMIUM_THREADSAFE crLockMutex(&g_crvboxhgcm.mutex); #endif buf = (CRVBOXHGCMBUFFER *) crBufferPoolPop(g_crvboxhgcm.bufpool, conn->buffer_size); if (!buf) { crDebug("Buffer pool %p was empty; allocating new %d byte buffer.", (void *) g_crvboxhgcm.bufpool, (unsigned int)sizeof(CRVBOXHGCMBUFFER) + conn->buffer_size); #if defined(IN_GUEST) && defined(RT_OS_WINDOWS) /* Try to start DDRAW on guest side */ if (!g_crvboxhgcm.pDirectDraw && 0) { HRESULT hr; hr = DirectDrawCreate(NULL, &g_crvboxhgcm.pDirectDraw, NULL); if (hr != DD_OK) { crWarning("Failed to create DirectDraw interface (%x)\n", hr); g_crvboxhgcm.pDirectDraw = NULL; } else { hr = IDirectDraw_SetCooperativeLevel(g_crvboxhgcm.pDirectDraw, NULL, DDSCL_NORMAL); if (hr != DD_OK) { crWarning("Failed to SetCooperativeLevel (%x)\n", hr); IDirectDraw_Release(g_crvboxhgcm.pDirectDraw); g_crvboxhgcm.pDirectDraw = NULL; } crDebug("Created DirectDraw and set CooperativeLevel successfully\n"); } } /* Try to allocate buffer via DDRAW */ if (g_crvboxhgcm.pDirectDraw) { DDSURFACEDESC ddsd; HRESULT hr; LPDIRECTDRAWSURFACE lpDDS; memset(&ddsd, 0, sizeof(ddsd)); ddsd.dwSize = sizeof(ddsd); /* @todo DDSCAPS_VIDEOMEMORY ain't working for some reason * also, it would be better to request dwLinearSize but it fails too * ddsd.dwLinearSize = sizeof(CRVBOXHGCMBUFFER) + conn->buffer_size; */ ddsd.dwFlags = DDSD_CAPS | DDSD_PIXELFORMAT | DDSD_WIDTH | DDSD_HEIGHT; ddsd.ddsCaps.dwCaps = DDSCAPS_OFFSCREENPLAIN; /* use 1 byte per pixel format */ ddsd.ddpfPixelFormat.dwSize = sizeof(ddsd.ddpfPixelFormat); ddsd.ddpfPixelFormat.dwFlags = DDPF_RGB; ddsd.ddpfPixelFormat.dwRGBBitCount = 8; ddsd.ddpfPixelFormat.dwRBitMask = 0xFF; ddsd.ddpfPixelFormat.dwGBitMask = 0; ddsd.ddpfPixelFormat.dwBBitMask = 0; /* request given buffer size, rounded to 1k */ ddsd.dwWidth = 1024; ddsd.dwHeight = (sizeof(CRVBOXHGCMBUFFER) + conn->buffer_size + ddsd.dwWidth-1)/ddsd.dwWidth; hr = IDirectDraw_CreateSurface(g_crvboxhgcm.pDirectDraw, &ddsd, &lpDDS, NULL); if (hr != DD_OK) { crWarning("Failed to create DirectDraw surface (%x)\n", hr); } else { crDebug("Created DirectDraw surface (%x)\n", lpDDS); hr = IDirectDrawSurface_Lock(lpDDS, NULL, &ddsd, DDLOCK_SURFACEMEMORYPTR, NULL); if (hr != DD_OK) { crWarning("Failed to lock DirectDraw surface (%x)\n", hr); IDirectDrawSurface_Release(lpDDS); } else { uint32_t cbLocked; cbLocked = (ddsd.dwFlags & DDSD_LINEARSIZE) ? ddsd.dwLinearSize : ddsd.lPitch*ddsd.dwHeight; crDebug("Locked %d bytes DirectDraw surface\n", cbLocked); buf = (CRVBOXHGCMBUFFER *) ddsd.lpSurface; CRASSERT(buf); buf->magic = CR_VBOXHGCM_BUFFER_MAGIC; buf->kind = CR_VBOXHGCM_DDRAW_SURFACE; buf->allocated = cbLocked; buf->pDDS = lpDDS; } } } #endif /* We're either on host side, or we failed to allocate DDRAW buffer */ if (!buf) { crDebug("Using system malloc\n"); buf = (CRVBOXHGCMBUFFER *) crAlloc( sizeof(CRVBOXHGCMBUFFER) + conn->buffer_size ); CRASSERT(buf); buf->magic = CR_VBOXHGCM_BUFFER_MAGIC; buf->kind = CR_VBOXHGCM_MEMORY; buf->allocated = conn->buffer_size; #ifdef RT_OS_WINDOWS buf->pDDS = NULL; #endif } } #ifdef CHROMIUM_THREADSAFE crUnlockMutex(&g_crvboxhgcm.mutex); #endif return (void *)( buf + 1 ); } static void *crVBoxHGCMAlloc(CRConnection *conn) { void *pvBuff; VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); pvBuff = _crVBoxHGCMAlloc(conn); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return pvBuff; } static void _crVBoxHGCMWriteExact(CRConnection *conn, const void *buf, unsigned int len) { int rc; int32_t callRes; #ifdef IN_GUEST if (conn->u32InjectClientID) { CRVBOXHGCMINJECT parms; parms.hdr.result = VERR_WRONG_ORDER; parms.hdr.u32ClientID = conn->u32ClientID; parms.hdr.u32Function = SHCRGL_GUEST_FN_INJECT; parms.hdr.cParms = SHCRGL_CPARMS_INJECT; parms.u32ClientID.type = VMMDevHGCMParmType_32bit; parms.u32ClientID.u.value32 = conn->u32InjectClientID; parms.pBuffer.type = VMMDevHGCMParmType_LinAddr_In; parms.pBuffer.u.Pointer.size = len; parms.pBuffer.u.Pointer.u.linearAddr = (uintptr_t) buf; rc = crVBoxHGCMCall(&parms, sizeof(parms)); callRes = parms.hdr.result; } else #endif { CRVBOXHGCMWRITE parms; parms.hdr.result = VERR_WRONG_ORDER; parms.hdr.u32ClientID = conn->u32ClientID; parms.hdr.u32Function = SHCRGL_GUEST_FN_WRITE; parms.hdr.cParms = SHCRGL_CPARMS_WRITE; parms.pBuffer.type = VMMDevHGCMParmType_LinAddr_In; parms.pBuffer.u.Pointer.size = len; parms.pBuffer.u.Pointer.u.linearAddr = (uintptr_t) buf; rc = crVBoxHGCMCall(&parms, sizeof(parms)); callRes = parms.hdr.result; } if (RT_FAILURE(rc) || RT_FAILURE(callRes)) { crWarning("SHCRGL_GUEST_FN_WRITE failed with %x %x\n", rc, callRes); } } static void crVBoxHGCMWriteExact(CRConnection *conn, const void *buf, unsigned int len) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); _crVBoxHGCMWriteExact(conn, buf, len); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static void crVBoxHGCMReadExact( CRConnection *conn, const void *buf, unsigned int len ) { CRVBOXHGCMREAD parms; int rc; parms.hdr.result = VERR_WRONG_ORDER; parms.hdr.u32ClientID = conn->u32ClientID; parms.hdr.u32Function = SHCRGL_GUEST_FN_READ; parms.hdr.cParms = SHCRGL_CPARMS_READ; CRASSERT(!conn->pBuffer); //make sure there's no data to process parms.pBuffer.type = VMMDevHGCMParmType_LinAddr_Out; parms.pBuffer.u.Pointer.size = conn->cbHostBufferAllocated; parms.pBuffer.u.Pointer.u.linearAddr = (uintptr_t) conn->pHostBuffer; parms.cbBuffer.type = VMMDevHGCMParmType_32bit; parms.cbBuffer.u.value32 = 0; rc = crVBoxHGCMCall(&parms, sizeof(parms)); if (RT_FAILURE(rc) || RT_FAILURE(parms.hdr.result)) { crWarning("SHCRGL_GUEST_FN_READ failed with %x %x\n", rc, parms.hdr.result); return; } if (parms.cbBuffer.u.value32) { //conn->pBuffer = (uint8_t*) parms.pBuffer.u.Pointer.u.linearAddr; conn->pBuffer = conn->pHostBuffer; conn->cbBuffer = parms.cbBuffer.u.value32; } if (conn->cbBuffer) _crVBoxHGCMReceiveMessage(conn); } /* Same as crVBoxHGCMWriteExact, but combined with read of writeback data. * This halves the number of HGCM calls we do, * most likely crVBoxHGCMPollHost shouldn't be called at all now. */ static void crVBoxHGCMWriteReadExact(CRConnection *conn, const void *buf, unsigned int len, CRVBOXHGCMBUFFERKIND bufferKind) { CRVBOXHGCMWRITEREAD parms; int rc; parms.hdr.result = VERR_WRONG_ORDER; parms.hdr.u32ClientID = conn->u32ClientID; parms.hdr.u32Function = SHCRGL_GUEST_FN_WRITE_READ; parms.hdr.cParms = SHCRGL_CPARMS_WRITE_READ; //if (bufferKind != CR_VBOXHGCM_DDRAW_SURFACE) { parms.pBuffer.type = VMMDevHGCMParmType_LinAddr_In; parms.pBuffer.u.Pointer.size = len; parms.pBuffer.u.Pointer.u.linearAddr = (uintptr_t) buf; } /*else ///@todo it fails badly, have to check why. bird: This fails because buf isn't a physical address? { parms.pBuffer.type = VMMDevHGCMParmType_PhysAddr; parms.pBuffer.u.Pointer.size = len; parms.pBuffer.u.Pointer.u.physAddr = (uintptr_t) buf; }*/ CRASSERT(!conn->pBuffer); //make sure there's no data to process parms.pWriteback.type = VMMDevHGCMParmType_LinAddr_Out; parms.pWriteback.u.Pointer.size = conn->cbHostBufferAllocated; parms.pWriteback.u.Pointer.u.linearAddr = (uintptr_t) conn->pHostBuffer; parms.cbWriteback.type = VMMDevHGCMParmType_32bit; parms.cbWriteback.u.value32 = 0; rc = crVBoxHGCMCall(&parms, sizeof(parms)); if (RT_FAILURE(rc) || RT_FAILURE(parms.hdr.result)) { if ((VERR_BUFFER_OVERFLOW == parms.hdr.result) && RT_SUCCESS(rc)) { /* reallocate buffer and retry */ CRASSERT(parms.cbWriteback.u.value32>conn->cbHostBufferAllocated); crDebug("Reallocating host buffer from %d to %d bytes", conn->cbHostBufferAllocated, parms.cbWriteback.u.value32); crFree(conn->pHostBuffer); conn->cbHostBufferAllocated = parms.cbWriteback.u.value32; conn->pHostBuffer = crAlloc(conn->cbHostBufferAllocated); crVBoxHGCMReadExact(conn, buf, len); return; } else { crWarning("SHCRGL_GUEST_FN_WRITE_READ (%i) failed with %x %x\n", len, rc, parms.hdr.result); return; } } if (parms.cbWriteback.u.value32) { //conn->pBuffer = (uint8_t*) parms.pWriteback.u.Pointer.u.linearAddr; conn->pBuffer = conn->pHostBuffer; conn->cbBuffer = parms.cbWriteback.u.value32; } if (conn->cbBuffer) _crVBoxHGCMReceiveMessage(conn); } static void crVBoxHGCMSend(CRConnection *conn, void **bufp, const void *start, unsigned int len) { CRVBOXHGCMBUFFER *hgcm_buffer; VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); if (!bufp) /* We're sending a user-allocated buffer. */ { #ifndef IN_GUEST //@todo remove temp buffer allocation in unpacker /* we're at the host side, so just store data until guest polls us */ _crVBoxHGCMWriteBytes(conn, start, len); #else CRASSERT(!conn->u32InjectClientID); crDebug("SHCRGL: sending userbuf with %d bytes\n", len); crVBoxHGCMWriteReadExact(conn, start, len, CR_VBOXHGCM_USERALLOCATED); #endif VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return; } /* The region [start .. start + len + 1] lies within a buffer that * was allocated with crVBoxHGCMAlloc() and can be put into the free * buffer pool when we're done sending it. */ hgcm_buffer = (CRVBOXHGCMBUFFER *)(*bufp) - 1; CRASSERT(hgcm_buffer->magic == CR_VBOXHGCM_BUFFER_MAGIC); /* Length would be passed as part of HGCM pointer description * No need to prepend it to the buffer */ #ifdef IN_GUEST if (conn->u32InjectClientID) { _crVBoxHGCMWriteExact(conn, start, len); } else #endif crVBoxHGCMWriteReadExact(conn, start, len, hgcm_buffer->kind); /* Reclaim this pointer for reuse */ #ifdef CHROMIUM_THREADSAFE crLockMutex(&g_crvboxhgcm.mutex); #endif crBufferPoolPush(g_crvboxhgcm.bufpool, hgcm_buffer, hgcm_buffer->allocated); #ifdef CHROMIUM_THREADSAFE crUnlockMutex(&g_crvboxhgcm.mutex); #endif /* Since the buffer's now in the 'free' buffer pool, the caller can't * use it any more. Setting bufp to NULL will make sure the caller * doesn't try to re-use the buffer. */ *bufp = NULL; VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static void crVBoxHGCMPollHost(CRConnection *conn) { CRVBOXHGCMREAD parms; int rc; CRASSERT(!conn->pBuffer); parms.hdr.result = VERR_WRONG_ORDER; parms.hdr.u32ClientID = conn->u32ClientID; parms.hdr.u32Function = SHCRGL_GUEST_FN_READ; parms.hdr.cParms = SHCRGL_CPARMS_READ; parms.pBuffer.type = VMMDevHGCMParmType_LinAddr_Out; parms.pBuffer.u.Pointer.size = conn->cbHostBufferAllocated; parms.pBuffer.u.Pointer.u.linearAddr = (uintptr_t) conn->pHostBuffer; parms.cbBuffer.type = VMMDevHGCMParmType_32bit; parms.cbBuffer.u.value32 = 0; rc = crVBoxHGCMCall(&parms, sizeof(parms)); if (RT_FAILURE(rc) || RT_FAILURE(parms.hdr.result)) { crDebug("SHCRGL_GUEST_FN_READ failed with %x %x\n", rc, parms.hdr.result); return; } if (parms.cbBuffer.u.value32) { conn->pBuffer = (uint8_t*) parms.pBuffer.u.Pointer.u.linearAddr; conn->cbBuffer = parms.cbBuffer.u.value32; } } static void crVBoxHGCMSingleRecv(CRConnection *conn, void *buf, unsigned int len) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); crVBoxHGCMReadExact(conn, buf, len); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static void _crVBoxHGCMFree(CRConnection *conn, void *buf) { CRVBOXHGCMBUFFER *hgcm_buffer = (CRVBOXHGCMBUFFER *) buf - 1; CRASSERT(hgcm_buffer->magic == CR_VBOXHGCM_BUFFER_MAGIC); /*@todo wrong len for redir buffers*/ conn->recv_credits += hgcm_buffer->len; switch (hgcm_buffer->kind) { case CR_VBOXHGCM_MEMORY: #ifdef RT_OS_WINDOWS case CR_VBOXHGCM_DDRAW_SURFACE: #endif #ifdef CHROMIUM_THREADSAFE crLockMutex(&g_crvboxhgcm.mutex); #endif if (g_crvboxhgcm.bufpool) { //@todo o'rly? /* pool may have been deallocated just a bit earlier in response * to a SIGPIPE (Broken Pipe) signal. */ crBufferPoolPush(g_crvboxhgcm.bufpool, hgcm_buffer, hgcm_buffer->allocated); } #ifdef CHROMIUM_THREADSAFE crUnlockMutex(&g_crvboxhgcm.mutex); #endif break; case CR_VBOXHGCM_MEMORY_BIG: crFree( hgcm_buffer ); break; default: crError( "Weird buffer kind trying to free in crVBoxHGCMFree: %d", hgcm_buffer->kind ); } } static void crVBoxHGCMFree(CRConnection *conn, void *buf) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); _crVBoxHGCMFree(conn, buf); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static void _crVBoxHGCMReceiveMessage(CRConnection *conn) { uint32_t len; CRVBOXHGCMBUFFER *hgcm_buffer; CRMessage *msg; CRMessageType cached_type; len = conn->cbBuffer; CRASSERT(len > 0); CRASSERT(conn->pBuffer); #ifndef IN_GUEST if (conn->allow_redir_ptr) { #endif //IN_GUEST CRASSERT(conn->buffer_size >= sizeof(CRMessageRedirPtr)); hgcm_buffer = (CRVBOXHGCMBUFFER *) _crVBoxHGCMAlloc( conn ) - 1; hgcm_buffer->len = sizeof(CRMessageRedirPtr); msg = (CRMessage *) (hgcm_buffer + 1); msg->header.type = CR_MESSAGE_REDIR_PTR; msg->redirptr.pMessage = (CRMessageHeader*) (conn->pBuffer); msg->header.conn_id = msg->redirptr.pMessage->conn_id; cached_type = msg->redirptr.pMessage->type; conn->cbBuffer = 0; conn->pBuffer = NULL; #ifndef IN_GUEST } else { if ( len <= conn->buffer_size ) { /* put in pre-allocated buffer */ hgcm_buffer = (CRVBOXHGCMBUFFER *) _crVBoxHGCMAlloc( conn ) - 1; } else { /* allocate new buffer, * not using pool here as it's most likely one time transfer of huge texture */ hgcm_buffer = (CRVBOXHGCMBUFFER *) crAlloc( sizeof(CRVBOXHGCMBUFFER) + len ); hgcm_buffer->magic = CR_VBOXHGCM_BUFFER_MAGIC; hgcm_buffer->kind = CR_VBOXHGCM_MEMORY_BIG; hgcm_buffer->allocated = sizeof(CRVBOXHGCMBUFFER) + len; # ifdef RT_OS_WINDOWS hgcm_buffer->pDDS = NULL; # endif } hgcm_buffer->len = len; _crVBoxHGCMReadBytes(conn, hgcm_buffer + 1, len); msg = (CRMessage *) (hgcm_buffer + 1); cached_type = msg->header.type; } #endif //IN_GUEST conn->recv_credits -= len; conn->total_bytes_recv += len; conn->recv_count++; crNetDispatchMessage( g_crvboxhgcm.recv_list, conn, msg, len ); /* CR_MESSAGE_OPCODES is freed in crserverlib/server_stream.c with crNetFree. * OOB messages are the programmer's problem. -- Humper 12/17/01 */ if (cached_type != CR_MESSAGE_OPCODES && cached_type != CR_MESSAGE_OOB && cached_type != CR_MESSAGE_GATHER) { _crVBoxHGCMFree(conn, msg); } } static void crVBoxHGCMReceiveMessage(CRConnection *conn) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); _crVBoxHGCMReceiveMessage(conn); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } /* * Called on host side only, to "accept" client connection */ static void crVBoxHGCMAccept( CRConnection *conn, const char *hostname, unsigned short port ) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); CRASSERT(conn && conn->pHostBuffer); #ifdef IN_GUEST CRASSERT(FALSE); #endif VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static int crVBoxHGCMSetVersion(CRConnection *conn, unsigned int vMajor, unsigned int vMinor) { CRVBOXHGCMSETVERSION parms; int rc; parms.hdr.result = VERR_WRONG_ORDER; parms.hdr.u32ClientID = conn->u32ClientID; parms.hdr.u32Function = SHCRGL_GUEST_FN_SET_VERSION; parms.hdr.cParms = SHCRGL_CPARMS_SET_VERSION; parms.vMajor.type = VMMDevHGCMParmType_32bit; parms.vMajor.u.value32 = CR_PROTOCOL_VERSION_MAJOR; parms.vMinor.type = VMMDevHGCMParmType_32bit; parms.vMinor.u.value32 = CR_PROTOCOL_VERSION_MINOR; rc = crVBoxHGCMCall(&parms, sizeof(parms)); if (RT_FAILURE(rc) || RT_FAILURE(parms.hdr.result)) { crWarning("Host doesn't accept our version %d.%d. Make sure you have appropriate additions installed!", parms.vMajor.u.value32, parms.vMinor.u.value32); return FALSE; } conn->vMajor = CR_PROTOCOL_VERSION_MAJOR; conn->vMinor = CR_PROTOCOL_VERSION_MINOR; return TRUE; } /** * The function that actually connects. This should only be called by clients, * guests in vbox case. * Servers go through crVBoxHGCMAccept; */ /*@todo use vbglR3Something here */ static int crVBoxHGCMDoConnect( CRConnection *conn ) { #ifdef IN_GUEST VBoxGuestHGCMConnectInfo info; #ifdef RT_OS_WINDOWS DWORD cbReturned; VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); if (g_crvboxhgcm.hGuestDrv == INVALID_HANDLE_VALUE) { /* open VBox guest driver */ g_crvboxhgcm.hGuestDrv = CreateFile(VBOXGUEST_DEVICE_NAME, GENERIC_READ | GENERIC_WRITE, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); /* @todo check if we could rollback to softwareopengl */ if (g_crvboxhgcm.hGuestDrv == INVALID_HANDLE_VALUE) { crDebug("could not open VBox Guest Additions driver! rc = %d\n", GetLastError()); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return FALSE; } } #else VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); if (g_crvboxhgcm.iGuestDrv == INVALID_HANDLE_VALUE) { g_crvboxhgcm.iGuestDrv = open(VBOXGUEST_USER_DEVICE_NAME, O_RDWR, 0); if (g_crvboxhgcm.iGuestDrv == INVALID_HANDLE_VALUE) { crDebug("could not open Guest Additions kernel module! rc = %d\n", errno); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return FALSE; } } #endif memset (&info, 0, sizeof (info)); info.Loc.type = VMMDevHGCMLoc_LocalHost_Existing; strcpy (info.Loc.u.host.achName, "VBoxSharedCrOpenGL"); #ifdef RT_OS_WINDOWS if (DeviceIoControl(g_crvboxhgcm.hGuestDrv, VBOXGUEST_IOCTL_HGCM_CONNECT, &info, sizeof (info), &info, sizeof (info), &cbReturned, NULL)) #elif defined(RT_OS_SOLARIS) || defined(RT_OS_FREEBSD) VBGLBIGREQ Hdr; Hdr.u32Magic = VBGLBIGREQ_MAGIC; Hdr.cbData = sizeof(info); Hdr.pvDataR3 = &info; # if HC_ARCH_BITS == 32 Hdr.u32Padding = 0; # endif if (ioctl(g_crvboxhgcm.iGuestDrv, VBOXGUEST_IOCTL_HGCM_CONNECT, &Hdr) >= 0) #else /*@todo it'd fail */ if (ioctl(g_crvboxhgcm.iGuestDrv, VBOXGUEST_IOCTL_HGCM_CONNECT, &info, sizeof (info)) >= 0) #endif { if (info.result == VINF_SUCCESS) { conn->u32ClientID = info.u32ClientID; crDebug("HGCM connect was successful: client id =0x%x\n", conn->u32ClientID); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return crVBoxHGCMSetVersion(conn, CR_PROTOCOL_VERSION_MAJOR, CR_PROTOCOL_VERSION_MINOR); } else { crDebug("HGCM connect failed with rc=0x%x\n", info.result); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return FALSE; } } else { #ifdef RT_OS_WINDOWS crDebug("IOCTL for HGCM connect failed with rc=0x%x\n", GetLastError()); #else crDebug("IOCTL for HGCM connect failed with rc=0x%x\n", errno); #endif VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return FALSE; } VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return TRUE; #else /*#ifdef IN_GUEST*/ crError("crVBoxHGCMDoConnect called on host side!"); CRASSERT(FALSE); return FALSE; #endif } /*@todo same, replace DeviceIoControl with vbglR3DoIOCtl */ static void crVBoxHGCMDoDisconnect( CRConnection *conn ) { #ifdef IN_GUEST VBoxGuestHGCMDisconnectInfo info; # ifdef RT_OS_WINDOWS DWORD cbReturned; # endif int i; #endif VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); if (conn->pHostBuffer) { crFree(conn->pHostBuffer); conn->pHostBuffer = NULL; conn->cbHostBuffer = 0; conn->cbHostBufferAllocated = 0; } conn->pBuffer = NULL; conn->cbBuffer = 0; //@todo hold lock here? if (conn->type == CR_VBOXHGCM) { --g_crvboxhgcm.num_conns; if (conn->index < g_crvboxhgcm.num_conns) { g_crvboxhgcm.conns[conn->index] = g_crvboxhgcm.conns[g_crvboxhgcm.num_conns]; g_crvboxhgcm.conns[conn->index]->index = conn->index; } else g_crvboxhgcm.conns[conn->index] = NULL; conn->type = CR_NO_CONNECTION; } #ifndef IN_GUEST #else /* IN_GUEST */ if (conn->u32ClientID) { memset (&info, 0, sizeof (info)); info.u32ClientID = conn->u32ClientID; # ifdef RT_OS_WINDOWS if ( !DeviceIoControl(g_crvboxhgcm.hGuestDrv, VBOXGUEST_IOCTL_HGCM_DISCONNECT, &info, sizeof (info), &info, sizeof (info), &cbReturned, NULL) ) { crDebug("Disconnect failed with %x\n", GetLastError()); } # elif defined(RT_OS_SOLARIS) || defined(RT_OS_FREEBSD) VBGLBIGREQ Hdr; Hdr.u32Magic = VBGLBIGREQ_MAGIC; Hdr.cbData = sizeof(info); Hdr.pvDataR3 = &info; # if HC_ARCH_BITS == 32 Hdr.u32Padding = 0; # endif if (ioctl(g_crvboxhgcm.iGuestDrv, VBOXGUEST_IOCTL_HGCM_DISCONNECT, &Hdr) >= 0) # else if (ioctl(g_crvboxhgcm.iGuestDrv, VBOXGUEST_IOCTL_HGCM_DISCONNECT, &info, sizeof (info)) < 0) { crDebug("Disconnect failed with %x\n", errno); } # endif conn->u32ClientID = 0; } /* see if any connections remain */ for (i = 0; i < g_crvboxhgcm.num_conns; i++) if (g_crvboxhgcm.conns[i] && g_crvboxhgcm.conns[i]->type != CR_NO_CONNECTION) break; /* close guest additions driver*/ if (i>=g_crvboxhgcm.num_conns) { # ifdef RT_OS_WINDOWS CloseHandle(g_crvboxhgcm.hGuestDrv); g_crvboxhgcm.hGuestDrv = INVALID_HANDLE_VALUE; # else close(g_crvboxhgcm.iGuestDrv); g_crvboxhgcm.iGuestDrv = INVALID_HANDLE_VALUE; # endif } #endif /* IN_GUEST */ VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static void crVBoxHGCMInstantReclaim(CRConnection *conn, CRMessage *mess) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); _crVBoxHGCMFree(conn, mess); CRASSERT(FALSE); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static void crVBoxHGCMHandleNewMessage( CRConnection *conn, CRMessage *msg, unsigned int len ) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); CRASSERT(FALSE); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } #if defined(VBOX_WITH_CRHGSMI) && defined(IN_GUEST) DECLCALLBACK(HVBOXCRHGSMI_CLIENT) _crVBoxHGSMIClientCreate(PVBOXUHGSMI pHgsmi) { PCRVBOXHGSMI_CLIENT pClient = crAlloc(sizeof (CRVBOXHGSMI_CLIENT)); if (pClient) { int rc; pClient->pHgsmi = pHgsmi; rc = pHgsmi->pfnBufferCreate(pHgsmi, CRVBOXHGSMI_PAGE_ALIGN(1), VBOXUHGSMI_SYNCHOBJECT_TYPE_EVENT, NULL, &pClient->pCmdBuffer); AssertRC(rc); if (RT_SUCCESS(rc)) { rc = pHgsmi->pfnBufferCreate(pHgsmi, CRVBOXHGSMI_PAGE_ALIGN(0x800000), VBOXUHGSMI_SYNCHOBJECT_TYPE_EVENT, NULL, &pClient->pHGBuffer); AssertRC(rc); if (RT_SUCCESS(rc)) { pClient->pvHGBuffer = NULL; pClient->bufpool = crBufferPoolInit(16); return (HVBOXCRHGSMI_CLIENT) pClient; } } } return NULL; } DECLCALLBACK(void) _crVBoxHGSMIClientDestroy(HVBOXCRHGSMI_CLIENT hClient) { Assert(0); /* @todo */ } bool _crVBoxHGSMIInit() { int bHasHGSMI = -1; if (bHasHGSMI < 0) { int rc; VBOXCRHGSMI_CALLBACKS Callbacks; Callbacks.pfnClientCreate = _crVBoxHGSMIClientCreate; Callbacks.pfnClientDestroy = _crVBoxHGSMIClientDestroy; rc = VBoxCrHgsmiInit(&Callbacks); AssertRC(rc); if (RT_SUCCESS(rc)) bHasHGSMI = 1; else bHasHGSMI = 0; } Assert(bHasHGSMI); return bHasHGSMI; } void _crVBoxHGSMITearDown() { VBoxCrHgsmiTerm(); } static void *_crVBoxHGSMIDoAlloc(CRConnection *conn, PCRVBOXHGSMI_CLIENT pClient) { PVBOXUHGSMI_BUFFER buf; CRVBOXHGCMBUFFER *pData = NULL; uint32_t cbSize = conn->buffer_size; int rc; buf = _crVBoxHGSMIBufAlloc(pClient, CRVBOXHGSMI_BUF_SIZE(cbSize)); Assert(buf); if (buf) { VBOXUHGSMI_BUFFER_LOCK_FLAGS fFlags; buf->pvUserData = pClient; fFlags.Value = 0; fFlags.bDiscard = 1; rc = buf->pfnLock(buf, 0, CRVBOXHGSMI_BUF_LOCK_SIZE(cbSize), fFlags, (void**)&pData); if (RT_SUCCESS(rc)) { pData->magic = CR_VBOXHGCM_BUFFER_MAGIC; pData->kind = CR_VBOXHGCM_UHGSMI_BUFFER; pData->pBuffer = buf; } else { crWarning("Failed to Lock the buffer, rc(%d)\n", rc); } return CRVBOXHGSMI_BUF_DATA(pData); } /* fall back */ return _crVBoxHGCMAlloc(conn); } static void _crVBoxHGSMIFree(CRConnection *conn, void *buf) { CRVBOXHGCMBUFFER *hgcm_buffer = (CRVBOXHGCMBUFFER *) buf - 1; CRASSERT(hgcm_buffer->magic == CR_VBOXHGCM_BUFFER_MAGIC); if (hgcm_buffer->kind == CR_VBOXHGCM_UHGSMI_BUFFER) { PVBOXUHGSMI_BUFFER pBuf = _crVBoxHGSMIBufFromHdr(hgcm_buffer); PCRVBOXHGSMI_CLIENT pClient = (PCRVBOXHGSMI_CLIENT)pBuf->pvUserData; pBuf->pfnUnlock(pBuf); _crVBoxHGSMIBufFree(pClient, pBuf); } else { _crVBoxHGCMFree(conn, buf); } } static void *crVBoxHGSMIAlloc(CRConnection *conn) { PCRVBOXHGSMI_CLIENT pClient; void *pvBuf; VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); pClient = _crVBoxHGSMIClientGet(conn); if (pClient) { pvBuf = _crVBoxHGSMIDoAlloc(conn, pClient); Assert(pvBuf); } else { pvBuf = _crVBoxHGCMAlloc(conn); } VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return pvBuf; } static void crVBoxHGSMIFree(CRConnection *conn, void *buf) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); _crVBoxHGSMIFree(conn, buf); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static void _crVBoxHGSMIPollHost(CRConnection *conn, PCRVBOXHGSMI_CLIENT pClient) { CRVBOXHGSMIREAD *parms = (CRVBOXHGSMIREAD *)_crVBoxHGSMICmdBufferLock(pClient, sizeof (*parms)); int rc; VBOXUHGSMI_BUFFER_SUBMIT aSubmit[2]; PVBOXUHGSMI_BUFFER pRecvBuffer; uint32_t cbBuffer; Assert(parms); parms->hdr.result = VERR_WRONG_ORDER; parms->hdr.u32ClientID = conn->u32ClientID; parms->hdr.u32Function = SHCRGL_GUEST_FN_READ; // parms->hdr.u32Reserved = 0; CRASSERT(!conn->pBuffer); //make sure there's no data to process parms->iBuffer = 1; parms->cbBuffer = 0; _crVBoxHGSMICmdBufferUnlock(pClient); pRecvBuffer = _crVBoxHGSMIRecvBufGet(pClient); Assert(pRecvBuffer); if (!pRecvBuffer) return; _crVBoxHGSMIFillCmd(&aSubmit[0], pClient, sizeof (*parms)); aSubmit[1].pBuf = pRecvBuffer; aSubmit[1].offData = 0; aSubmit[1].cbData = pRecvBuffer->cbBuffer; aSubmit[1].fFlags.Value = 0; aSubmit[1].fFlags.bHostWriteOnly = 1; rc = pClient->pHgsmi->pfnBufferSubmitAsynch(pClient->pHgsmi, aSubmit, 2); AssertRC(rc); if (RT_FAILURE(rc)) { crWarning("pfnBufferSubmitAsynch failed with %d \n", rc); return; } _crVBoxHGSMIWaitCmd(pClient); parms = (CRVBOXHGSMIREAD *)_crVBoxHGSMICmdBufferLockRo(pClient, sizeof (*parms)); Assert(parms); if (!parms) { crWarning("_crVBoxHGSMICmdBufferLockRo failed\n"); return; } if (RT_SUCCESS(parms->hdr.result)) cbBuffer = parms->cbBuffer; else cbBuffer = 0; _crVBoxHGSMICmdBufferUnlock(pClient); if (cbBuffer) { void *pvData = _crVBoxHGSMIRecvBufData(pClient, cbBuffer); Assert(pvData); if (pvData) { conn->pBuffer = pvData; conn->cbBuffer = cbBuffer; } } } static void _crVBoxHGSMIReadExact(CRConnection *conn, PCRVBOXHGSMI_CLIENT pClient) { _crVBoxHGSMIPollHost(conn, pClient); if (conn->cbBuffer) _crVBoxHGCMReceiveMessage(conn); } /* Same as crVBoxHGCMWriteExact, but combined with read of writeback data. * This halves the number of HGCM calls we do, * most likely crVBoxHGCMPollHost shouldn't be called at all now. */ static void _crVBoxHGSMIWriteReadExact(CRConnection *conn, PCRVBOXHGSMI_CLIENT pClient, void *buf, uint32_t offBuffer, unsigned int len, bool bIsBuffer) { CRVBOXHGSMIWRITEREAD *parms = (CRVBOXHGSMIWRITEREAD*)_crVBoxHGSMICmdBufferLock(pClient, sizeof (*parms)); int rc; VBOXUHGSMI_BUFFER_SUBMIT aSubmit[3]; PVBOXUHGSMI_BUFFER pBuf = NULL; VBOXUHGSMI_BUFFER_LOCK_FLAGS fFlags; // uint32_t cbBuffer; parms->hdr.result = VERR_WRONG_ORDER; parms->hdr.u32ClientID = conn->u32ClientID; parms->hdr.u32Function = SHCRGL_GUEST_FN_WRITE_READ; // parms->hdr.u32Reserved = 0; parms->iBuffer = 1; CRASSERT(!conn->pBuffer); //make sure there's no data to process parms->iWriteback = 2; parms->cbWriteback = 0; _crVBoxHGSMICmdBufferUnlock(pClient); if (!bIsBuffer) { void *pvBuf; pBuf = _crVBoxHGSMIBufAlloc(pClient, len); Assert(pBuf); if (!pBuf) { /* fallback */ crVBoxHGCMWriteReadExact(conn, buf, len, CR_VBOXHGCM_USERALLOCATED); return; } Assert(!offBuffer); offBuffer = 0; fFlags.Value = 0; fFlags.bDiscard = 1; fFlags.bWriteOnly = 1; rc = pBuf->pfnLock(pBuf, 0, len, fFlags, &pvBuf); AssertRC(rc); if (RT_SUCCESS(rc)) { memcpy(pvBuf, buf, len); rc = pBuf->pfnUnlock(pBuf); AssertRC(rc); CRASSERT(RT_SUCCESS(rc)); } else { _crVBoxHGSMIBufFree(pClient, pBuf); /* fallback */ crVBoxHGCMWriteReadExact(conn, buf, len, CR_VBOXHGCM_USERALLOCATED); return; } } else { pBuf = (PVBOXUHGSMI_BUFFER)buf; } do { PVBOXUHGSMI_BUFFER pRecvBuffer = _crVBoxHGSMIRecvBufGet(pClient); Assert(pRecvBuffer); if (!pRecvBuffer) { break; } _crVBoxHGSMIFillCmd(&aSubmit[0], pClient, sizeof (*parms)); aSubmit[1].pBuf = pBuf; aSubmit[1].offData = offBuffer; aSubmit[1].cbData = len; aSubmit[1].fFlags.Value = 0; aSubmit[1].fFlags.bHostReadOnly = 1; aSubmit[2].pBuf = pRecvBuffer; aSubmit[2].offData = 0; aSubmit[2].cbData = pRecvBuffer->cbBuffer; aSubmit[2].fFlags.Value = 0; rc = pClient->pHgsmi->pfnBufferSubmitAsynch(pClient->pHgsmi, aSubmit, 3); AssertRC(rc); if (RT_FAILURE(rc)) { crWarning("pfnBufferSubmitAsynch failed with %d \n", rc); break; } _crVBoxHGSMIWaitCmd(pClient); parms = (CRVBOXHGSMIWRITEREAD *)_crVBoxHGSMICmdBufferLockRo(pClient, sizeof (*parms)); Assert(parms); if (parms) { uint32_t cbWriteback = parms->cbWriteback; rc = parms->hdr.result; _crVBoxHGSMICmdBufferUnlock(pClient); #ifdef DEBUG parms = NULL; #endif if (RT_SUCCESS(rc)) { if (cbWriteback) { void *pvData = _crVBoxHGSMIRecvBufData(pClient, cbWriteback); Assert(pvData); if (pvData) { conn->pBuffer = pvData; conn->cbBuffer = cbWriteback; _crVBoxHGCMReceiveMessage(conn); } } } else if (VERR_BUFFER_OVERFLOW == rc) { PVBOXUHGSMI_BUFFER pOldBuf = pClient->pHGBuffer; Assert(!pClient->pvHGBuffer); CRASSERT(cbWriteback>pClient->pHGBuffer->cbBuffer); crDebug("Reallocating host buffer from %d to %d bytes", conn->cbHostBufferAllocated, cbWriteback); rc = pClient->pHgsmi->pfnBufferCreate(pClient->pHgsmi, CRVBOXHGSMI_PAGE_ALIGN(cbWriteback), VBOXUHGSMI_SYNCHOBJECT_TYPE_NONE, NULL, &pClient->pHGBuffer); AssertRC(rc); CRASSERT(RT_SUCCESS(rc)); if (RT_SUCCESS(rc)) { rc = pOldBuf->pfnDestroy(pOldBuf); CRASSERT(RT_SUCCESS(rc)); _crVBoxHGSMIReadExact(conn, pClient/*, cbWriteback*/); } else { crFree(conn->pHostBuffer); conn->cbHostBufferAllocated = cbWriteback; conn->pHostBuffer = crAlloc(conn->cbHostBufferAllocated); crVBoxHGCMReadExact(conn, NULL, cbWriteback); } } else { crWarning("SHCRGL_GUEST_FN_WRITE_READ (%i) failed with %x \n", len, rc); } } else { crWarning("_crVBoxHGSMICmdBufferLockRo failed\n"); break; } } while (0); if (!bIsBuffer) _crVBoxHGSMIBufFree(pClient, pBuf); return; } static void _crVBoxHGSMIWriteExact(CRConnection *conn, PCRVBOXHGSMI_CLIENT pClient, PVBOXUHGSMI_BUFFER pBuf, uint32_t offStart, unsigned int len) { int rc; int32_t callRes; VBOXUHGSMI_BUFFER_SUBMIT aSubmit[2]; #ifdef IN_GUEST if (conn->u32InjectClientID) { CRVBOXHGSMIINJECT *parms = (CRVBOXHGSMIINJECT *)_crVBoxHGSMICmdBufferLock(pClient, sizeof (*parms)); Assert(parms); if (!parms) { return; } parms->hdr.result = VERR_WRONG_ORDER; parms->hdr.u32ClientID = conn->u32ClientID; parms->hdr.u32Function = SHCRGL_GUEST_FN_INJECT; // parms->hdr.u32Reserved = 0; parms->u32ClientID = conn->u32InjectClientID; parms->iBuffer = 1; _crVBoxHGSMICmdBufferUnlock(pClient); _crVBoxHGSMIFillCmd(&aSubmit[0], pClient, sizeof (*parms)); aSubmit[1].pBuf = pBuf; aSubmit[1].offData = offStart; aSubmit[1].cbData = len; aSubmit[1].fFlags.Value = 0; aSubmit[1].fFlags.bHostReadOnly = 1; rc = pClient->pHgsmi->pfnBufferSubmitAsynch(pClient->pHgsmi, aSubmit, 2); AssertRC(rc); if (RT_SUCCESS(rc)) { _crVBoxHGSMIWaitCmd(pClient); /* @todo: do we need to wait for completion actually? * NOTE: in case we do not need completion, * we MUST specify bDoNotSignalCompletion flag for the command buffer */ // CRVBOXHGSMI_BUF_WAIT(pClient->pCmdBuffer); callRes = _crVBoxHGSMICmdBufferGetRc(pClient); } } else #endif { CRVBOXHGSMIWRITE * parms = (CRVBOXHGSMIWRITE *)_crVBoxHGSMICmdBufferLock(pClient, sizeof (*parms));; parms->hdr.result = VERR_WRONG_ORDER; parms->hdr.u32ClientID = conn->u32ClientID; parms->hdr.u32Function = SHCRGL_GUEST_FN_WRITE; // parms->hdr.u32Reserved = 0; parms->iBuffer = 1; _crVBoxHGSMICmdBufferUnlock(pClient); _crVBoxHGSMIFillCmd(&aSubmit[0], pClient, sizeof (*parms)); aSubmit[1].pBuf = pBuf; aSubmit[1].offData = offStart; aSubmit[1].cbData = len; aSubmit[1].fFlags.Value = 0; aSubmit[1].fFlags.bHostReadOnly = 1; rc = pClient->pHgsmi->pfnBufferSubmitAsynch(pClient->pHgsmi, aSubmit, 2); AssertRC(rc); if (RT_SUCCESS(rc)) { _crVBoxHGSMIWaitCmd(pClient); /* @todo: do we need to wait for completion actually? * NOTE: in case we do not need completion, * we MUST specify bDoNotSignalCompletion flag for the command buffer */ // CRVBOXHGSMI_BUF_WAIT(pClient->pCmdBuffer); callRes = _crVBoxHGSMICmdBufferGetRc(pClient); } } if (RT_FAILURE(rc) || RT_FAILURE(callRes)) { crWarning("SHCRGL_GUEST_FN_WRITE failed with %x %x\n", rc, callRes); } } static void crVBoxHGSMISend(CRConnection *conn, void **bufp, const void *start, unsigned int len) { PCRVBOXHGSMI_CLIENT pClient; PVBOXUHGSMI_BUFFER pBuf; CRVBOXHGCMBUFFER *hgcm_buffer; VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); if (!bufp) /* We're sending a user-allocated buffer. */ { pClient = _crVBoxHGSMIClientGet(conn); if (pClient) { #ifndef IN_GUEST //@todo remove temp buffer allocation in unpacker /* we're at the host side, so just store data until guest polls us */ _crVBoxHGCMWriteBytes(conn, start, len); #else CRASSERT(!conn->u32InjectClientID); crDebug("SHCRGL: sending userbuf with %d bytes\n", len); _crVBoxHGSMIWriteReadExact(conn, pClient, (void*)start, 0, len, false); #endif VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return; } /* fallback */ crVBoxHGCMSend(conn, bufp, start, len); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return; } hgcm_buffer = (CRVBOXHGCMBUFFER *) *bufp - 1; Assert(hgcm_buffer->magic == CR_VBOXHGCM_BUFFER_MAGIC); if (hgcm_buffer->kind != CR_VBOXHGCM_UHGSMI_BUFFER) { /* fallback */ crVBoxHGCMSend(conn, bufp, start, len); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return; } /* The region [start .. start + len + 1] lies within a buffer that * was allocated with crVBoxHGCMAlloc() and can be put into the free * buffer pool when we're done sending it. */ pBuf = _crVBoxHGSMIBufFromHdr(hgcm_buffer); Assert(pBuf); if (!pBuf) { crVBoxHGCMSend(conn, bufp, start, len); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return; } pClient = (PCRVBOXHGSMI_CLIENT)pBuf->pvUserData; /* Length would be passed as part of HGCM pointer description * No need to prepend it to the buffer */ #ifdef IN_GUEST if (conn->u32InjectClientID) { _crVBoxHGSMIWriteExact(conn, pClient, pBuf, CRVBOXHGSMI_BUF_OFFSET(start, *bufp) + CRVBOXHGSMI_BUF_HDR_SIZE(), len); } else #endif { _crVBoxHGSMIWriteReadExact(conn, pClient, pBuf, CRVBOXHGSMI_BUF_OFFSET(start, *bufp) + CRVBOXHGSMI_BUF_HDR_SIZE(), len, true); } /* Reclaim this pointer for reuse */ _crVBoxHGSMIBufFree(pClient, pBuf); /* Since the buffer's now in the 'free' buffer pool, the caller can't * use it any more. Setting bufp to NULL will make sure the caller * doesn't try to re-use the buffer. */ *bufp = NULL; VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static void crVBoxHGSMIWriteExact(CRConnection *conn, const void *buf, unsigned int len) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); Assert(0); CRASSERT(0); // PCRVBOXHGSMI_CLIENT pClient; // PVBOXUHGSMI_BUFFER pBuf = _crVBoxHGSMIBufFromMemPtr(buf); // if (!pBuf) // return; // pClient = (PCRVBOXHGSMI_CLIENT)pBuf->pvUserData; // _crVBoxHGSMIWriteExact(conn, pClient, pBuf, 0, len); // _crVBoxHGSMIBufFree(pClient, pBuf); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static void crVBoxHGSMISingleRecv(CRConnection *conn, void *buf, unsigned int len) { // PCRVBOXHGSMI_CLIENT pClient; // PVBOXUHGSMI_BUFFER pBuf; VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); // pBuf = _crVBoxHGSMIBufFromMemPtr(buf); // Assert(pBuf); Assert(0); CRASSERT(0); // if (!pBuf) // { // VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); // return; // } // pClient = (PCRVBOXHGSMI_CLIENT)pBuf->pvUserData; // _crVBoxHGSMIReadExact(conn, pClient); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static void crVBoxHGSMIReceiveMessage(CRConnection *conn) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); Assert(0); _crVBoxHGCMReceiveMessage(conn); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } /* * Called on host side only, to "accept" client connection */ static void crVBoxHGSMIAccept( CRConnection *conn, const char *hostname, unsigned short port ) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); Assert(0); CRASSERT(conn && conn->pHostBuffer); #ifdef IN_GUEST CRASSERT(FALSE); #endif VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static int crVBoxHGSMIDoConnect( CRConnection *conn ) { return crVBoxHGCMDoConnect(conn); } static void crVBoxHGSMIDoDisconnect( CRConnection *conn ) { crVBoxHGCMDoDisconnect(conn); } static void crVBoxHGSMIInstantReclaim(CRConnection *conn, CRMessage *mess) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); Assert(0); _crVBoxHGSMIFree(conn, mess); CRASSERT(FALSE); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } static void crVBoxHGSMIHandleNewMessage( CRConnection *conn, CRMessage *msg, unsigned int len ) { VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); Assert(0); CRASSERT(FALSE); VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); } #endif void crVBoxHGCMInit(CRNetReceiveFuncList *rfl, CRNetCloseFuncList *cfl, unsigned int mtu) { (void) mtu; g_crvboxhgcm.recv_list = rfl; g_crvboxhgcm.close_list = cfl; if (g_crvboxhgcm.initialized) { return; } VBOXCRHGSMIPROFILE_INIT(); g_crvboxhgcm.initialized = 1; #if defined(VBOX_WITH_CRHGSMI) && defined(IN_GUEST) g_crvboxhgcm.bHgsmiOn = _crVBoxHGSMIInit(); #endif g_crvboxhgcm.num_conns = 0; g_crvboxhgcm.conns = NULL; /* Can't open VBox guest driver here, because it gets called for host side as well */ /*@todo as we have 2 dll versions, can do it now.*/ #ifdef RT_OS_WINDOWS g_crvboxhgcm.hGuestDrv = INVALID_HANDLE_VALUE; g_crvboxhgcm.pDirectDraw = NULL; #else g_crvboxhgcm.iGuestDrv = INVALID_HANDLE_VALUE; #endif #ifdef CHROMIUM_THREADSAFE crInitMutex(&g_crvboxhgcm.mutex); crInitMutex(&g_crvboxhgcm.recvmutex); #endif g_crvboxhgcm.bufpool = crBufferPoolInit(16); } /* Callback function used to free buffer pool entries */ void crVBoxHGCMBufferFree(void *data) { #ifdef RT_OS_WINDOWS LPDIRECTDRAWSURFACE lpDDS; #endif CRVBOXHGCMBUFFER *hgcm_buffer = (CRVBOXHGCMBUFFER *) data; CRASSERT(hgcm_buffer->magic == CR_VBOXHGCM_BUFFER_MAGIC); switch (hgcm_buffer->kind) { case CR_VBOXHGCM_MEMORY: crFree( hgcm_buffer ); break; #ifdef RT_OS_WINDOWS case CR_VBOXHGCM_DDRAW_SURFACE: lpDDS = hgcm_buffer->pDDS; CRASSERT(lpDDS); IDirectDrawSurface_Unlock(lpDDS, NULL); IDirectDrawSurface_Release(lpDDS); crDebug("DDraw surface freed (%x)\n", lpDDS); break; #endif case CR_VBOXHGCM_MEMORY_BIG: crFree( hgcm_buffer ); break; default: crError( "Weird buffer kind trying to free in crVBoxHGCMBufferFree: %d", hgcm_buffer->kind ); } } void crVBoxHGCMTearDown(void) { int32_t i, cCons; if (!g_crvboxhgcm.initialized) return; /* Connection count would be changed in calls to crNetDisconnect, so we have to store original value. * Walking array backwards is not a good idea as it could cause some issues if we'd disconnect clients not in the * order of their connection. */ cCons = g_crvboxhgcm.num_conns; for (i=0; itype = CR_VBOXHGCM; conn->Alloc = crVBoxHGSMIAlloc; conn->Send = crVBoxHGSMISend; conn->SendExact = crVBoxHGSMIWriteExact; conn->Recv = crVBoxHGSMISingleRecv; conn->RecvMsg = crVBoxHGSMIReceiveMessage; conn->Free = crVBoxHGSMIFree; conn->Accept = crVBoxHGSMIAccept; conn->Connect = crVBoxHGSMIDoConnect; conn->Disconnect = crVBoxHGSMIDoDisconnect; conn->InstantReclaim = crVBoxHGSMIInstantReclaim; conn->HandleNewMessage = crVBoxHGSMIHandleNewMessage; } else #endif { conn->type = CR_VBOXHGCM; conn->Alloc = crVBoxHGCMAlloc; conn->Send = crVBoxHGCMSend; conn->SendExact = crVBoxHGCMWriteExact; conn->Recv = crVBoxHGCMSingleRecv; conn->RecvMsg = crVBoxHGCMReceiveMessage; conn->Free = crVBoxHGCMFree; conn->Accept = crVBoxHGCMAccept; conn->Connect = crVBoxHGCMDoConnect; conn->Disconnect = crVBoxHGCMDoDisconnect; conn->InstantReclaim = crVBoxHGCMInstantReclaim; conn->HandleNewMessage = crVBoxHGCMHandleNewMessage; } conn->index = g_crvboxhgcm.num_conns; conn->sizeof_buffer_header = sizeof(CRVBOXHGCMBUFFER); conn->actual_network = 1; conn->krecv_buf_size = 0; conn->pBuffer = NULL; conn->cbBuffer = 0; conn->allow_redir_ptr = 1; //@todo remove this crap at all later conn->cbHostBufferAllocated = 2*1024; conn->pHostBuffer = (uint8_t*) crAlloc(conn->cbHostBufferAllocated); CRASSERT(conn->pHostBuffer); conn->cbHostBuffer = 0; /* Find a free slot */ for (i = 0; i < g_crvboxhgcm.num_conns; i++) { if (g_crvboxhgcm.conns[i] == NULL) { conn->index = i; g_crvboxhgcm.conns[i] = conn; found = 1; break; } } /* Realloc connection stack if we couldn't find a free slot */ if (found == 0) { n_bytes = ( g_crvboxhgcm.num_conns + 1 ) * sizeof(*g_crvboxhgcm.conns); crRealloc( (void **) &g_crvboxhgcm.conns, n_bytes ); g_crvboxhgcm.conns[g_crvboxhgcm.num_conns++] = conn; } } int crVBoxHGCMRecv(void) { int32_t i; VBOXCRHGSMIPROFILE_FUNC_PROLOGUE(); #ifdef IN_GUEST /* we're on guest side, poll host if it got something for us */ for (i=0; itype == CR_NO_CONNECTION ) continue; if (!conn->pBuffer) { #if defined(VBOX_WITH_CRHGSMI) && defined(IN_GUEST) PCRVBOXHGSMI_CLIENT pClient; if (g_crvboxhgcm.bHgsmiOn && !!(pClient = _crVBoxHGSMIClientGet(conn))) { _crVBoxHGSMIPollHost(conn, pClient); } else #endif { crVBoxHGCMPollHost(conn); } } } #endif for (i=0; itype == CR_NO_CONNECTION ) continue; if (conn->cbBuffer>0) { _crVBoxHGCMReceiveMessage(conn); } } VBOXCRHGSMIPROFILE_FUNC_EPILOGUE(); return 0; } CRConnection** crVBoxHGCMDump( int *num ) { *num = g_crvboxhgcm.num_conns; return g_crvboxhgcm.conns; }