00001 /* 00002 * IMPORTANT: READ BEFORE DOWNLOADING, COPYING, INSTALLING OR USING. By 00003 * downloading, copying, installing or using the software you agree to 00004 * this license. If you do not agree to this license, do not download, 00005 * install, copy or use the software. 00006 * 00007 * Intel Open Source License 00008 * 00009 * Copyright (c) 2004 Intel Corporation. All rights reserved. 00010 * 00011 * Redistribution and use in source and binary forms, with or without 00012 * modification, are permitted provided that the following conditions are 00013 * met: 00014 * 00015 * Redistributions of source code must retain the above copyright 00016 * notice, this list of conditions and the following disclaimer. 00017 * 00018 * Redistributions in binary form must reproduce the above copyright 00019 * notice, this list of conditions and the following disclaimer in the 00020 * documentation and/or other materials provided with the distribution. 00021 * 00022 * Neither the name of the Intel Corporation nor the names of its 00023 * contributors may be used to endorse or promote products derived from 00024 * this software without specific prior written permission. 00025 * 00026 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 00027 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 00028 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 00029 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE INTEL OR 00030 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 00031 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT 00032 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 00033 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 00034 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 00035 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 00036 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 00037 */ 00038 00039 #include "TestCommand.h" 00040 00041 namespace dtn { 00042 00043 TestCommand::TestCommand() 00044 : TclCommand("test"), id_(0), fork_(false) 00045 { 00046 add_to_help("segfault", "Generate a segfault."); 00047 add_to_help("panic", "Trigger a panic."); 00048 add_to_help("assert", "Trigger a false assert."); 00049 } 00050 00051 void 00052 TestCommand::bind_vars() 00053 { 00054 bind_i("id", &id_, "The test id. (Defualt is 0.)"); 00055 bind_s("initscript", &initscript_, "The script to start."); 00056 bind_s("argv", &argv_, "A string to pass as the argument to the script."); 00057 bind_b("fork", &fork_, "A boolean to control forking. (Default is false.)"); 00058 } 00059 00060 int 00061 TestCommand::exec(int argc, const char** argv, Tcl_Interp* interp) 00062 { 00063 (void)interp; 00064 00065 if (argc < 2) { 00066 resultf("need a test subcommand"); 00067 return TCL_ERROR; 00068 } 00069 00070 const char* cmd = argv[1]; 00071 if (!strcmp(cmd, "segfault")) 00072 { 00073 int* x = NULL; 00074 (void)*x; 00075 NOTREACHED; 00076 } 00077 else if (!strcmp(cmd, "panic")) 00078 { 00079 PANIC("panic"); 00080 } 00081 else if (!strcmp(cmd, "assert")) 00082 { 00083 ASSERT(0); 00084 } 00085 00086 return TCL_ERROR; 00087 } 00088 00089 } // namespace dtn