void
_profile_reset(struct profile_vars *pv)
{
struct alloc_context *aptr;
struct page_list *plist;
struct gfuncs *gfunc;
if (pv->active) {
_profile_md_stop();
}
/* Reset all function unique pointers back to 0 */
for (aptr = pv->acontext[ACONTEXT_GFUNC];
aptr != (struct alloc_context *)0;
aptr = aptr->next) {
for (plist = aptr->plist;
plist != (struct page_list *)0;
plist = plist->next) {
for (gfunc = (struct gfuncs *)plist->first;
gfunc < (struct gfuncs *)plist->ptr;
gfunc++) {
*(gfunc->unique_ptr) = (struct hasharc *)0;
}
}
}
/* Release memory */
_profile_reset_alloc(pv, ACONTEXT_GPROF);
_profile_reset_alloc(pv, ACONTEXT_GFUNC);
_profile_reset_alloc(pv, ACONTEXT_PROF);
memset((void *)pv->profil_buf, '\0', pv->profil_info.profil_len);
memset((void *)pv->md.hash_ptr, '\0', pv->md.hash_size * sizeof(struct hasharc *));
memset((void *)&pv->stats, '\0', sizeof(pv->stats));
pv->stats.stats_size = sizeof(struct profile_stats);
pv->stats.major_version = PROFILE_MAJOR_VERSION;
pv->stats.minor_version = PROFILE_MINOR_VERSION;
if (pv->active) {
_profile_md_start();
}
}
long
_profile_kgmon(int write,
size_t count,
long indx,
int max_cpus,
void **p_ptr,
void (*control_func)(kgmon_control_t))
{
kgmon_control_t kgmon;
int cpu;
int error = 0;
int i;
struct profile_vars *pv;
static struct callback dummy_callback;
*p_ptr = (void *)0;
/*
* If the number passed is not within bounds, just copy the data directly.
*/
if (!LEGAL_KGMON(indx)) {
*p_ptr = (void *)indx;
if (!write) {
if (PROFILE_VARS(0)->debug) {
printf("_profile_kgmon: copy %5ld bytes, from 0x%lx\n",
(long)count,
(long)indx);
}
} else {
if (PROFILE_VARS(0)->debug) {
printf("_profile_kgmon: copy %5ld bytes, to 0x%lx\n",
(long)count,
(long)indx);
}
}
return count;
}
/*
* Decode the record number into the component pieces.
*/
DECODE_KGMON(indx, kgmon, cpu);
if (PROFILE_VARS(0)->debug) {
printf("_profile_kgmon: start: kgmon control = %2d, cpu = %d, count = %ld\n",
kgmon, cpu, (long)count);
}
/* Validate the CPU number */
if (cpu < 0 || cpu >= max_cpus) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON, bad cpu %d\n", cpu);
}
return -1;
} else {
pv = PROFILE_VARS(cpu);
if (!write) {
switch (kgmon) {
default:
if (PROFILE_VARS(0)->debug) {
printf("Unknown KGMON read command\n");
}
error = -1;
break;
case KGMON_GET_STATUS: /* return whether or not profiling is active */
if (cpu != 0) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON_GET_STATUS: cpu = %d\n", cpu);
}
error = -1;
break;
}
if (count != sizeof(pv->active)) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON_GET_STATUS: count = %ld, should be %ld\n",
(long)count,
(long)sizeof(pv->active));
}
error = -1;
break;
}
*p_ptr = (void *)&pv->active;
break;
case KGMON_GET_DEBUG: /* return whether or not debugging is active */
if (cpu != 0) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON_GET_DEBUG: cpu = %d\n", cpu);
}
error = -1;
break;
}
if (count != sizeof(pv->debug)) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON_GET_DEBUG: count = %ld, should be %ld\n",
(long)count,
(long)sizeof(pv->active));
}
error = -1;
break;
}
*p_ptr = (void *)&pv->debug;
break;
case KGMON_GET_PROFILE_VARS: /* return the _profile_vars structure */
if (count != sizeof(struct profile_vars)) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON_GET_PROFILE_VARS: count = %ld, should be %ld\n",
(long)count,
(long)sizeof(struct profile_vars));
}
error = -1;
break;
}
_profile_update_stats(pv);
*p_ptr = (void *)pv;
break;
case KGMON_GET_PROFILE_STATS: /* return the _profile_stats structure */
if (count != sizeof(struct profile_stats)) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON_GET_PROFILE_STATS: count = %ld, should be = %ld\n",
(long)count,
(long)sizeof(struct profile_stats));
}
error = -1;
break;
}
_profile_update_stats(pv);
*p_ptr = (void *)&pv->stats;
break;
}
} else {
switch (kgmon) {
default:
if (PROFILE_VARS(0)->debug) {
printf("Unknown KGMON write command\n");
}
error = -1;
break;
case KGMON_SET_PROFILE_ON: /* turn on profiling */
if (cpu != 0) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON_SET_PROFILE_ON, cpu = %d\n", cpu);
}
error = -1;
break;
}
if (!PROFILE_VARS(0)->active) {
for (i = 0; i < max_cpus; i++) {
PROFILE_VARS(i)->active = 1;
}
if (control_func) {
(*control_func)(kgmon);
}
_profile_md_start();
}
count = 0;
break;
case KGMON_SET_PROFILE_OFF: /* turn off profiling */
if (cpu != 0) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON_SET_PROFILE_OFF, cpu = %d\n", cpu);
}
error = -1;
break;
}
if (PROFILE_VARS(0)->active) {
for (i = 0; i < max_cpus; i++) {
PROFILE_VARS(i)->active = 0;
}
_profile_md_stop();
if (control_func) {
(*control_func)(kgmon);
}
}
count = 0;
break;
case KGMON_SET_PROFILE_RESET: /* reset profiling */
if (cpu != 0) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON_SET_PROFILE_RESET, cpu = %d\n", cpu);
}
error = -1;
break;
}
for (i = 0; i < max_cpus; i++) {
_profile_reset(PROFILE_VARS(i));
}
if (control_func) {
(*control_func)(kgmon);
}
count = 0;
break;
case KGMON_SET_DEBUG_ON: /* turn on profiling */
if (cpu != 0) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON_SET_DEBUG_ON, cpu = %d\n", cpu);
}
error = -1;
break;
}
if (!PROFILE_VARS(0)->debug) {
for (i = 0; i < max_cpus; i++) {
PROFILE_VARS(i)->debug = 1;
}
if (control_func) {
(*control_func)(kgmon);
}
}
count = 0;
break;
case KGMON_SET_DEBUG_OFF: /* turn off profiling */
if (cpu != 0) {
if (PROFILE_VARS(0)->debug) {
printf("KGMON_SET_DEBUG_OFF, cpu = %d\n", cpu);
}
error = -1;
break;
}
if (PROFILE_VARS(0)->debug) {
for (i = 0; i < max_cpus; i++) {
PROFILE_VARS(i)->debug = 0;
}
if (control_func) {
(*control_func)(kgmon);
}
}
count = 0;
break;
}
}
}
if (error) {
if (PROFILE_VARS(0)->debug) {
printf("_profile_kgmon: done: kgmon control = %2d, cpu = %d, error = %d\n",
kgmon, cpu, error);
}
return -1;
}
if (PROFILE_VARS(0)->debug) {
printf("_profile_kgmon: done: kgmon control = %2d, cpu = %d, count = %ld\n",
kgmon, cpu, (long)count);
}
return count;
}
