minix/kernel/system/do_sprofile.c

   1 /* The kernel call that is implemented in this file:
   2  *   m_type:    SYS_SPROF
   3  *
   4  * The parameters for this kernel call are:
   5  *      m_lsys_krn_sys_sprof.action     (start/stop profiling)
   6  *      m_lsys_krn_sys_sprof.mem_size   (available memory for data)
   7  *      m_lsys_krn_sys_sprof.freq       (requested sample frequency)
   8  *      m_lsys_krn_sys_sprof.endpt      (endpoint of caller)
   9  *      m_lsys_krn_sys_sprof.ctl_ptr    (location of info struct)
  10  *      m_lsys_krn_sys_sprof.mem_ptr    (location of memory for data)
  11  *      m_lsys_krn_sys_sprof.intr_type  (interrupt source: RTC/NMI)
  12  *
  13  * Changes:
  14  *   14 Aug, 2006   Created (Rogier Meurs)
  15  */
  16
  17 #include "kernel/system.h"
  18 #include "kernel/watchdog.h"
  19
  20 #if SPROFILE
  21
  22 /* user address to write info struct */
  23 static vir_bytes sprof_info_addr_vir;
  24
  25 static void clean_seen_flag(void)
  26 {
  27         int i;
  28
  29         for (i = 0; i < NR_TASKS + NR_PROCS; i++)
  30                 proc[i].p_misc_flags &= ~MF_SPROF_SEEN;
  31 }
  32
  33 /*===========================================================================*
  34  *                              do_sprofile                                  *
  35  *===========================================================================*/
  36 int do_sprofile(struct proc * caller, message * m_ptr)
  37 {
  38   int proc_nr;
  39   int err;
  40
  41   switch(m_ptr->m_lsys_krn_sys_sprof.action) {
  42
  43   case PROF_START:
  44         /* Starting profiling.
  45          *
  46          * Check if profiling is not already running.  Calculate physical
  47          * addresses of user pointers.  Reset counters.  Start CMOS timer.
  48          * Turn on profiling.
  49          */
  50         if (sprofiling) {
  51                 printf("SYSTEM: start s-profiling: already started\n");
  52                 return EBUSY;
  53         }
  54
  55         /* Test endpoint number. */
  56         if(!isokendpt(m_ptr->m_lsys_krn_sys_sprof.endpt, &proc_nr))
  57                 return EINVAL;
  58
  59         /* Set parameters for statistical profiler. */
  60         sprof_ep = m_ptr->m_lsys_krn_sys_sprof.endpt;
  61         sprof_info_addr_vir = m_ptr->m_lsys_krn_sys_sprof.ctl_ptr;
  62         sprof_data_addr_vir = m_ptr->m_lsys_krn_sys_sprof.mem_ptr;
  63
  64         sprof_info.mem_used = 0;
  65         sprof_info.total_samples = 0;
  66         sprof_info.idle_samples = 0;
  67         sprof_info.system_samples = 0;
  68         sprof_info.user_samples = 0;
  69
  70         sprof_mem_size =
  71                 m_ptr->m_lsys_krn_sys_sprof.mem_size < SAMPLE_BUFFER_SIZE ?
  72                 m_ptr->m_lsys_krn_sys_sprof.mem_size : SAMPLE_BUFFER_SIZE;
  73
  74         switch (sprofiling_type = m_ptr->m_lsys_krn_sys_sprof.intr_type) {
  75                 case PROF_RTC:
  76                         init_profile_clock(m_ptr->m_lsys_krn_sys_sprof.freq);
  77                         break;
  78                 case PROF_NMI:
  79                         err = nmi_watchdog_start_profiling(
  80                                 m_ptr->m_lsys_krn_sys_sprof.freq);
  81                         if (err)
  82                                 return err;
  83                         break;
  84                 default:
  85                         printf("ERROR : unknown profiling interrupt type\n");
  86                         return EINVAL;
  87         }
  88
  89         sprofiling = 1;
  90
  91         clean_seen_flag();
  92
  93         return OK;
  94
  95   case PROF_STOP:
  96         /* Stopping profiling.
  97          *
  98          * Check if profiling is indeed running.  Turn off profiling.
  99          * Stop CMOS timer.  Copy info struct to user process.
 100          */
 101         if (!sprofiling) {
 102                 printf("SYSTEM: stop s-profiling: not started\n");
 103                 return EBUSY;
 104         }
 105
 106         sprofiling = 0;
 107
 108         switch (sprofiling_type) {
 109                 case PROF_RTC:
 110                         stop_profile_clock();
 111                         break;
 112                 case PROF_NMI:
 113                         nmi_watchdog_stop_profiling();
 114                         break;
 115         }
 116
 117         data_copy(KERNEL, (vir_bytes) &sprof_info,
 118                 sprof_ep, sprof_info_addr_vir, sizeof(sprof_info));
 119         data_copy(KERNEL, (vir_bytes) sprof_sample_buffer,
 120                 sprof_ep, sprof_data_addr_vir, sprof_info.mem_used);
 121
 122         clean_seen_flag();
 123
 124         return OK;
 125
 126   default:
 127         return EINVAL;
 128   }
 129 }
 130
 131 #endif /* SPROFILE */
 132