1 /* xscreensaver, Copyright (c) 2006 Jamie Zawinski <jwz@jwz.org>
3 * Permission to use, copy, modify, distribute, and sell this software and its
4 * documentation for any purpose is hereby granted without fee, provided that
5 * the above copyright notice appear in all copies and that both that
6 * copyright notice and this permission notice appear in supporting
7 * documentation. No representations are made about the suitability of this
8 * software for any purpose. It is provided "as is" without express or
12 /* XScreenSaver uses XML files to describe the user interface for configuring
13 the various screen savers. These files live in .../hacks/config/ and
14 say relatively high level things like: "there should be a checkbox
15 labelled "Leave Trails", and when it is checked, add the option '-trails'
16 to the command line when launching the program."
18 This code reads that XML and constructs a Cocoa interface from it.
19 The Cocoa controls are hooked up to NSUserDefaultsController to save
20 those settings into the MacOS preferences system. The Cocoa preferences
21 names are the same as the resource names specified in the screenhack's
22 'options' array (we use that array to map the command line switches
23 specified in the XML to the resource names to use).
26 #import "XScreenSaverConfigSheet.h"
29 #import "InvertedSlider.h"
30 #import <Foundation/NSXMLDocument.h>
32 @implementation XScreenSaverConfigSheet
34 #define LEFT_MARGIN 20 // left edge of window
35 #define COLUMN_SPACING 10 // gap between e.g. labels and text fields
36 #define LEFT_LABEL_WIDTH 70 // width of all left labels
37 #define LINE_SPACING 10 // leading between each line
39 // redefine these since they don't work when not inside an ObjC method
44 #define NSAssert(CC,S) do { if (!(CC)) { NSLog(S); }} while(0)
45 #define NSAssert1(CC,S,A) do { if (!(CC)) { NSLog(S,A); }} while(0)
46 #define NSAssert2(CC,S,A,B) do { if (!(CC)) { NSLog(S,A,B); }} while(0)
47 #define NSAssert3(CC,S,A,B,C) do { if (!(CC)) { NSLog(S,A,B,C); }} while(0)
50 /* Given a command-line option, returns the corresponding resource name.
51 Any arguments in the switch string are ignored (e.g., "-foo x").
54 switch_to_resource (NSString *cmdline_switch, const XrmOptionDescRec *opts,
59 NSAssert(cmdline_switch, @"cmdline switch is null");
60 if (! [cmdline_switch getCString:buf maxLength:sizeof(buf)
61 encoding:NSUTF8StringEncoding]) {
62 NSAssert1(0, @"unable to convert %@", cmdline_switch);
65 char *s = strpbrk(buf, " \t\r\n");
69 while (*tail && (*tail == ' ' || *tail == '\t'))
73 while (opts[0].option) {
74 if (!strcmp (opts[0].option, buf)) {
77 if (opts[0].argKind == XrmoptionNoArg) {
79 NSAssert1 (0, @"expected no args to switch: \"%@\"",
84 NSAssert1 (0, @"expected args to switch: \"%@\"",
91 ? [NSString stringWithCString:ret
92 encoding:NSUTF8StringEncoding]
95 const char *res = opts[0].specifier;
96 while (*res && (*res == '.' || *res == '*'))
98 return [NSString stringWithCString:res
99 encoding:NSUTF8StringEncoding];
104 NSAssert1 (0, @"\"%@\" not present in options", cmdline_switch);
109 /* Connects a control (checkbox, etc) to the corresponding preferences key.
112 bind_resource_to_preferences (NSUserDefaultsController *prefs,
115 const XrmOptionDescRec *opts)
117 NSString *bindto = ([control isKindOfClass:[NSPopUpButton class]]
119 : ([control isKindOfClass:[NSMatrix class]]
124 withKeyPath:[@"values." stringByAppendingString: pref_key]
128 NSObject *def = [[prefs defaults] objectForKey:pref_key];
129 NSString *s = [NSString stringWithFormat:@"bind: \"%@\"", pref_key];
130 s = [s stringByPaddingToLength:18 withString:@" " startingAtIndex:0];
131 s = [NSString stringWithFormat:@"%@ = \"%@\"", s, def];
132 s = [s stringByPaddingToLength:28 withString:@" " startingAtIndex:0];
133 NSLog (@"%@ %@/%@", s, [def class], [control class]);
138 bind_switch_to_preferences (NSUserDefaultsController *prefs,
140 NSString *cmdline_switch,
141 const XrmOptionDescRec *opts)
143 NSString *pref_key = switch_to_resource (cmdline_switch, opts, 0);
144 bind_resource_to_preferences (prefs, control, pref_key, opts);
148 /* Parse the attributes of an XML tag into a dictionary.
149 For input, the dictionary should have as attributes the keys, each
150 with @"" as their value.
151 On output, the dictionary will set the keys to the values specified,
152 and keys that were not specified will not be present in the dictionary.
153 Warnings are printed if there are duplicate or unknown attributes.
156 parse_attrs (NSMutableDictionary *dict, NSXMLNode *node)
158 NSArray *attrs = [(NSXMLElement *) node attributes];
159 int n = [attrs count];
162 // For each key in the dictionary, fill in the dict with the corresponding
163 // value. The value @"" is assumed to mean "un-set". Issue a warning if
164 // an attribute is specified twice.
166 for (i = 0; i < n; i++) {
167 NSXMLNode *attr = [attrs objectAtIndex:i];
168 NSString *key = [attr name];
169 NSString *val = [attr objectValue];
170 NSString *old = [dict objectForKey:key];
173 NSAssert2 (0, @"unknown attribute \"%@\" in \"%@\"", key, [node name]);
174 } else if ([old length] != 0) {
175 NSAssert2 (0, @"duplicate %@: \"%@\", \"%@\"", old, val);
177 [dict setValue:val forKey:key];
181 // Remove from the dictionary any keys whose value is still @"",
182 // meaning there was no such attribute specified.
184 NSArray *keys = [dict allKeys];
186 for (i = 0; i < n; i++) {
187 NSString *key = [keys objectAtIndex:i];
188 NSString *val = [dict objectForKey:key];
189 if ([val length] == 0)
190 [dict removeObjectForKey:key];
195 /* Creates a label: an un-editable NSTextField displaying the given text.
198 make_label (NSString *text)
201 rect.origin.x = rect.origin.y = 0;
202 rect.size.width = rect.size.height = 10;
203 NSTextField *lab = [[NSTextField alloc] initWithFrame:rect];
204 [lab setSelectable:NO];
205 [lab setEditable:NO];
207 [lab setDrawsBackground:NO];
208 [lab setStringValue:text];
215 last_child (NSView *parent)
217 NSArray *kids = [parent subviews];
218 int nkids = [kids count];
222 return [kids objectAtIndex:nkids-1];
226 /* Add the child as a subview of the parent, positioning it immediately
227 below or to the right of the previously-added child of that view.
230 place_child (NSView *parent, NSView *child, BOOL right_p)
232 NSRect rect = [child frame];
233 NSView *last = last_child (parent);
235 rect.origin.x = LEFT_MARGIN;
236 rect.origin.y = [parent frame].size.height - rect.size.height
238 } else if (right_p) {
240 rect.origin.x += rect.size.width + COLUMN_SPACING;
243 rect.origin.x = LEFT_MARGIN;
244 rect.origin.y -= [child frame].size.height + LINE_SPACING;
246 [child setFrameOrigin:rect.origin];
247 [parent addSubview:child];
251 static void traverse_children (NSUserDefaultsController *,
252 const XrmOptionDescRec *,
253 NSView *, NSXMLNode *);
256 /* Creates the checkbox (NSButton) described by the given XML node.
259 make_checkbox (NSUserDefaultsController *prefs,
260 const XrmOptionDescRec *opts, NSView *parent, NSXMLNode *node)
262 NSMutableDictionary *dict =
263 [NSMutableDictionary dictionaryWithObjectsAndKeys:
269 parse_attrs (dict, node);
270 NSString *label = [dict objectForKey:@"_label"];
271 NSString *arg_set = [dict objectForKey:@"arg-set"];
272 NSString *arg_unset = [dict objectForKey:@"arg-unset"];
275 NSAssert1 (0, @"no _label in %@", [node name]);
278 if (!arg_set && !arg_unset) {
279 NSAssert1 (0, @"neither arg-set nor arg-unset provided in \"%@\"",
282 if (arg_set && arg_unset) {
283 NSAssert1 (0, @"only one of arg-set and arg-unset may be used in \"%@\"",
287 // sanity-check the choice of argument names.
289 if (arg_set && ([arg_set hasPrefix:@"-no-"] ||
290 [arg_set hasPrefix:@"--no-"]))
291 NSLog (@"arg-set should not be a \"no\" option in \"%@\": %@",
293 if (arg_unset && (![arg_unset hasPrefix:@"-no-"] &&
294 ![arg_unset hasPrefix:@"--no-"]))
295 NSLog(@"arg-unset should be a \"no\" option in \"%@\": %@",
299 rect.origin.x = rect.origin.y = 0;
300 rect.size.width = rect.size.height = 10;
302 NSButton *button = [[NSButton alloc] initWithFrame:rect];
303 [button setButtonType:([[node name] isEqualToString:@"radio"]
306 [button setTitle:label];
308 place_child (parent, button, NO);
310 bind_switch_to_preferences (prefs, button,
311 (arg_set ? arg_set : arg_unset),
317 /* Creates the NSTextField described by the given XML node.
320 make_text_field (NSUserDefaultsController *prefs,
321 const XrmOptionDescRec *opts, NSView *parent, NSXMLNode *node,
324 NSMutableDictionary *dict =
325 [NSMutableDictionary dictionaryWithObjectsAndKeys:
330 parse_attrs (dict, node);
331 NSString *label = [dict objectForKey:@"_label"];
332 NSString *arg = [dict objectForKey:@"arg"];
334 if (!label && !no_label_p) {
335 NSAssert1 (0, @"no _label in %@", [node name]);
339 NSAssert1 (arg, @"no arg in %@", label);
342 rect.origin.x = rect.origin.y = 0;
343 rect.size.width = rect.size.height = 10;
345 NSTextField *txt = [[NSTextField alloc] initWithFrame:rect];
347 // make the default size be around 30 columns; a typical value for
348 // these text fields is "xscreensaver-text --cols 40".
350 [txt setStringValue:@"123456789 123456789 123456789 "];
352 [[txt cell] setWraps:NO];
353 [[txt cell] setScrollable:YES];
354 [txt setStringValue:@""];
357 NSTextField *lab = make_label (label);
358 place_child (parent, lab, NO);
362 place_child (parent, txt, (label ? YES : NO));
364 bind_switch_to_preferences (prefs, txt, arg, opts);
369 /* Creates the NSTextField described by the given XML node,
370 and hooks it up to a Choose button and a file selector widget.
373 make_file_selector (NSUserDefaultsController *prefs,
374 const XrmOptionDescRec *opts,
375 NSView *parent, NSXMLNode *node,
379 NSMutableDictionary *dict =
380 [NSMutableDictionary dictionaryWithObjectsAndKeys:
385 parse_attrs (dict, node);
386 NSString *label = [dict objectForKey:@"_label"];
387 NSString *arg = [dict objectForKey:@"arg"];
389 if (!label && !no_label_p) {
390 NSAssert1 (0, @"no _label in %@", [node name]);
394 NSAssert1 (arg, @"no arg in %@", label);
397 rect.origin.x = rect.origin.y = 0;
398 rect.size.width = rect.size.height = 10;
400 NSTextField *txt = [[NSTextField alloc] initWithFrame:rect];
402 // make the default size be around 20 columns.
404 [txt setStringValue:@"123456789 123456789 "];
406 [txt setSelectable:YES];
407 [txt setEditable:NO];
409 [txt setDrawsBackground:NO];
410 [[txt cell] setWraps:NO];
411 [[txt cell] setScrollable:YES];
412 [[txt cell] setLineBreakMode:NSLineBreakByTruncatingHead];
413 [txt setStringValue:@""];
415 NSTextField *lab = 0;
417 lab = make_label (label);
418 place_child (parent, lab, NO);
422 place_child (parent, txt, (label ? YES : NO));
424 bind_switch_to_preferences (prefs, txt, arg, opts);
427 // Make the text field be the same height as the label.
430 rect.size.height = [lab frame].size.height;
434 // Now put a "Choose" button next to it.
436 rect.origin.x = rect.origin.y = 0;
437 rect.size.width = rect.size.height = 10;
438 NSButton *choose = [[NSButton alloc] initWithFrame:rect];
439 [choose setTitle:@"Choose..."];
440 [choose setBezelStyle:NSRoundedBezelStyle];
443 place_child (parent, choose, YES);
445 // center the Choose button around the midpoint of the text field.
446 rect = [choose frame];
447 rect.origin.y = ([txt frame].origin.y +
448 (([txt frame].size.height - rect.size.height) / 2));
449 [choose setFrameOrigin:rect.origin];
451 [choose setTarget:[parent window]];
453 [choose setAction:@selector(chooseClickedDirs:)];
455 [choose setAction:@selector(chooseClicked:)];
461 /* Runs a modal file selector and sets the text field's value to the
462 selected file or directory.
465 do_file_selector (NSTextField *txt, BOOL dirs_p)
467 NSOpenPanel *panel = [NSOpenPanel openPanel];
468 [panel setAllowsMultipleSelection:NO];
469 [panel setCanChooseFiles:!dirs_p];
470 [panel setCanChooseDirectories:dirs_p];
472 NSString *file = [txt stringValue];
473 if ([file length] <= 0) {
474 file = NSHomeDirectory();
476 file = [file stringByAppendingPathComponent:@"Pictures"];
479 // NSString *dir = [file stringByDeletingLastPathComponent];
481 int result = [panel runModalForDirectory:file //dir
482 file:nil //[file lastPathComponent]
484 if (result == NSOKButton) {
485 NSArray *files = [panel filenames];
486 NSString *file = ([files count] > 0 ? [files objectAtIndex:0] : @"");
487 file = [file stringByAbbreviatingWithTildeInPath];
488 [txt setStringValue:file];
490 // Fuck me! Just setting the value of the NSTextField does not cause
491 // that to end up in the preferences!
493 NSDictionary *dict = [txt infoForBinding:@"value"];
494 NSUserDefaultsController *prefs = [dict objectForKey:@"NSObservedObject"];
495 NSString *path = [dict objectForKey:@"NSObservedKeyPath"];
496 if ([path hasPrefix:@"values."]) // WTF.
497 path = [path substringFromIndex:7];
498 [[prefs values] setValue:file forKey:path];
501 // make sure the end of the string is visible.
502 NSText *fe = [[txt window] fieldEditor:YES forObject:txt];
504 range.location = [file length]-3;
506 if (! [[txt window] makeFirstResponder:[txt window]])
507 [[txt window] endEditingFor:nil];
508 // [[txt window] makeFirstResponder:nil];
509 [fe setSelectedRange:range];
510 // [tv scrollRangeToVisible:range];
511 // [txt setNeedsDisplay:YES];
512 // [[txt cell] setNeedsDisplay:YES];
513 // [txt selectAll:txt];
518 /* Returns the NSTextField that is to the left of or above the NSButton.
521 find_text_field_of_button (NSButton *button)
523 NSView *parent = [button superview];
524 NSArray *kids = [parent subviews];
525 int nkids = [kids count];
528 for (i = 0; i < nkids; i++) {
529 NSObject *kid = [kids objectAtIndex:i];
530 if ([kid isKindOfClass:[NSTextField class]]) {
531 f = (NSTextField *) kid;
532 } else if (kid == button) {
541 - (void) chooseClicked:(NSObject *)arg
543 NSButton *choose = (NSButton *) arg;
544 NSTextField *txt = find_text_field_of_button (choose);
545 do_file_selector (txt, NO);
548 - (void) chooseClickedDirs:(NSObject *)arg
550 NSButton *choose = (NSButton *) arg;
551 NSTextField *txt = find_text_field_of_button (choose);
552 do_file_selector (txt, YES);
556 /* Creates the number selection control described by the given XML node.
557 If "type=slider", it's an NSSlider.
558 If "type=spinbutton", it's a text field with up/down arrows next to it.
561 make_number_selector (NSUserDefaultsController *prefs,
562 const XrmOptionDescRec *opts,
563 NSView *parent, NSXMLNode *node)
565 NSMutableDictionary *dict =
566 [NSMutableDictionary dictionaryWithObjectsAndKeys:
578 parse_attrs (dict, node);
579 NSString *label = [dict objectForKey:@"_label"];
580 NSString *low_label = [dict objectForKey:@"_low-label"];
581 NSString *high_label = [dict objectForKey:@"_high-label"];
582 NSString *type = [dict objectForKey:@"type"];
583 NSString *arg = [dict objectForKey:@"arg"];
584 NSString *low = [dict objectForKey:@"low"];
585 NSString *high = [dict objectForKey:@"high"];
586 NSString *def = [dict objectForKey:@"default"];
587 NSString *cvt = [dict objectForKey:@"convert"];
589 NSAssert1 (arg, @"no arg in %@", label);
590 NSAssert1 (type, @"no type in %@", label);
593 NSAssert1 (0, @"no low in %@", [node name]);
597 NSAssert1 (0, @"no high in %@", [node name]);
601 NSAssert1 (0, @"no default in %@", [node name]);
604 if (cvt && ![cvt isEqualToString:@"invert"]) {
605 NSAssert1 (0, @"if provided, \"convert\" must be \"invert\" in %@",
609 if ([type isEqualToString:@"slider"]) {
612 rect.origin.x = rect.origin.y = 0;
613 rect.size.width = 150;
614 rect.size.height = 20;
617 slider = [[InvertedSlider alloc] initWithFrame:rect];
619 slider = [[NSSlider alloc] initWithFrame:rect];
621 [slider setMaxValue:[high doubleValue]];
622 [slider setMinValue:[low doubleValue]];
625 NSTextField *lab = make_label (label);
626 place_child (parent, lab, NO);
631 NSTextField *lab = make_label (low_label);
632 [lab setFont:[NSFont systemFontOfSize:[NSFont smallSystemFontSize]]];
633 [lab setAlignment:1]; // right aligned
635 if (rect.size.width < LEFT_LABEL_WIDTH)
636 rect.size.width = LEFT_LABEL_WIDTH; // make all left labels same size
637 rect.size.height = [slider frame].size.height;
639 place_child (parent, lab, NO);
643 place_child (parent, slider, (low_label ? YES : NO));
646 rect = [slider frame];
647 if (rect.origin.x < LEFT_LABEL_WIDTH)
648 rect.origin.x = LEFT_LABEL_WIDTH; // make unlabelled sliders line up too
649 [slider setFrame:rect];
653 NSTextField *lab = make_label (high_label);
654 [lab setFont:[NSFont systemFontOfSize:[NSFont smallSystemFontSize]]];
656 rect.size.height = [slider frame].size.height;
658 place_child (parent, lab, YES);
662 bind_switch_to_preferences (prefs, slider, arg, opts);
665 } else if ([type isEqualToString:@"spinbutton"]) {
668 NSAssert1 (0, @"no _label in spinbutton %@", [node name]);
671 NSAssert1 (!low_label,
672 @"low-label not allowed in spinbutton \"%@\"", [node name]);
673 NSAssert1 (!high_label,
674 @"high-label not allowed in spinbutton \"%@\"", [node name]);
675 NSAssert1 (!cvt, @"convert not allowed in spinbutton \"%@\"",
679 rect.origin.x = rect.origin.y = 0;
680 rect.size.width = rect.size.height = 10;
682 NSTextField *txt = [[NSTextField alloc] initWithFrame:rect];
683 [txt setStringValue:@"0000.0"];
685 [txt setStringValue:@""];
688 NSTextField *lab = make_label (label);
689 //[lab setFont:[NSFont systemFontOfSize:[NSFont smallSystemFontSize]]];
690 [lab setAlignment:1]; // right aligned
692 if (rect.size.width < LEFT_LABEL_WIDTH)
693 rect.size.width = LEFT_LABEL_WIDTH; // make all left labels same size
694 rect.size.height = [txt frame].size.height;
696 place_child (parent, lab, NO);
700 place_child (parent, txt, (label ? YES : NO));
704 if (rect.origin.x < LEFT_LABEL_WIDTH)
705 rect.origin.x = LEFT_LABEL_WIDTH; // make unlabelled spinbtns line up
709 rect.size.width = rect.size.height = 10;
710 NSStepper *step = [[NSStepper alloc] initWithFrame:rect];
712 place_child (parent, step, YES);
714 rect.size.height = [txt frame].size.height;
715 rect.origin.x -= COLUMN_SPACING; // this one goes close
716 [step setFrame:rect];
718 [step setMinValue:[low doubleValue]];
719 [step setMaxValue:[high doubleValue]];
720 [step setAutorepeat:YES];
721 [step setValueWraps:NO];
723 double range = [high doubleValue] - [low doubleValue];
725 [step setIncrement:range / 10.0];
726 else if (range >= 500)
727 [step setIncrement:range / 100.0];
729 [step setIncrement:1.0];
731 bind_switch_to_preferences (prefs, step, arg, opts);
732 bind_switch_to_preferences (prefs, txt, arg, opts);
738 NSAssert2 (0, @"unknown type \"%@\" in \"%@\"", type, label);
744 set_menu_item_object (NSMenuItem *item, NSObject *obj)
746 /* If the object associated with this menu item looks like a boolean,
747 store an NSNumber instead of an NSString, since that's what
748 will be in the preferences (due to similar logic in PrefsReader).
750 if ([obj isKindOfClass:[NSString class]]) {
751 NSString *string = (NSString *) obj;
752 if (NSOrderedSame == [string caseInsensitiveCompare:@"true"] ||
753 NSOrderedSame == [string caseInsensitiveCompare:@"yes"])
754 obj = [NSNumber numberWithBool:YES];
755 else if (NSOrderedSame == [string caseInsensitiveCompare:@"false"] ||
756 NSOrderedSame == [string caseInsensitiveCompare:@"no"])
757 obj = [NSNumber numberWithBool:NO];
762 [item setRepresentedObject:obj];
763 //NSLog (@"menu item \"%@\" = \"%@\" %@", [item title], obj, [obj class]);
767 /* Creates the popup menu described by the given XML node (and its children).
770 make_option_menu (NSUserDefaultsController *prefs,
771 const XrmOptionDescRec *opts,
772 NSView *parent, NSXMLNode *node)
774 NSArray *children = [node children];
775 int i, count = [children count];
778 NSAssert1 (0, @"no menu items in \"%@\"", [node name]);
782 // get the "id" attribute off the <select> tag.
784 NSMutableDictionary *dict =
785 [NSMutableDictionary dictionaryWithObjectsAndKeys:
788 parse_attrs (dict, node);
791 rect.origin.x = rect.origin.y = 0;
792 rect.size.width = 10;
793 rect.size.height = 10;
794 NSPopUpButton *popup = [[NSPopUpButton alloc] initWithFrame:rect
797 NSMenuItem *def_item = nil;
800 NSString *menu_key = nil; // the resource key used by items in this menu
802 for (i = 0; i < count; i++) {
803 NSXMLNode *child = [children objectAtIndex:i];
805 if ([child kind] == NSXMLCommentKind)
807 if ([child kind] != NSXMLElementKind) {
808 NSAssert2 (0, @"weird XML node kind: %d: %@", [child kind], node);
812 // get the "id", "_label", and "arg-set" attrs off of the <option> tags.
814 NSMutableDictionary *dict2 =
815 [NSMutableDictionary dictionaryWithObjectsAndKeys:
820 parse_attrs (dict2, child);
821 NSString *label = [dict2 objectForKey:@"_label"];
822 NSString *arg_set = [dict2 objectForKey:@"arg-set"];
825 NSAssert1 (0, @"no _label in %@", [child name]);
829 // create the menu item (and then get a pointer to it)
830 [popup addItemWithTitle:label];
831 NSMenuItem *item = [popup itemWithTitle:label];
834 NSString *this_val = NULL;
835 NSString *this_key = switch_to_resource (arg_set, opts, &this_val);
836 NSAssert1 (this_val, @"this_val null for %@", arg_set);
837 if (menu_key && ![menu_key isEqualToString:this_key])
839 @"multiple resources in menu: \"%@\" vs \"%@\" = \"%@\"",
840 menu_key, this_key, this_val);
844 /* If this menu has the cmd line "-mode foo" then set this item's
845 value to "foo" (the menu itself will be bound to e.g. "modeString")
847 set_menu_item_object (item, this_val);
850 // no arg-set -- only one menu item can be missing that.
851 NSAssert1 (!def_item, @"no arg-set in \"%@\"", label);
855 /* make sure the menu button has room for the text of this item,
856 and remember the greatest width it has reached.
858 [popup setTitle:label];
860 NSRect r = [popup frame];
861 if (r.size.width > max_width) max_width = r.size.width;
865 NSAssert1 (0, @"no switches in menu \"%@\"", [dict objectForKey:@"id"]);
869 /* We've added all of the menu items. If there was an item with no
870 command-line switch, then it's the item that represents the default
871 value. Now we must bind to that item as well... (We have to bind
872 this one late, because if it was the first item, then we didn't
873 yet know what resource was associated with this menu.)
876 NSDictionary *defs = [prefs initialValues];
877 NSObject *def_obj = [defs objectForKey:menu_key];
880 @"no default value for resource \"%@\" in menu item \"%@\"",
881 menu_key, [def_item title]);
883 set_menu_item_object (def_item, def_obj);
886 /* Finish tweaking the menu button itself.
889 [popup setTitle:[def_item title]];
890 NSRect r = [popup frame];
891 r.size.width = max_width;
893 place_child (parent, popup, NO);
895 bind_resource_to_preferences (prefs, popup, menu_key, opts);
900 static NSString *unwrap (NSString *);
901 static void hreffify (NSText *);
902 static void boldify (NSText *);
904 /* Creates an uneditable, wrapping NSTextField to display the given
905 text enclosed by <description> ... </description> in the XML.
908 make_desc_label (NSView *parent, NSXMLNode *node)
910 NSString *text = nil;
911 NSArray *children = [node children];
912 int i, count = [children count];
914 for (i = 0; i < count; i++) {
915 NSXMLNode *child = [children objectAtIndex:i];
916 NSString *s = [child objectValue];
918 text = [text stringByAppendingString:s];
923 text = unwrap (text);
925 NSRect rect = [parent frame];
926 rect.origin.x = rect.origin.y = 0;
927 rect.size.width = 200;
928 rect.size.height = 50; // sized later
929 NSText *lab = [[NSText alloc] initWithFrame:rect];
930 [lab setEditable:NO];
931 [lab setDrawsBackground:NO];
932 [lab setHorizontallyResizable:YES];
933 [lab setVerticallyResizable:YES];
934 [lab setString:text];
939 place_child (parent, lab, NO);
944 unwrap (NSString *text)
946 // Unwrap lines: delete \n but do not delete \n\n.
948 NSArray *lines = [text componentsSeparatedByString:@"\n"];
949 int nlines = [lines count];
953 text = @"\n"; // start with one blank line
955 // skip trailing blank lines in file
956 for (i = nlines-1; i > 0; i--) {
957 NSString *s = (NSString *) [lines objectAtIndex:i];
963 // skip leading blank lines in file
964 for (i = 0; i < nlines; i++) {
965 NSString *s = (NSString *) [lines objectAtIndex:i];
972 for (; i < nlines; i++) {
973 NSString *s = (NSString *) [lines objectAtIndex:i];
974 if ([s length] == 0) {
975 text = [text stringByAppendingString:@"\n\n"];
977 } else if ([s characterAtIndex:0] == ' ' ||
978 [s hasPrefix:@"Copyright "] ||
979 [s hasPrefix:@"http://"]) {
980 // don't unwrap if the following line begins with whitespace,
981 // or with the word "Copyright", or if it begins with a URL.
983 text = [text stringByAppendingString:@"\n"];
984 text = [text stringByAppendingString:s];
989 text = [text stringByAppendingString:@" "];
990 text = [text stringByAppendingString:s];
1000 /* Converts any http: URLs in the given text field to clickable links.
1003 hreffify (NSText *nstext)
1005 NSString *text = [nstext string];
1006 [nstext setRichText:YES];
1008 int L = [text length];
1009 NSRange start; // range is start-of-search to end-of-string
1012 while (start.location < L) {
1014 // Find the beginning of a URL...
1016 NSRange r2 = [text rangeOfString:@"http://" options:0 range:start];
1017 if (r2.location == NSNotFound)
1020 // Next time around, start searching after this.
1021 start.location = r2.location + r2.length;
1022 start.length = L - start.location;
1024 // Find the end of a URL (whitespace or EOF)...
1026 NSRange r3 = [text rangeOfCharacterFromSet:
1027 [NSCharacterSet whitespaceAndNewlineCharacterSet]
1028 options:0 range:start];
1029 if (r3.location == NSNotFound) // EOF
1030 r3.location = L, r3.length = 0;
1032 // Next time around, start searching after this.
1033 start.location = r3.location;
1034 start.length = L - start.location;
1036 // Set r2 to the start/length of this URL.
1037 r2.length = start.location - r2.location;
1040 NSString *nsurl = [text substringWithRange:r2];
1041 const char *url = [nsurl UTF8String];
1043 // Construct the RTF corresponding to <A HREF="url">url</A>
1045 const char *fmt = "{\\field{\\*\\fldinst{HYPERLINK \"%s\"}}%s}";
1046 char *rtf = malloc (strlen (fmt) + (strlen (url) * 2) + 10);
1047 sprintf (rtf, fmt, url, url);
1048 NSData *rtfdata = [NSData dataWithBytesNoCopy:rtf length:strlen(rtf)];
1050 // Insert the RTF into the NSText.
1051 [nstext replaceCharactersInRange:r2 withRTF:rtfdata];
1055 /* Makes the text up to the first comma be bold.
1058 boldify (NSText *nstext)
1060 NSString *text = [nstext string];
1061 NSRange r = [text rangeOfString:@"," options:0];
1062 r.length = r.location+1;
1065 NSFont *font = [nstext font];
1066 font = [NSFont boldSystemFontOfSize:[font pointSize]];
1067 [nstext setFont:font range:r];
1071 static void layout_group (NSView *group, BOOL horiz_p);
1074 /* Creates an invisible NSBox (for layout purposes) to enclose the widgets
1075 wrapped in <hgroup> or <vgroup> in the XML.
1078 make_group (NSUserDefaultsController *prefs,
1079 const XrmOptionDescRec *opts, NSView *parent, NSXMLNode *node,
1083 rect.size.width = rect.size.height = 1;
1084 rect.origin.x = rect.origin.y = 0;
1085 NSView *group = [[NSView alloc] initWithFrame:rect];
1086 traverse_children (prefs, opts, group, node);
1088 layout_group (group, horiz_p);
1090 rect.size.width = rect.size.height = 0;
1091 NSBox *box = [[NSBox alloc] initWithFrame:rect];
1092 [box setTitlePosition:NSNoTitle];
1093 [box setBorderType:NSNoBorder];
1094 [box setContentViewMargins:rect.size];
1095 [box setContentView:group];
1098 place_child (parent, box, NO);
1103 layout_group (NSView *group, BOOL horiz_p)
1105 NSArray *kids = [group subviews];
1106 int nkids = [kids count];
1108 double maxx = 0, miny = 0;
1109 for (i = 0; i < nkids; i++) {
1110 NSView *kid = [kids objectAtIndex:i];
1111 NSRect r = [kid frame];
1114 maxx += r.size.width + COLUMN_SPACING;
1115 if (r.size.height > -miny) miny = -r.size.height;
1117 if (r.size.width > maxx) maxx = r.size.width;
1118 miny = r.origin.y - r.size.height;
1123 rect.size.width = maxx;
1124 rect.size.height = -miny;
1125 [group setFrame:rect];
1128 for (i = 0; i < nkids; i++) {
1129 NSView *kid = [kids objectAtIndex:i];
1130 NSRect r = [kid frame];
1132 r.origin.y = rect.size.height - r.size.height;
1134 x += r.size.width + COLUMN_SPACING;
1144 make_text_controls (NSUserDefaultsController *prefs,
1145 const XrmOptionDescRec *opts,
1146 NSView *parent, NSXMLNode *node)
1150 (x) Computer Name and Time
1151 ( ) Text [__________________________]
1152 ( ) Text file [_________________] [Choose]
1153 ( ) URL [__________________________]
1155 textMode -text-mode date
1156 textMode -text-mode literal textLiteral -text-literal %
1157 textMode -text-mode file textFile -text-file %
1158 textMode -text-mode url textURL -text-url %
1161 rect.size.width = rect.size.height = 1;
1162 rect.origin.x = rect.origin.y = 0;
1163 NSView *group = [[NSView alloc] initWithFrame:rect];
1164 NSView *rgroup = [[NSView alloc] initWithFrame:rect];
1167 NSXMLElement *node2;
1170 // This is how you link radio buttons together.
1172 NSButtonCell *proto = [[NSButtonCell alloc] init];
1173 [proto setButtonType:NSRadioButton];
1175 rect.origin.x = rect.origin.y = 0;
1176 rect.size.width = rect.size.height = 10;
1177 NSMatrix *matrix = [[NSMatrix alloc]
1179 mode:NSRadioModeMatrix
1183 [matrix setAllowsEmptySelection:NO];
1185 NSArrayController *cnames = [[NSArrayController alloc] initWithContent:nil];
1186 [cnames addObject:@"Computer Name and Time"];
1187 [cnames addObject:@"Text"];
1188 [cnames addObject:@"File"];
1189 [cnames addObject:@"URL"];
1190 [matrix bind:@"content"
1192 withKeyPath:@"arrangedObjects"
1196 bind_switch_to_preferences (prefs, matrix, @"-text-mode %", opts);
1198 place_child (group, matrix, NO);
1199 place_child (group, rgroup, YES);
1201 // <string id="textLiteral" _label="" arg-set="-text-literal %"/>
1202 node2 = [[NSXMLElement alloc] initWithName:@"string"];
1203 [node2 setAttributesAsDictionary:
1204 [NSDictionary dictionaryWithObjectsAndKeys:
1205 @"textLiteral", @"id",
1206 @"-text-literal %", @"arg",
1208 make_text_field (prefs, opts, rgroup, node2, YES);
1211 rect = [last_child(rgroup) frame];
1213 /* // trying to make the text fields be enabled only when the checkbox is on..
1214 control = last_child (rgroup);
1215 [control bind:@"enabled"
1216 toObject:[matrix cellAtRow:1 column:0]
1217 withKeyPath:@"value"
1222 // <file id="textFile" _label="" arg-set="-text-file %"/>
1223 node2 = [[NSXMLElement alloc] initWithName:@"string"];
1224 [node2 setAttributesAsDictionary:
1225 [NSDictionary dictionaryWithObjectsAndKeys:
1227 @"-text-file %", @"arg",
1229 make_file_selector (prefs, opts, rgroup, node2, NO, YES);
1232 rect = [last_child(rgroup) frame];
1234 // <string id="textURL" _label="" arg-set="text-url %"/>
1235 node2 = [[NSXMLElement alloc] initWithName:@"string"];
1236 [node2 setAttributesAsDictionary:
1237 [NSDictionary dictionaryWithObjectsAndKeys:
1239 @"-text-url %", @"arg",
1241 make_text_field (prefs, opts, rgroup, node2, YES);
1244 rect = [last_child(rgroup) frame];
1246 layout_group (rgroup, NO);
1248 rect = [rgroup frame];
1249 rect.size.width += 35; // WTF? Why is rgroup too narrow?
1250 [rgroup setFrame:rect];
1253 // Set the height of the cells in the radio-box matrix to the height of
1254 // the (last of the) text fields.
1255 control = last_child (rgroup);
1256 rect = [control frame];
1257 rect.size.width = 30; // width of the string "Text", plus a bit...
1258 rect.size.height += LINE_SPACING;
1259 [matrix setCellSize:rect.size];
1260 [matrix sizeToCells];
1262 layout_group (group, YES);
1263 rect = [matrix frame];
1264 rect.origin.x += rect.size.width + COLUMN_SPACING;
1265 rect.origin.y -= [control frame].size.height - LINE_SPACING;
1266 [rgroup setFrameOrigin:rect.origin];
1268 // now cheat on the size of the matrix: allow it to overlap (underlap)
1271 rect.size = [matrix cellSize];
1272 rect.size.width *= 10;
1273 [matrix setCellSize:rect.size];
1274 [matrix sizeToCells];
1276 // Cheat on the position of the stuff on the right (the rgroup).
1277 // GAAAH, this code is such crap!
1278 rect = [rgroup frame];
1280 [rgroup setFrame:rect];
1283 rect.size.width = rect.size.height = 0;
1284 NSBox *box = [[NSBox alloc] initWithFrame:rect];
1285 [box setTitlePosition:NSAtTop];
1286 [box setBorderType:NSBezelBorder];
1287 [box setTitle:@"Display Text"];
1289 rect.size.width = rect.size.height = 12;
1290 [box setContentViewMargins:rect.size];
1291 [box setContentView:group];
1294 place_child (parent, box, NO);
1299 make_image_controls (NSUserDefaultsController *prefs,
1300 const XrmOptionDescRec *opts,
1301 NSView *parent, NSXMLNode *node)
1304 [x] Grab Desktop Images
1305 [ ] Choose Random Image:
1306 [__________________________] [Choose]
1308 <boolean id="grabDesktopImages" _label="Grab Desktop Images"
1309 arg-unset="-no-grab-desktop"/>
1310 <boolean id="chooseRandomImages" _label="Grab Desktop Images"
1311 arg-unset="-choose-random-images"/>
1312 <file id="imageDirectory" _label="" arg-set="-image-directory %"/>
1315 NSXMLElement *node2;
1317 node2 = [[NSXMLElement alloc] initWithName:@"boolean"];
1318 [node2 setAttributesAsDictionary:
1319 [NSDictionary dictionaryWithObjectsAndKeys:
1320 @"grabDesktopImages", @"id",
1321 @"Grab Desktop Images", @"_label",
1322 @"-no-grab-desktop", @"arg-unset",
1324 make_checkbox (prefs, opts, parent, node2);
1327 node2 = [[NSXMLElement alloc] initWithName:@"boolean"];
1328 [node2 setAttributesAsDictionary:
1329 [NSDictionary dictionaryWithObjectsAndKeys:
1330 @"chooseRandomImages", @"id",
1331 @"Choose Random Images", @"_label",
1332 @"-choose-random-images", @"arg-set",
1334 make_checkbox (prefs, opts, parent, node2);
1337 node2 = [[NSXMLElement alloc] initWithName:@"string"];
1338 [node2 setAttributesAsDictionary:
1339 [NSDictionary dictionaryWithObjectsAndKeys:
1340 @"imageDirectory", @"id",
1341 @"Images Directory:", @"_label",
1342 @"-image-directory %", @"arg",
1344 make_file_selector (prefs, opts, parent, node2, YES, NO);
1350 /* Create some kind of control corresponding to the given XML node.
1353 make_control (NSUserDefaultsController *prefs,
1354 const XrmOptionDescRec *opts, NSView *parent, NSXMLNode *node)
1356 NSString *name = [node name];
1358 if ([node kind] == NSXMLCommentKind)
1360 if ([node kind] != NSXMLElementKind) {
1361 NSAssert2 (0, @"weird XML node kind: %d: %@", [node kind], node);
1365 if ([name isEqualToString:@"hgroup"] ||
1366 [name isEqualToString:@"vgroup"]) {
1368 BOOL horiz_p = [name isEqualToString:@"hgroup"];
1369 make_group (prefs, opts, parent, node, horiz_p);
1371 } else if ([name isEqualToString:@"command"]) {
1372 // do nothing: this is the "-root" business
1374 } else if ([name isEqualToString:@"boolean"]) {
1375 make_checkbox (prefs, opts, parent, node);
1377 } else if ([name isEqualToString:@"string"]) {
1378 make_text_field (prefs, opts, parent, node, NO);
1380 } else if ([name isEqualToString:@"file"]) {
1381 make_file_selector (prefs, opts, parent, node, NO, NO);
1383 } else if ([name isEqualToString:@"number"]) {
1384 make_number_selector (prefs, opts, parent, node);
1386 } else if ([name isEqualToString:@"select"]) {
1387 make_option_menu (prefs, opts, parent, node);
1389 } else if ([name isEqualToString:@"_description"]) {
1390 make_desc_label (parent, node);
1392 } else if ([name isEqualToString:@"xscreensaver-text"]) {
1393 make_text_controls (prefs, opts, parent, node);
1395 } else if ([name isEqualToString:@"xscreensaver-image"]) {
1396 make_image_controls (prefs, opts, parent, node);
1399 NSAssert1 (0, @"unknown tag: %@", name);
1404 /* Iterate over and process the children of this XML node.
1407 traverse_children (NSUserDefaultsController *prefs,
1408 const XrmOptionDescRec *opts,
1409 NSView *parent, NSXMLNode *node)
1411 NSArray *children = [node children];
1412 int i, count = [children count];
1413 for (i = 0; i < count; i++) {
1414 NSXMLNode *child = [children objectAtIndex:i];
1415 make_control (prefs, opts, parent, child);
1419 /* Handle the options on the top level <xscreensaver> tag.
1422 parse_xscreensaver_tag (NSXMLNode *node)
1424 NSMutableDictionary *dict =
1425 [NSMutableDictionary dictionaryWithObjectsAndKeys:
1429 parse_attrs (dict, node);
1430 NSString *name = [dict objectForKey:@"name"];
1431 NSString *label = [dict objectForKey:@"_label"];
1434 NSAssert1 (0, @"no _label in %@", [node name]);
1438 NSAssert1 (0, @"no name in \"%@\"", label);
1442 // #### do any callers need the "name" field for anything?
1446 /* Kludgey magic to make the window enclose the controls we created.
1449 fix_contentview_size (NSView *parent)
1452 NSArray *kids = [parent subviews];
1453 int nkids = [kids count];
1454 NSView *text; // the NSText at the bottom of the window
1455 NSView *last; // the last child before the NSText
1456 double maxx = 0, miny = 0;
1459 /* Find the size of the rectangle taken up by each of the children
1460 except the final "NSText" child.
1462 for (i = 0; i < nkids; i++) {
1463 NSView *kid = [kids objectAtIndex:i];
1464 if ([kid isKindOfClass:[NSText class]]) {
1469 if (f.origin.x + f.size.width > maxx) maxx = f.origin.x + f.size.width;
1470 if (f.origin.y - f.size.height < miny) miny = f.origin.y;
1472 // NSLog(@"start: %3.0f x %3.0f @ %3.0f %3.0f %3.0f %@",
1473 // f.size.width, f.size.height, f.origin.x, f.origin.y,
1474 // f.origin.y + f.size.height, [kid class]);
1477 if (maxx < 400) maxx = 400; // leave room for the NSText paragraph...
1479 /* Now that we know the width of the window, set the width of the NSText to
1480 that, so that it can decide what its height needs to be.
1483 // NSLog(@"text old: %3.0f x %3.0f @ %3.0f %3.0f %3.0f %@",
1484 // f.size.width, f.size.height, f.origin.x, f.origin.y,
1485 // f.origin.y + f.size.height, [text class]);
1487 // set the NSText's width (this changes its height).
1488 f.size.width = maxx - LEFT_MARGIN;
1491 // position the NSText below the last child (this gives us a new miny).
1493 f.origin.y = miny - f.size.height - LINE_SPACING;
1494 miny = f.origin.y - LINE_SPACING;
1497 // Lock the width of the field and unlock the height, and let it resize
1498 // once more, to compute the proper height of the text for that width.
1500 [(NSText *) text setHorizontallyResizable:NO];
1501 [(NSText *) text setVerticallyResizable:YES];
1502 [(NSText *) text sizeToFit];
1504 // Now lock the height too: no more resizing this text field.
1506 [(NSText *) text setVerticallyResizable:NO];
1508 // Now reposition the top edge of the text field to be back where it
1509 // was before we changed the height.
1511 float oh = f.size.height;
1513 float dh = f.size.height - oh;
1517 // Also adjust the parent height by the change in height of the text field.
1520 // NSLog(@"text new: %3.0f x %3.0f @ %3.0f %3.0f %3.0f %@",
1521 // f.size.width, f.size.height, f.origin.x, f.origin.y,
1522 // f.origin.y + f.size.height, [text class]);
1525 /* Set the contentView to the size of the children.
1528 float yoff = f.size.height;
1529 f.size.width = maxx + LEFT_MARGIN;
1530 f.size.height = -(miny - LEFT_MARGIN*2);
1531 yoff = f.size.height - yoff;
1532 [parent setFrame:f];
1534 // NSLog(@"max: %3.0f x %3.0f @ %3.0f %3.0f",
1535 // f.size.width, f.size.height, f.origin.x, f.origin.y);
1537 /* Now move all of the kids up into the window.
1540 float shift = f.size.height;
1541 // NSLog(@"shift: %3.0f", shift);
1542 for (i = 0; i < nkids; i++) {
1543 NSView *kid = [kids objectAtIndex:i];
1545 f.origin.y += shift;
1547 // NSLog(@"move: %3.0f x %3.0f @ %3.0f %3.0f %3.0f %@",
1548 // f.size.width, f.size.height, f.origin.x, f.origin.y,
1549 // f.origin.y + f.size.height, [kid class]);
1552 /* Set the kids to track the top left corner of the window when resized.
1553 Set the NSText to track the bottom right corner as well.
1555 for (i = 0; i < nkids; i++) {
1556 NSView *kid = [kids objectAtIndex:i];
1557 unsigned long mask = NSViewMaxXMargin | NSViewMinYMargin;
1558 if ([kid isKindOfClass:[NSText class]])
1559 mask |= NSViewWidthSizable|NSViewHeightSizable;
1560 [kid setAutoresizingMask:mask];
1565 - (void) okClicked:(NSObject *)arg
1567 [userDefaultsController commitEditing];
1568 [userDefaultsController save:self];
1569 [NSApp endSheet:self returnCode:NSOKButton];
1573 - (void) cancelClicked:(NSObject *)arg
1575 [userDefaultsController revert:self];
1576 [NSApp endSheet:self returnCode:NSCancelButton];
1580 - (void) resetClicked:(NSObject *)arg
1582 [userDefaultsController revertToInitialValues:self];
1587 wrap_with_buttons (NSWindow *window, NSView *panel)
1591 // Make a box to hold the buttons at the bottom of the window.
1593 rect = [panel frame];
1594 rect.origin.x = rect.origin.y = 0;
1595 rect.size.height = 10;
1596 NSBox *bbox = [[NSBox alloc] initWithFrame:rect];
1597 [bbox setTitlePosition:NSNoTitle];
1598 [bbox setBorderType:NSNoBorder];
1600 // Make some buttons: Default, Cancel, OK
1602 rect.origin.x = rect.origin.y = 0;
1603 rect.size.width = rect.size.height = 10;
1604 NSButton *reset = [[NSButton alloc] initWithFrame:rect];
1605 [reset setTitle:@"Reset to Defaults"];
1606 [reset setBezelStyle:NSRoundedBezelStyle];
1609 rect = [reset frame];
1610 NSButton *ok = [[NSButton alloc] initWithFrame:rect];
1611 [ok setTitle:@"OK"];
1612 [ok setBezelStyle:NSRoundedBezelStyle];
1614 rect = [bbox frame];
1615 rect.origin.x = rect.size.width - [ok frame].size.width;
1616 [ok setFrameOrigin:rect.origin];
1619 NSButton *cancel = [[NSButton alloc] initWithFrame:rect];
1620 [cancel setTitle:@"Cancel"];
1621 [cancel setBezelStyle:NSRoundedBezelStyle];
1623 rect.origin.x -= [cancel frame].size.width + 10;
1624 [cancel setFrameOrigin:rect.origin];
1626 // Bind OK to RET and Cancel to ESC.
1627 [ok setKeyEquivalent:@"\r"];
1628 [cancel setKeyEquivalent:@"\e"];
1630 // The correct width for OK and Cancel buttons is 68 pixels
1631 // ("Human Interface Guidelines: Controls: Buttons:
1632 // Push Button Specifications").
1635 rect.size.width = 68;
1638 rect = [cancel frame];
1639 rect.size.width = 68;
1640 [cancel setFrame:rect];
1642 // It puts the buttons in the box or else it gets the hose again
1644 [bbox addSubview:ok];
1645 [bbox addSubview:cancel];
1646 [bbox addSubview:reset];
1649 // make a box to hold the button-box, and the preferences view
1651 rect = [bbox frame];
1652 rect.origin.y += rect.size.height;
1653 NSBox *pbox = [[NSBox alloc] initWithFrame:rect];
1654 [pbox setTitlePosition:NSNoTitle];
1655 [pbox setBorderType:NSBezelBorder];
1658 NSRect f = [panel frame];
1659 int screen_height = 800 - 64;
1660 if (f.size.height > screen_height) {
1661 NSLog(@"%@ height was %.0f; clipping to %d",
1662 [panel class], f.size.height, screen_height);
1663 f.size.height = screen_height;
1668 [pbox addSubview:panel];
1669 [pbox addSubview:bbox];
1672 [reset setAutoresizingMask:NSViewMaxXMargin];
1673 [cancel setAutoresizingMask:NSViewMinXMargin];
1674 [ok setAutoresizingMask:NSViewMinXMargin];
1675 [bbox setAutoresizingMask:NSViewWidthSizable];
1679 [ok setTarget:window];
1680 [cancel setTarget:window];
1681 [reset setTarget:window];
1682 [ok setAction:@selector(okClicked:)];
1683 [cancel setAction:@selector(cancelClicked:)];
1684 [reset setAction:@selector(resetClicked:)];
1690 /* Iterate over and process the children of the root node of the XML document.
1693 traverse_tree (NSUserDefaultsController *prefs,
1694 NSWindow *window, const XrmOptionDescRec *opts, NSXMLNode *node)
1696 if (![[node name] isEqualToString:@"screensaver"]) {
1697 NSAssert (0, @"top level node is not <xscreensaver>");
1700 parse_xscreensaver_tag (node);
1703 rect.origin.x = rect.origin.y = 0;
1704 rect.size.width = rect.size.height = 1;
1706 NSView *panel = [[NSView alloc] initWithFrame:rect];
1708 traverse_children (prefs, opts, panel, node);
1709 fix_contentview_size (panel);
1711 NSView *root = wrap_with_buttons (window, panel);
1712 [prefs setAppliesImmediately:NO];
1714 [panel setAutoresizingMask:NSViewWidthSizable|NSViewHeightSizable];
1716 rect = [window frameRectForContentRect:[root frame]];
1717 [window setFrame:rect display:NO];
1718 [window setMinSize:rect.size];
1720 [window setContentView:root];
1724 /* When this object is instantiated, it parses the XML file and creates
1725 controls on itself that are hooked up to the appropriate preferences.
1726 The default size of the view is just big enough to hold them all.
1728 - (id)initWithXMLFile: (NSString *) xml_file
1729 options: (const XrmOptionDescRec *) opts
1730 controller: (NSUserDefaultsController *) prefs
1732 if (! (self = [super init]))
1735 // instance variable
1736 userDefaultsController = prefs;
1739 NSURL *furl = [NSURL fileURLWithPath:xml_file];
1742 NSAssert1 (0, @"can't URLify \"%@\"", xml_file);
1747 NSXMLDocument *xmlDoc = [[NSXMLDocument alloc]
1748 initWithContentsOfURL:furl
1749 options:(NSXMLNodePreserveWhitespace |
1750 NSXMLNodePreserveCDATA)
1754 xmlDoc = [[NSXMLDocument alloc] initWithContentsOfURL:furl
1755 options:NSXMLDocumentTidyXML
1759 if (!xmlDoc || err) {
1761 NSAssert2 (0, @"XML Error: %@: %@",
1762 xml_file, [err localizedDescription]);
1766 traverse_tree (prefs, self, opts, [xmlDoc rootElement]);
1774 [userDefaultsController release];