// Show the backdrop objects
void backdrop_show_objects(BackdropInfo *info,UWORD flags)
{
BackdropObject *object;
// Lock backdrop list
lock_listlock(&info->objects,0);
// Lock window
GetSemaphore(&info->window_lock,SEMF_EXCLUSIVE,0);
// Window open?
if (info->window)
{
// Are we in a refresh?
if (flags&BDSF_IN_REFRESH)
{
// Lock layers
#ifdef LOCKLAYER_OK
LockScreenLayer(info->window->WScreen);
#else
Forbid();
#endif
// End refresh temporarily
EndRefresh(info->window,FALSE);
// Install new clip region if we have it
if (info->clip_region)
InstallClipRegion(info->window->WLayer,info->clip_region);
// Continue refresh
BeginRefresh(info->window);
}
// Or, are we meant to be refreshing?
else
if (flags&BDSF_REFRESH)
{
// Start refresh here?
if ((flags&BDSF_REFRESH_DONE)==BDSF_REFRESH_DONE)
{
// Lock layers
#ifdef LOCKLAYER_OK
LockScreenLayer(info->window->WScreen);
#else
Forbid();
#endif
}
// And our region with damagelist
if (info->clip_region)
AndRegionRegion(info->clip_region,info->window->WLayer->DamageList);
// Begin the refresh
BeginRefresh(info->window);
}
// Install clip region if we have it
else
if (!(flags&BDSF_NO_CLIP) && info->clip_region)
InstallClipRegion(info->window->WLayer,info->clip_region);
// Clear backdrop window
if (flags&BDSF_CLEAR)
{
EraseRect(&info->rp,
info->size.MinX,
info->size.MinY,
info->size.MaxX,
info->size.MaxY);
}
// Not just clearing?
if ((flags&BDSF_CLEAR_ONLY)!=BDSF_CLEAR_ONLY)
{
// Go through backdrop list (backwards)
for (object=(BackdropObject *)info->objects.list.lh_TailPred;
object->node.ln_Pred;
object=(BackdropObject *)object->node.ln_Pred)
{
// Reset?
if (flags&BDSF_RESET)
{
// Need to get masks?
if (!backdrop_icon_border(object) &&
!object->image_mask[0])
{
// Get masks for this icon
backdrop_get_masks(object);
}
}
// Valid position?
if (!(object->flags&BDOF_NO_POSITION))
{
// Render this object
backdrop_draw_object(
info,
object,
BRENDERF_REAL,
&info->rp,
object->pos.Left,
object->pos.Top);
}
}
}
// Refresh?
if (flags&BDSF_REFRESH)
{
EndRefresh(info->window,((flags&BDSF_REFRESH_DONE)==BDSF_REFRESH_DONE)?TRUE:FALSE);
// End refresh here?
if ((flags&BDSF_REFRESH_DONE)==BDSF_REFRESH_DONE)
{
// Unlock layers
#ifdef LOCKLAYER_OK
UnlockScreenLayer(info->window->WScreen);
#else
Permit();
#endif
}
}
// In refresh?
else
if (flags&BDSF_IN_REFRESH)
{
// End refresh temporarily
EndRefresh(info->window,FALSE);
// Remove clip region
if (info->clip_region)
InstallClipRegion(info->window->WLayer,0);
// Continue refresh
BeginRefresh(info->window);
// Unlock layers
#ifdef LOCKLAYER_OK
UnlockScreenLayer(info->window->WScreen);
#else
Permit();
#endif
}
// Remove clip region
else
if (!(flags&BDSF_NO_CLIP) && info->clip_region)
InstallClipRegion(info->window->WLayer,0);
// Update virtual size
if (flags&BDSF_RECALC) backdrop_calc_virtual(info);
}
// Unlock window
FreeSemaphore(&info->window_lock);
// Unlock backdrop list
unlock_listlock(&info->objects);
}
// Scroll the icons
void backdrop_scroll_objects(BackdropInfo *info,short off_x,short off_y)
{
// Lock window
GetSemaphore(&info->window_lock,SEMF_EXCLUSIVE,0);
// Window open?
if (info->window)
{
short damage=0,clear=0;
// Bounds-check the deltas
if (off_x<0 && off_x<-RECTWIDTH(&info->size))
clear=1;
else
if (off_x>0 && off_x>RECTWIDTH(&info->size))
clear=1;
else
if (off_y<0 && off_y<-RECTHEIGHT(&info->size))
clear=1;
else
if (off_y>0 && off_y>RECTHEIGHT(&info->size))
clear=1;
// Clear instead of scrolling?
if (clear)
{
// Clear the whole window
EraseRect(
info->window->RPort,
info->size.MinX,
info->size.MinY,
info->size.MaxX,
info->size.MaxY);
}
// Scroll
else
{
// Check for 39
if(((struct Library *)GfxBase)->lib_Version>=39)
{
// Scroll backdrop window
ScrollRasterBF(
info->window->RPort,
off_x,off_y,
info->size.MinX,
info->size.MinY,
info->size.MaxX,
info->size.MaxY);
}
// No backfills
else
{
// Scroll backdrop window
ScrollRaster(
info->window->RPort,
off_x,off_y,
info->size.MinX,
info->size.MinY,
info->size.MaxX,
info->size.MaxY);
}
// Damaged simple-refresh?
if (info->window->Flags&WFLG_SIMPLE_REFRESH &&
info->window->WLayer->Flags&LAYERREFRESH)
{
// Forbid
#ifdef LOCKLAYER_OK
LockScreenLayer(info->window->WScreen);
#else
Forbid();
#endif
// Begin refreshing
BeginRefresh(info->window);
// Clear the new bits
EraseRect(
info->window->RPort,
info->size.MinX,
info->size.MinY,
info->size.MaxX,
info->size.MaxY);
// End refreshing for the moment
EndRefresh(info->window,FALSE);
damage=1;
}
}
// Got temporary region?
if (info->temp_region)
{
struct Rectangle rect;
// Get refresh region
rect.MinX=(off_x==0)?info->size.MinX:((off_x>0)?info->size.MaxX-off_x:info->size.MinX);
rect.MaxX=(off_x==0)?info->size.MaxX:((off_x>0)?info->size.MaxX:info->size.MinX-off_x);
rect.MinY=(off_y==0)?info->size.MinY:((off_y>0)?info->size.MaxY-off_y:info->size.MinY);
rect.MaxY=(off_y==0)?info->size.MaxY:((off_y>0)?info->size.MaxY:info->size.MinY-off_y);
// Bounds check region
if (rect.MinX<info->size.MinX) rect.MinX=info->size.MinX;
if (rect.MinY<info->size.MinY) rect.MinY=info->size.MinY;
if (rect.MaxX>info->size.MaxX) rect.MaxX=info->size.MaxX;
if (rect.MaxY>info->size.MaxY) rect.MaxY=info->size.MaxY;
// Add to damage list?
if (damage)
{
// Or rectangle in
OrRectRegion(info->window->WLayer->DamageList,&rect);
}
// Manually refresh
else
{
// Set refresh region
ClearRegion(info->temp_region);
OrRectRegion(info->temp_region,&rect);
// Install region
InstallClipRegion(info->window->WLayer,info->temp_region);
}
}
// Manual refresh?
if (!damage)
{
// Refresh
backdrop_show_objects(info,BDSF_NO_CLIP);
// Remove clip region
InstallClipRegion(info->window->WLayer,0);
}
// Automatic refresh
else
{
// Lister?
if (info->lister)
lister_refresh_callback(IDCMP_REFRESHWINDOW,info->window,info->lister);
// Other type
else
{
struct IntuiMessage msg;
// Fake IntuiMessage
msg.Class=IDCMP_REFRESHWINDOW;
// Handle refresh
backdrop_idcmp(info,&msg,0);
}
// Enable multi-tasking
#ifdef LOCKLAYER_OK
UnlockScreenLayer(info->window->WScreen);
#else
Permit();
#endif
}
}
// Unlock window
FreeSemaphore(&info->window_lock);
}
// Stop dragging a button
void buttons_stop_drag(Buttons *buttons,short x,short y)
{
struct Layer *layer;
struct Window *window;
ULONG id=0;
BOOL swap_local=0;
IPCData *ipc=0;
BOOL ok=0;
// Free drag info
FreeDragInfo(buttons->drag_info);
buttons->drag_info=0;
// Nothing selected now
buttons->editor_sel_col=-1;
buttons->editor_sel_row=-1;
buttons->button_sel_button=0;
IPC_Command(
buttons->editor,
BUTTONEDIT_SELECT_BUTTON,
-1,
(APTR)-1,
0,
0);
// Invalid coordinates?
if (x==-1 || y==-1) return;
// Lock layer
LockScreenLayer(buttons->window->WScreen);
// Find which layer we dropped it on
if (layer=WhichLayer(
&buttons->window->WScreen->LayerInfo,
x+buttons->window->LeftEdge,
y+buttons->window->TopEdge))
{
// Does layer have a window?
if ((window=layer->Window))
{
// Is it our own window?
if (window==buttons->window)
{
// Set flag to swap with local button
swap_local=1;
}
else
{
// Get window ID
id=GetWindowID(window);
// Forbid to get IPC
Forbid();
if (!(ipc=(IPCData *)GetWindowAppPort(window)))
Permit();
}
}
}
// Unlock layer
UnlockScreenLayer(buttons->window->WScreen);
// Got an IPC port?
if (ipc)
{
// Button editor or another button bank?
if (id==WINDOW_BUTTON_CONFIG || id==WINDOW_BUTTONS || id==WINDOW_FUNCTION_EDITOR)
{
Cfg_Button *button;
Point *pos;
// Store position (screen relative)
if (pos=AllocVec(sizeof(Point),0))
{
pos->x=x+buttons->window->LeftEdge;
pos->y=y+buttons->window->TopEdge;
}
// Copy current button
if (button=CopyButton(buttons->button_drag_button,0,-1))
{
// Send button
IPC_Command(ipc,BUTTONEDIT_CLIP_BUTTON,0,button,pos,0);
ok=1;
}
}
// Permit now we've sent the message
Permit();
}
// Swapping local buttons?
else
if (swap_local)
{
Cfg_Button *swap;
// Lock bank
GetSemaphore(&buttons->bank->lock,SEMF_SHARED,0);
// Get swap button
if (swap=button_from_point(buttons,&x,&y))
{
// Different button?
if (swap!=buttons->button_drag_button)
{
// Swap buttons
SwapListNodes(
&buttons->bank->buttons,
(struct Node *)buttons->button_drag_button,
(struct Node *)swap);
// Redraw buttons
buttons_show_button(
buttons,
swap,
buttons->drag_col,
buttons->drag_row,
swap->current,0);
buttons_show_button(
buttons,
buttons->button_drag_button,
x,
y,
buttons->button_drag_button->current,0);
buttons->flags|=BUTTONF_CHANGED;
}
}
// Unlock bank
FreeSemaphore(&buttons->bank->lock);
ok=1;
}
// Failed?
if (!ok) DisplayBeep(buttons->window->WScreen);
}
