aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/c-c++-common/analyzer/pr93355-localealias-feasibility-noexcept.c
blob: 6ab14fb82c7cfecdb553ec8040f3044b15fa89e0 (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
/* Simplified version of test to ensure we issue a FILE * leak diagnostic,
   reproducing a feasibility issue.
   Adapted from intl/localealias.c, with all #includes removed.  */

/* { dg-do "compile" } */
/* { dg-additional-options "-fno-exceptions" } */

/* Handle aliases for locale names.
   Copyright (C) 1995-1999, 2000-2001, 2003 Free Software Foundation, Inc.

   This program is free software; you can redistribute it and/or modify it
   under the terms of the GNU Library General Public License as published
   by the Free Software Foundation; either version 2, or (at your option)
   any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   Library General Public License for more details.

   You should have received a copy of the GNU Library General Public
   License along with this program; if not, write to the Free Software
   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301,
   USA.  */


#include "../../gcc.dg/analyzer/analyzer-decls.h"
/* Minimal version of system headers.  */
typedef __SIZE_TYPE__ size_t;

typedef struct _IO_FILE FILE;
extern FILE *fopen (const char *__restrict __filename,
		    const char *__restrict __modes);
extern size_t fread(void *ptr, size_t size, size_t nmemb, FILE *stream);
extern int fclose (FILE *__stream);

extern int isspace (int) __attribute__((__nothrow__, __leaf__));

/* Cleaned-up body of localealias.c follows.  */

size_t
read_alias_file (const char *fname, int fname_len)
{
  FILE *fp;
  size_t added;
  char buf[400];
  char *alias;
  char *value;
  char *cp;

  fp = fopen (fname, "r"); /* { dg-message "opened here" } */
  if (fp == NULL)
    return 0;

  if (fread (buf, sizeof buf, 1, fp) != 1)
    {
      fclose (fp);
      return 0;
    }

  cp = buf;

  /* Ignore leading white space.  */
  while (isspace ((unsigned char)cp[0]))
    ++cp;

  if (cp[0] != '\0' && cp[0] != '#')
    {
      alias = cp++;
      while (cp[0] != '\0' && !isspace ((unsigned char)cp[0]))
	++cp;
      if (cp[0] != '\0')
	*cp++ = '\0';

      while (isspace ((unsigned char)cp[0]))
	++cp;

      if (cp[0] != '\0')
	return 42; /* { dg-warning "leak of FILE 'fp'" } */
    }

  fclose(fp);

  return 0;
}