First Commit

libui-ng/darwin/slider.m

@@ -0,0 +1,208 @@
+// 14 august 2015
+#import "uipriv_darwin.h"
+
+// Horizontal sliders have no intrinsic width; we'll use the default Interface Builder width for them.
+// This will also be used for the initial frame size, to ensure the slider is always horizontal (see below).
+#define sliderWidth 92
+
+@interface libui_intrinsicWidthNSSlider : NSSlider
+@end
+
+@implementation libui_intrinsicWidthNSSlider
+
+- (NSSize)intrinsicContentSize
+{
+	NSSize s;
+
+	s = [super intrinsicContentSize];
+	s.width = sliderWidth;
+	return s;
+}
+
+@end
+
+struct uiSlider {
+	uiDarwinControl c;
+	NSSlider *slider;
+	void (*onChanged)(uiSlider *, void *);
+	void *onChangedData;
+	void (*onReleased)(uiSlider *, void *);
+	void *onReleasedData;
+	BOOL hasToolTip;
+};
+
+static void _uiSliderUpdateToolTip(uiSlider *s);
+
+@interface sliderDelegateClass : NSObject {
+	uiprivMap *sliders;
+}
+- (IBAction)onChanged:(id)sender;
+- (void)registerSlider:(uiSlider *)b;
+- (void)unregisterSlider:(uiSlider *)b;
+@end
+
+@implementation sliderDelegateClass
+
+- (id)init
+{
+	self = [super init];
+	if (self)
+		self->sliders = uiprivNewMap();
+	return self;
+}
+
+- (void)dealloc
+{
+	uiprivMapDestroy(self->sliders);
+	[super dealloc];
+}
+
+- (IBAction)onChanged:(id)sender
+{
+	uiSlider *s;
+	s = (uiSlider *) uiprivMapGet(self->sliders, sender);
+
+	NSEvent *currentEvent = [[sender window] currentEvent];
+	if([currentEvent type] == NSLeftMouseUp) {
+		(*(s->onReleased))(s, s->onReleasedData);
+	} else {
+		(*(s->onChanged))(s, s->onChangedData);
+	}
+
+	if (s->hasToolTip)
+		_uiSliderUpdateToolTip(s);
+}
+
+- (void)registerSlider:(uiSlider *)s
+{
+	uiprivMapSet(self->sliders, s->slider, s);
+	[s->slider setTarget:self];
+	[s->slider setAction:@selector(onChanged:)];
+}
+
+- (void)unregisterSlider:(uiSlider *)s
+{
+	[s->slider setTarget:nil];
+	uiprivMapDelete(self->sliders, s->slider);
+}
+
+@end
+
+static sliderDelegateClass *sliderDelegate = nil;
+
+uiDarwinControlAllDefaultsExceptDestroy(uiSlider, slider)
+
+static void uiSliderDestroy(uiControl *c)
+{
+	uiSlider *s = uiSlider(c);
+
+	[sliderDelegate unregisterSlider:s];
+	[s->slider release];
+	uiFreeControl(uiControl(s));
+}
+
+static void _uiSliderUpdateToolTip(uiSlider *s)
+{
+	[s->slider setToolTip:[NSString stringWithFormat:@"%ld", [s->slider integerValue]]];
+}
+
+int uiSliderHasToolTip(uiSlider *s)
+{
+	return s->hasToolTip;
+}
+
+void uiSliderSetHasToolTip(uiSlider *s, int hasToolTip)
+{
+	s->hasToolTip = hasToolTip;
+
+	if (hasToolTip)
+		_uiSliderUpdateToolTip(s);
+	else
+		[s->slider setToolTip:nil];
+}
+
+int uiSliderValue(uiSlider *s)
+{
+	return [s->slider integerValue];
+}
+
+void uiSliderSetValue(uiSlider *s, int value)
+{
+	[s->slider setIntegerValue:value];
+}
+
+void uiSliderOnChanged(uiSlider *s, void (*f)(uiSlider *, void *), void *data)
+{
+	s->onChanged = f;
+	s->onChangedData = data;
+}
+
+static void defaultOnChanged(uiSlider *s, void *data)
+{
+	// do nothing
+}
+
+void uiSliderOnReleased(uiSlider *s, void (*f)(uiSlider *, void *), void *data)
+{
+	s->onReleased = f;
+	s->onReleasedData = data;
+}
+
+static void defaultOnReleased(uiSlider *s, void *data)
+{
+	// do nothing
+}
+
+void uiSliderSetRange(uiSlider *s, int min, int max)
+{
+	int temp;
+
+	if (min >= max) {
+		temp = min;
+		min = max;
+		max = temp;
+	}
+
+	[s->slider setMinValue:min];
+	[s->slider setMaxValue:max];
+}
+
+uiSlider *uiNewSlider(int min, int max)
+{
+	uiSlider *s;
+	NSSliderCell *cell;
+	int temp;
+
+	if (min >= max) {
+		temp = min;
+		min = max;
+		max = temp;
+	}
+
+	uiDarwinNewControl(uiSlider, s);
+
+	// a horizontal slider is defined as one where the width > height, not by a flag
+	// to be safe, don't use NSZeroRect, but make it horizontal from the get-go
+	s->slider = [[libui_intrinsicWidthNSSlider alloc]
+		initWithFrame:NSMakeRect(0, 0, sliderWidth, 2)];
+	[s->slider setMinValue:min];
+	[s->slider setMaxValue:max];
+	[s->slider setAllowsTickMarkValuesOnly:NO];
+	[s->slider setNumberOfTickMarks:0];
+	[s->slider setTickMarkPosition:NSTickMarkAbove];
+
+	cell = (NSSliderCell *) [s->slider cell];
+	[cell setSliderType:NSLinearSlider];
+
+	if (sliderDelegate == nil) {
+		sliderDelegate = [[sliderDelegateClass new] autorelease];
+		[uiprivDelegates addObject:sliderDelegate];
+	}
+	[sliderDelegate registerSlider:s];
+	uiSliderOnChanged(s, defaultOnChanged, NULL);
+	uiSliderOnReleased(s, defaultOnReleased, NULL);
+
+	uiSliderSetHasToolTip(s, 1);
+
+	return s;
+}