File: fdleak_fcntl.c

package info (click to toggle)
valgrind 1%3A3.2.1-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 27,372 kB
  • ctags: 23,091
  • sloc: ansic: 192,648; xml: 10,723; sh: 4,750; perl: 4,023; makefile: 2,103; asm: 1,813; cpp: 140; haskell: 139
file content (20 lines) | stat: -rw-r--r-- 373 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
#include <unistd.h>
#include <stdio.h>
#include <fcntl.h>

int
main (int argc, char **argv)
{
   int s1;

   /*
    * Fedora Core 1's Perl opens /dev/pts/2 as fd 10.  Let's close it
    * now to get consistent results across different releases.
    */

   close(10);

   s1 = open("/dev/null", O_RDONLY);
   if(fcntl(s1, F_DUPFD, s1) == -1) perror("fcntl");
   return 0;
}