Add support for copying coredumps to /tmp

tools/testing/dart/test_options.dart

 // Copyright (c) 2013, the Dart project authors.  Please see the AUTHORS file
 // for details. All rights reserved. Use of this source code is governed by a
 // BSD-style license that can be found in the LICENSE file.
 
 library test_options_parser;
 
 import "dart:io";
 import "drt_updater.dart";
 import "test_suite.dart";
 
@@ skipping 317 matching lines @@
           ),
           new _TestOptionSpecification(
               'clear_safari_cache',
               'Clear the safari cache (i.e., delete it).',
               ['--clear_safari_cache'],
               [],
               false,
               'bool'
               ),
           new _TestOptionSpecification(
+              'copy_coredumps',
+              'If we see a crash that we did not expect, copy the core dumps. '
+              'to /tmp',
+              ['--copy-coredumps'],
+              [],
+              false,
+              'bool'
+              ),
+          new _TestOptionSpecification(
               'local_ip',
               'IP address the http servers should listen on.'
               'This address is also used for browsers to connect.',
               ['--local_ip'],
               [],
               '127.0.0.1'),
           new _TestOptionSpecification(
               'test_server_port',
               'Port for test http server.',
               ['--test_server_port'],
@@ skipping 261 matching lines @@
       isValid = false;
       print("Error: shard index is ${config['shard']} out of "
             "${config['shards']} shards");
     }
 
     if (config['use_repository_packages'] && config['use_public_packages']) {
       isValid = false;
       print("Cannot have both --use-repository-packages and "
             "--use-public-packages");
     }
+
+    if (config['copy_coredumps'] && Platform.operatingSystem != 'linux') {
+      isValid = false;
+      print("Coredump copying is not yet available on non linux systems");
+    }
+
     return isValid;
   }
 
   /**
    * Recursively expand a configuration with multiple values per key
    * into a list of configurations with exactly one value per key.
    */
   List<Map> _expandConfigurations(Map configuration) {
     // Expand the pseudo-values such as 'all'.
     if (configuration['arch'] == 'all') {
@@ skipping 200 matching lines @@
         return option;
       }
     }
     print('Unknown test option $name');
     exit(1);
   }
 
 
   List<_TestOptionSpecification> _options;
 }