workbench/libs/muimaster/clipboard.c

   1 /*
   2     Copyright © 1999, David Le Corfec.
   3     Copyright © 2002, The AROS Development Team.
   4     All rights reserved.
   5
   6     $Id$
   7 */
   8
   9 #include <ctype.h>
  10 #include <stdlib.h>
  11 #include <string.h>
  12 #include <stdio.h>
  13
  14 #include <exec/types.h>
  15 #include <exec/memory.h>
  16
  17 #include <clib/alib_protos.h>
  18 #include <libraries/iffparse.h>
  19 #include <datatypes/textclass.h>
  20 #include <proto/exec.h>
  21 #include <proto/iffparse.h>
  22 #include <proto/utility.h>
  23
  24 #include "mui.h"
  25 #include "clipboard.h"
  26 #include "support.h"
  27
  28 #include "muimaster_intern.h"
  29
  30 //#define MYDEBUG 1
  31 #include "debug.h"
  32
  33 extern struct Library *MUIMasterBase;
  34
  35 void clipboard_write_text(STRPTR text, LONG textlen)
  36 {
  37     struct IFFHandle *iff;
  38
  39     if((iff = AllocIFF()))
  40     {
  41         if((iff->iff_Stream = (IPTR)OpenClipboard(0)))
  42         {
  43             InitIFFasClip(iff);
  44             if(!OpenIFF(iff,IFFF_WRITE))
  45             {
  46                 if(!PushChunk(iff, ID_FTXT, ID_FORM, IFFSIZE_UNKNOWN))
  47                 {
  48                     if(!PushChunk(iff, ID_FTXT, ID_CHRS, IFFSIZE_UNKNOWN))
  49                     {
  50                         WriteChunkBytes(iff, text, textlen);
  51
  52                         PopChunk(iff);
  53
  54                     } /* if(!PushChunk(iff, ID_FTXT, ID_CHRS, IFFSIZE_UNKNOWN)) */
  55                     PopChunk(iff);
  56
  57                 } /* if(!PushChunk(iff, ID_FTXT, ID_FORM, IFFSIZE_UNKNOWN)) */
  58                 CloseIFF(iff);
  59
  60             } /* if(!OpenIFF(iff,IFFF_WRITE)) */
  61             CloseClipboard((struct ClipboardHandle*)iff->iff_Stream);
  62
  63         } /* if((iff->iff_Stream = (IPTR)OpenClipboard(clipunit))) */
  64         FreeIFF(iff);
  65
  66     } /* if((iff = AllocIFF()))) */
  67
  68 }
  69
  70 STRPTR clipboard_read_text(void)
  71 {
  72     struct IFFHandle    *iff;
  73     struct ContextNode  *cn;
  74     STRPTR               retval = 0;
  75
  76     if((iff = AllocIFF()))
  77     {
  78         if((iff->iff_Stream = (IPTR)OpenClipboard(0)))
  79         {
  80             InitIFFasClip(iff);
  81
  82             if(!OpenIFF(iff, IFFF_READ))
  83             {
  84                 if (!(StopChunk(iff, ID_FTXT, ID_CHRS)))
  85                 {
  86                     if (!ParseIFF(iff, IFFPARSE_SCAN))
  87                     {
  88                         cn = CurrentChunk(iff);
  89
  90                         if ((cn->cn_Type == ID_FTXT) && (cn->cn_ID == ID_CHRS) && (cn->cn_Size > 0))
  91                         {
  92                             if ((retval = mui_alloc(cn->cn_Size + 1)))
  93                             {
  94                                 ReadChunkBytes(iff, retval, cn->cn_Size);
  95
  96                                 retval[cn->cn_Size] = '\0';
  97                             }
  98
  99                         } /* if ((cn->cn_Type == ID_FTXT) && (cn->cn_ID == ID_CHRS) && (cn->cn_Size > 0)) */
 100
 101                     } /* if (!ParseIFF(iff, IFFPARSE_SCAN)) */
 102
 103                 } /* if (!(StopChunk(iff, ID_FTXT, ID_CHRS))) */
 104
 105                 CloseIFF(iff);
 106
 107             } /* if(!OpenIFF(iff, IFFF_READ)) */
 108             CloseClipboard((struct ClipboardHandle*)iff->iff_Stream);
 109
 110         } /* if((iff->iff_Stream = (IPTR)OpenClipboard(clipunit))) */
 111         FreeIFF(iff);
 112
 113     } /* if((iff = AllocIFF()))) */
 114
 115     return retval;
 116 }
 117
 118 void clipboard_free_text(STRPTR text)
 119 {
 120     mui_free(text);
 121 }
 122
 123