oprof.c 5.0 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14
/**
 * @file oprof.c
 *
 * @remark Copyright 2002 OProfile authors
 * @remark Read the file COPYING
 *
 * @author John Levon <levon@movementarian.org>
 */

#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/init.h>
#include <linux/oprofile.h>
#include <linux/moduleparam.h>
15 16
#include <linux/workqueue.h>
#include <linux/time.h>
17
#include <asm/mutex.h>
L
Linus Torvalds 已提交
18 19 20 21 22 23

#include "oprof.h"
#include "event_buffer.h"
#include "cpu_buffer.h"
#include "buffer_sync.h"
#include "oprofile_stats.h"
R
Robert Richter 已提交
24

L
Linus Torvalds 已提交
25 26 27
struct oprofile_operations oprofile_ops;

unsigned long oprofile_started;
28
unsigned long oprofile_backtrace_depth;
29 30
static unsigned long is_setup;
static DEFINE_MUTEX(start_mutex);
L
Linus Torvalds 已提交
31 32 33 34 35 36 37 38 39 40

/* timer
   0 - use performance monitoring hardware if available
   1 - use the timer int mechanism regardless
 */
static int timer = 0;

int oprofile_setup(void)
{
	int err;
R
Robert Richter 已提交
41

42
	mutex_lock(&start_mutex);
L
Linus Torvalds 已提交
43 44 45 46 47 48

	if ((err = alloc_cpu_buffers()))
		goto out;

	if ((err = alloc_event_buffer()))
		goto out1;
R
Robert Richter 已提交
49

L
Linus Torvalds 已提交
50 51
	if (oprofile_ops.setup && (err = oprofile_ops.setup()))
		goto out2;
R
Robert Richter 已提交
52

L
Linus Torvalds 已提交
53 54 55 56 57
	/* Note even though this starts part of the
	 * profiling overhead, it's necessary to prevent
	 * us missing task deaths and eventually oopsing
	 * when trying to process the event buffer.
	 */
58 59 60 61 62 63 64 65 66 67 68 69 70 71
	if (oprofile_ops.sync_start) {
		int sync_ret = oprofile_ops.sync_start();
		switch (sync_ret) {
		case 0:
			goto post_sync;
		case 1:
			goto do_generic;
		case -1:
			goto out3;
		default:
			goto out3;
		}
	}
do_generic:
L
Linus Torvalds 已提交
72 73 74
	if ((err = sync_start()))
		goto out3;

75
post_sync:
L
Linus Torvalds 已提交
76
	is_setup = 1;
77
	mutex_unlock(&start_mutex);
L
Linus Torvalds 已提交
78
	return 0;
R
Robert Richter 已提交
79

L
Linus Torvalds 已提交
80 81 82 83 84 85 86 87
out3:
	if (oprofile_ops.shutdown)
		oprofile_ops.shutdown();
out2:
	free_event_buffer();
out1:
	free_cpu_buffers();
out:
88
	mutex_unlock(&start_mutex);
L
Linus Torvalds 已提交
89 90 91
	return err;
}

92 93
#ifdef CONFIG_OPROFILE_EVENT_MULTIPLEX

94 95 96
static void switch_worker(struct work_struct *work);
static DECLARE_DELAYED_WORK(switch_work, switch_worker);

97 98
static void start_switch_worker(void)
{
99 100 101 102 103 104 105
	if (oprofile_ops.switch_events)
		schedule_delayed_work(&switch_work, oprofile_time_slice);
}

static void stop_switch_worker(void)
{
	cancel_delayed_work_sync(&switch_work);
106 107 108 109
}

static void switch_worker(struct work_struct *work)
{
110 111 112 113 114
	if (oprofile_ops.switch_events())
		return;

	atomic_inc(&oprofile_stats.multiplex_counter);
	start_switch_worker();
115 116
}

117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153
/* User inputs in ms, converts to jiffies */
int oprofile_set_timeout(unsigned long val_msec)
{
	int err = 0;
	unsigned long time_slice;

	mutex_lock(&start_mutex);

	if (oprofile_started) {
		err = -EBUSY;
		goto out;
	}

	if (!oprofile_ops.switch_events) {
		err = -EINVAL;
		goto out;
	}

	time_slice = msecs_to_jiffies(val_msec);
	if (time_slice == MAX_JIFFY_OFFSET) {
		err = -EINVAL;
		goto out;
	}

	oprofile_time_slice = time_slice;

out:
	mutex_unlock(&start_mutex);
	return err;

}

#else

static inline void start_switch_worker(void) { }
static inline void stop_switch_worker(void) { }

