77 |
(namep "namep" rtmk-port-t AD_IN))) |
(namep "namep" rtmk-port-t AD_IN))) |
78 |
) |
) |
79 |
|
|
80 |
|
; Return send rights to threads that belong to TASK. |
81 |
|
(define-routine task-threads |
82 |
|
(c-name "task_threads") |
83 |
|
(comment "????") |
84 |
|
() |
85 |
|
(return-type kern-return-t) |
86 |
|
(arguments ((task-port "task" task-t) |
87 |
|
(threads "threads" port-array-t AD_IN))) |
88 |
|
) |
89 |
|
|
90 |
|
|
91 |
; Thread related functions |
; Thread related functions |
92 |
|
|
233 |
(anywhere "anywhere" int))) |
(anywhere "anywhere" int))) |
234 |
) |
) |
235 |
|
|
236 |
|
; Deallocate region [OFFSET, OFFSET+SIZE) in TASKs address space. |
237 |
|
(define-routine vm-deallocate |
238 |
|
(c-name "vm_deallocate") |
239 |
|
(comment "deallocate SIZE bytes in TASK-PORT at OFFSET") |
240 |
|
() |
241 |
|
(return-type kern-return-t) |
242 |
|
(arguments ((task-port "task" task-t) |
243 |
|
(offset-x "offset" vm-offset-t) |
244 |
|
(size "size" vm-size-t))) |
245 |
|
) |
246 |
|
|
247 |
|
; Set the protection for address region [OFFSET, OFFSET+SIZE) |
248 |
|
; in TASK to PROTECTION. If SETMAX_P is specified, the maximum |
249 |
|
; protection is to be set; otherwise, only the current protection |
250 |
|
; is affected. |
251 |
|
(define-routine vm-protect |
252 |
|
(c-name "vm_protect") |
253 |
|
(comment "change protection to PROTECTION") |
254 |
|
() |
255 |
|
(return-type kern-return-t) |
256 |
|
(arguments ((task-port "task" task-t) |
257 |
|
(offset-x "offset" vm-offset-t) |
258 |
|
(size "size" vm-size-t) |
259 |
|
(protection "protection" vm-prot-t) |
260 |
|
(setmax-p "setmax_p" int))) |
261 |
|
) |
262 |
|
|
263 |
; Write into TASKs address space at offset DST_OFFSET, from current |
; Write into TASKs address space at offset DST_OFFSET, from current |
264 |
; tasks address space at SRC_OFFSET. Copy LENGTH bytes. |
; tasks address space at SRC_OFFSET. Copy LENGTH bytes. |
265 |
(define-routine vm-write |
(define-routine vm-write |
328 |
(arguments ((task-port "task" task-t) |
(arguments ((task-port "task" task-t) |
329 |
(evcp "evcp" eventcnt-t AD_IN))) |
(evcp "evcp" eventcnt-t AD_IN))) |
330 |
) |
) |
|
|
|