FreeBSD/Linux Kernel Cross Reference
sys/tools/syscall_map.lua

     #!/usr/bin/env recon
     
     local cjson = require 'cjson'
     local lpeg = require 'lpeg'
     lpeg.locale(lpeg)
     
     -- Only certain regions of the master file should be parsed.
     -- The convention is that any `#if/#else/#endif` clauses are parsed, assuming the condition is true/defined, except for `COMPAT_GETFSSTAT`.
     
    local region_state = { valid = true, }
    local function in_valid_region(line)
      -- Only C preprocessor directives can affect the region's validity.
      if line:sub(1, 1) ~= '#' then
        return region_state.valid
      end
    
      -- This is the only macro definition that is assumed to be undefined.
      local assume_defined = not line:match('COMPAT_GETFSSTAT')
      if line:match('^#if') then
        region_state.valid = assume_defined
      elseif line:match('^#else') then
        region_state.valid = not region_state.valid
      elseif line:match('^#endif') then
        region_state.valid = true
      end
    end
    
    -- Parse a syscall declaration line from `bsd/kern/syscalls.master` into a table with `name`, `number`, `arguments`, and `old` keys.
    
    -- Primitive tokens.
    local space = lpeg.S(' \t')^0
    local identifier = (lpeg.alnum + lpeg.P('_'))^1
    local numeric = lpeg.digit^1 / tonumber
    
    -- Matching the function name of the syscall declaration.
    local function_ptn = lpeg.Cg(identifier^1, 'name') * lpeg.P('(')
    local nosys_ptn = lpeg.P('e')^-1 * lpeg.P('nosys(')
    
    -- Matching an argument list.
    local arg = lpeg.C((1 - lpeg.S(',)'))^1)
    local args_ptn = lpeg.Ct(arg * (lpeg.P(',') * space * arg)^0)
    
    -- Matching a normal C-style declaration of the syscall.
    local decl_ptn = (1 - function_ptn)^1 * (function_ptn - nosys_ptn) *
        lpeg.Cg(args_ptn, 'arguments')
    
    -- Matching an old breadcrumb, with empty arguments table.
    local old_ptn = lpeg.P('old') * space * lpeg.Cg(identifier^1, 'name') *
        lpeg.Cg(lpeg.Cc(true), 'old') * lpeg.Cg(lpeg.Cc({}), 'arguments')
    local old_decl_ptn = (1 - old_ptn)^1 * old_ptn
    
    local syscall_ptn = lpeg.Ct(lpeg.Cg(numeric, 'number') *
        (decl_ptn + old_decl_ptn))
    
    local bsd_syscalls = {}
    for line in io.stdin:lines() do
      if in_valid_region(line) then
        bsd_syscalls[#bsd_syscalls + 1] = syscall_ptn:match(line)
      end
    end
    
    local syscalls = {
      bsd_syscalls = bsd_syscalls,
      mach_syscalls = {
        -- Duplicate the names from `mach_trap_table` here.
        { number = 10, name = 'mach_vm_allocate',
          arguments = {
            'mach_port_name_t target',
            'mach_vm_address_t *address',
            'mach_vm_size_t size',
            'int flags',
          },
        },
        { number = 11, name = 'mach_vm_purgable_control',
          arguments = {
            'mach_port_name_t target',
            'mach_vm_offset_t address',
            'vm_purgable_t control',
            'int *state',
          },
        },
        { number = 12, name = 'mach_vm_deallocate',
          arguments = {
            'mach_port_name_t target',
            'mach_vm_address_t address',
            'mach_vm_size_t size',
          },
        },
        { number = 13, name = 'task_dyld_process_info_notify_get',
          arguments = {
            'mach_port_name_array_t names_addr',
            'natural_t *names_count_addr',
          },
        },
        { number = 14, name = 'mach_vm_protect',
          arguments = {
            'mach_port_name_t task',
            'mach_vm_address_t address',
            'mach_vm_size_t size',
           'boolean_t set_maximum',
           'vm_prot_t new_protection',
         }
       },
       { number = 15, name = 'mach_vm_map',
         arguments = {
           'mach_port_name_t target',
           'mach_vm_address_t *address',
           'mach_vm_size_t size',
           'mach_vm_offset_t mask',
           'int flags',
           'mem_entry_name_port_t object',
           'memory_object_offset_t offset',
           'boolean_t copy',
           'vm_prot_t cur_protection',
           'vm_prot_t max_protection',
           'vm_inherit_t inheritance',
         },
       },
       { number = 16, name = 'mach_port_allocate',
         arguments = {
           'mach_port_name_t target',
           'mach_port_right_t right',
           'mach_port_name_t *name',
         },
       },
   
       { number = 18, name = 'mach_port_deallocate',
         arguments = {
           'mach_port_name_t target',
           'mach_port_name_t name',
         },
       },
       { number = 19, name = 'mach_port_mod_refs',
         arguments = {
           'mach_port_name_t target',
           'mach_port_name_t name',
           'mach_port_right_t right',
           'mach_port_delta_t delta',
         },
       },
       { number = 20, name = 'mach_port_move_member',
         arguments = {
           'mach_port_name_t target',
           'mach_port_name_t member',
           'mach_port_name_t after',
         },
       },
       { number = 21, name = 'mach_port_insert_right',
         arguments = {
           'mach_port_name_t target',
           'mach_port_name_t name',
           'mach_port_name_t poly',
           'mach_msg_type_name_t polyPoly',
         },
       },
       { number = 22, name = 'mach_port_insert_member',
         arguments = {
           'mach_port_name_t target',
           'mach_port_name_t name',
           'mach_port_name_t pset',
         },
       },
       { number = 23, name = 'mach_port_extract_member',
         arguments = {
           'mach_port_name_t target',
           'mach_port_name_t name',
           'mach_port_name_t pset',
         },
       },
       { number = 24, name = 'mach_port_construct',
         arguments = {
           'mach_port_name_t target',
           'mach_port_options_t *options',
           'uint64_t context',
           'mach_port_name_t *name',
         },
       },
       { number = 25, name = 'mach_port_destruct',
         arguments = {
           'mach_port_name_t target',
           'mach_port_name_t name',
           'mach_port_delta_t srdelta',
           'uint64_t guard',
         },
       },
       { number = 26, name = 'mach_reply_port',
         arguments = { 'void' },
       },
       { number = 27, name = 'thread_self',
         arguments = { 'void' },
       },
       { number = 28, name = 'task_self',
         arguments = { 'void' },
       },
       { number = 29, name = 'host_self',
         arguments = { 'void' },
       },
   
       { number = 31, name = 'mach_msg',
         arguments = {
           'mach_msg_header_t *msg',
           'mach_msg_option_t option',
           'mach_msg_size_t send_size',
           'mach_msg_size_t rcv_size',
           'mach_port_name_t rcv_name',
           'mach_msg_timeout_t timeout',
           'mach_port_name_t notify',
         },
       },
       { number = 32, name = 'mach_msg_overwrite',
         arguments = {
           'mach_msg_header_t *msg',
           'mach_msg_option_t option',
           'mach_msg_size_t send_size',
           'mach_msg_size_t rcv_size',
           'mach_port_name_t rcv_name',
           'mach_msg_timeout_t timeout',
           'mach_port_name_t notify',
           'mach_msg_header_t *rcv_msg',
           'mach_msg_size_t rcv_limit',
         },
       },
       { number = 33, name = 'semaphore_signal',
         arguments = {
           'mach_port_name_t signal_name',
         },
       },
       { number = 34, name = 'semaphore_signal_all',
         arguments = {
           'mach_port_name_t signal_name',
         },
       },
       { number = 35, name = 'semaphore_signal_thread',
         arguments = {
           'mach_port_name_t signal_name',
           'mach_port_name_t thread_name',
         },
       },
       { number = 36, name = 'semaphore_wait',
         arguments = {
           'mach_port_name_t wait_name',
         },
       },
       { number = 37, name = 'semaphore_wait_signal',
         arguments = {
           'mach_port_name_t wait_name',
           'mach_port_name_t signal_name',
         },
       },
       { number = 38, name = 'semaphore_timedwait',
         arguments = {
           'mach_port_name_t wait_name',
           'unsigned int sec',
           'clock_res_t nsec',
         },
       },
       { number = 39, name = 'semaphore_timedwait_signal',
         arguments = {
           'mach_port_name_t wait_name',
           'mach_port_name_t signal_name',
           'unsigned int sec',
           'clock_res_t nsec',
         },
       },
       { number = 40, name = 'mach_port_get_attributes',
         arguments = {
           'mach_port_name_t target',
           'mach_port_name_t name',
           'mach_port_flavor_t flavor',
           'mach_port_info_t port_info_out',
           'mach_msg_type_number_t *port_info_outCnt',
         },
       },
       { number = 41, name = 'mach_port_guard',
         arguments = {
           'mach_port_name_t target',
           'mach_port_name_t name',
           'uint64_t guard',
           'boolean_t strict',
         },
       },
       { number = 42, name = 'mach_port_unguard',
         arguments = {
           'mach_port_name_t target',
           'mach_port_name_t name',
           'uint64_t guard',
         },
       },
       { number = 43, name = 'mach_generate_activity_id',
         arguments = {
           'mach_port_name_t target',
           'int count',
           'uint64_t *activity_id',
         },
       },
       { number = 44, name = 'task_name_for_pid',
         arguments = {
           'mach_port_name_t target_tport',
           'int pid',
           'mach_port_name_t *tn',
         },
       },
       { number = 45, name = 'task_for_pid',
         arguments = {
           'mach_port_name_t target_tport',
           'int pid',
           'mach_port_name_t *t',
         },
       },
       { number = 46, name = 'pid_for_task',
         arguments = {
           'mach_port_name_t t',
           'int *x',
         },
       },
       { number = 47, name = 'mach_msg2',
         arguments = {
           'void *data',
           'mach_msg_option64_t option64',
           'mach_msg_header_t header',
           'mach_msg_size_t send_size',
           'mach_msg_size_t rcv_size',
           'mach_port_t rcv_name',
           'uint64_t timeout',
           'uint32_t priority',
         },
       },
       { number = 48, name = 'macx_swapon',
         arguments = {
           'uint64_t filename',
           'int flags',
           'int size',
           'int priority',
         },
       },
       { number = 49, name = 'macx_swapoff',
         arguments = {
           'uint64_t filename',
           'int flags',
         },
       },
       { number = 50, name = 'thread_get_special_reply_port',
         arguments = { 'void' },
       },
       { number = 51, name = 'macx_triggers',
         arguments = {
           'int hi_water',
           'int low_water',
           'int flags',
           'mach_port_t alert_port',
         },
       },
       { number = 52, name = 'macx_backing_store_suspend',
         arguments = {
           'boolean_t suspend',
         },
       },
       { number = 53, name = 'macx_backing_store_recovery',
         arguments = {
           'int pid',
         },
       },
   
       { number = 58, name = 'pfz_exit',
         arguments = { 'void' },
       },
       { number = 59, name = 'swtch_pri',
         arguments = {
           'int pri',
         },
       },
       { number = 60, name = 'swtch',
         arguments = { 'void' },
       },
       { number = 61, name = 'thread_switch',
         arguments = {
           'mach_port_name_t thread_name',
           'int option',
           'mach_msg_timeout_t option_time',
         },
       },
       { number = 62, name = 'clock_sleep',
         arguments = {
           'mach_port_name_t clock_name',
           'sleep_type_t sleep_type',
           'int sleep_sec',
           'int sleep_nsec',
           'mach_timespec_t *wakeup_time',
         },
       },
   
       { number = 70, name = 'host_create_mach_voucher',
         arguments = {
           'mach_port_name_t host',
           'mach_voucher_attr_raw_recipe_array_t recipes',
           'int recipes_size',
           'mach_port_name_t *voucher',
         },
       },
   
       { number = 72, name = 'mach_voucher_extract_attr_recipe',
         arguments = {
           'mach_port_name_t voucher_name',
           'mach_voucher_attr_key_t key',
           'mach_voucher_attr_raw_recipe_t recipe',
           'mach_msg_type_number_t *recipe_size',
         },
       },
   
       { number = 76, name = 'mach_port_type',
         arguments = {
           'ipc_space_t task',
           'mach_port_name_t name',
           'mach_port_type_t *ptype',
         },
       },
       { number = 77, name = 'mach_port_request_notification',
         arguments = {
           'ipc_space_t task',
           'mach_port_name_t name',
           'mach_msg_id_t msgid',
           'mach_port_mscount_t sync',
           'mach_port_name_t notify',
           'mach_msg_type_name_t notifyPoly',
           'mach_port_name_t *previous',
         },
       },
   
       { number = 89, name = 'mach_timebase_info',
         arguments = {
           'mach_timebase_info_t info',
         },
       },
       { number = 90, name = 'mach_wait_until',
         arguments = {
           'uint64_t deadline',
         },
       },
       { number = 91, name = 'mk_timer_create',
         arguments = { 'void' },
       },
       { number = 92, name = 'mk_timer_destroy',
         arguments = {
           'mach_port_name_t name',
         },
       },
       { number = 93, name = 'mk_timer_arm',
         arguments = {
           'mach_port_name_t name',
           'uint64_t expire_time',
         },
       },
       { number = 94, name = 'mk_timer_cancel',
         arguments = {
           'mach_port_name_t name',
           'uint64_t *result_time',
         },
       },
       { number = 95, name = 'mk_timer_arm_leeway',
         arguments = {
           'mach_port_name_t name',
           'uint64_t mk_timer_flags',
           'uint64_t mk_timer_expire_time',
           'uint64_t mk_timer_leeway',
         },
       },
       { number = 96, name = 'debug_control_port_for_pid',
         arguments = {
           'mach_port_name_t target_tport',
           'int pid',
           'mach_port_name_t *t',
         },
       },
   
       { number = 100, name = 'iokit_user_client',
         arguments = {
           'void *userClientRef',
           'uint32_t index',
           'void *p1',
           'void *p2',
           'void *p3',
           'void *p4',
           'void *p5',
           'void *p6',
         },
       },
     },
   }
   
   -- Basic sanity checking that the same number isn't claimed by two syscalls.
   for type, entries in pairs(syscalls) do
     local numbers_seen = {}
     for _, call in ipairs(entries) do
       if numbers_seen[call.number] then
         io.stderr:write(('error: %s: saw %d twice: %s and %s\n'):format(type,
             call.number, call.name, numbers_seen[call.number]))
         os.exit(1)
       end
       numbers_seen[call.number] = call.name
     end
   end
   
   print(cjson.encode(syscalls))

Cache object: c9f3f50b12906beeadec1ee9ab88c1dc