2 * Acess2 GUI (AxWin) Version 3
3 * - By John Hodge (thePowersGang)
6 * - Interprocess communication
12 #include <ipcmessages.h>
15 #include <wm_internals.h>
16 #include <wm_hotkeys.h> // Hotkey registration
17 #include <wm_renderer.h> // Renderer IPC messages
19 #define AXWIN_PORT 4101
21 #define STATICBUF_SIZE 64
22 #define MAX_WINDOWS_PER_APP 128
25 typedef struct sIPC_Type tIPC_Type;
29 int (*GetIdentSize)(const void *Ident);
30 int (*CompareIdent)(const void *Ident1, const void *Ident2);
31 void (*SendMessage)(const void *Ident, size_t Length, const void *Data);
36 const tIPC_Type *IPCType;
37 const void *Ident; // Stored after structure
44 extern tWindow *gpWM_FocusedWindow; // Needed for _FocusWindow
48 void IPC_FillSelect(int *nfds, fd_set *set);
49 void IPC_HandleSelect(fd_set *set);
50 int IPC_Type_Datagram_GetSize(const void *Ident);
51 int IPC_Type_Datagram_Compare(const void *Ident1, const void *Ident2);
52 void IPC_Type_Datagram_Send(const void *Ident, size_t Length, const void *Data);
53 int IPC_Type_Sys_GetSize(const void *Ident);
54 int IPC_Type_Sys_Compare(const void *Ident1, const void *Ident2);
55 void IPC_Type_Sys_Send(const void *Ident, size_t Length, const void *Data);
56 void IPC_Handle(const tIPC_Type *IPCType, const void *Ident, size_t MsgLen, tAxWin_IPCMessage *Msg);
59 const tIPC_Type gIPC_Type_Datagram = {
60 IPC_Type_Datagram_GetSize,
61 IPC_Type_Datagram_Compare,
62 IPC_Type_Datagram_Send
64 const tIPC_Type gIPC_Type_SysMessage = {
69 int giNetworkFileHandle = -1;
70 int giMessagesFileHandle = -1;
71 int giIPC_ClientCount;
72 tIPC_Client **gIPC_Clients;
79 giNetworkFileHandle = _SysOpen("/Devices/ip/loop/udp", OPENFLAG_READ);
80 if( giNetworkFileHandle != -1 )
83 _SysIOCtl(giNetworkFileHandle, 4, &tmp); // TODO: Don't hard-code IOCtl number
87 void IPC_FillSelect(int *nfds, fd_set *set)
89 if( giNetworkFileHandle != -1 )
91 if( giNetworkFileHandle > *nfds ) *nfds = giNetworkFileHandle;
92 FD_SET(giNetworkFileHandle, set);
96 void IPC_HandleSelect(fd_set *set)
98 if( giNetworkFileHandle != -1 )
100 if( FD_ISSET(giNetworkFileHandle, set) )
102 char staticBuf[STATICBUF_SIZE];
103 int readlen, identlen;
106 readlen = _SysRead(giNetworkFileHandle, staticBuf, sizeof(staticBuf));
108 identlen = 4 + Net_GetAddressSize( ((uint16_t*)staticBuf)[1] );
109 msg = staticBuf + identlen;
111 IPC_Handle(&gIPC_Type_Datagram, staticBuf, readlen - identlen, (void*)msg);
112 // _SysDebug("IPC_HandleSelect: UDP handled");
118 while( (len = _SysGetMessage(&tid, 0, NULL)) )
121 _SysGetMessage(NULL, len, data);
123 IPC_Handle(&gIPC_Type_SysMessage, &tid, len, (void*)data);
124 // _SysDebug("IPC_HandleSelect: Message handled");
128 int IPC_Type_Datagram_GetSize(const void *Ident)
130 return 4 + Net_GetAddressSize( ((const uint16_t*)Ident)[1] );
133 int IPC_Type_Datagram_Compare(const void *Ident1, const void *Ident2)
136 // - No need to worry about mis-matching sizes, as the size is computed
137 // from the 3rd/4th bytes, hence it will differ before the size is hit.
138 return memcmp(Ident1, Ident2, IPC_Type_Datagram_GetSize(Ident1));
141 void IPC_Type_Datagram_Send(const void *Ident, size_t Length, const void *Data)
143 int identlen = IPC_Type_Datagram_GetSize(Ident);
144 char tmpbuf[ identlen + Length ];
145 memcpy(tmpbuf, Ident, identlen); // Header
146 memcpy(tmpbuf + identlen, Data, Length); // Data
147 // TODO: Handle fragmented packets
148 _SysWrite(giNetworkFileHandle, tmpbuf, sizeof(tmpbuf));
151 int IPC_Type_Sys_GetSize(const void *Ident)
153 return sizeof(pid_t);
156 int IPC_Type_Sys_Compare(const void *Ident1, const void *Ident2)
158 return *(const tid_t*)Ident1 - *(const tid_t*)Ident2;
161 void IPC_Type_Sys_Send(const void *Ident, size_t Length, const void *Data)
163 _SysSendMessage( *(const tid_t*)Ident, Length, Data );
166 // --- Client -> Window Mappings
167 int _CompareClientPtrs(const void *_a, const void *_b)
169 tIPC_Client *a = *(tIPC_Client**)_a;
170 tIPC_Client *b = *(tIPC_Client**)_b;
175 if(a->IPCType < b->IPCType) return -1;
176 if(a->IPCType > b->IPCType) return 1;
178 return a->IPCType->CompareIdent(a->Ident, b->Ident);
181 tIPC_Client *IPC_int_GetClient(const tIPC_Type *IPCType, const void *Ident)
183 int pos = 0; // Position where the new client will be inserted
187 // - Search list of registered clients
188 if(giIPC_ClientCount > 0)
194 target.IPCType = IPCType;
195 target.Ident = Ident;
196 ret = ⌖ // Abuse ret to get a pointer
198 div = giIPC_ClientCount;
203 cmp = _CompareClientPtrs(&ret, &gIPC_Clients[pos]);
204 // _SysDebug("Checking against %i gives %i", pos, cmp);
214 return gIPC_Clients[pos];
216 // Adjust pos to be the index where the new client will be placed
221 // - Create a new client entry
222 ident_size = IPCType->GetIdentSize(Ident);
223 // _SysDebug("ident_size = %i", ident_size);
224 ret = malloc( sizeof(tIPC_Client) + ident_size );
225 if(!ret) return NULL;
226 ret->IPCType = IPCType;
227 ret->Ident = ret + 1; // Get the end of the structure
228 memcpy( (void*)ret->Ident, Ident, ident_size );
232 // TODO: Register some way of detecting the client disconnecting
233 // > Wait on the thread / register with kernel somehow
234 // > Sockets are easier, but UDP is harder. Might get rid of it
237 giIPC_ClientCount ++;
238 gIPC_Clients = realloc(gIPC_Clients, giIPC_ClientCount*sizeof(tIPC_Client*));
239 memmove(&gIPC_Clients[pos+1], &gIPC_Clients[pos], (giIPC_ClientCount-pos-1) * sizeof(tIPC_Client*));
240 gIPC_Clients[pos] = ret;
245 tWindow *IPC_int_GetWindow(tIPC_Client *Client, uint32_t WindowID)
250 if( WindowID >= Client->nWindows ) {
254 return Client->Windows[WindowID];
257 void IPC_int_SetWindow(tIPC_Client *Client, uint32_t WindowID, tWindow *WindowPtr)
259 if( WindowID >= MAX_WINDOWS_PER_APP )
262 if( WindowID >= Client->nWindows )
264 int oldCount = Client->nWindows;
265 Client->nWindows = WindowID + 1;
266 Client->Windows = realloc(Client->Windows, Client->nWindows*sizeof(tWindow*));
267 memset( &Client->Windows[oldCount], 0, (Client->nWindows-oldCount)*sizeof(tWindow*) );
268 _SysDebug("Expanded %p's window list from %i to %i", Client, oldCount, Client->nWindows);
271 _SysDebug("Assigned %p to window %i for %p", WindowPtr, WindowID, Client);
272 Client->Windows[WindowID] = WindowPtr;
275 // --- IPC Message Handlers ---
276 int IPC_Msg_Ping(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
278 ASSERT(Msg->ID == IPCMSG_PING);
280 if( !(Msg->Flags & IPCMSG_FLAG_RETURN) ) return 0;
282 if( Msg->Size < 4 ) return -1;
284 tIPCMsg_ReturnInt *ret = (void*)Msg->Data;
285 Msg->ID = IPCMSG_PING;
286 Msg->Size = sizeof(*ret);
287 ret->Value = AXWIN_VERSION;
288 Client->IPCType->SendMessage(Client->Ident, sizeof(*Msg)+sizeof(*ret), Msg);
292 int IPC_Msg_GetDisplayCount(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
294 tAxWin_IPCMessage *ret_hdr;
295 tIPCMsg_ReturnInt *ret;
296 char buf[sizeof(*ret_hdr)+sizeof(*ret)];
298 ASSERT(Msg->ID == IPCMSG_GETDISPLAYCOUNT);
300 if( !(Msg->Flags & IPCMSG_FLAG_RETURN) ) return 0;
302 ret_hdr = (void*)buf;
303 ret_hdr->ID = IPCMSG_GETDISPLAYCOUNT;
305 ret_hdr->Window = -1;
306 ret_hdr->Size = sizeof(*ret);
307 ret = (void*)ret_hdr->Data;
308 ret->Value = 1; // HARD CODE - Current version only supports one display
310 Client->IPCType->SendMessage(Client->Ident, sizeof(buf), buf);
314 int IPC_Msg_GetDisplayDims(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
316 tIPCMsg_GetDisplayDims *info;
317 tAxWin_IPCMessage *ret_hdr;
318 tIPCMsg_RetDisplayDims *ret;
319 char buf[sizeof(*ret_hdr)+sizeof(*ret)];
321 ASSERT(Msg->ID == IPCMSG_GETDISPLAYDIMS);
323 if( !(Msg->Flags & IPCMSG_FLAG_RETURN) ) return 0;
325 info = (void*)Msg->Data;
327 ret_hdr = (void*)buf;
328 ret_hdr->ID = IPCMSG_GETDISPLAYDIMS;
330 ret_hdr->Window = -1;
331 ret_hdr->Size = sizeof(*ret);
332 ret = (void*)ret_hdr->Data;
334 // HARD CODE! Only one display supported
335 if( info->DisplayID == 0 )
339 ret->W = giScreenWidth;
340 ret->H = giScreenHeight;
344 ret->X = 0; ret->Y = 0;
345 ret->W = 0; ret->H = 0;
348 Client->IPCType->SendMessage(Client->Ident, sizeof(buf), buf);
352 int IPC_Msg_SendMsg(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
354 tIPCMsg_SendMsg *info = (void*)Msg->Data;
357 ASSERT(Msg->ID == IPCMSG_SENDMSG);
360 if( Msg->Size < sizeof(tIPCMsg_SendMsg) )
362 if( Msg->Size < sizeof(tIPCMsg_SendMsg) + info->Length )
365 src = IPC_int_GetWindow(Client, Msg->Window);
367 dest = IPC_int_GetWindow(Client, info->Remote);
370 WM_SendMessage(src, dest, info->ID, info->Length, info->Data);
375 int IPC_Msg_CreateWin(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
377 tIPCMsg_CreateWin *info = (void*)Msg->Data;
378 tWindow *newwin, *parent;
380 ASSERT(Msg->ID == IPCMSG_CREATEWIN);
383 // > +1 is for NULL byte on string
384 if( Msg->Size < sizeof(*info) + 1 ) {
385 _SysDebug("IPC_Msg_CreateWin: Size check 1 failed");
388 if( info->Renderer[Msg->Size - sizeof(*info) - 1] != '\0' ) {
389 _SysDebug("IPC_Msg_CreateWin: Size check 2 failed");
390 _SysDebug("info = {");
391 _SysDebug(" .NewWinID = %i", info->NewWinID);
392 _SysDebug(" .RendererArg = %i", info->RendererArg);
393 _SysDebug(" .Renderer = '%.*s'", Msg->Size - sizeof(*info), info->Renderer);
398 // - Get the parent window ID
399 parent = IPC_int_GetWindow(Client, Msg->Window);
401 // Catch creating a window with an existing ID
402 if( IPC_int_GetWindow(Client, info->NewWinID) )
405 // - Create the new window, and save its pointer
406 newwin = WM_CreateWindow(parent, Client, info->NewWinID, info->RendererArg, info->Renderer);
407 IPC_int_SetWindow(Client, info->NewWinID, newwin);
412 int IPC_Msg_DestroyWin(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
416 ASSERT(Msg->ID == IPCMSG_DESTROYWIN);
418 win = IPC_int_GetWindow(Client, Msg->Window);
422 WM_DestroyWindow(win);
426 int IPC_Msg_SetWindowTitle(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
430 ASSERT(Msg->ID == IPCMSG_SETWINTITLE);
432 if( Msg->Size < 1 ) return -1;
433 if( Msg->Data[ Msg->Size-1 ] != '\0' ) return -1;
435 win = IPC_int_GetWindow(Client, Msg->Window);
438 WM_SetWindowTitle(win, Msg->Data);
443 int IPC_Msg_ShowWindow(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
445 tIPCMsg_Boolean *info = (void*)Msg->Data;
448 ASSERT(Msg->ID == IPCMSG_SHOWWINDOW);
450 if( Msg->Size < sizeof(*info) ) return -1;
452 win = IPC_int_GetWindow(Client, Msg->Window);
455 WM_ShowWindow(win, !!info->Value);
460 int IPC_Msg_DecorateWindow(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
462 tIPCMsg_Boolean *info = (void*)Msg->Data;
465 if( Msg->Size < sizeof(*info) ) return -1;
467 win = IPC_int_GetWindow(Client, Msg->Window);
470 WM_DecorateWindow(win, !!info->Value);
474 int IPC_Msg_FocusWindow(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
478 ASSERT(Msg->ID == IPCMSG_FOCUSWINDOW);
480 // Don't allow the focus to be changed unless the client has the focus
481 // if(!gpWM_FocusedWindow) return 1;
482 // if(gpWM_FocusedWindow->Client != Client) return 1;
484 win = IPC_int_GetWindow(Client, Msg->Window);
492 int IPC_Msg_SetWinPos(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
494 tIPCMsg_SetWindowPos *info = (void*)Msg->Data;
497 ASSERT(Msg->ID == IPCMSG_SETWINPOS);
499 if(Msg->Size < sizeof(*info)) return -1;
501 win = IPC_int_GetWindow(Client, Msg->Window);
504 _SysDebug("info = {..., bSetPos=%i,bSetDims=%i}", info->bSetPos, info->bSetDims);
507 WM_MoveWindow(win, info->X, info->Y);
509 WM_ResizeWindow(win, info->W, info->H);
514 int IPC_Msg_RegisterAction(tIPC_Client *Client, tAxWin_IPCMessage *Msg)
516 tIPCMsg_RegAction *info = (void*)Msg->Data;
519 ASSERT(Msg->ID == IPCMSG_REGACTION);
521 if( Msg->Size < sizeof(*info) + 1 )
524 win = IPC_int_GetWindow(Client, Msg->Window);
527 if( strnlen(info->Action, Msg->Size - sizeof(*info)) == Msg->Size - sizeof(*info) )
530 _SysDebug("RegisterAction %p:%i [%i]\"%s\"",
531 Client, Msg->Window, info->Index, info->Action
534 WM_Hotkey_RegisterAction(info->Action, win, info->Index);
539 int (*gIPC_MessageHandlers[])(tIPC_Client *Client, tAxWin_IPCMessage *Msg) = {
541 IPC_Msg_GetDisplayCount,
542 IPC_Msg_GetDisplayDims,
545 IPC_Msg_DestroyWin, // Destroy window
546 IPC_Msg_SetWindowTitle,
548 IPC_Msg_DecorateWindow,
551 IPC_Msg_RegisterAction
553 const int giIPC_NumMessageHandlers = sizeof(gIPC_MessageHandlers)/sizeof(gIPC_MessageHandlers[0]);
555 void IPC_Handle(const tIPC_Type *IPCType, const void *Ident, size_t MsgLen, tAxWin_IPCMessage *Msg)
560 // _SysDebug("IPC_Handle: (IPCType=%p, Ident=%p, MsgLen=%i, Msg=%p)",
561 // IPCType, Ident, MsgLen, Msg);
563 if( MsgLen < sizeof(tAxWin_IPCMessage) )
565 if( MsgLen < sizeof(tAxWin_IPCMessage) + Msg->Size )
568 client = IPC_int_GetClient(IPCType, Ident);
573 if( Msg->Flags & IPCMSG_FLAG_RENDERER )
575 tWindow *win = IPC_int_GetWindow(client, Msg->Window);
577 _SysDebug("WARNING: NULL window in message %i", Msg->ID);
580 tWMRenderer *renderer = win->Renderer;
581 if( Msg->ID >= renderer->nIPCHandlers ) {
582 _SysDebug("WARNING: Message %i out of range in %s", Msg->ID, renderer->Name);
585 if( !renderer->IPCHandlers[Msg->ID] ) {
586 _SysDebug("WARNING: Message %i has no handler in %s", Msg->ID, renderer->Name);
589 _SysDebug("IPC_Handle: Call %s-%i", renderer->Name, Msg->ID);
590 rv = renderer->IPCHandlers[Msg->ID](win, Msg->Size, Msg->Data);
592 _SysDebug("IPC_Handle: rv != 0 (%i)", rv);
596 if( Msg->ID >= giIPC_NumMessageHandlers ) {
597 fprintf(stderr, "WARNING: Unknown message %i (%p)\n", Msg->ID, IPCType);
598 _SysDebug("WARNING: Unknown message %i (%p)", Msg->ID, IPCType);
602 if( !gIPC_MessageHandlers[ Msg->ID ] ) {
603 fprintf(stderr, "WARNING: Message %i does not have a handler\n", Msg->ID);
604 _SysDebug("WARNING: Message %i does not have a handler", Msg->ID);
608 _SysDebug("IPC_Handle: Call WM-%i", Msg->ID);
609 rv = gIPC_MessageHandlers[Msg->ID](client, Msg);
611 _SysDebug("IPC_Handle: rv != 0 (%i)", rv);
615 // Dispatch a message to the client
616 void IPC_SendWMMessage(tIPC_Client *Client, uint32_t Src, uint32_t Dst, int MsgID, int Len, void *Data)
618 tAxWin_IPCMessage *hdr;
619 tIPCMsg_SendMsg *msg;
620 char buf[sizeof(*hdr)+sizeof(*msg)+Len];
623 msg = (void*)hdr->Data;
625 hdr->ID = IPCMSG_SENDMSG;
627 hdr->Size = sizeof(*msg) + Len;
633 memcpy(msg->Data, Data, Len);
635 Client->IPCType->SendMessage(Client->Ident, sizeof(buf), buf);
638 // --- Server->Client replies
639 void IPC_SendReply(tIPC_Client *Client, uint32_t WinID, int MsgID, size_t Len, const void *Data)
641 tAxWin_IPCMessage *hdr;
642 char buf[sizeof(*hdr)+Len];
647 hdr->Flags = IPCMSG_FLAG_RENDERER;
651 memcpy(hdr->Data, Data, Len);
652 Client->IPCType->SendMessage(Client->Ident, sizeof(buf), buf);