Kill redundant declarion of perror()
[qemu-kvm/fedora.git] / hw / ptimer.c
blob9d3862724da2ad117cddb94ae20e576f4071378d
1 /*
2 * General purpose implementation of a simple periodic countdown timer.
4 * Copyright (c) 2007 CodeSourcery.
6 * This code is licenced under the GNU LGPL.
7 */
8 #include "hw.h"
9 #include "qemu-timer.h"
12 struct ptimer_state
14 int enabled; /* 0 = disabled, 1 = periodic, 2 = oneshot. */
15 uint64_t limit;
16 uint64_t delta;
17 uint32_t period_frac;
18 int64_t period;
19 int64_t last_event;
20 int64_t next_event;
21 QEMUBH *bh;
22 QEMUTimer *timer;
25 /* Use a bottom-half routine to avoid reentrancy issues. */
26 static void ptimer_trigger(ptimer_state *s)
28 if (s->bh) {
29 qemu_bh_schedule(s->bh);
33 static void ptimer_reload(ptimer_state *s)
35 if (s->delta == 0) {
36 ptimer_trigger(s);
37 s->delta = s->limit;
39 if (s->delta == 0 || s->period == 0) {
40 fprintf(stderr, "Timer with period zero, disabling\n");
41 s->enabled = 0;
42 return;
45 s->last_event = s->next_event;
46 s->next_event = s->last_event + s->delta * s->period;
47 if (s->period_frac) {
48 s->next_event += ((int64_t)s->period_frac * s->delta) >> 32;
50 qemu_mod_timer(s->timer, s->next_event);
53 static void ptimer_tick(void *opaque)
55 ptimer_state *s = (ptimer_state *)opaque;
56 ptimer_trigger(s);
57 s->delta = 0;
58 if (s->enabled == 2) {
59 s->enabled = 0;
60 } else {
61 ptimer_reload(s);
65 uint64_t ptimer_get_count(ptimer_state *s)
67 int64_t now;
68 uint64_t counter;
70 if (s->enabled) {
71 now = qemu_get_clock(vm_clock);
72 /* Figure out the current counter value. */
73 if (now - s->next_event > 0
74 || s->period == 0) {
75 /* Prevent timer underflowing if it should already have
76 triggered. */
77 counter = 0;
78 } else {
79 uint64_t rem;
80 uint64_t div;
82 rem = s->next_event - now;
83 div = s->period;
84 counter = rem / div;
86 } else {
87 counter = s->delta;
89 return counter;
92 void ptimer_set_count(ptimer_state *s, uint64_t count)
94 s->delta = count;
95 if (s->enabled) {
96 s->next_event = qemu_get_clock(vm_clock);
97 ptimer_reload(s);
101 void ptimer_run(ptimer_state *s, int oneshot)
103 if (s->enabled) {
104 return;
106 if (s->period == 0) {
107 fprintf(stderr, "Timer with period zero, disabling\n");
108 return;
110 s->enabled = oneshot ? 2 : 1;
111 s->next_event = qemu_get_clock(vm_clock);
112 ptimer_reload(s);
115 /* Pause a timer. Note that this may cause it to "lose" time, even if it
116 is immediately restarted. */
117 void ptimer_stop(ptimer_state *s)
119 if (!s->enabled)
120 return;
122 s->delta = ptimer_get_count(s);
123 qemu_del_timer(s->timer);
124 s->enabled = 0;
127 /* Set counter increment interval in nanoseconds. */
128 void ptimer_set_period(ptimer_state *s, int64_t period)
130 s->period = period;
131 s->period_frac = 0;
132 if (s->enabled) {
133 s->next_event = qemu_get_clock(vm_clock);
134 ptimer_reload(s);
138 /* Set counter frequency in Hz. */
139 void ptimer_set_freq(ptimer_state *s, uint32_t freq)
141 s->period = 1000000000ll / freq;
142 s->period_frac = (1000000000ll << 32) / freq;
143 if (s->enabled) {
144 s->next_event = qemu_get_clock(vm_clock);
145 ptimer_reload(s);
149 /* Set the initial countdown value. If reload is nonzero then also set
150 count = limit. */
151 void ptimer_set_limit(ptimer_state *s, uint64_t limit, int reload)
153 s->limit = limit;
154 if (reload)
155 s->delta = limit;
156 if (s->enabled && reload) {
157 s->next_event = qemu_get_clock(vm_clock);
158 ptimer_reload(s);
162 void qemu_put_ptimer(QEMUFile *f, ptimer_state *s)
164 qemu_put_byte(f, s->enabled);
165 qemu_put_be64s(f, &s->limit);
166 qemu_put_be64s(f, &s->delta);
167 qemu_put_be32s(f, &s->period_frac);
168 qemu_put_sbe64s(f, &s->period);
169 qemu_put_sbe64s(f, &s->last_event);
170 qemu_put_sbe64s(f, &s->next_event);
171 qemu_put_timer(f, s->timer);
174 void qemu_get_ptimer(QEMUFile *f, ptimer_state *s)
176 s->enabled = qemu_get_byte(f);
177 qemu_get_be64s(f, &s->limit);
178 qemu_get_be64s(f, &s->delta);
179 qemu_get_be32s(f, &s->period_frac);
180 qemu_get_sbe64s(f, &s->period);
181 qemu_get_sbe64s(f, &s->last_event);
182 qemu_get_sbe64s(f, &s->next_event);
183 qemu_get_timer(f, s->timer);
186 ptimer_state *ptimer_init(QEMUBH *bh)
188 ptimer_state *s;
190 s = (ptimer_state *)qemu_mallocz(sizeof(ptimer_state));
191 s->bh = bh;
192 s->timer = qemu_new_timer(vm_clock, ptimer_tick, s);
193 return s;