Fix various python lazy string bugs.
[external/binutils.git] / gdb / testsuite / gdb.python / py-value.c
1 /* This testcase is part of GDB, the GNU debugger.
2
3    Copyright 2008-2017 Free Software Foundation, Inc.
4
5    This program is free software; you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 3 of the License, or
8    (at your option) any later version.
9
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details.
14
15    You should have received a copy of the GNU General Public License
16    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
17
18 #include <stdio.h>
19 #include <stdlib.h>
20 #include <string.h>
21
22 struct s
23 {
24   int a;
25   int b;
26 };
27
28 union u
29 {
30   int a;
31   float b;
32 };
33
34 enum e
35   {
36     ONE = 1,
37     TWO = 2
38   };
39
40 typedef struct s *PTR;
41
42 enum e evalue = TWO;
43
44 struct str
45 {
46   int length;
47   /* Variable length.  */
48   char text[1];
49 };
50
51 #ifdef __cplusplus
52
53 struct Base {
54   virtual int x() { return 5; }
55 };
56
57 struct Derived : public Base {
58 };
59
60 Base *base = new Derived ();
61 Derived derived;
62 Base &base_ref = derived;
63
64 void ptr_ref(int*& rptr_int)
65 {
66   return; /* break to inspect pointer by reference. */
67 }
68 #endif
69
70 void func1 ()
71 {
72   printf ("void function called\n");
73 }
74
75 int func2 (int arg1, int arg2)
76 {
77   return arg1 + arg2;
78 }
79
80 char **save_argv;
81
82 int
83 main (int argc, char *argv[])
84 {
85   char *cp;
86   struct s s;
87   union u u;
88   PTR x = &s;
89   char st[17] = "divide et impera";
90   char nullst[17] = "divide\0et\0impera";
91   void (*fp1) (void)  = &func1;
92   int  (*fp2) (int, int) = &func2;
93   const char *embed = "embedded x\201\202\203\204";
94   int a[3] = {1,2,3};
95   int *p = a;
96   int i = 2;
97   int *ptr_i = &i;
98   struct str *xstr;
99
100   /* Prevent gcc from optimizing argv[] out.  */
101
102   /* We also check for a NULL argv in case we are dealing with a target
103      executing in a freestanding environment, therefore there are no
104      guarantees about argc or argv.  */
105   if (argv != NULL)
106     cp = argv[0];
107
108   s.a = 3;
109   s.b = 5;
110   u.a = 7;
111   (*fp1) ();
112   (*fp2) (10,20);
113
114 #ifdef __cplusplus
115   ptr_ref(ptr_i);
116 #endif
117
118 #define STR_LENGTH 100
119   xstr = (struct str *) malloc (sizeof (*xstr) + STR_LENGTH);
120   xstr->length = STR_LENGTH;
121   memset (xstr->text, 'x', STR_LENGTH);
122 #undef STR_LENGTH
123
124   save_argv = argv;      /* break to inspect struct and union */
125   return 0;
126 }