package posix-stat

  1. Overview
  2. Docs
Bindings for posix stat

Install 

dune-project
 Dependency

github.com Readme Changelog Edit opam file Versions (1)

Authors

  1. R
    Romain Beauxis

Maintainers

  1. R
    romain.beauxis@gmail.com

Sources

v4.0.1.tar.gz
md5=464f431a8517dba4295286dd61f3ff2c
sha512=36d4c64987848fc06a4296c2141d250d95db0092b2d9d4d95f301f5eaada9a3df8ae9703fc8f2407596f6fb474a69863abd5e3d2c08636eb2c0dd67477d316e8

doc/src/posix-stat.stubs/posix_stat_stubs.ml.html

Source file posix_stat_stubs.ml

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
open Ctypes

module Def (F : Cstubs.FOREIGN) = struct
  open F
  module Types = Posix_stat_types.Def (Posix_stat_generated_types)
  open Types

  (* stat family *)
  let stat = foreign "stat" (string @-> ptr Stat.t @-> returning int)
  let fstat = foreign "fstat" (int @-> ptr Stat.t @-> returning int)
  let lstat = foreign "lstat" (string @-> ptr Stat.t @-> returning int)

  (* chmod family *)
  let chmod = foreign "chmod" (string @-> Posix_types.mode_t @-> returning int)
  let fchmod = foreign "fchmod" (int @-> Posix_types.mode_t @-> returning int)

  (* Directory and special file creation *)
  let mkdir = foreign "mkdir" (string @-> Posix_types.mode_t @-> returning int)
  let mkfifo = foreign "mkfifo" (string @-> Posix_types.mode_t @-> returning int)

  (* umask *)
  let umask =
    foreign "umask" (Posix_types.mode_t @-> returning Posix_types.mode_t)

  (* *at functions *)
  let fstatat =
    foreign "fstatat" (int @-> string @-> ptr Stat.t @-> int @-> returning int)

  let fchmodat =
    foreign "fchmodat"
      (int @-> string @-> Posix_types.mode_t @-> int @-> returning int)

  let mkdirat =
    foreign "mkdirat" (int @-> string @-> Posix_types.mode_t @-> returning int)

  let mkfifoat =
    foreign "mkfifoat" (int @-> string @-> Posix_types.mode_t @-> returning int)
end