workbench/libs/iffparse/closeclipboard.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include "iffparse_intern.h"
   7
   8 /*****************************************************************************
   9
  10     NAME */
  11 #include <proto/iffparse.h>
  12
  13         AROS_LH1(void, CloseClipboard,
  14
  15 /*  SYNOPSIS */
  16         AROS_LHA(struct ClipboardHandle *, clipHandle, A0),
  17
  18 /*  LOCATION */
  19         struct Library *, IFFParseBase, 42, IFFParse)
  20
  21 /*  FUNCTION
  22         Closes the clipboard.device and frees the ClipboardHandle
  23
  24     INPUTS
  25         clip - pointer to a ClipboardHandle struct created with OpenClipboard.
  26
  27     RESULT
  28         None.
  29
  30     NOTES
  31
  32     EXAMPLE
  33
  34     BUGS
  35
  36     SEE ALSO
  37         OpenClipboard(), InitIFFAsClip()
  38
  39     INTERNALS
  40
  41 *****************************************************************************/
  42 {
  43     AROS_LIBFUNC_INIT
  44
  45     if (clipHandle != NULL)
  46     {
  47         /* Delete the messageports */
  48
  49         ClosePort (&(clipHandle->cbh_CBport), IPB(IFFParseBase));
  50         ClosePort (&(clipHandle->cbh_SatisfyPort), IPB(IFFParseBase));
  51
  52         CloseDevice((struct IORequest *)&(clipHandle->cbh_Req));
  53
  54         /*
  55             Free the IO request is just a question of freiing the memory
  56             allocated for it. Since the ioClipReq structure resides inside
  57             the clipboardhandle, (it's all just one big portion of memory),
  58             we just free the clipboardhandle.
  59         */
  60         FreeMem(clipHandle, sizeof (struct ClipboardHandle));
  61     }
  62
  63     AROS_LIBFUNC_EXIT
  64 } /* CloseClipboard */