154
#endif
L
Linus Torvalds 已提交
155 156 157 158 159

/* Actually start profiling (echo 1>/dev/oprofile/enable) */
int oprofile_start(void)
{
	int err = -EINVAL;
R
Robert Richter 已提交
160

161
	mutex_lock(&start_mutex);
162

L
Linus Torvalds 已提交
163 164 165
	if (!is_setup)
		goto out;

R
Robert Richter 已提交
166 167
	err = 0;

L
Linus Torvalds 已提交
168 169
	if (oprofile_started)
		goto out;
R
Robert Richter 已提交
170

L
Linus Torvalds 已提交
171 172 173 174 175
	oprofile_reset_stats();

	if ((err = oprofile_ops.start()))
		goto out;

176
	start_switch_worker();
177

L
Linus Torvalds 已提交
178 179
	oprofile_started = 1;
out:
180
	mutex_unlock(&start_mutex);
L
Linus Torvalds 已提交
181 182 183
	return err;
}

R
Robert Richter 已提交
184

L
Linus Torvalds 已提交
185 186 187
/* echo 0>/dev/oprofile/enable */
void oprofile_stop(void)
{
188
	mutex_lock(&start_mutex);
L
Linus Torvalds 已提交
189 190 191 192
	if (!oprofile_started)
		goto out;
	oprofile_ops.stop();
	oprofile_started = 0;
193

194
	stop_switch_worker();
195

L
Linus Torvalds 已提交
196 197 198
	/* wake up the daemon to read what remains */
	wake_up_buffer_waiter();
out:
199
	mutex_unlock(&start_mutex);
L
Linus Torvalds 已提交
200 201 202 203 204
}


void oprofile_shutdown(void)
{
205
	mutex_lock(&start_mutex);
206 207 208 209 210 211 212 213 214 215 216 217
	if (oprofile_ops.sync_stop) {
		int sync_ret = oprofile_ops.sync_stop();
		switch (sync_ret) {
		case 0:
			goto post_sync;
		case 1:
			goto do_generic;
		default:
			goto post_sync;
		}
	}
do_generic:
L
Linus Torvalds 已提交
218
	sync_stop();
219
post_sync:
L
Linus Torvalds 已提交
220 221 222 223 224
	if (oprofile_ops.shutdown)
		oprofile_ops.shutdown();
	is_setup = 0;
	free_event_buffer();
	free_cpu_buffers();
225
	mutex_unlock(&start_mutex);
L
Linus Torvalds 已提交
226 227 228 229 230 231
}

int oprofile_set_backtrace(unsigned long val)
{
	int err = 0;

232
	mutex_lock(&start_mutex);
L
Linus Torvalds 已提交
233 234 235 236 237 238 239 240 241 242 243

	if (oprofile_started) {
		err = -EBUSY;
		goto out;
	}

	if (!oprofile_ops.backtrace) {
		err = -EINVAL;
		goto out;
	}

244
	oprofile_backtrace_depth = val;
L
Linus Torvalds 已提交
245 246

out:
247
	mutex_unlock(&start_mutex);
L
Linus Torvalds 已提交
248 249 250 251 252 253 254 255 256 257
	return err;
}

static int __init oprofile_init(void)
{
	int err;

	err = oprofile_arch_init(&oprofile_ops);
	if (err < 0 || timer) {
		printk(KERN_INFO "oprofile: using timer interrupt.\n");
258 259 260
		err = oprofile_timer_init(&oprofile_ops);
		if (err)
			goto out_arch;
L
Linus Torvalds 已提交
261 262
	}
	err = oprofilefs_register();
263
	if (err)
264 265
		goto out_arch;
	return 0;
L
Linus Torvalds 已提交
266

267 268
out_arch:
	oprofile_arch_exit();
L
Linus Torvalds 已提交
269 270 271 272 273 274
	return err;
}


static void __exit oprofile_exit(void)
{
275
	oprofile_timer_exit();
L
Linus Torvalds 已提交
276 277 278 279
	oprofilefs_unregister();
	oprofile_arch_exit();
}

R
Robert Richter 已提交
280

L
Linus Torvalds 已提交
281 282 283 284 285
module_init(oprofile_init);
module_exit(oprofile_exit);

module_param_named(timer, timer, int, 0644);
MODULE_PARM_DESC(timer, "force use of timer interrupt");
R
Robert Richter 已提交
286

L
Linus Torvalds 已提交
287 288 289
MODULE_LICENSE("GPL");
MODULE_AUTHOR("John Levon <levon@movementarian.org>");
MODULE_DESCRIPTION("OProfile system profiler");