/ 
OS2-Proc-0.02
River stage zero No dependents
/ OS2::Proc

NAME

OS2::Proc - Perl extension for get information about running processes and loaded modules.

SYNOPSIS

use OS2::Proc;
$p_info = (proc_info($$,1))[0]->[0];
$p_info->{pid} == $$ or die;
$t_info = $p_info->{threads}[0];
$ticks = ($t_info->{usertime}+$t_info->{systime});
%i = OS2::SysInfo;
$cpu_time = $ticks*$i{TIMER_INTERVAL}/10000;

DESCRIPTION

This module access internal tables keeping information of OS/2 processes. The corresponding API call was present for a long time, but is documented only around OS/2 v4.5. Since older version are stable now, it should be safe to use this call (with certain limitations) for any version of OS/2.

Keep in mind that due to certain bugs in the OS/2 kernel some calls to this API may kill your system. E.g., it is not safe to get an info about non-existing PID until W3fp18. (The module contains a safeguard against this bug.)

This module allows querying the following data:

$href = global_info()

hash reference with sizes of internal tables for modules, procs, threads.

print "$_ => $href->{$_}\n" for qw(modules procs threads);
$href_modules = mod_info()

$href_modules indexes modules by their handles, the value being a hash reference with the following fields:

  cnt_static	 - No. of modules linked in at compile time
  name		 - Full path name (except for SYSINIT/basedevs?)
  segcnt	 - ?? Number of segments?
  static_handles - array reference with handles of modules linked
			at compile time
  static_names	 - same with names
  type		 - ?? SYSINIT/IFS/DMD/SYS=0, DLL/EXE=1,
($aref_processes, $href_modules) = proc_info(0)

information about all processes and modules on the system. Each entry referenced by $aref_processes is a hash reference with the following fields:

  threads	  - Array of hash references with thread information
  pid		  - pid
  ppid		  - parent pid
  proc_type	  - FullScreen/RealMode/VIO/PM/Detached
  type		  - 0..4 (see proc_type)
  status_array    - combination of ExitList/ExitingT1/Exiting/
			NeedsWait/Parent-Waiting/Dying/Embrionic
  state		  - combination of flags in 0x01..0x80 (see status_array)
  sessid	  - SessionId
  module_name	  - full name of the executabale (!)
  module_handle	  - module handle of the executable
  threadcnt	  - No. of threads
  privsem32cnt    - No. of private 32bit semaphores
  sem16cnt	  - No. of 16bit semaphores
  dllcnt	  - length
  shrmemcnt	  - No. of shared memory segments
  fdscnt	  - No. of available file descriptors
  dynamic_names	  - reference to array with full names of
			runtime-loaded modules (!)
  dynamic_handles - same with handles
  static_handles  - array reference with handles of modules linked
			at compile time (!)
  static_names	  - same with names (!)

Each thread-information hash has the following entries

priority	 - absolute priority (?)
priority_class - Idle-Time/Regular/Time-Critical/Fixed-High
priority_level - Priority shift inside class (larger is higher)
sleepid	 - ???
slotid	 - "Global" thread id
state		 - 1,2,5 (see thread_state)
systime	 - Cumulative no. of busy ticks spent in syscalls
thread_state	 - Ready/Blocked/Running
threadid	 - Thread Id "in the process"
usertime	 - Cumulative no. of busy ticks spent in user code

Keep in mind that the semantic of priority_class is not monotonic, monotonic is Idle-Time/Regular/Fixed-High/Time-Critical.

The $href_modules is the same as for mod_info().

$aref = proc_info()

same info with processes restricted to the current process, and modules to modules used by the current process.

$aref = proc_info($pid)

same about a given ProcessID.

$aref = proc_info($pid,$flags)

Allows restriction of the information restricted to one about

processes	- 0x001
modules	- 0x002
semaphores	- 0x004
shared memory - 0x008
files		- 0x100

and without any parsing. The description above corresponds to $flags==3. Only the combinations of 0x1 and 0x2 are allowed now. If 0x2 is not present, the fields marked with (!) are omited from the process list descriptions.

$href = process_info($pid)

Gives a reference to a hash with process information as above, except for those marked with (!).

AUTHOR

Ilya Zakharevich <ilya@math.ohio-state.edu>

SEE ALSO

perl(1).