aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.target/powerpc/pr60158.c
blob: dc9fbdd0cf241c40eb992f97c3713d974463b889 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
/* { dg-do compile } */
/* { dg-skip-if "not an SPE target" { ! powerpc_spe_nocache } } */
/* { dg-options "-mcpu=8548 -mno-spe -mfloat-gprs=double -Os -fdata-sections -fpic -mrelocatable" } */

#define NULL 0
int func (int val);
void *func2 (void *ptr);

static const char *ifs;
static char map[256];

typedef struct {
/* None of these fields are used, but removing any
   of them makes the problem go away.  */
  char *data;
  int length;
  int maxlen;
  int quote;
} o_string;

#define NULL_O_STRING {NULL,0,0,0}

static int parse_stream (void *dest, void *ctx)
{
  int ch = func (0), m;

  while (ch != -1) {
    m = map[ch];
    if (ch != '\n')
    func2(dest);

    ctx = func2 (ctx);
    if (!func (0))
      return 0;
    if (m != ch) {
      func2 ("htns");
      break;
    }
  }
  return -1;
}

static void mapset (const char *set, int code)
{
  const char *s;
  for (s=set; *s; s++)  map[(int)*s] = code;
}

static void update_ifs_map(void)
{
  /* char *ifs and char map[256] are both globals.  */
  ifs = func2 ("abc");
  if (ifs == NULL) ifs="def";

  func2 (map);
  {
    char subst[2] = {4, 0};
    mapset (subst, 3);
  }
  mapset (";&|#", 1);
}

int parse_stream_outer (int flag)
{
  int blah;
  o_string temp=NULL_O_STRING;
  int rcode;

  do {
    update_ifs_map ();
    func2 (&blah); /* a memory clobber works as well.  */
    rcode = parse_stream (&temp, NULL);
    func2 ("aoeu");
    if (func (0) != 0) {
      func2 (NULL);
    }
  } while (rcode != -1);
  return 0;
}

/* { dg-final { if ![file exists pr60158.s] { fail "pr60158.c (compile)"; return; } } } */

/* { dg-final { set c_rel [llength [grep pr60158.s \\.data\\.rel\\.ro\\.local]] } } */
/* { dg-final { set c_fix [llength [grep pr60158.s \\.fixup]] } } */
/* { dg-final { if [string match $c_rel $c_fix] \{	} } */
/* { dg-final {     pass "pr60158.c (passed)"	} } */
/* { dg-final { \} else \{	} } */
/* { dg-final {     fail "pr60158.c (.fixup table entries not generated for .data.rel.ro.local section)"	} } */
/* { dg-final { \}	} } */