dwindows: mac/dw.m comparison

comparison mac/dw.m @ 731:6a589a1a42b0

Add dw_window_get_font() Add incomplete dw_scrollbox_get* functions Add initial QNX Photon support

author	mhessling@81767d24-ef19-dc11-ae90-00e081727c95
date	Tue, 15 Mar 2011 01:46:41 +0000
parents	d3fb3613726a
children	db3a173e487e

comparison

equal deleted inserted replaced

-:d3fb3613726a
+:6a589a1a42b0
 *
 * Using garbage collection so requires 10.5 or later.
 * clang -std=c99 -g -o dwtest -D__MAC__ -I. dwtest.c mac/dw.m -framework Cocoa -framework WebKit -fobjc-gc-only
 */
 #import <Cocoa/Cocoa.h>
 #import <WebKit/WebKit.h>
 #include "dw.h"
 #include <sys/utsname.h>
 #include <sys/socket.h>
 #include <sys/un.h>
 #include <sys/mman.h>
 int (*keypressfunc)(HWND, char, int, int, void *) = handler->signalfunction;
 NSString *nchar = [event charactersIgnoringModifiers];
 int special = (int)[event modifierFlags];
 unichar vk = [nchar characterAtIndex:0];
 char ch;
 /* Handle a valid key */
 if([nchar length] == 1)
 {
 const char *tmp = [nchar UTF8String];
 if(tmp)
 {
 ch = tmp[0];
 }
 }
 return keypressfunc(handler->window, ch, (int)vk, special, handler->data);
 }
 /* Button press and release event */
 			case 3:
 			case 4:
 				int (* API buttonfunc)(HWND, int, int, int, void *) = (int (* API)(HWND, int, int, int, void *))handler->signalfunction;
 				int button = (int)event;
 				LONG x,y;
 				dw_pointer_query_pos(&x, &y);
 				return buttonfunc(object, (int)x, (int)y, button, handler->data);
 			}
 /* Window close event */
 			case 6:
 			{
 			}
 /* Container class selection event */
 case 9:
 {
 int (*containerselectfunc)(HWND, char *, void *) = handler->signalfunction;
 return containerselectfunc(handler->window, (char *)event, handler->data);
 }
 /* Container context menu event */
 			case 10:
 			{
 case 11:
 case 14:
 {
 int (* API valuechangedfunc)(HWND, int, void *) = (int (* API)(HWND, int, void *))handler->signalfunction;
 int selected = (int)event;
 return valuechangedfunc(handler->window, selected, handler->data);;
 }
 /* Tree class selection event */
 			case 12:
 			{
 int (* API treeselectfunc)(HWND, HTREEITEM, char *, void *, void *) = (int (* API)(HWND, HTREEITEM, char *, void *, void *))handler->signalfunction;
 char *text = (char *)event;
 void *user = NULL;
 id item = nil;
 if([object isKindOfClass:[NSOutlineView class]])
 {
 item = (id)event;
 NSString *nstr = [item pointerAtIndex:1];
 if(nstr)
 {
 text = strdup([nstr UTF8String]);
 }
 else
 			}
 /* Set Focus event */
 case 13:
 {
 int (* API setfocusfunc)(HWND, void *) = (int (* API)(HWND, void *))handler->signalfunction;
 return setfocusfunc(handler->window, handler->data);
 }
 /* Notebook page change event */
 case 15:
 {
 int (* API switchpagefunc)(HWND, unsigned long, void *) = (int (* API)(HWND, unsigned long, void *))handler->signalfunction;
 int pageid = (int)event;
 return switchpagefunc(handler->window, pageid, handler->data);
 }
 case 16:
 {
 int (* API treeexpandfunc)(HWND, HTREEITEM, void *) = (int (* API)(HWND, HTREEITEM, void *))handler->signalfunction;
 return treeexpandfunc(handler->window, (HTREEITEM)event, handler->data);
 }
 		}
 	}
 	return -1;
 -(void)doBitBlt:(id)param;
 -(void)doFlush:(id)param;
 @end
 @implementation DWObject
 -(void)uselessThread:(id)sender { /* Thread only to initialize threading */ }
 -(void)synchronizeThread:(id)param
 {
 pthread_mutex_unlock(DWRunMutex);
 pthread_mutex_lock(DWThreadMutex2);
 pthread_mutex_unlock(DWThreadMutex2);
 {
 NSValue *bi = (NSValue *)param;
 DWBitBlt *bltinfo = (DWBitBlt *)[bi pointerValue];
 id bltdest = bltinfo->dest;
 id bltsrc = bltinfo->src;
 if([bltdest isMemberOfClass:[NSImage class]])
 {
 [bltdest lockFocus];
 }
 else
 _DWLastDrawable = bltinfo->dest;
 }
 if([bltsrc isMemberOfClass:[NSImage class]])
 {
 NSImage *image = bltsrc;
 [image drawAtPoint:NSMakePoint(bltinfo->xdest, bltinfo->ydest) fromRect:NSMakeRect(bltinfo->xsrc, bltinfo->ysrc, bltinfo->width, bltinfo->height)
 operation:NSCompositeCopy fraction:1.0];
 [bltsrc release];
 }
 [bltdest unlockFocus];
 free(bltinfo);
 DWObject *DWObj;
 /* So basically to implement our event handlers...
 * it looks like we are going to have to subclass
 * basically everything.  Was hoping to add methods
 * to the superclasses but it looks like you can
 * only add methods and no variables, which isn't
 * going to work. -Brian
 */
 /* Subclass for a box type */
 @interface DWBox : NSView
 #ifdef BUILDING_FOR_SNOW_LEOPARD
 <NSWindowDelegate>
 #endif
 {
 	Box *box;
 	void *userdata;
 	NSColor *bgcolor;
 }
 -(id)init;
 -(void)dealloc;
 -(Box *)box;
 -(void *)userdata;
 -(void)setUserdata:(void *)input;
 -(void)drawRect:(NSRect)rect;
 -(BOOL)isFlipped;
 -(void)keyDown:(NSEvent *)theEvent;
 -(void)setColor:(unsigned long)input;
 @end
 @implementation DWBox
 -(id)init
 {
 self = [super init];
 if (self)
 {
 box = calloc(1, sizeof(Box));
 }
 return self;
 }
 -(void)dealloc
 {
 UserData *root = userdata;
 free(box);
 _remove_userdata(&root, NULL, TRUE);
 [super dealloc];
 }
 -(Box *)box { return box; }
 -(void *)userdata { return userdata; }
 -(void)setUserdata:(void *)input { userdata = input; }
 -(void)drawRect:(NSRect)rect
 {
 	if(bgcolor)
 	{
 		[bgcolor set];
 		NSRectFill( [self bounds] );
 	}
 }
 @end
 /* Subclass for a top-level window */
 @interface DWView : DWBox
 {
 	NSMenu *windowmenu;
 }
 -(BOOL)windowShouldClose:(id)sender;
 -(void)setMenu:(NSMenu *)input;
 -(void)menuHandler:(id)sender;
 -(void)keyDown:(NSEvent *)theEvent;
 @end
 @implementation DWView
 -(BOOL)windowShouldClose:(id)sender
 {
 if(_event_handler(self, nil, 6) == FALSE)
 		return NO;
 	return YES;
 }
 {
 	if(windowmenu)
 	{
 		[DWApp setMainMenu:windowmenu];
 	}
 	else
 	{
 		[DWApp setMainMenu:DWMainMenu];
 	}
 _event_handler(self, nil, 13);
 }
 @end
 /* Subclass for a button type */
 @interface DWButton : NSButton
 {
 	void *userdata;
 }
 -(void *)userdata;
 -(void)setUserdata:(void *)input;
 -(void)buttonClicked:(id)sender;
 @end
 @end
 /* Subclass for a progress type */
 @interface DWPercent : NSProgressIndicator
 {
 	void *userdata;
 }
 -(void *)userdata;
 -(void)setUserdata:(void *)input;
 @end
 @end
 /* Subclass for a entryfield type */
 @interface DWEntryField : NSTextField
 {
 	void *userdata;
 }
 -(void *)userdata;
 -(void)setUserdata:(void *)input;
 @end
 @end
 /* Subclass for a entryfield password type */
 @interface DWEntryFieldPassword : NSSecureTextField
 {
 	void *userdata;
 }
 -(void *)userdata;
 -(void)setUserdata:(void *)input;
 @end
 -(void)setUserdata:(void *)input { userdata = input; }
 -(void)dealloc { UserData *root = userdata; _remove_userdata(&root, NULL, TRUE); [super dealloc]; }
 @end
 /* Subclass for a Notebook control type */
 @interface DWNotebook : NSTabView
 #ifdef BUILDING_FOR_SNOW_LEOPARD
 <NSTabViewDelegate>
 #endif
 {
 	void *userdata;
 -(void)setPageid:(int)input { pageid = input; }
 -(void)dealloc { UserData *root = userdata; _remove_userdata(&root, NULL, TRUE); [super dealloc]; }
 @end
 /* Subclass for a color chooser type */
 @interface DWColorChoose : NSColorPanel
 {
 	DWDialog *dialog;
 }
 -(void)changeColor:(id)sender;
 -(void)setDialog:(DWDialog *)input;
 }
 -(void)setDialog:(DWDialog *)input { dialog = input; }
 @end
 /* Subclass for a splitbar type */
 @interface DWSplitBar : NSSplitView
 #ifdef BUILDING_FOR_SNOW_LEOPARD
 <NSSplitViewDelegate>
 #endif
 {
 	void *userdata;
 float percent;
 }
 -(void)splitViewDidResizeSubviews:(NSNotification *)aNotification;
 -(void *)userdata;
 -(void)setUserdata:(void *)input;
 @end
 /* Subclass for a slider type */
 @interface DWSlider : NSSlider
 {
 	void *userdata;
 }
 -(void *)userdata;
 -(void)setUserdata:(void *)input;
 -(void)sliderChanged:(id)sender;
 @end
 -(void *)userdata { return userdata; }
 -(void)setUserdata:(void *)input { userdata = input; }
 -(float)range { return range; }
 -(float)visible { return visible; }
 -(void)setRange:(float)input1 andVisible:(float)input2 { range = input1; visible = input2; }
 -(void)scrollerChanged:(id)sender
 {
 double proportion = [self knobProportion];
 int page = (int)(proportion * range);
 int max = (int)(range - page);
 int result = (int)([self doubleValue] * max);
 int newpos = result;
 switch ([sender hitPart])
 {
 case NSScrollerDecrementLine:
 if(newpos > 0)
 {
 newpos--;
 }
 break;
 case NSScrollerIncrementLine:
 if(newpos < max)
 {
 newpos++;
 }
 break;
 case NSScrollerDecrementPage:
 newpos -= page;
 if(newpos < 0)
 {
 newpos = 0;
 }
 break;
 case NSScrollerIncrementPage:
 newpos += page;
 if(newpos > max)
 {
 newpos = max;
 }
 break;
 default:
 ; // do nothing
 }
 if(newpos != result)
 {
 double newposd = (double)newpos/max;
 [self setDoubleValue:newposd];
 }
 _event_handler(self, (void *)newpos, 14);
 }
 -(void)dealloc { UserData *root = userdata; _remove_userdata(&root, NULL, TRUE); [super dealloc]; }
 @end
 /* Subclass for a render area type */
 @interface DWRender : NSView
 {
 	void *userdata;
 }
 -(void *)userdata;
 -(void)setUserdata:(void *)input;
 -(BOOL)isFlipped { return NO; }
 -(void)dealloc { UserData *root = userdata; _remove_userdata(&root, NULL, TRUE); [super dealloc]; }
 @end
 /* Subclass for a MLE type */
 @interface DWMLE : NSTextView
 {
 	void *userdata;
 }
 -(void *)userdata;
 -(void)setUserdata:(void *)input;
 -(void)setUserdata:(void *)input { userdata = input; }
 -(void)dealloc { UserData *root = userdata; _remove_userdata(&root, NULL, TRUE); [super dealloc]; }
 @end
 /* Subclass for a Container/List type */
 @interface DWContainer : NSTableView
 #ifdef BUILDING_FOR_SNOW_LEOPARD
 <NSTableViewDataSource>
 #endif
 {
 	void *userdata;
 -(void)setUserdata:(void *)input { userdata = input; }
 -(id)scrollview { return scrollview; }
 -(void)setScrollview:(id)input { scrollview = input; }
 -(void)addColumn:(NSTableColumn *)input andType:(int)type { if(tvcols) { [tvcols addObject:input]; [types addObject:[NSNumber numberWithInt:type]]; } }
 -(NSTableColumn *)getColumn:(int)col { if(tvcols) { return [tvcols objectAtIndex:col]; } return nil; }
 -(int)insertRow:(NSArray *)input at:(int)index
 {
 if(data)
 {
 unsigned long start = [tvcols count] * index;
 NSIndexSet *set = [[NSIndexSet alloc] initWithIndexesInRange:NSMakeRange(start, start + [tvcols count])];
 if(index < lastAddPoint)
 {
 lastAddPoint++;
 }
 [data insertObjects:input atIndexes:set];
 [titles insertPointer:NULL atIndex:index];
 [set release];
 return (int)[titles count];
 }
 return 0;
 }
 -(int)addRow:(NSArray *)input
 {
 if(data)
 {
 lastAddPoint = (int)[titles count];
 [data addObjectsFromArray:input];
 [titles addPointer:NULL];
 return (int)[titles count];
 }
 return 0;
 }
 -(int)addRows:(int)number
 {
 	if(tvcols)
 	{
 -(int)cellType:(int)col { return [[types objectAtIndex:col] intValue]; }
 -(int)lastAddPoint { return lastAddPoint; }
 -(int)lastQueryPoint { return lastQueryPoint; }
 -(void)setLastQueryPoint:(int)input { lastQueryPoint = input; }
 -(void)clear { if(data) { [data removeAllObjects]; while([titles count]) { [titles removePointerAtIndex:0]; } } lastAddPoint = 0; }
 -(void)setup
 {
 	tvcols = [[[NSMutableArray alloc] init] retain];
 	data = [[[NSMutableArray alloc] init] retain];
 	types = [[[NSMutableArray alloc] init] retain];
 	titles = [[NSPointerArray pointerArrayWithWeakObjects] retain];
 	[[NSNotificationCenter defaultCenter] addObserver:self selector:@selector(selectionChanged:) name:NSTableViewSelectionDidChangeNotification object:[self window]];
 }
 -(void)doubleClicked:(id)sender
 {
 /* Handler for container class */
 	_event_handler(self, (NSEvent *)[self getRowTitle:(int)[self selectedRow]], 12);
 /* Handler for listbox class */
 	_event_handler(self, (NSEvent *)(int)[self selectedRow], 11);
 }
 -(NSMenu *)menuForEvent:(NSEvent *)event
 {
 int row;
 NSPoint where = [self convertPoint:[event locationInWindow] fromView:nil];
 row = (int)[self rowAtPoint:where];
 _event_handler(self, (NSEvent *)[self getRowTitle:row], 10);
 {
 if(node)
 {
 int count = (int)[node count];
 int z;
 for(z=0;z<count;z++)
 {
 NSPointerArray *pnt = [node objectAtIndex:z];
 NSMutableArray *children = (NSMutableArray *)[pnt pointerAtIndex:3];
 if(children)
 {
 if(item == pnt)
 {
 _free_tree_recurse(children, NULL);
 [node release];
 }
 }
 /* Subclass for a Tree type */
 @interface DWTree : NSOutlineView
 #ifdef BUILDING_FOR_SNOW_LEOPARD
 <NSOutlineViewDataSource>
 #endif
 {
 	void *userdata;
 	NSTableColumn *imagecol;
 NSTableColumn *textcol;
 	NSMutableArray *data;
 /* Each data item consists of a linked lists of tree item data.
 * NSImage *, NSString *, Item Data *, NSMutableArray * of Children
 */
 id scrollview;
 }
 -(id)outlineView:(NSOutlineView *)outlineView child:(int)index ofItem:(id)item;
 -(void)deleteNode:(NSPointerArray *)item;
 -(void)clear;
 @end
 @implementation DWTree
 -(id)init
 {
 self = [super init];
 if (self)
 {
 imagecol = [[NSTableColumn alloc] init];
 NSImageCell *imagecell = [[[NSImageCell alloc] init] autorelease];
 [imagecol setDataCell:imagecell];
 [imagecol setResizingMask:NSTableColumnNoResizing];
 }
 return self;
 }
 -(id)outlineView:(NSOutlineView *)outlineView child:(int)index ofItem:(id)item
 {
 	if(item)
 {
 NSMutableArray *array = [item pointerAtIndex:3];
 		return array ? [array objectAtIndex:index] : nil;
 	}
 	else
 {
 			return 0;
 }
 }
 else
 {
 return data ? (int)[data count] : 0;
 }
 }
 -(id)outlineView:(NSOutlineView *)outlineView objectValueForTableColumn:(NSTableColumn *)tableColumn byItem:(id)item
 {
 	if(item)
 {
 		if([item isKindOfClass:[NSPointerArray class]])
 {
 			NSPointerArray *this = (NSPointerArray *)item;
 if(tableColumn == imagecol)
 {
 return [this pointerAtIndex:0];
 }
 return [this pointerAtIndex:1];
 }
 		else
 {
 			return nil;
 }
 	}
 return @"List Root";
 }
 if(item)
 {
 _event_handler(self, (void *)item, 12);
 }
 }
 -(void)treeItemExpanded:(NSNotification *)notification
 {
 id item = [[notification userInfo ] objectForKey: @"NSObject"];
 if(item)
 {
 _event_handler(self, (void *)item, 16);
 }
 }
 -(NSMenu *)menuForEvent:(NSEvent *)event
 {
 int row;
 NSPoint where = [self convertPoint:[event locationInWindow] fromView:nil];
 row = (int)[self rowAtPoint:where];
 id item = [self itemAtRow:row];
 }
 -(NSScrollView *)scrollview { return scrollview; }
 -(void)setScrollview:(NSScrollView *)input { scrollview = input; }
 -(void)deleteNode:(NSPointerArray *)item { _free_tree_recurse(data, item); }
 -(void)clear { NSMutableArray *toclear = data; data = nil; _free_tree_recurse(toclear, NULL); [self reloadData]; }
 -(void)dealloc
 {
 UserData *root = userdata;
 _remove_userdata(&root, NULL, TRUE);
 _free_tree_recurse(data, NULL);
 [imagecol release];
 [textcol release];
 [super dealloc];
 }
 @end
 /* Subclass for a Calendar type */
 @interface DWCalendar : NSDatePicker
 {
 	void *userdata;
 }
 -(void *)userdata;
 -(void)setUserdata:(void *)input;
 -(void)setUserdata:(void *)input { userdata = input; }
 -(void)dealloc { UserData *root = userdata; _remove_userdata(&root, NULL, TRUE); [super dealloc]; }
 @end
 /* Subclass for a Combobox type */
 @interface DWComboBox : NSComboBox
 #ifdef BUILDING_FOR_SNOW_LEOPARD
 <NSComboBoxDelegate>
 #endif
 {
 	void *userdata;
 -(void)dealloc { UserData *root = userdata; _remove_userdata(&root, NULL, TRUE); [super dealloc]; }
 @end
 /* Subclass for a stepper component of the spinbutton type */
 /* This is a bad way of doing this... but I can't get the other methods to work */
 @interface DWStepper : NSStepper
 {
 id textfield;
 id parent;
 }
 -(void)setTextfield:(id)input;
 -(id)textfield;
 -(void)setParent:(id)input { parent = input; }
 -(id)parent { return parent; }
 -(void)mouseDown:(NSEvent *)event
 {
 [super mouseDown:event];
 if([[NSApp currentEvent] type] == NSLeftMouseUp)
 {
 [textfield takeIntValueFrom:self];
 _event_handler(parent, (void *)[self integerValue], 14);
 }
 }
 -(void)mouseUp:(NSEvent *)event
 {
 [textfield takeIntValueFrom:self];
 _event_handler(parent, (void *)[self integerValue], 14);
 }
 @end
 /* Subclass for a Spinbutton type */
 @interface DWSpinButton : NSView
 #ifdef BUILDING_FOR_SNOW_LEOPARD
 <NSTextFieldDelegate>
 #endif
 {
 	void *userdata;
 -(NSStepper *)stepper;
 -(void)controlTextDidChange:(NSNotification *)aNotification;
 @end
 @implementation DWSpinButton
 -(id)init
 {
 self = [super init];
 if(self)
 {
 textfield = [[NSTextField alloc] init];
 [self addSubview:textfield];
 stepper = [[DWStepper alloc] init];
 [self addSubview:stepper];
 _event_handler(self, (void *)[stepper integerValue], 14);
 }
 -(void)dealloc { UserData *root = userdata; _remove_userdata(&root, NULL, TRUE); [super dealloc]; }
 @end
 /* Subclass for a MDI type
 * This is just a box for display purposes... but it is a
 * unique class so it can be identified when creating windows.
 */
 @interface DWMDI : DWBox {}
 @end
 			if([handle isMemberOfClass:[DWNotebook class]])
 			{
 				DWNotebook *notebook = (DWNotebook *)handle;
 				DWNotebookPage *notepage = (DWNotebookPage *)[notebook selectedTabViewItem];
 				DWBox *view = [notepage view];
 				if(view != nil)
 				{
 					Box *box = [view box];
 					NSSize size = [view frame].size;
 					_do_resize(box, size.width, size.height);
 			}
 			else if([handle isMemberOfClass:[DWSplitBar class]] && size.width > 20 && size.height > 20)
 			{
 DWSplitBar *split = (DWSplitBar *)handle;
 				float percent = [split percent];
 if(percent > 0)
 {
 dw_splitbar_set(handle, percent);
 [split setPercent:0];
 }
 			}
 			if(thisbox->type == DW_HORZ)
 currentx += width + vectorx + (pad * 2);
 if(thisbox->type == DW_VERT)
 currenty += height + vectory + (pad * 2);
 }
 *           milliseconds: Number of milliseconds to run the loop for.
 */
 void API dw_main_sleep(int milliseconds)
 {
 DWTID curr = pthread_self();
 if(DWThread == (DWTID)-1 || DWThread == curr)
 {
 DWTID orig = DWThread;
 NSDate *until = [NSDate dateWithTimeIntervalSinceNow:(milliseconds/1000.0)];
 if(orig == (DWTID)-1)
 {
 dw_mutex_lock(DWRunMutex);
 DWThread = curr;
 }
 {
 NSEvent *event = [DWApp nextEventMatchingMask:NSAnyEventMask
 untilDate:date
 inMode:NSDefaultRunLoopMode
 dequeue:YES];
 if(event)
 {
 [DWApp sendEvent:event];
 [DWApp updateWindows];
 return 1;
 }
 * Processes a single message iteration and returns.
 */
 void API dw_main_iteration(void)
 {
 DWTID curr = pthread_self();
 if(DWThread == (DWTID)-1)
 {
 dw_mutex_lock(DWRunMutex);
 DWThread = curr;
 _dw_main_iteration([NSDate distantPast]);
 	}
 	if(flags & DW_MB_ERROR)
 	{
 		iResponse = (int)
 		NSRunCriticalAlertPanel([ NSString stringWithUTF8String:title ],
 								[ NSString stringWithUTF8String:outbuf ],
 								button1, button2, button3);	}
 	else
 	{
 		iResponse = (int)
 		NSRunAlertPanel([ NSString stringWithUTF8String:title ],
 						[ NSString stringWithUTF8String:outbuf ],
 						button1, button2, button3);
 	}
 	switch(iResponse)
 	{
 		case NSAlertDefaultReturn:    /* user pressed OK */
 			if(flags & DW_MB_YESNO || flags & DW_MB_YESNOCANCEL)
 			{
 				return DW_MB_RETURN_YES;
 */
 HWND API dw_box_new(int type, int pad)
 {
 int _locked_by_me = FALSE;
 DW_MUTEX_LOCK;
 DWBox *view = [[DWBox alloc] init];
 	Box *newbox = [view box];
 	memset(newbox, 0, sizeof(Box));
 	newbox->pad = pad;
 	newbox->type = type;
 DW_MUTEX_UNLOCK;
 {
 	DWBox *box = dw_box_new(type, pad);
 	[box setFocusRingType:NSFocusRingTypeExterior];
 	return box;
 }
+#ifndef INCOMPLETE
+/*
+* Create a new scrollable Box to be packed.
+* Parameters:
+*       type: Either DW_VERT (vertical) or DW_HORZ (horizontal).
+*       pad: Number of pixels to pad around the box.
+* This works fine under GTK+, but is incomplete on other platforms
+*/
+HWND dw_scrollbox_new( int type, int pad )
+{
+DWBox *box = dw_box_new(type, pad);
+[box setFocusRingType:NSFocusRingTypeExterior];
+NSLog(@"dw_scrollbox_new() unimplemented\n");
+return box;
+}
+/*
+* Returns the position of the scrollbar in the scrollbox
+* Parameters:
+*          handle: Handle to the scrollbox to be queried.
+*          orient: The vertical or horizontal scrollbar.
+*/
+int dw_scrollbox_get_pos(HWND handle, int orient)
+{
+int val = -1;
+NSLog(@"dw_scrollbox_get_pos() unimplemented\n");
+return val;
+}
+/*
+* Gets the range for the scrollbar in the scrollbox.
+* Parameters:
+*          handle: Handle to the scrollbox to be queried.
+*          orient: The vertical or horizontal scrollbar.
+*/
+int API dw_scrollbox_get_range(HWND handle, int orient)
+{
+int val = -1;
+NSLog(@"dw_scrollbox_get_range() unimplemented\n");
+return val;
+}
+#endif
 /*
 * Pack windows (widgets) into a box from the end (or bottom).
 * Parameters:
 *       box: Window handle of the box to be packed into.
 	else if([ object isKindOfClass:[ DWTree class ] ])
 	{
 		DWTree *tree = item;
 		this = item = [tree scrollview];
 	}
 	/* Duplicate the existing data */
 tmpitem = malloc(sizeof(Item)*(thisbox->count+1));
 for(z=0;z<thisbox->count;z++)
 {
 HWND API dw_bitmapbutton_new(char *text, ULONG resid)
 {
 /* TODO: Implement tooltips */
 NSBundle *bundle = [NSBundle mainBundle];
 NSString *respath = [bundle resourcePath];
 NSString *filepath = [respath stringByAppendingFormat:@"/%u.png", resid];
 	NSImage *image = [[NSImage alloc] initWithContentsOfFile:filepath];
 	DWButton *button = _button_new("", resid);
 	[button setImage:image];
 //[button setBezelStyle:0];
 [button setButtonType:NSMomentaryLight];
 else
 {
 scrollbar = [[DWScrollbar alloc] initWithFrame:NSMakeRect(0,0,100,5)];
 }
 [scrollbar setArrowsPosition:NSScrollerArrowsDefaultSetting];
 [scrollbar setTarget:scrollbar];
 [scrollbar setAction:@selector(changed:)];
 [scrollbar setRange:0.0 andVisible:0.0];
 [scrollbar setKnobProportion:1.0];
 [scrollbar setTarget:scrollbar];
 [scrollbar setAction:@selector(scrollerChanged:)];
 	DWButton *button = handle;
 	if(value)
 	{
 		[button setState:NSOnState];
 	}
 	else
 	{
 		[button setState:NSOffState];
 	}
 }
 /* Common code for containers and listboxes */
 HWND _cont_new(ULONG cid, int multi)
 {
 NSScrollView *scrollview  = [[NSScrollView alloc] init];
 	DWContainer *cont = [[DWContainer alloc] init];
 [cont setScrollview:scrollview];
 [scrollview setBorderType:NSBezelBorder];
 [scrollview setHasVerticalScroller:YES];
 [scrollview setAutohidesScrollers:YES];
 	if(multi)
 	{
 		[cont setAllowsMultipleSelection:YES];
 	}
 	else
 else if([object isMemberOfClass:[DWContainer class]])
 {
 DWContainer *cont = handle;
 NSString *nstr = [ NSString stringWithUTF8String:text ];
 NSArray *newrow = [NSArray arrayWithObject:nstr];
 [cont addRow:newrow];
 /*[cont performSelectorOnMainThread:@selector(addRow:)
 withObject:newrow
 waitUntilDone:YES];*/
 [cont reloadData];
 else if([object isMemberOfClass:[DWContainer class]])
 {
 DWContainer *cont = handle;
 NSString *nstr = [ NSString stringWithUTF8String:text ];
 NSArray *newrow = [NSArray arrayWithObject:nstr];
 [cont insertRow:newrow at:pos];
 [cont reloadData];
 }
 DW_MUTEX_UNLOCK;
 }
 		for(z=0;z<count;z++)
 		{
 NSString *nstr = [ NSString stringWithUTF8String:text[z] ];
 NSArray *newrow = [[NSArray alloc] arrayWithObject:nstr];
 [cont addRow:newrow];
 }
 [cont reloadData];
 }
 DW_MUTEX_UNLOCK;
 		[combo removeAllItems];
 	}
 else if([object isMemberOfClass:[DWContainer class]])
 {
 DWContainer *cont = handle;
 [cont clear];
 [cont reloadData];
 }
 DW_MUTEX_UNLOCK;
 }
 		[combo scrollItemAtIndexToTop:top];
 	}
 else if([object isMemberOfClass:[DWContainer class]])
 {
 DWContainer *cont = handle;
 [cont scrollRowToVisible:top];
 }
 DW_MUTEX_UNLOCK;
 }
 	if([object isMemberOfClass:[DWComboBox class]])
 	{
 		DWComboBox *combo = handle;
 int count = (int)[combo numberOfItems];
 if(index > count)
 {
 *buffer = '\0';
 }
 else
 	}
 else if([object isMemberOfClass:[DWContainer class]])
 {
 DWContainer *cont = handle;
 int count = (int)[cont numberOfRowsInTableView:cont];
 if(index > count)
 {
 *buffer = '\0';
 }
 else
 {
 NSString *nstr = [cont getRow:index and:0];
 strncpy(buffer, [ nstr UTF8String ], length - 1);
 }
 }
 DW_MUTEX_UNLOCK;
 }
 	}
 else if([object isMemberOfClass:[DWContainer class]])
 {
 DWContainer *cont = handle;
 int count = (int)[cont numberOfRowsInTableView:cont];
 if(index <= count)
 {
 NSString *nstr = [ NSString stringWithUTF8String:buffer ];
 [cont editCell:nstr at:index and:0];
 [cont reloadData];
 }
 }
 DW_MUTEX_UNLOCK;
 }
 /*
 * Returns the index to the item in the list currently selected.
 * Parameters:
 {
 int _locked_by_me = FALSE;
 DW_MUTEX_LOCK;
 	id object = handle;
 int retval = -1;
 if([object isMemberOfClass:[DWContainer class]])
 {
 DWContainer *cont = handle;
 NSIndexSet *selected = [cont selectedRowIndexes];
 NSUInteger result = [selected indexGreaterThanIndex:where];
 if(result != NSNotFound)
 {
 retval = (int)result;
 }
 }
 DW_MUTEX_UNLOCK;
 	return retval;
 }
 /*
 	}
 else if([object isMemberOfClass:[DWContainer class]])
 {
 DWContainer *cont = handle;
 NSIndexSet *selected = [[NSIndexSet alloc] initWithIndex:(NSUInteger)index];
 [cont selectRowIndexes:selected byExtendingSelection:YES];
 [selected release];
 }
 DW_MUTEX_UNLOCK;
 }
 /*
 * Deletes the item with given index from the list.
 		[combo removeItemAtIndex:index];
 	}
 else if([object isMemberOfClass:[DWContainer class]])
 {
 DWContainer *cont = handle;
 [cont removeRow:index];
 [cont reloadData];
 }
 DW_MUTEX_UNLOCK;
 }
 *       id: An ID to be used with dw_window_from_id() or 0L.
 */
 HWND API dw_mle_new(ULONG cid)
 {
 	DWMLE *mle = [[DWMLE alloc] init];
 NSScrollView *scrollview  = [[NSScrollView alloc] init];
 //[mle setScrollview:scrollview];
 [scrollview setBorderType:NSBezelBorder];
 [scrollview setHasVerticalScroller:YES];
 [scrollview setAutohidesScrollers:YES];
 [scrollview setAutoresizingMask:NSViewWidthSizable|NSViewHeightSizable];
 {
 NSScrollView *sv = handle;
 	DWMLE *mle = [sv documentView];
 NSTextStorage *ts = [mle textStorage];
 NSMutableString *ms = [ts mutableString];
 *bytes = [ms length];
 *lines = 0; /* TODO: Line count */
 }
 /*
 	DWMLE *mle = [sv documentView];
 	if(state)
 	{
 		[mle setEditable:YES];
 	}
 	else
 	{
 		[mle setEditable:NO];
 	}
 }
 DWDialog *dialog = dw_dialog_new(colorDlg);
 /* Set defaults for the dialog. */
 [colorDlg setColor:color];
 [colorDlg setDialog:dialog];
 [colorDlg setContinuous:YES];
 [colorDlg setTarget:colorDlg];
 [colorDlg setAction:@selector(changeColor:)];
 [colorDlg makeKeyAndOrderFront:nil];
 color = (NSColor *)dw_dialog_wait(dialog);
 [color release];
 return _foreground;
 */
 HWND API dw_tree_new(ULONG cid)
 {
 int _locked_by_me = FALSE;
 DW_MUTEX_LOCK;
 NSScrollView *scrollview  = [[NSScrollView alloc] init];
 	DWTree *tree = [[DWTree alloc] init];
 [tree setScrollview:scrollview];
 [scrollview setBorderType:NSBezelBorder];
 [scrollview setHasVerticalScroller:YES];
 [scrollview setAutohidesScrollers:YES];
 [tree setAllowsMultipleSelection:NO];
 	[tree setDataSource:tree];
 [scrollview setDocumentView:tree];
 [tree setHeaderView:nil];
 [tree setTag:cid];
 DW_MUTEX_LOCK;
 	DWContainer *cont = handle;
 	id object = nil;
 	int type = [cont cellType:column];
 	int lastadd = [cont lastAddPoint];
 if(!data)
 {
 DW_MUTEX_UNLOCK;
 return;
 }
 	else if(type & DW_CFA_STRING)
 	{
 char *str = *((char **)data);
 		object = [ NSString stringWithUTF8String:str ];
 	}
 	else
 	{
 		char textbuffer[100];
 		if(type & DW_CFA_ULONG)
 		{
 			curtm.tm_min = ctime.minutes;
 			curtm.tm_sec = ctime.seconds;
 			strftime(textbuffer, 100, "%X", &curtm);
 		}
 		else
 		{
 DW_MUTEX_UNLOCK;
 			return;
 		}
 		object = [ NSString stringWithUTF8String:textbuffer ];
 {
 int _locked_by_me = FALSE;
 DW_MUTEX_LOCK;
 DWContainer *cont = handle;
 NSTableColumn *col = [cont getColumn:column];
 [col setWidth:width];
 DW_MUTEX_UNLOCK;
 }
 /*
 {
 int _locked_by_me = FALSE;
 DW_MUTEX_LOCK;
 DWContainer *cont = handle;
 int x;
 for(x=0;x<rowcount;x++)
 {
 [cont removeRow:0];
 }
 DW_MUTEX_UNLOCK;
 DW_MUTEX_LOCK;
 DWContainer *cont = handle;
 NSIndexSet *selected = [cont selectedRowIndexes];
 NSUInteger result = [selected indexGreaterThanOrEqualToIndex:0];
 char *retval = NULL;
 if(result != NSNotFound)
 {
 retval = [cont getRowTitle:(int)result];
 [cont setLastQueryPoint:(int)result];
 }
 DWContainer *cont = handle;
 int lastQueryPoint = [cont lastQueryPoint];
 NSIndexSet *selected = [cont selectedRowIndexes];
 NSUInteger result = [selected indexGreaterThanIndex:lastQueryPoint];
 char *retval = NULL;
 if(result != NSNotFound)
 {
 retval = [cont getRowTitle:(int)result];
 [cont setLastQueryPoint:(int)result];
 }
 int _locked_by_me = FALSE;
 DW_MUTEX_LOCK;
 DWContainer *cont = handle;
 char *thistext;
 int x, count = (int)[cont numberOfRowsInTableView:cont];
 for(x=0;x<count;x++)
 {
 thistext = [cont getRowTitle:x];
 if(thistext == text)
 {
 NSIndexSet *selected = [[NSIndexSet alloc] initWithIndex:(NSUInteger)x];
 [cont selectRowIndexes:selected byExtendingSelection:YES];
 [selected release];
 }
 }
 DW_MUTEX_UNLOCK;
 int _locked_by_me = FALSE;
 DW_MUTEX_LOCK;
 DWContainer *cont = handle;
 char *thistext;
 int x, count = (int)[cont numberOfRowsInTableView:cont];
 for(x=0;x<count;x++)
 {
 thistext = [cont getRowTitle:x];
 if(thistext == text)
 {
 [cont removeRow:x];
 return;
 }
 */
 HICN API dw_icon_load(unsigned long module, unsigned long resid)
 {
 NSBundle *bundle = [NSBundle mainBundle];
 NSString *respath = [bundle resourcePath];
 NSString *filepath = [respath stringByAppendingFormat:@"/%u.png", resid];
 	NSImage *image = [[NSImage alloc] initWithContentsOfFile:filepath];
 	return image;
 }
 /*
 HWND API dw_mdi_new(unsigned long cid)
 {
 /* There isn't anything like quite like MDI on MacOS...
 * However we will make floating windows that hide
 * when the application is deactivated to simulate
 * similar behavior.
 */
 DWMDI *mdi = [[DWMDI alloc] init];
 /* [mdi setTag:cid]; Why doesn't this work? */
 return mdi;
 }
 * Returns:
 *       A handle to a splitbar window or NULL on failure.
 */
 HWND API dw_splitbar_new(int type, HWND topleft, HWND bottomright, unsigned long cid)
 {
 HWND tmpbox = dw_box_new(DW_VERT, 0);
 int _locked_by_me = FALSE;
 DW_MUTEX_LOCK;
 	DWSplitBar *split = [[DWSplitBar alloc] init];
 [split setDelegate:split];
 dw_box_pack_start(tmpbox, topleft, 0, 0, TRUE, TRUE, 0);
 	[split addSubview:tmpbox];
 tmpbox = dw_box_new(DW_VERT, 0);
 dw_box_pack_start(tmpbox, bottomright, 0, 0, TRUE, TRUE, 0);
 	[split addSubview:tmpbox];
 	if(type == DW_VERT)
 	{
 		[split setVertical:NO];
 [split setPosition:pos ofDividerAtIndex:0];
 }
 else
 {
 /* If we have no size.. wait until the resize
 * event when we get an actual size to try
 * to set the splitbar again.
 */
 [split setPercent:percent];
 }
 DW_MUTEX_UNLOCK;
 {
 	HPIXMAP pixmap;
 	if (!(pixmap = calloc(1,sizeof(struct _hpixmap))))
 		return NULL;
 NSBundle *bundle = [NSBundle mainBundle];
 NSString *respath = [bundle resourcePath];
 NSString *filepath = [respath stringByAppendingFormat:@"/%u.png", resid];
 	NSImage *image = [[NSImage alloc] initWithContentsOfFile:filepath];
 	NSSize size = [image size];
 	pixmap->width = size.width;
 	pixmap->height = size.height;
 	pixmap->handle = image;
 */
 void API dw_pixmap_bitblt(HWND dest, HPIXMAP destp, int xdest, int ydest, int width, int height, HWND src, HPIXMAP srcp, int xsrc, int ysrc)
 {
 DWBitBlt *bltinfo = calloc(1, sizeof(DWBitBlt));
 NSValue* bi = [NSValue valueWithPointer:bltinfo];
 /* Fill in the information */
 bltinfo->dest = dest;
 bltinfo->src = src;
 bltinfo->xdest = xdest;
 bltinfo->ydest = ydest;
 bltinfo->width = width;
 bltinfo->height = height;
 bltinfo->xsrc = xsrc;
 bltinfo->ysrc = ysrc;
 if(destp)
 {
 bltinfo->dest = (id)destp->handle;
 }
 if(srcp)
 {
 id object = bltinfo->src = (id)srcp->handle;
 [object retain];
 }
 [DWObj performSelectorOnMainThread:@selector(doBitBlt:) withObject:bi waitUntilDone:YES];
 }
 /*
 * Create a new static text window (widget) to be packed.
 *       x: Pointer to variable to store X coordinate.
 *       y: Pointer to variable to store Y coordinate.
 */
 void API dw_pointer_query_pos(long *x, long *y)
 {
 NSPoint mouseLoc;
 mouseLoc = [NSEvent mouseLocation];
 	if(x)
 	{
 		*x = mouseLoc.x;
 	}
 NSMenu *thismenu = (NSMenu *)*menu;
 id object = parent;
 NSView *view = [object isKindOfClass:[NSWindow class]] ? [object contentView] : parent;
 NSWindow *window = [view window];
 NSEvent *event = [DWApp currentEvent];
 NSEvent* fake = [NSEvent mouseEventWithType:NSRightMouseDown
 location:[window convertScreenToBase:NSMakePoint(x, y)]
 modifierFlags:0
 timestamp:[event timestamp]
 windowNumber:[window windowNumber]
 context:[NSGraphicsContext currentContext]
 eventNumber:1
 clickCount:1
 pressure:0.0];
 [NSMenu popUpContextMenu:thismenu withEvent:fake forView:view];
 }
 char _removetilde(char *dest, char *src)
 {
 	NSMenuItem *item = NULL;
 	if(strlen(title) == 0)
 	{
 		[menu addItem:[NSMenuItem separatorItem]];
 	}
 	else
 	{
 		char accel[2];
 		char *newtitle = malloc(strlen(title)+1);
 		NSString *nstr;
 /* Gets the notebook page from associated ID */
 DWNotebookPage *_notepage_from_id(DWNotebook *notebook, unsigned long pageid)
 {
 	NSArray *pages = [notebook tabViewItems];
 	for(DWNotebookPage *notepage in pages)
 	{
 		if([notepage pageid] == pageid)
 		{
 			return notepage;
 		}
 	if(notepage != nil)
 	{
 HWND tmpbox = dw_box_new(DW_VERT, 0);
 DWBox *box = tmpbox;
 dw_box_pack_start(tmpbox, page, 0, 0, TRUE, TRUE, 0);
 		[notepage setView:box];
 	}
 }
 [window makeKeyAndOrderFront:nil];
 #ifdef BUILDING_FOR_SNOW_LEOPARD
 	[window setAllowsConcurrentViewDrawing:NO];
 #endif
 [view release];
 /* If it isn't a toplevel window... */
 if(hwndOwner)
 {
 id object = hwndOwner;
 /* Check to see if the parent is an MDI window */
 if([object isMemberOfClass:[DWMDI class]])
 {
 /* Set the window level to be floating */
 [window setLevel:NSFloatingWindowLevel];
 *       cursortype: ID of the pointer you want.
 */
 void API dw_window_set_pointer(HWND handle, int pointertype)
 {
 id object = handle;
 	if([ object isKindOfClass:[ NSView class ] ])
 	{
 		NSView *view = handle;
 if(pointertype == DW_POINTER_DEFAULT)
 {
 [view discardCursorRects];
 }
 else if(pointertype == DW_POINTER_ARROW)
 {
 NSRect rect = [view frame];
 NSCursor *cursor = [NSCursor arrowCursor];
 [view addCursorRect:rect cursor:cursor];
 }
 /* No cursor for DW_POINTER_CLOCK? */
 }
 }
 *           handle: The window handle to make visible.
 */
 int API dw_window_hide(HWND handle)
 {
 /* TODO: Figure out proper dw_window_hide behavior...
 * individual windows don't appear to be hidable,
 * but all application windows can be hidden/deactivated
 * via the NS/DWApplication class.
 */
 	return 0;
 }
 *       handle: Handle to receive mouse input.
 */
 void API dw_window_capture(HWND handle)
 {
 id object = handle;
 if(![object isMemberOfClass:[NSWindow class]])
 {
 object = [object window];
 }
 if(object)
 *           newparent: The window's new parent window.
 */
 void API dw_window_reparent(HWND handle, HWND newparent)
 {
 id object = handle;
 if([object isMemberOfClass:[NSWindow class]])
 {
 /* We can't actually reparent on MacOS but if the
 * new parent is an MDI window, change to be a
 * floating window... otherwise set it to normal.
 */
 NSWindow *window = handle;
 /* If it isn't a toplevel window... */
 if(newparent)
 {
 object = newparent;
 /* Check to see if the parent is an MDI window */
 if([object isMemberOfClass:[DWMDI class]])
 {
 /* Set the window level to be floating */
 [window setLevel:NSFloatingWindowLevel];
 {
 	char *fontcopy = strdup(fontname);
 	char *name = strchr(fontcopy, '.');
 	if(name)
 	{
 		int size = atoi(fontcopy);
 		*name = 0;
 		name++;
 		NSFont *font = [NSFont fontWithName:[ NSString stringWithUTF8String:name ] size:(float)size];
 if(font)
 {
 	free(fontcopy);
 	return 0;
 }
 /*
+* Returns the current font for the specified window
+* Parameters:
+*           handle: The window handle from which to obtain the font.
+*/
+char * API dw_window_get_font(HWND handle)
+{
+NSLog(@"dw_window_get_font() unimplemented\n");
+return "8.Monaco";
+}
+/*
 * Destroys a window and all of it's children.
 * Parameters:
 *           handle: The window handle to destroy.
 */
 int API dw_window_destroy(HWND handle)
 	NSObject *object = handle;
 	if([ object isKindOfClass:[ NSImageView class ] ])
 	{
 		NSImageView *iv = handle;
 NSImage *bitmap = NULL;
 if(filename)
 {
 bitmap = [[NSImage alloc] initWithContentsOfFile:[ NSString stringWithUTF8String:filename ]];
 }
 else if(resid > 0 && resid < 65536)
 int _locked_by_me = FALSE;
 DW_MUTEX_LOCK;
 	NSObject *object = handle;
 	NSSize size;
 	size.width = width;
 	size.height = height;
 	if([ object isKindOfClass:[ NSWindow class ] ])
 	{
 		NSWindow *window = handle;
 		[window setContentSize:size];
 int _locked_by_me = FALSE;
 DW_MUTEX_LOCK;
 	NSObject *object = handle;
 	NSPoint point;
 	point.x = x;
 	point.y = y;
 	if([ object isKindOfClass:[ NSWindow class ] ])
 	{
 		NSWindow *window = handle;
 		[window setFrameOrigin:point];
 			*y = rect.origin.y;
 		if(width)
 			*width = rect.size.width;
 		if(height)
 			*height = rect.size.height;
 		return;
 	}
 }
 /*
 * Returns the width of the screen.
 */
 int API dw_screen_width(void)
 {
 	NSRect screenRect = [[NSScreen mainScreen] frame];
 	return screenRect.size.width;
 }
 /*
 * Returns the height of the screen.
 */
 int API dw_screen_height(void)
 {
 	NSRect screenRect = [[NSScreen mainScreen] frame];
 	return screenRect.size.height;
 }
 /* This should return the current color depth */
 unsigned long API dw_color_depth_get(void)
 *       data: User data to be passed to the handler function.
 */
 void API dw_signal_connect(HWND window, char *signame, void *sigfunc, void *data)
 {
 	ULONG message = 0, msgid = 0;
 	if(window && signame && sigfunc)
 	{
 		if((message = _findsigmessage(signame)) != 0)
 		{
 			_new_signal(message, window, (int)msgid, sigfunc, data);
 *       mutex: The handle to the mutex returned by dw_mutex_new().
 */
 void dw_mutex_lock(HMTX mutex)
 {
 /* We need to handle locks from the main thread differently...
 * since we can't stop message processing... otherwise we
 * will deadlock... so try to acquire the lock and continue
 * processing messages in between tries.
 */
 if(DWThread == pthread_self())
 {
 #if !defined(GARBAGE_COLLECT)
 NSAutoreleasePool *pool = pthread_getspecific(_dw_pool_key);
 [pool drain];
 pool = [[NSAutoreleasePool alloc] init];
 pthread_setspecific(_dw_pool_key, pool);
 #endif
 }
 /*
 * Setup thread independent pools.
 */

Mercurial > dwindows

comparison mac/dw.m @ 731:6a589a1a42b0