workbench/libs/iffparse/clipboardfuncs.c

   1 /*
   2     Copyright © 1995-2004, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Helpfuncs needed when iffparse is used for clipboard handling.
   6 */
   7 #include "iffparse_intern.h"
   8 #include <exec/io.h>
   9
  10 #include <aros/debug.h>
  11
  12 #define DEBUG_STREAM(x)         ;
  13
  14 /***********************/
  15 /* Port initialization */
  16 /***********************/
  17
  18 /* Initializes and Closes PRIVATE ports     */
  19 /* Used in OpenClipboard and CloseClipboard */
  20 /* Look at page 501-502 in RKM Libraries     */
  21
  22 BOOL InitPort (struct MsgPort *mp, struct Task *t,
  23         struct IFFParseBase_intern * IFFParseBase)
  24 {
  25     LONG sigbit;
  26
  27     if ((sigbit = AllocSignal(-1L)) == -1) return (FALSE);
  28
  29     mp->mp_Node.ln_Type = NT_MSGPORT;
  30     mp->mp_Flags        =  PA_SIGNAL;
  31     mp->mp_SigBit        =  sigbit;
  32     mp->mp_SigTask      =  t;
  33
  34     NewList(&(mp->mp_MsgList));
  35
  36     return (TRUE);
  37 }
  38
  39 VOID ClosePort (struct MsgPort *mp,
  40     struct IFFParseBase_intern * IFFParseBase)
  41 {
  42     mp->mp_SigTask          =  (struct Task*)-1;
  43     mp->mp_MsgList.lh_Head  = (struct Node*)-1;
  44
  45     FreeSignal( mp->mp_SigBit );
  46
  47     return;
  48 }
  49
  50
  51 /**********************/
  52 /* ClipStreamHandler  */
  53 /**********************/
  54
  55 #define IFFParseBase IPB(hook->h_Data)
  56
  57 ULONG ClipStreamHandler
  58 (
  59     struct Hook         * hook,
  60     struct IFFHandle    * iff,
  61     struct IFFStreamCmd * cmd
  62 )
  63 {
  64       #define CLIPSCANBUFSIZE 10000000 //500
  65     ULONG error = 0;
  66
  67     /* Buffer neede for reading rest of clip in IFFCMD_CLEANUP. Eats some stack */
  68 //      UBYTE  buf[CLIPSCANBUFSIZE];
  69
  70     struct IOClipReq *req;
  71
  72     req = &( ((struct ClipboardHandle*)iff->iff_Stream)->cbh_Req);
  73
  74     DEBUG_STREAM(bug("ClipStream: iff %p cmd %d buf %p bytes %d\n",
  75                          iff, cmd->sc_Command, cmd->sc_Buf, cmd->sc_NBytes));
  76
  77     switch (cmd->sc_Command)
  78     {
  79         case IFFCMD_READ:
  80
  81             DEBUG_BUFSTREAMHANDLER(dprintf("ClipStream: IFFCMD_READ...\n"));
  82
  83             req->io_Command = CMD_READ;
  84             req->io_Data    = cmd->sc_Buf;
  85             req->io_Length  =  cmd->sc_NBytes;
  86
  87             error = (DoIO((struct IORequest*)req));
  88
  89             break;
  90
  91         case IFFCMD_WRITE:
  92
  93             DEBUG_BUFSTREAMHANDLER(dprintf("ClipStream: IFFCMD_WRITE...\n"));
  94
  95             req->io_Command = CMD_WRITE;
  96             req->io_Data    = cmd->sc_Buf;
  97             req->io_Length  =  cmd->sc_NBytes;
  98
  99             error = (DoIO((struct IORequest*)req));
 100
 101             break;
 102
 103         case IFFCMD_SEEK:
 104
 105             DEBUG_BUFSTREAMHANDLER(dprintf("ClipStream: IFFCMD_SEEK...\n"));
 106
 107             req->io_Offset += cmd->sc_NBytes;
 108
 109             if (req->io_Offset < 0)
 110                 error = TRUE;
 111
 112             break;
 113
 114         case IFFCMD_INIT:
 115
 116             DEBUG_BUFSTREAMHANDLER(dprintf("ClipStream: IFFCMD_INIT...\n"));
 117
 118             /* Start reading and writing at offset 0 */
 119             req->io_ClipID = 0;
 120             req->io_Offset = 0;
 121             break;
 122
 123         case IFFCMD_CLEANUP:
 124
 125             DEBUG_BUFSTREAMHANDLER(dprintf("ClipStream: IFFCMD_CLEANUP...\n"));
 126
 127             if ((iff->iff_Flags & IFFF_RWBITS) == IFFF_READ)
 128             {
 129                 /* Read past end of clip if we are in read mode */
 130                 req->io_Command = CMD_READ;
 131                 req->io_Data    = NULL;
 132                 req->io_Length  =  CLIPSCANBUFSIZE;
 133
 134                 /* Read until there is not more left */
 135                 do
 136                 {
 137                     DoIO((struct IORequest*)req);
 138                 }
 139                 while (req->io_Actual==req->io_Length);
 140
 141             }
 142
 143             if ((iff->iff_Flags & IFFF_RWBITS) == IFFF_WRITE)
 144             {
 145                 req->io_Command = CMD_UPDATE;
 146                 DoIO((struct IORequest*)req);
 147             }
 148             break;
 149
 150     }
 151
 152     DEBUG_STREAM(bug("ClipStream: error %ld\n", error));
 153
 154     return (error);
 155 }