[DTrace-devel] [PATCH] test: Add tests for option "stdc"

Kris Van Hees kris.van.hees at oracle.com
Sat Apr 29 03:38:27 UTC 2023


On Tue, Apr 04, 2023 at 07:00:51PM -0400, eugene.loh--- via DTrace-devel wrote:
> From: Eugene Loh <eugene.loh at oracle.com>
> 
> Signed-off-by: Eugene Loh <eugene.loh at oracle.com>

Reviewed-by: Kris Van Hees <kris.van.hees at oracle.com>

> ---
>  test/unittest/options/err.stdc-x.d | 13 +++++++++++++
>  test/unittest/options/err.stdc-x.r |  2 ++
>  test/unittest/options/tst.stdc-a.d | 17 +++++++++++++++++
>  test/unittest/options/tst.stdc-a.r |  5 +++++
>  test/unittest/options/tst.stdc-c.d | 17 +++++++++++++++++
>  test/unittest/options/tst.stdc-c.r |  5 +++++
>  test/unittest/options/tst.stdc-s.d | 17 +++++++++++++++++
>  test/unittest/options/tst.stdc-s.r |  5 +++++
>  test/unittest/options/tst.stdc-t.d | 17 +++++++++++++++++
>  test/unittest/options/tst.stdc-t.r |  5 +++++
>  10 files changed, 103 insertions(+)
>  create mode 100644 test/unittest/options/err.stdc-x.d
>  create mode 100644 test/unittest/options/err.stdc-x.r
>  create mode 100644 test/unittest/options/tst.stdc-a.d
>  create mode 100644 test/unittest/options/tst.stdc-a.r
>  create mode 100644 test/unittest/options/tst.stdc-c.d
>  create mode 100644 test/unittest/options/tst.stdc-c.r
>  create mode 100644 test/unittest/options/tst.stdc-s.d
>  create mode 100644 test/unittest/options/tst.stdc-s.r
>  create mode 100644 test/unittest/options/tst.stdc-t.d
>  create mode 100644 test/unittest/options/tst.stdc-t.r
> 
> diff --git a/test/unittest/options/err.stdc-x.d b/test/unittest/options/err.stdc-x.d
> new file mode 100644
> index 00000000..a25abc25
> --- /dev/null
> +++ b/test/unittest/options/err.stdc-x.d
> @@ -0,0 +1,13 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2023, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +/* @@runtest-opts: -xstdc=X */
> +
> +BEGIN
> +{
> +	exit(0);
> +}
> diff --git a/test/unittest/options/err.stdc-x.r b/test/unittest/options/err.stdc-x.r
> new file mode 100644
> index 00000000..f39d1be9
> --- /dev/null
> +++ b/test/unittest/options/err.stdc-x.r
> @@ -0,0 +1,2 @@
> +-- @@stderr --
> +dtrace: failed to set -x stdc: Invalid value for specified option
> diff --git a/test/unittest/options/tst.stdc-a.d b/test/unittest/options/tst.stdc-a.d
> new file mode 100644
> index 00000000..6b383032
> --- /dev/null
> +++ b/test/unittest/options/tst.stdc-a.d
> @@ -0,0 +1,17 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2023, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +/* @@runtest-opts: -C -xstdc=a */
> +
> +BEGIN
> +{
> +#ifdef __STDC__
> +	exit(0);
> +#else
> +	exit(1);
> +#endif
> +}
> diff --git a/test/unittest/options/tst.stdc-a.r b/test/unittest/options/tst.stdc-a.r
> new file mode 100644
> index 00000000..546719ec
> --- /dev/null
> +++ b/test/unittest/options/tst.stdc-a.r
> @@ -0,0 +1,5 @@
> +                   FUNCTION:NAME
> +                          :BEGIN 
> +
> +-- @@stderr --
> +dtrace: script 'test/unittest/options/tst.stdc-a.d' matched 1 probe
> diff --git a/test/unittest/options/tst.stdc-c.d b/test/unittest/options/tst.stdc-c.d
> new file mode 100644
> index 00000000..a896a3b6
> --- /dev/null
> +++ b/test/unittest/options/tst.stdc-c.d
> @@ -0,0 +1,17 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2023, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +/* @@runtest-opts: -C -xstdc=c */
> +
> +BEGIN
> +{
> +#ifdef __STDC__
> +	exit(0);
> +#else
> +	exit(1);
> +#endif
> +}
> diff --git a/test/unittest/options/tst.stdc-c.r b/test/unittest/options/tst.stdc-c.r
> new file mode 100644
> index 00000000..27a01584
> --- /dev/null
> +++ b/test/unittest/options/tst.stdc-c.r
> @@ -0,0 +1,5 @@
> +                   FUNCTION:NAME
> +                          :BEGIN 
> +
> +-- @@stderr --
> +dtrace: script 'test/unittest/options/tst.stdc-c.d' matched 1 probe
> diff --git a/test/unittest/options/tst.stdc-s.d b/test/unittest/options/tst.stdc-s.d
> new file mode 100644
> index 00000000..87d45778
> --- /dev/null
> +++ b/test/unittest/options/tst.stdc-s.d
> @@ -0,0 +1,17 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2023, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +/* @@runtest-opts: -C -xstdc=s */
> +
> +BEGIN
> +{
> +#ifdef __STDC__
> +	exit(1);
> +#else
> +	exit(0);
> +#endif
> +}
> diff --git a/test/unittest/options/tst.stdc-s.r b/test/unittest/options/tst.stdc-s.r
> new file mode 100644
> index 00000000..e31b1018
> --- /dev/null
> +++ b/test/unittest/options/tst.stdc-s.r
> @@ -0,0 +1,5 @@
> +                   FUNCTION:NAME
> +                          :BEGIN 
> +
> +-- @@stderr --
> +dtrace: script 'test/unittest/options/tst.stdc-s.d' matched 1 probe
> diff --git a/test/unittest/options/tst.stdc-t.d b/test/unittest/options/tst.stdc-t.d
> new file mode 100644
> index 00000000..244d2f01
> --- /dev/null
> +++ b/test/unittest/options/tst.stdc-t.d
> @@ -0,0 +1,17 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2023, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +/* @@runtest-opts: -C -xstdc=t */
> +
> +BEGIN
> +{
> +#ifdef __STDC__
> +	exit(0);
> +#else
> +	exit(1);
> +#endif
> +}
> diff --git a/test/unittest/options/tst.stdc-t.r b/test/unittest/options/tst.stdc-t.r
> new file mode 100644
> index 00000000..58366ad9
> --- /dev/null
> +++ b/test/unittest/options/tst.stdc-t.r
> @@ -0,0 +1,5 @@
> +                   FUNCTION:NAME
> +                          :BEGIN 
> +
> +-- @@stderr --
> +dtrace: script 'test/unittest/options/tst.stdc-t.d' matched 1 probe
> -- 
> 2.18.4
> 
> 
> _______________________________________________
> DTrace-devel mailing list
> DTrace-devel at oss.oracle.com
> https://oss.oracle.com/mailman/listinfo/dtrace-devel



More information about the DTrace-devel mailing list