rom/hyperlayers/movelayerinfrontof.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8
   9 #include <aros/libcall.h>
  10 #include <proto/layers.h>
  11 #include <proto/graphics.h>
  12 #include <graphics/clip.h>
  13 #include <graphics/layers.h>
  14 #include "layers_intern.h"
  15
  16 /*****************************************************************************
  17
  18     NAME */
  19 #include <proto/layers.h>
  20
  21         AROS_LH2(LONG, MoveLayerInFrontOf,
  22
  23 /*  SYNOPSIS */
  24         AROS_LHA(struct Layer *, layer_to_move, A0),
  25         AROS_LHA(struct Layer *, other_layer, A1),
  26
  27 /*  LOCATION */
  28         struct LayersBase *, LayersBase, 28, Layers)
  29
  30 /*  FUNCTION
  31         Moves layer directly in front of another layer. Other layers
  32         might become visible. You cannot move a backdrop layer in front
  33         of a non-backdrop layer. You can also not move a layer in front
  34         of a layer with different relationship to the root layer. Boot
  35         have to be children of grandchildren or grandgrandchildren etc.
  36         of the root layer. The root layer is not visible to you and
  37         should never be accessed.
  38         If parts of a simple layer become visible these areas are added
  39         to the damage list.
  40
  41     INPUTS
  42         layer_to_move - pointer to layer that is to be moved
  43         other_layer   - pointer to other layer that will be behind the
  44                         layer_to_move.
  45
  46     RESULT
  47         TRUE  - layer was moved
  48         FALSE - layer could not be moved. (probably out of memory)
  49
  50     NOTES
  51
  52     EXAMPLE
  53
  54     BUGS
  55
  56     SEE ALSO
  57
  58     INTERNALS
  59
  60     HISTORY
  61         27-11-96    digulla automatically created from
  62                             layers_lib.fd and clib/layers_protos.h
  63
  64 *****************************************************************************/
  65 {
  66   AROS_LIBFUNC_INIT
  67
  68   struct Layer * first, *_l;
  69   int toback = TRUE;
  70   LONG ret;
  71
  72   if (layer_to_move->parent  != other_layer->parent ||
  73       layer_to_move->priority < other_layer->priority)
  74     return FALSE;
  75
  76   LockLayers(layer_to_move->LayerInfo);
  77
  78   first = GetFirstFamilyMember(layer_to_move);
  79
  80   _l = layer_to_move->parent->front;
  81   while (1)
  82   {
  83     /*
  84      * If I run into the other layer before I find l
  85      * then I know I have to move it to the back.
  86      */
  87     if (_l == other_layer)
  88       break;
  89
  90     if (_l == layer_to_move)
  91     {
  92       toback = FALSE;
  93       break;
  94     }
  95     _l = _l->front;
  96     if (NULL == _l)
  97     {
  98       UnlockLayers(layer_to_move->LayerInfo);
  99       return FALSE;
 100     }
 101   }
 102
 103   _l = GetFirstFamilyMember(other_layer);
 104
 105   if (TRUE == toback)
 106   {
 107     /*
 108      * If the topmost child of the other layer is
 109      * behind my layer I don't have to do anything.
 110      */
 111     if (layer_to_move->back == _l)
 112     {
 113       UnlockLayers(layer_to_move->LayerInfo);
 114       return TRUE;
 115     }
 116     ret = _MoveLayerBehind(layer_to_move, _l, LayersBase);
 117   }
 118   else
 119   {
 120     ret = _MoveLayerToFront(layer_to_move, _l, LayersBase);
 121   }
 122
 123   UnlockLayers(layer_to_move->LayerInfo);
 124   return ret;
 125
 126   AROS_LIBFUNC_EXIT
 127 } /* MoveLayerInFrontOf */