| /xen/tools/ocaml/xenstored/ |
| A D | config.ml | 25 | String of (string -> unit) Constructor
31 let len = String.length s and i = ref 0 in
36 if !i < len then String.sub s !i (len - !i) else ""
39 let i = ref (String.length s - 1) in
44 if !i >= 0 then String.sub s 0 (!i + 1) else ""
47 let i = try String.index s c with Not_found -> -1 in
52 let a = String.sub s 0 i
53 and b = String.sub s (i + 1) (String.length s - i - 1) in
66 if String.length line > 0 && line.[0] <> '#' then
93 | String f -> f v
|
| A D | disk.ml | 40 let len = String.length s
84 if String.length line > 0 then
101 let len = String.length s in
107 let x = String.sub s 0 !i
108 and lx = String.sub s !i len in
118 let len = String.length s in
119 let si = if String.contains s '=' then
120 String.index s '='
123 let pi = String.rindex_from s si '{' in
124 let epi = String.index_from s pi '}' in
[all …]
|
| A D | stdext.ml | 47 module String = struct include String module
49 let of_char c = String.make 1 c
52 let i = try String.index s c with Not_found -> -1 in
57 let a = String.sub s 0 i
58 and b = String.sub s (i + 1) (String.length s - i - 1) in
70 let x_l = String.length x and prefix_l = String.length prefix in
71 prefix_l <= x_l && String.sub x 0 prefix_l = prefix
124 let len = String.length buf in
|
| A D | utils.ml | 48 let hs = Bytes.create (String.length s * 2) in
49 String.iteri (fun i c ->
58 let b = Bytes.create (String.length hs / 2) in
67 let rindex = String.rindex path '/' in
68 String.sub path 0 rindex
72 let join_by_null ls = String.concat "\000" ls
94 let len = String.length path in
99 match String.get path 0 with
111 let len = String.length abs_path in
|
| A D | logging.ml | 29 let len_prefix = String.length prefix in
30 let len = String.length s in
31 if String.startswith prefix s
32 then Syslog(Syslog.facility_of_string (String.sub s len_prefix (len - len_prefix)))
61 if String.length line > nb_chars - 1 then
141 try String.length (Unix.getenv "TZ") > 0
259 let data = String.init
260 (String.length data)
263 String.escaped data
332 | Xenbus.Xb.Op.Error when String.startswith "ENOENT" data -> !access_log_read_ops , Warn
|
| A D | perms.ml | 74 and id = int_of_string (String.sub s 1 (String.length s - 1)) in
85 let ls = String.split '\000' s in
94 String.concat sep (List.map string_of_perm l)
133 Printf.sprintf "%i%S" i (String.concat "" (List.map String.of_char (List.map char_of_permty p)))
|
| A D | connection.ml | 133 if (String.length data) > xenstore_payload_max && (is_backend_mmap con) then
156 if String.startswith path p then w :: l else l) con.watches [])
224 let perms = perms |> List.map (Perms.Node.to_string ~sep:" ") |> String.concat ", " in
232 let n = String.length watch.base
233 and m = String.length path in
234 String.sub path n (m - n)
319 String.concat "" watches
|
| A D | store.ml | 118 name <> "" && String.fold_left (fun accu c -> accu && char_is_valid c) true name
128 else match String.split '/' s with
141 "/" ^ (String.concat "/" t)
376 let pathstr = String.concat "/" path in
378 (String.escaped (Perms.Node.to_string (Node.get_perms node)));
379 if String.length node.Node.value > 0 then
380 Printf.bprintf buf " = %s\n" (String.escaped node.Node.value)
409 Quota.check store.quota (-1) (String.length value)
412 Quota.check store.quota owner (String.length value);
|
| A D | xenstored.ml | 108 ("xenstored-log-file", Config.String Logging.set_xenstored_log_destination);
109 ("xenstored-log-level", Config.String
114 ("access-log-file", Config.String Logging.set_access_log_destination);
154 let l = String.split ',' line in
|
| A D | connections.ml | 196 String.concat "" (domains @ anonymous)
|
| A D | process.ml | 35 let len = String.length s in
51 String.split ~limit c s
|
| /xen/tools/ocaml/libs/xs/ |
| A D | xsraw.ml | 45 let i = try String.index s c with Not_found -> -1 in
50 let a = String.sub s 0 i
51 and b = String.sub s (i + 1) (String.length s - i - 1) in
64 String.concat "\000" (List.map string_of_perm ((owner,other) :: acl))
72 if String.length s < 2
76 int_of_string (String.sub s 1 (String.length s - 1)),
80 try let i = String.index s '\000' in
81 String.sub s 0 i :: split (String.sub s (i + 1) (String.length s - 1 - i))
169 for offset = 0 to String.length path - (String.length bad) do
170 if String.sub path offset (String.length bad) = bad then
[all …]
|
| A D | queueop.ml | 18 let data_concat ls = (String.concat "\000" ls) ^ "\000"
|
| /xen/tools/ocaml/libs/xb/ |
| A D | packet.ml | 36 let header = string_of_header pkt.tid pkt.rid (Op.to_cval pkt.ty) (String.length pkt.data) in
45 let l = String.length pkt.data in
47 String.sub pkt.data 0 (l - 1)
|
| A D | xb.ml | 109 let s = if String.length con.partial_out > 0 then
117 let len = String.length s in
119 let left = String.sub s sz (len - sz) in
190 let has_old_output con = String.length con.partial_out > 0
|
| A D | partial.ml | 50 Buffer.add_string pkt.buf (String.sub s 0 sz)
|
| /xen/xen/include/efi/ |
| A D | eficon.h | 42 IN CHAR16 *String
49 IN CHAR16 *String
|
| A D | efiprot.h | 505 IN CHAR16 *String,
529 OUT CHAR16 *String
536 IN CHAR16 *String,
|
| A D | efidevp.h | 320 CHAR8 String[1]; member
|
| /xen/tools/golang/xenlight/ |
| A D | xenlight.go | 240 func (u Uuid) String() string { func
281 func (d Defbool) String() string { func
362 func (mac Mac) String() string { func
549 func (sr ShutdownReason) String() (str string) { func
556 func (dt DomainType) String() (str string) { func
564 func (s Scheduler) String() string { func
896 func (bm Bitmap) String() (s string) { func
1118 func (ct ConsoleType) String() (str string) { func
|
| /xen/tools/python/ |
| A D | pylintrc | 254 # String used as indentation unit. This is usually " " (4 spaces) or "\t" (1 tab).
|
| /xen/docs/misc/ |
| A D | xen-command-line.pandoc | 60 ### String
73 of Boolean and String. These are noted in the relevant sections.
80 **String**, or **Boolean** to disable.
|
| /xen/docs/man/ |
| A D | xl.1.pod.in | 472 Use <sshcommand> instead of ssh. String will be passed to sh. If empty, run
570 Use <sshcommand> instead of ssh. String will be passed to sh.
|
| A D | xl.cfg.5.pod.in | 1368 String connector unique id. Space, comma symbols are not allowed.
|