File: fdleak_fcntl.c

package info (click to toggle)
valgrind 1%3A3.3.1-3
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 34,452 kB
  • ctags: 27,778
  • sloc: ansic: 234,398; sh: 14,186; xml: 11,662; perl: 4,410; asm: 3,135; makefile: 3,011; exp: 625; cpp: 255; haskell: 195
file content (20 lines) | stat: -rw-r--r-- 384 bytes parent folder | download 
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);  close(4);

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