From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 114208 invoked by alias); 15 Dec 2015 07:23:32 -0000 Mailing-List: contact systemtap-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Post: List-Help: , Sender: systemtap-owner@sourceware.org Received: (qmail 114126 invoked by uid 89); 15 Dec 2015 07:23:31 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=1.8 required=5.0 tests=AWL,BAYES_00,KAM_LAZY_DOMAIN_SECURITY,UNWANTED_LANGUAGE_BODY autolearn=no version=3.3.2 X-HELO: heian.cn.fujitsu.com Received: from Unknown (HELO heian.cn.fujitsu.com) (59.151.112.132) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Tue, 15 Dec 2015 07:23:31 +0000 Received: from unknown (HELO cn.fujitsu.com) ([10.167.33.5]) by heian.cn.fujitsu.com with ESMTP; 15 Dec 2015 15:23:12 +0800 Received: from G08CNEXCHPEKD02.g08.fujitsu.local (unknown [10.167.33.83]) by cn.fujitsu.com (Postfix) with ESMTP id 37392409256D for ; Tue, 15 Dec 2015 15:23:04 +0800 (CST) Received: from localhost.localdomain (10.167.226.48) by G08CNEXCHPEKD02.g08.fujitsu.local (10.167.33.89) with Microsoft SMTP Server (TLS) id 14.3.181.6; Tue, 15 Dec 2015 15:23:03 +0800 From: Zhou Wenjian To: Subject: [PATCH 3/3] Add new case for stress test Date: Tue, 15 Dec 2015 07:23:00 -0000 Message-ID: <1450164104-1508-3-git-send-email-zhouwj-fnst@cn.fujitsu.com> In-Reply-To: <1450164104-1508-1-git-send-email-zhouwj-fnst@cn.fujitsu.com> References: <1450164104-1508-1-git-send-email-zhouwj-fnst@cn.fujitsu.com> MIME-Version: 1.0 Content-Type: text/plain X-yoursite-MailScanner-Information: Please contact the ISP for more information X-yoursite-MailScanner-ID: 37392409256D.A14F3 X-yoursite-MailScanner: Found to be clean X-yoursite-MailScanner-From: zhouwj-fnst@cn.fujitsu.com X-IsSubscribed: yes X-SW-Source: 2015-q4/txt/msg00285.txt.bz2 * testsuite/systemtap.stress/parallel_exec.exp: New test case --- testsuite/systemtap.stress/parallel_exec.exp | 56 ++++++++++++++++++++++++++++ 1 file changed, 56 insertions(+) create mode 100644 testsuite/systemtap.stress/parallel_exec.exp diff --git a/testsuite/systemtap.stress/parallel_exec.exp b/testsuite/systemtap.stress/parallel_exec.exp new file mode 100644 index 0000000..9fbefae --- /dev/null +++ b/testsuite/systemtap.stress/parallel_exec.exp @@ -0,0 +1,56 @@ +#!/bin/expect -f + +set test "parallel execute" + +proc gen_load {} { + # if 'genload' from the ltp exists, use it to create a real load + set genload {/usr/local/ltp/testcases/bin/genload} + if [file executable $genload] { + exec $genload -c 10 -i 10 -m 10 -t 10 + # ^^^^^ run for 10 seconds + # ^^^^^ 10 procs spinning on malloc + # ^^^^^ 10 procs spinning on sync + # ^^^^^ 10 procs spinning on sqrt + } else { + # sleep for a bit + wait_n_secs 10 + } + return 0 +} + +set process_num 10 + +set script { + probe syscall.open + { + if (pid() != target()) next + log("open") + } + + probe syscall.close + { + if (pid() != target()) next + log("close") + } +} + +for { set i 0 } { $i < $process_num } { incr i } { + exec stap -e "$script" -c "cat /etc/hosts > /dev/null" >>/tmp/parallel_exec & +} + +if {[eval gen_load] == 0} then { + pass "$test load generation" +} else { + fail "$test load generation" +} + +set num1 [exec stap -e "$script" -c "cat /etc/hosts > /dev/null" | grep \[open|close\] | wc -l] +set num2 [exec grep \[open|close\] /tmp/parallel_exec | wc -l] + +exec rm -f /tmp/parallel_exec + +if {$num1 * $process_num != $num2} { + fail $test +} else { + pass $test +} -- 1.8.3.1