Skip to content

Commit b211b4c

Browse files
Add missing library function definitions for rsync issue
Co-authored-by: michael-schwarz <13812333+michael-schwarz@users.noreply.github.com>
1 parent 0a7df37 commit b211b4c

File tree

1 file changed

+24
-0
lines changed

1 file changed

+24
-0
lines changed

src/util/library/libraryFunctions.ml

Lines changed: 24 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -467,6 +467,21 @@ let posix_descs_list: (string * LibraryDesc.t) list = LibraryDsl.[
467467
("getdelim", unknown [drop "lineptr" [r_deep; w_deep]; drop "n" [r; w]; drop "delimiter" []; drop "stream" [r_deep; w_deep]]);
468468
("__getdelim", unknown [drop "lineptr" [r_deep; w_deep]; drop "n" [r; w]; drop "delimiter" []; drop "stream" [r_deep; w_deep]]);
469469
("getwdelim", unknown [drop "lineptr" [r_deep; w_deep]; drop "n" [r; w]; drop "delimiter" []; drop "stream" [r_deep; w_deep]]);
470+
("chroot", unknown [drop "path" [r]]);
471+
("execlp", unknown (drop "file" [r] :: drop "arg" [r] :: VarArgs (drop' [r])));
472+
("gai_strerror", unknown [drop "errcode" []]);
473+
("getegid", unknown []);
474+
("getgroups", unknown [drop "size" []; drop "list" [w]]);
475+
("getpass", unknown ~attrs:[ThreadUnsafe] [drop "prompt" [r]]);
476+
("initgroups", unknown [drop "user" [r]; drop "group" []]);
477+
("mknod", unknown [drop "pathname" [r]; drop "mode" []; drop "dev" []]);
478+
("openat", unknown (drop "dirfd" [] :: drop "pathname" [r] :: drop "flags" [] :: VarArgs (drop "mode" [])));
479+
("seteuid", unknown [drop "uid" []]);
480+
("setgid", unknown [drop "gid" []]);
481+
("setgroups", unknown [drop "size" []; drop "list" [r]]);
482+
("setuid", unknown [drop "uid" []]);
483+
("socketpair", unknown [drop "domain" []; drop "type" []; drop "protocol" []; drop "sv" [w]]);
484+
("tcgetpgrp", unknown [drop "fd" []]);
470485
]
471486
[@@coverage off]
472487

@@ -721,6 +736,14 @@ let glibc_desc_list: (string * LibraryDesc.t) list = LibraryDsl.[
721736
("svc_register", unknown [drop "xprt" [r_deep; w_deep]; drop "prognum" []; drop "versnum" []; drop "dispatch" [r; w; c]; drop "protocol" []]);
722737
("svc_run", unknown []); (* TODO: make new special kind "NoReturn" for this: the following node will be dead (like Abort), but the program doesn't exit (so it shouldn't be Abort) *)
723738
(* RPC library end *)
739+
("getgrouplist", unknown [drop "user" [r]; drop "group" []; drop "groups" [w]; drop "ngroups" [r; w]]);
740+
("innetgr", unknown [drop "netgroup" [r]; drop "host" [r]; drop "user" [r]; drop "domain" [r]]);
741+
("lchmod", unknown [drop "path" [r]; drop "mode" []]);
742+
("lseek64", unknown [drop "fd" []; drop "offset" []; drop "whence" []]);
743+
("lutimes", unknown [drop "filename" [r]; drop "times" [r]]);
744+
("mallinfo2", unknown []);
745+
("strlcat", unknown [drop "dst" [r; w]; drop "src" [r]; drop "dstsize" []]);
746+
("strlcpy", unknown [drop "dst" [w]; drop "src" [r]; drop "dstsize" []]);
724747
]
725748
[@@coverage off]
726749

@@ -766,6 +789,7 @@ let linux_userspace_descs_list: (string * LibraryDesc.t) list = LibraryDsl.[
766789
("__fxstat", unknown [drop "ver" []; drop "fildes" []; drop "stat_buf" [w]]);
767790
("__ctype_b_loc", unknown []);
768791
("_IO_getc", unknown [drop "f" [r_deep; w_deep]]);
792+
("fallocate", unknown [drop "fd" []; drop "mode" []; drop "offset" []; drop "len" []]);
769793
]
770794
[@@coverage off]
771795

0 commit comments

Comments
 (0)