// Get icon for an object
void backdrop_get_icon(BackdropInfo *info,BackdropObject *object,short flags)
{
short x,y,border_x=0,border_y=0;
BOOL new_icon=1;
// Keeping icon?
if (flags&GETICON_KEEP) new_icon=0;
// Not AppIcon?
if (object->type!=BDO_APP_ICON && !(flags&GETICON_POS_ONLY))
{
BPTR lock=0,old=0;
// Already got icon?
if (object->icon && !(flags&GETICON_KEEP))
{
// Free icon remapping
RemapIcon(object->icon,(info->window)?info->window->WScreen:0,1);
// Free icon
FreeCachedDiskObject(object->icon);
object->icon=0;
// We'll be getting a new one
new_icon=1;
}
// Bad disk?
if (object->type==BDO_BAD_DISK)
{
// Get default disk
if (!object->icon && !(object->icon=GetCachedDefDiskObject(WBKICK)))
object->icon=GetCachedDefDiskObject(WBDISK);
}
// Default directory icon?
else
if (flags&GETICON_DEFDIR)
{
// Get default drawer icon
if (!object->icon) object->icon=GetCachedDefDiskObject(WBDRAWER);
}
// Get lock on directory
else
if (!(flags&GETICON_CD) || (lock=backdrop_icon_lock(object)))
{
// Go to icon directory
if (lock) old=CurrentDir(lock);
// Disk?
if (object->type==BDO_DISK)
{
// No icon already?
if (!object->icon)
{
BOOL ok=1;
Cfg_Filetype *type=0;
char name[256],*ptr;
// Find a filetype-defined icon
if (object->device_name &&
(type=filetype_identify(object->device_name,FTTYPE_ICON,0,0)))
{
// Copy icon path, strip .info
strcpy(name,type->icon_path);
if (ptr=isicon(name)) *ptr=0;
// Over-ride flag set in filetype?
if (type->type.flags&FILETYPEF_OVERRIDE)
{
// Try for filetype icon first
object->icon=GetCachedDiskObject(name,0);
}
}
// Don't have icon yet?
if (!object->icon)
{
// Is this a MSDOS disk?
if (object->misc_data==ID_MSDOS_DISK)
{
// See if icon actually exists
if (type && !(SetProtection("Disk.info",FIBF_ARCHIVE)) &&
IoErr()==ERROR_OBJECT_NOT_FOUND)
{
// We'll use default icon
ok=0;
}
}
// Get disk icon
if (ok)
object->icon=GetCachedDiskObject("Disk",0);
}
// Got icon?
if (object->icon)
{
// If it's a drawer icon, turn it into a disk
if (object->icon->do_Type==WBDRAWER)
object->icon->do_Type=WBDISK;
// Check it is for a disk
if (object->icon->do_Type!=WBDISK)
{
// It's not, free it and use default
FreeCachedDiskObject(object->icon);
object->icon=0;
}
}
// Still no icon? Get default
if (!object->icon && !(flags&GETICON_FAIL))
{
// Got type-defined?
if (type)
{
// Try for filetype icon
object->icon=GetCachedDiskObject(name,0);
}
// Still none? Get default
if (!object->icon)
object->icon=GetCachedDefDiskObject(WBDISK);
// Set fake flag
if (object->icon)
object->flags|=BDOF_FAKE_ICON;
}
}
}
// Left out or group
else
if (object->type==BDO_LEFT_OUT || object->type==BDO_GROUP)
{
// Try for icon
if (!object->icon)
{
short fake=0;
// Want real icon?
if (flags&GETICON_FAIL) object->icon=GetCachedDiskObject(object->name,0);
// Get default icon if fails
else object->icon=GetProperIcon(object->name,&fake,0);
// Ended up fake?
if (fake)
{
// Set flag
object->flags|=BDOF_FAKE_ICON;
}
}
// Got group icon?
if (object->icon && object->type==BDO_GROUP)
{
// Auto-open group?
if (FindToolType(object->icon->do_ToolTypes,"OPEN"))
object->flags|=BDOF_AUTO_OPEN;
}
}
// Had a lock?
if (lock)
{
// Got icon?
if (object->icon)
{
// Clear custom position flag
object->flags&=~BDOF_CUSTOM_POS;
#ifdef DISTINCT_OK
// Main desktop, distinct positions?
if (info->flags&BDIF_MAIN_DESKTOP &&
environment->env->desktop_flags&DESKTOPF_DISTINCT)
{
char path[256];
// Get icon path
if (desktop_icon_path(object,path,256,lock))
{
// See if position is available
if (desktop_find_icon(path,&object->custom_pos))
{
// Set "custom position" flag
object->flags|=BDOF_CUSTOM_POS;
}
}
}
#endif
}
// Restore current dir
CurrentDir(old);
// Unlock object lock
UnLock(lock);
}
}
// Failed to even get a lock; get default icon if a disk
else
if (object->type==BDO_DISK)
{
// Get default icon
if (!object->icon && (object->icon=GetCachedDefDiskObject(WBDISK)))
object->flags|=BDOF_FAKE_ICON;
}
}
// Got an icon?
if (object->icon)
{
// Ended up fake?
if (object->flags&BDOF_FAKE_ICON)
{
// Make sure default icon has no position
if (object->icon)
{
// Clear 'position ok' flag, set invalid position
SetIconFlags(object->icon,GetIconFlags(object->icon)&~ICONF_POSITION_OK);
SetIconPosition(object->icon,-1,-1);
object->icon->do_CurrentX=NO_ICON_POSITION;
object->icon->do_CurrentY=NO_ICON_POSITION;
}
}
// If this is a group, make sure icon is a drawer
if (object->type==BDO_GROUP)
object->icon->do_Type=WBDRAWER;
// Is it a new icon?
if (new_icon)
{
// Window open?
if (info->window)
{
// Remap the icon
RemapIcon(object->icon,info->window->WScreen,0);
// Set flag
object->flags|=BDOF_REMAPPED;
}
}
// Transparent icon?
if (!backdrop_icon_border(object))
{
border_x=0;
border_y=0;
}
else
{
border_x=ICON_BORDER_X;
border_y=ICON_BORDER_Y;
}
// No label?
if ((GetIconFlags(object->icon)&ICONF_NO_LABEL) && !(environment->env->desktop_flags&DESKTOPF_NO_NOLABELS))
object->flags|=BDOF_NO_LABEL;
else
object->flags&=~BDOF_NO_LABEL;
}
// No icon, or no size stuff?
if (!object->icon || flags&GETICON_NO_POS) return;
// Get masks
if (!(flags&GETICON_KEEP)) backdrop_get_masks(object);
// Get object size
object->pos.Width=object->icon->do_Gadget.Width;
object->pos.Height=object->icon->do_Gadget.Height;
// (Re)position?
if (!(flags&GETICON_SAVE_POS))
{
// No position initially
object->flags|=BDOF_NO_POSITION;
// Auto position?
if (object->flags&BDOF_AUTO_POSITION)
{
return;
}
// Custom position?
else
if (object->flags&(BDOF_CUSTOM_POS|BDOF_LEFTOUT_POS))
{
// Get custom position
x=(object->custom_pos>>16)&0xffff;
y=object->custom_pos&0xffff;
}
// 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);
}
// Draw an object
void backdrop_draw_object(
BackdropInfo *info,
BackdropObject *object,
UWORD flags,
struct RastPort *rp,
short left,
short top)
{
UBYTE fpen=1,bpen=0,drawmode=JAM2,opus_drawmode=JAM2;
UWORD *imagedata=0;
struct Image *image=0;
struct Rectangle rect;
short len;
BOOL comp=0,draw=1,state=0;
short has_border;
// No icon?
if (!object->icon) return;
// See if icon has no border
has_border=backdrop_icon_border(object);
// Not just clearing image?
if (!(flags&BRENDERF_CLEAR))
{
// Get image to render
if ((image=(struct Image *)object->icon->do_Gadget.GadgetRender))
imagedata=image->ImageData;
// Is icon selected?
if (object->state)
{
// Is there a select image?
if (object->icon->do_Gadget.SelectRender &&
(object->icon->do_Gadget.Flags&GFLG_GADGHIMAGE))
{
if ((image=(struct Image *)object->icon->do_Gadget.SelectRender))
imagedata=image->ImageData;
state=1;
}
else comp=1;
}
}
#ifdef USE_DRAWICONSTATE
if (GetIconRectangle(
rp, object->icon, NULL, &rect,
ICONDRAWA_Borderless, TRUE,
TAG_DONE))
{
object->pos.Width = rect.MaxX - rect.MinX + 1;
object->pos.Height = rect.MaxY - rect.MinY + 1;
}
#elif defined(__MORPHOS__)
if (ISOWN(object->icon))
{
struct OwnDiskObject *o = (APTR)object->icon;
object->pos.Width = o->pngimage_width;
object->pos.Height = o->pngimage_height;
}
#endif
// Get object position
if (flags&BRENDERF_REAL)
{
short border_x=0,border_y_top=0,border_y_bottom=0;
// Border?
if (has_border)
{
// Use default border
border_x=ICON_BORDER_X;
border_y_top=ICON_BORDER_Y_TOP;
border_y_bottom=ICON_BORDER_Y_BOTTOM;
}
// Calculate full size
object->full_size.MinX=left-border_x;
object->full_size.MinY=top-border_y_top;
object->full_size.MaxX=left+object->pos.Width+border_x-1;
object->full_size.MaxY=top+object->pos.Height+border_y_bottom-1;
// Get image rectangle
rect.MinX=object->full_size.MinX+(info->size.MinX-info->offset_x);
rect.MinY=object->full_size.MinY+(info->size.MinY-info->offset_y);
rect.MaxX=object->full_size.MaxX+(info->size.MinX-info->offset_x);
rect.MaxY=object->full_size.MaxY+(info->size.MinY-info->offset_y);
// Store position
object->show_rect=rect;
object->image_rect=rect;
// Is object offscreen?
if (rect.MaxX<info->size.MinX ||
rect.MaxY<info->size.MinY ||
rect.MinX>info->size.MaxX ||
rect.MinY>info->size.MaxY) draw=0;
// Offset by coordinates
left+=info->size.MinX-info->offset_x;
top+=info->size.MinY-info->offset_y;
}
else
{
rect.MinX=left;
rect.MinY=top;
rect.MaxX=left+object->pos.Width-1;
rect.MaxY=top+object->pos.Height-1;
}
// Clear area?
if (flags&BRENDERF_CLEAR)
{
// Ok to draw?
if (draw)
{
// Clear whole icon?
if (!(flags&BRENDERF_LABEL))
{
EraseRect(rp,rect.MinX,rect.MinY,rect.MaxX,rect.MaxY);
}
}
// Can't draw
else flags&=~BRENDERF_CLEAR;
}
// Object state changed?
else
if (object->flags&BDOF_STATE_CHANGE)
{
#ifndef USE_DRAWICONSTATE
// Need to clear if transparent
#if !defined(__MORPHOS__)
if (!has_border)
#endif
EraseRect(rp,rect.MinX,rect.MinY,rect.MaxX,rect.MaxY);
#endif
object->flags&=~BDOF_STATE_CHANGE;
}
// Draw as normal
if (!(flags&BRENDERF_CLEAR))
{
// Not drawing if no image
if (!imagedata) draw=0;
// Ok to draw?
if (draw)
{
struct BitMap bitmap;
BOOL use_mask=0;
// Full icon?
if (flags&BRENDERF_REAL)
{
// Want border?
if (has_border)
{
// Draw border around icon
DrawBox(rp,&rect,GUI->draw_info,object->state);
// Get background colour
#ifdef USE_64BIT
SetAPen(
rp,
(object->flags&BDOF_BACKGROUND)?
object->pen:
GUI->draw_info->dri_Pens[BACKGROUNDPEN]);
#else
SetAPen(
rp,
(object->flags&BDOF_BACKGROUND)?
object->size:
GUI->draw_info->dri_Pens[BACKGROUNDPEN]);
#endif
// Clear boundary around image
#ifdef USE_DRAWICONSTATE
RectFill(rp,rect.MinX+1,rect.MinY+1,rect.MaxX-1,rect.MaxY-1);
#else
RectFill(rp,rect.MinX+1,rect.MinY+1,rect.MaxX-1,rect.MinY+2);
RectFill(rp,rect.MinX+1,rect.MinY+1,rect.MinX+3,rect.MaxY-1);
RectFill(rp,rect.MinX+4,rect.MaxY-3,rect.MaxX-1,rect.MaxY-1);
RectFill(rp,rect.MaxX-3,rect.MinY+3,rect.MaxX-1,rect.MaxY-4);
#endif
}
#ifdef USE_DRAWICONSTATE
else
{
EraseRect(rp,rect.MinX,rect.MinY,rect.MaxX,rect.MaxY);
}
#endif
}
#ifdef USE_DRAWICONSTATE
DrawIconState(
rp, object->icon, NULL,
left, top, object->state ? IDS_SELECTED : IDS_NORMAL,
ICONDRAWA_Frameless, TRUE,
ICONDRAWA_Borderless, TRUE,
ICONDRAWA_EraseBackground, FALSE,
TAG_DONE);
#else
#if defined(__MORPHOS__)
if (ISOWN(object->icon))
{
IPTR tags[] = { BLTBMA_USESOURCEALPHA, TRUE, TAG_DONE };
struct OwnDiskObject *o = (APTR)object->icon;
BltBitMapRastPortAlpha(o->pngimage,
0, 0, rp, left, top, o->pngimage_width, o->pngimage_height,
(struct TagItem *)&tags);
if (object->state)
{
ProcessPixelArray(rp, left, top, o->pngimage_width, o->pngimage_height,
POP_TINT, 0x5082ff, NULL);
}
}
else
{
#endif
// Get image as a bitmap
backdrop_image_bitmap(info,image,imagedata,&bitmap);
// Using a mask (no border)?
if (!has_border && object->image_mask[state])
{
// Draw using a mask
BltMaskBitMapRastPort(
&bitmap,0,0,
rp,left,top,
image->Width,image->Height,
0xe0,
(PLANEPTR)object->image_mask[state]);
use_mask=1;
}
// Draw normally
else
{
// Draw image
BltBitMapRastPort(
&bitmap,0,0,
rp,left,top,
image->Width,image->Height,
0xc0);
}
// Complement?
if (comp)
{
DragInfo *drag_info;
UBYTE mask;
// Only complement to image depth
mask=rp->Mask;
SetWrMsk(rp,image->PlanePick);
// Need backfill?
if ((object->icon->do_Gadget.Flags&GFLG_GADGBACKFILL) &&
(drag_info=GetDragInfo(info->window,0,-object->pos.Width,-object->pos.Height,0)))
{
// Draw icon into drag buffer
BltBitMapRastPort(
&bitmap,0,0,
&drag_info->drag_rp,0,0,
image->Width,image->Height,
0xc0);
// Build mask
GetDragMask(drag_info);
// Complement area with mask
BltMaskBitMapRastPort(
&drag_info->drag_bm,
0,0,
rp,
left,top,
image->Width,
image->Height,
0x20,
(PLANEPTR)drag_info->bob.ImageShadow);
// Free temporary drag info
FreeDragInfo(drag_info);
}
// Just complement image
else
{
ClipBlit(
rp,
left,top,
rp,
left,top,
image->Width,
image->Height,
0x50);
}
// Restore mask
SetWrMsk(rp,mask);
}
#if defined(__MORPHOS__)
}
#endif
#endif
// Left out (on desktop), or a link?
if (!(environment->env->desktop_flags&DESKTOPF_NO_ARROW) &&
((object->type==BDO_LEFT_OUT && !(object->flags&BDOF_DESKTOP_FOLDER) && info->flags&BDIF_MAIN_DESKTOP) ||
object->flags&BDOF_LINK_ICON))
{
struct Image *image;
// Get correct image for this resolution
image=(GUI->screen_info&SCRI_LORES)?&arrow_image[1]:&arrow_image[0];
// Is object big enough for the 'shortcut arrow'?
if (object->pos.Width>(image->Width<<1) &&
object->pos.Height>image->Height+4)
{
// Draw arrow in bottom-left corner
DrawImage(rp,image,rect.MinX,rect.MaxY-image->Height+1);
}
}
// Ghosted icon?
if (object->flags&BDOF_GHOSTED)
{
// Draw ghosting over the icon
backdrop_draw_icon_ghost(rp,&rect,(use_mask)?(PLANEPTR)object->image_mask[state]:0);
}
}
// Get pens from configuration
fpen=(info->flags&BDIF_MAIN_DESKTOP)?environment->env->icon_fpen:environment->env->iconw_fpen;
bpen=(info->flags&BDIF_MAIN_DESKTOP)?environment->env->icon_bpen:environment->env->iconw_bpen;
drawmode=(info->flags&BDIF_MAIN_DESKTOP)?environment->env->icon_style:environment->env->iconw_style;
opus_drawmode=drawmode;
// Shadow/Outline?
if (drawmode==MODE_SHADOW || drawmode==MODE_OUTLINE)
{
UBYTE temp;
// Set back to JAM1
drawmode=JAM1;
// Swap the pens
temp=fpen;
fpen=bpen;
bpen=temp;
}
// Fix pens for user colours
if (fpen>=4 && fpen<252) fpen=GUI->pens[fpen-4];
if (bpen>=4 && bpen<252) bpen=GUI->pens[bpen-4];
// Use fast call under 39
if(((struct Library *)GfxBase)->lib_Version>=39)
{
SetABPenDrMd(rp,fpen,bpen,drawmode);
}
else
{
SetAPen(rp,fpen);
SetBPen(rp,bpen);
SetDrMd(rp,drawmode);
}
}
// Full icon?
if (flags&BRENDERF_REAL && !(object->flags&BDOF_NO_LABEL))
{
char *name,namebuf[40];
// Bad disk?
if (object->type==BDO_BAD_DISK)
{
// Get bad disk name
backdrop_bad_disk_name(object,namebuf);
name=namebuf;
}
// Custom label?
else
if (object->flags&BDOF_CUSTOM_LABEL) name=object->device_name;
// Get name pointer
else name=object->name;
// Get text length
if ((len=strlen(name)))
{
struct TextExtent extent;
short max_width=0,loop,textx,texty;
// Splitting long labels?
if (environment->env->desktop_flags&DESKTOPF_SPLIT_LABELS)
{
// Calculate maximum text width (minimum 6 chars)
max_width=RECTWIDTH(&rect)+(RECTWIDTH(&rect)>>1);
if (max_width<rp->Font->tf_XSize*6)
max_width=rp->Font->tf_XSize*6;
}
// Position for text
textx=rect.MinX+(RECTWIDTH(&rect)>>1);
texty=rect.MaxY+ICON_LABEL_SPACE+rp->TxBaseline+((opus_drawmode==MODE_OUTLINE)?1:0);
Move(rp,textx,texty);
// Get text pixel size
TextMultiLine(rp,name,len,max_width,TMLF_CENTER|TMLF_EXTENT,&extent);
// Fix extent for shadow/outline
if (opus_drawmode==MODE_SHADOW)
{
extent.te_Extent.MaxX++;
extent.te_Width++;
extent.te_Height++;
}
else
if (opus_drawmode==MODE_OUTLINE)
{
extent.te_Extent.MinX--;
extent.te_Extent.MaxX++;
extent.te_Width+=2;
extent.te_Height+=2;
}
// Stretch out rectangle sides if necessary
if (extent.te_Extent.MinX<rect.MinX)
object->full_size.MinX-=rect.MinX-extent.te_Extent.MinX;
if (extent.te_Extent.MaxX>rect.MaxX)
object->full_size.MaxX+=extent.te_Extent.MaxX-rect.MaxX;
if (object->show_rect.MinX>extent.te_Extent.MinX)
object->show_rect.MinX=extent.te_Extent.MinX;
if (object->show_rect.MaxX<extent.te_Extent.MinX+extent.te_Width-1)
object->show_rect.MaxX=extent.te_Extent.MinX+extent.te_Width-1;
// Save bottom of text
object->show_rect.MaxY+=ICON_LABEL_SPACE+extent.te_Height; // +((opus_drawmode==MODE_OUTLINE)?1:0);
object->full_size.MaxY+=ICON_LABEL_SPACE+extent.te_Height; // +((opus_drawmode==MODE_OUTLINE)?1:0);
// Clear?
if (flags&BRENDERF_CLEAR)
{
EraseRect(rp,
extent.te_Extent.MinX,rect.MaxY+ICON_LABEL_SPACE+((opus_drawmode==MODE_OUTLINE)?1:0),
extent.te_Extent.MinX+extent.te_Width-1,rect.MaxY+ICON_LABEL_SPACE+extent.te_Height-1);
}
// Draw text
else
{
// Is object selected?
if (object->flags&BDOF_SELECTED)
{
if (drawmode==JAM2) SetDrMd(rp,INVERSVID|JAM2);
else
if (fpen!=GUI->draw_info->dri_Pens[HIGHLIGHTTEXTPEN])
SetAPen(rp,GUI->draw_info->dri_Pens[HIGHLIGHTTEXTPEN]);
else SetAPen(rp,GUI->draw_info->dri_Pens[BACKGROUNDPEN]);
}
// Shadow
if (opus_drawmode==MODE_SHADOW)
{
// Draw shadow text first
Move(rp,textx+1,texty+1);
TextMultiLine(rp,name,len,max_width,TMLF_CENTER,0);
// Draw text
SetAPen(rp,bpen);
Move(rp,textx,texty);
TextMultiLine(rp,name,len,max_width,TMLF_CENTER,0);
}
// Normal text
else
if (opus_drawmode!=MODE_OUTLINE)
{
// Render text
TextMultiLine(rp,name,len,max_width,TMLF_CENTER,0);
}
// Outline
else
{
Move(rp,textx+1,texty+1);
for (loop=0;loop<5;loop++)
{
// Render text
TextMultiLine(rp,name,len,max_width,TMLF_CENTER,0);
// Doing shadow?
if (loop<4)
{
short s_x=0,s_y=0;
// Switch to other pen?
if (loop==3)
SetAPen(rp,bpen);
// Get the new offsets
else
if (loop==0)
{
s_x=-1;
s_y=1;
}
else
if (loop==1)
{
s_x=-1;
s_y=-1;
}
else
if (loop==2)
{
s_x=1;
s_y=-1;
}
// Position for text
Move(rp,textx+s_x,texty+s_y);
}
}
}
// Reset draw mode if necessary
if (object->flags&BDOF_SELECTED)
SetDrMd(rp,drawmode);
}
}
// Got a notify message from PutDiskObject()
BOOL backdrop_check_notify(
BackdropInfo *info,
DOpusNotify *notify,
Lister *lister)
{
char *name_buf;
BOOL disk=0,ret=0;
struct List *search;
BackdropObject *object;
if (!(name_buf=AllocVec(256,0)))
return 0;
// Disk icon?
if (notify->dn_Name[strlen(notify->dn_Name)-1]==':')
{
char *ptr;
// Get volume name
if ((ptr=strchr(notify->dn_Name,':')))
{
stccpy(name_buf,notify->dn_Name,ptr-notify->dn_Name+1);
disk=1;
}
}
// Otherwise copy name and clear it
else
{
// Get name pointer
char *name=FilePart(notify->dn_Name);
// Copy name
strcpy(name_buf,name);
*name=0;
// Strip trailing '/'
if (*(name-1)=='/') *(name-1)=0;
}
// Is this a lister?
if (lister)
{
short len;
BOOL ok=0;
// Match length
len=strlen(notify->dn_Name);
// See if strings match
if (strnicmp(lister->cur_buffer->buf_Path,notify->dn_Name,len)==0)
{
// Check termination
if (lister->cur_buffer->buf_Path[len]=='\0') ok=1;
// / can terminate too
else
if (lister->cur_buffer->buf_Path[len]=='/' &&
lister->cur_buffer->buf_Path[len+1]=='\0') ok=1;
}
// Didn't match?
if (!ok)
{
// Free message
ReplyFreeMsg(notify);
FreeVec(name_buf);
return 0;
}
}
// Lock backdrop list
lock_listlock(&info->objects,1);
// See if there's an icon of this name
search=&info->objects.list;
while ((object=(BackdropObject *)FindNameI(search,name_buf)))
{
// Disk?
if (object->type==BDO_DISK && disk)
{
// Matched
break;
}
// Valid object?
else
if (object->type!=BDO_APP_ICON &&
object->type!=BDO_BAD_DISK &&
object->path)
{
char *path=0;
BPTR lock;
// If no lister, get full path of object
if (!lister && (path=AllocVec(512,0)))
{
// Lock path
if ((lock=Lock(object->path,ACCESS_READ)))
{
// Get full path
DevNameFromLockDopus(lock,path,512);
UnLock(lock);
}
// Failed
else strcpy(path,object->path);
}
// Objects in same directory?
if (lister || stricmp(notify->dn_Name,(path)?path:object->path)==0)
{
// Free path
if (path) FreeVec(path);
// Matched
break;
}
// Free path
if (path) FreeVec(path);
}
// If this is a lister, there could only be one
if (lister)
{
object=0;
break;
}
// Keep searching from this object
search=(struct List *)object;
}
// Got object?
if (object)
{
ULONG old_image1=0,old_image2=0,new_image1,new_image2,old_flags=0,new_flags;
BOOL redraw=0;
struct DiskObject *old;
// Save old icon
old=object->icon;
object->icon=0;
// Not deleted?
if (!notify->dn_Flags)
{
// Get image checksums
old_image1=IconCheckSum(old,0);
old_image2=IconCheckSum(old,1);
old_flags=GetIconFlags(old);
// Get new icon
backdrop_get_icon(info,object,GETICON_CD|GETICON_NO_POS|GETICON_FAIL);
}
// No icon now?
if (!object->icon)
{
// Replace old icon
object->icon=old;
// Erase old object
backdrop_erase_icon(info,object,BDSF_RECALC);
// Is object a disk?
if (object->type==BDO_DISK)
{
// Signal to refresh drives
IPC_Command(info->ipc,MAINCMD_REFRESH_DRIVES,0,0,0,0);
}
// Remove object from list
backdrop_remove_object(info,object);
}
// Ok to keep going
else
{
// Get image checksums
new_image1=IconCheckSum(object->icon,0);
new_image2=IconCheckSum(object->icon,1);
new_flags=GetIconFlags(object->icon);
// Mask out uninteresting flag bits
old_flags&=ICONF_BORDER_OFF|ICONF_BORDER_ON|ICONF_NO_LABEL;
new_flags&=ICONF_BORDER_OFF|ICONF_BORDER_ON|ICONF_NO_LABEL;
// Need to redraw?
if (old_image1!=new_image1 ||
old_image2!=new_image2 ||
old_flags!=new_flags)
{
// Erase old object
backdrop_erase_icon(info,object,0);
redraw=1;
}
// Free old icon
if (old)
{
// Free icon remapping
RemapIcon(old,(info->window)?info->window->WScreen:0,1);
// Free icon
FreeCachedDiskObject(old);
}
// Fix new icon size
backdrop_get_icon(info,object,GETICON_POS_ONLY|GETICON_SAVE_POS|GETICON_KEEP);
// Need to get masks?
if (!backdrop_icon_border(object))
{
// Get masks for this icon
backdrop_get_masks(object);
}
// Show new icon
if (redraw) backdrop_render_object(info,object,BRENDERF_CLIP);
}
ret=1;
}
// Otherwise, got lister?
else
if (lister)
{
// Tell lister to get icons
IPC_Command(lister->ipc,LISTER_GET_ICONS,0,0,0,0);
ret=1;
}
// Or, on the desktop?
else
if (info->flags&BDIF_MAIN_DESKTOP)
{
BPTR lock1,lock2;
// Lock the desktop folder and the changed directory
if ((lock1=Lock(environment->env->desktop_location,ACCESS_READ)) &&
(lock2=Lock(notify->dn_Name,ACCESS_READ)))
{
// Same directory?
if (SameLock(lock1,lock2)==LOCK_SAME)
{
// Update the desktop folder
misc_startup("dopus_desktop_update",MENU_UPDATE_DESKTOP,GUI->window,0,TRUE);
}
// Unlock second lock
UnLock(lock2);
}
// Unlock first lock
UnLock(lock1);
}
// Unlock list
unlock_listlock(&info->objects);
// Free message
ReplyFreeMsg(notify);
FreeVec(name_buf);
return ret;
}
