MacViews a11y: Allow accessibility clients to set the AXValue on some controls.

ui/accessibility/platform/ax_platform_node_mac.mm

 // Copyright 2014 The Chromium Authors. All rights reserved.
 // Use of this source code is governed by a BSD-style license that can be
 // found in the LICENSE file.
 
 #import "ui/accessibility/platform/ax_platform_node_mac.h"
 
 #import <Cocoa/Cocoa.h>
 #include <stddef.h>
 
 #include "base/macros.h"
@@ skipping 331 matching lines @@
     case ui::AX_ROLE_TOGGLE_BUTTON:
       [axAttributes addObjectsFromArray:kValueAttributes];
       break;
     // TODO(tapted): Add additional attributes based on role.
     default:
       break;
   }
   return axAttributes.autorelease();
 }
 
-- (BOOL)accessibilityIsAttributeSettable:(NSString*)attribute {
+- (BOOL)accessibilityIsAttributeSettable:(NSString*)attributeName {
+  // Allow certain attributes to be written via an accessibility client. A
+  // writable attribute will only appear as such if the accessibility element
+  // has a value set for that attribute.
+  if ([attributeName isEqualToString:NSAccessibilitySelectedAttribute] ||
+      [attributeName
+          isEqualToString:NSAccessibilitySelectedChildrenAttribute] ||
+      [attributeName
+          isEqualToString:NSAccessibilitySelectedTextRangeAttribute] ||
+      [attributeName
+          isEqualToString:NSAccessibilityVisibleCharacterRangeAttribute]) {
+    return NO;
+  }
+
+  if ([attributeName isEqualToString:NSAccessibilityValueAttribute])
+    return node_->GetDelegate()->CanSetStringValue();
+  // TODO(patricialor): Implement and merge with conditional for value above.
+  if ([attributeName isEqualToString:NSAccessibilitySelectedTextAttribute])
+    return NO;
+
+  if ([attributeName isEqualToString:NSAccessibilityFocusedAttribute]) {
+    if (ui::AXViewState::IsFlagSet(node_->GetData().state,
+                                   ui::AX_STATE_FOCUSABLE))
+      return NO;
+  }
+
+  // TODO(patricialor): Add callbacks for updating the above attributes except
+  // NSAccessibilityValueAttribute and return YES.
   return NO;
 }
 
+- (void)accessibilitySetValue:(id)value forAttribute:(NSString*)attribute {
+  if ([attribute isEqualToString:NSAccessibilityValueAttribute] &&
+      [value isKindOfClass:[NSString class]])
+    node_->GetDelegate()->SetStringValue(base::SysNSStringToUTF16(value));
+
+  // TODO(patricialor): Plumb through all the other writable attributes as
+  // specified in accessibilityIsAttributeSettable.
+}
+
 - (id)accessibilityAttributeValue:(NSString*)attribute {
   SEL selector = NSSelectorFromString(attribute);
   if ([self respondsToSelector:selector])
     return [self performSelector:selector];
   return nil;
 }
 
 // NSAccessibility attributes.
 
 - (NSArray*)AXChildren {
@@ skipping 166 matching lines @@
   }
   NotifyMacEvent(target, event_type);
 }
 
 int AXPlatformNodeMac::GetIndexInParent() {
   // TODO(dmazzoni): implement this.  http://crbug.com/396137
   return -1;
 }
 
 }  // namespace ui