xref: /illumos-gate/usr/src/cmd/sendmail/libsm/t-exc.c (revision 7c478bd95313f5f23a4c958a745db2134aa03244)
1 /*
2  * Copyright (c) 2000-2001 Sendmail, Inc. and its suppliers.
3  *	All rights reserved.
4  *
5  * By using this file, you agree to the terms and conditions set
6  * forth in the LICENSE file which can be found at the top level of
7  * the sendmail distribution.
8  */
9 
10 #pragma ident	"%Z%%M%	%I%	%E% SMI"
11 
12 #include <sm/gen.h>
13 SM_IDSTR(id, "@(#)$Id: t-exc.c,v 1.18 2001/07/05 22:46:35 gshapiro Exp $")
14 
15 #include <string.h>
16 #include <sm/heap.h>
17 #include <sm/io.h>
18 #include <sm/test.h>
19 
20 const SM_EXC_TYPE_T EtypeTest1 =
21 {
22 	SmExcTypeMagic,
23 	"E:test1",
24 	"i",
25 	sm_etype_printf,
26 	"test1 exception argv[0]=%0",
27 };
28 
29 const SM_EXC_TYPE_T EtypeTest2 =
30 {
31 	SmExcTypeMagic,
32 	"E:test2",
33 	"i",
34 	sm_etype_printf,
35 	"test2 exception argv[0]=%0",
36 };
37 
38 int
39 main(argc, argv)
40 	int argc;
41 	char **argv;
42 {
43 	void *p;
44 	int volatile x;
45 	char *unknown, *cant;
46 
47 	sm_test_begin(argc, argv, "test exception handling");
48 
49 	/*
50 	**  SM_TRY
51 	*/
52 
53 	cant = "can't happen";
54 	x = 0;
55 	SM_TRY
56 		x = 1;
57 	SM_END_TRY
58 	SM_TEST(x == 1);
59 
60 	/*
61 	**  SM_FINALLY-0
62 	*/
63 
64 	x = 0;
65 	SM_TRY
66 		x = 1;
67 	SM_FINALLY
68 		x = 2;
69 	SM_END_TRY
70 	SM_TEST(x == 2);
71 
72 	/*
73 	**  SM_FINALLY-1
74 	*/
75 
76 	x = 0;
77 	SM_TRY
78 		SM_TRY
79 			x = 1;
80 			sm_exc_raisenew_x(&EtypeTest1, 17);
81 		SM_FINALLY
82 			x = 2;
83 			sm_exc_raisenew_x(&EtypeTest2, 42);
84 		SM_END_TRY
85 	SM_EXCEPT(exc, "E:test2")
86 		(void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
87 			 "got exception test2: can't happen\n");
88 	SM_EXCEPT(exc, "E:test1")
89 		SM_TEST(x == 2 && exc->exc_argv[0].v_int == 17);
90 		if (!(x == 2 && exc->exc_argv[0].v_int == 17))
91 		{
92 			(void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
93 				"can't happen: x=%d argv[0]=%d\n",
94 				x, exc->exc_argv[0].v_int);
95 		}
96 	SM_EXCEPT(exc, "*")
97 	{
98 		unknown = "unknown exception: ";
99 		SM_TEST(strcmp(unknown, cant) == 0);
100 	}
101 	SM_END_TRY
102 
103 	x = 3;
104 	SM_TRY
105 		x = 4;
106 		sm_exc_raisenew_x(&EtypeTest1, 94);
107 	SM_FINALLY
108 		x = 5;
109 		sm_exc_raisenew_x(&EtypeTest2, 95);
110 	SM_EXCEPT(exc, "E:test2")
111 	{
112 		unknown = "got exception test2: ";
113 		SM_TEST(strcmp(unknown, cant) == 0);
114 	}
115 	SM_EXCEPT(exc, "E:test1")
116 		SM_TEST(x == 5 && exc->exc_argv[0].v_int == 94);
117 		if (!(x == 5 && exc->exc_argv[0].v_int == 94))
118 		{
119 			(void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
120 				"can't happen: x=%d argv[0]=%d\n",
121 				x, exc->exc_argv[0].v_int);
122 		}
123 	SM_EXCEPT(exc, "*")
124 	{
125 		unknown = "unknown exception: ";
126 		SM_TEST(strcmp(unknown, cant) == 0);
127 	}
128 	SM_END_TRY
129 
130 	SM_TRY
131 		sm_exc_raisenew_x(&SmEtypeErr, "test %d", 0);
132 	SM_EXCEPT(exc, "*")
133 #if DEBUG
134 		(void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
135 			"test 0 got an exception, as expected:\n");
136 		sm_exc_print(exc, smioout);
137 #endif /* DEBUG */
138 		return sm_test_end();
139 	SM_END_TRY
140 
141 	p = sm_malloc_x((size_t)(-1));
142 	(void) sm_io_fprintf(smioout, SM_TIME_DEFAULT,
143 		"sm_malloc_x unexpectedly succeeded, returning %p\n", p);
144 	unknown = "sm_malloc_x unexpectedly succeeded";
145 	SM_TEST(strcmp(unknown, cant) == 0);
146 	return sm_test_end();
147 }
148