ext/Fcntl/Makefile.PL

   1 use ExtUtils::MakeMaker;
   2 use ExtUtils::Constant 0.07 'WriteConstants';
   3 WriteMakefile(
   4     NAME        => 'Fcntl',
   5     MAN3PODS    => {},  # Pods will be built by installman.
   6     XSPROTOARG => '-noprototypes',              # XXX remove later?
   7     VERSION_FROM => 'Fcntl.pm',
   8     realclean => {FILES=> 'constants.c constants.xs'},
   9 );
  10
  11 my @names = (qw(FAPPEND FASYNC FCREAT FDEFER FDSYNC FD_CLOEXEC FEXCL FLARGEFILE
  12                FNDELAY FNONBLOCK FRSYNC FSYNC FTRUNC F_ALLOCSP F_ALLOCSP64
  13                F_COMPAT F_DUP2FD F_DUPFD F_EXLCK F_FREESP F_FREESP64 F_FSYNC
  14                F_FSYNC64 F_GETFD F_GETFL F_GETLK F_GETLK64 F_GETOWN F_NODNY
  15                F_POSIX F_RDACC F_RDDNY F_RDLCK F_RWACC F_RWDNY F_SETFD F_SETFL
  16                F_SETLK F_SETLK64 F_SETLKW F_SETLKW64 F_SETOWN F_SHARE F_SHLCK
  17                F_UNLCK F_UNSHARE F_WRACC F_WRDNY F_WRLCK O_ACCMODE O_ALIAS
  18                O_APPEND O_ASYNC O_BINARY O_CREAT O_DEFER O_DIRECT O_DIRECTORY
  19                O_DSYNC O_EXCL O_EXLOCK O_LARGEFILE O_NDELAY O_NOCTTY O_NOFOLLOW
  20                O_NOINHERIT O_NONBLOCK O_RANDOM O_RAW O_RDONLY O_RDWR O_RSRC
  21                O_RSYNC O_SEQUENTIAL O_SHLOCK O_SYNC O_TEMPORARY O_TEXT O_TRUNC
  22                O_WRONLY S_ENFMT S_IEXEC S_IFBLK S_IFCHR S_IFDIR S_IFIFO S_IFLNK
  23                S_IFREG S_IFSOCK S_IFWHT S_IREAD S_IRGRP S_IROTH S_IRUSR S_IRWXG
  24                S_IRWXO S_IRWXU S_ISGID S_ISTXT S_ISUID S_ISVTX S_IWGRP S_IWOTH
  25                S_IWRITE S_IWUSR S_IXGRP S_IXOTH S_IXUSR),
  26             {name=>"LOCK_SH", default=>["IV", "1"]},
  27             {name=>"LOCK_EX", default=>["IV", "2"]},
  28             {name=>"LOCK_NB", default=>["IV", "4"]},
  29             {name=>"LOCK_UN", default=>["IV", "8"]},
  30             {name=>"SEEK_SET", default=>["IV", "0"]},
  31             {name=>"SEEK_CUR", default=>["IV", "1"]},
  32             {name=>"SEEK_END", default=>["IV", "2"]},
  33             {name=>"_S_IFMT", macro=>"S_IFMT", value=>"S_IFMT"});
  34 WriteConstants(
  35     NAME => 'Fcntl',
  36     NAMES => \@names,
  37 );