[qemu.git] / replay / replay-events.c

/*
 * replay-events.c
 *
 * Copyright (c) 2010-2015 Institute for System Programming
 *                         of the Russian Academy of Sciences.
 *
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 * See the COPYING file in the top-level directory.
 *
 */

#include "qemu/osdep.h"
#include "qemu/error-report.h"
#include "sysemu/replay.h"
#include "replay-internal.h"
#include "block/aio.h"
#include "ui/input.h"

typedef struct Event {
    ReplayAsyncEventKind event_kind;
    void *opaque;
    void *opaque2;
    uint64_t id;

    QTAILQ_ENTRY(Event) events;
} Event;

static QTAILQ_HEAD(, Event) events_list = QTAILQ_HEAD_INITIALIZER(events_list);
static bool events_enabled;

/* Functions */

static void replay_run_event(Event *event)
{
    switch (event->event_kind) {
    case REPLAY_ASYNC_EVENT_BH:
        aio_bh_call(event->opaque);
        break;
    case REPLAY_ASYNC_EVENT_INPUT:
        qemu_input_event_send_impl(NULL, (InputEvent *)event->opaque);
        qapi_free_InputEvent((InputEvent *)event->opaque);
        break;
    case REPLAY_ASYNC_EVENT_INPUT_SYNC:
        qemu_input_event_sync_impl();
        break;
    case REPLAY_ASYNC_EVENT_CHAR_READ:
        replay_event_char_read_run(event->opaque);
        break;
    case REPLAY_ASYNC_EVENT_BLOCK:
        aio_bh_call(event->opaque);
        break;
    case REPLAY_ASYNC_EVENT_NET:
        replay_event_net_run(event->opaque);
        break;
    default:
        error_report("Replay: invalid async event ID (%d) in the queue",
                    event->event_kind);
        exit(1);
        break;
    }
}

void replay_enable_events(void)
{
    if (replay_mode != REPLAY_MODE_NONE) {
        events_enabled = true;
    }
}

bool replay_has_events(void)
{
    return !QTAILQ_EMPTY(&events_list);
}

void replay_flush_events(void)
{
    g_assert(replay_mutex_locked());

    while (!QTAILQ_EMPTY(&events_list)) {
        Event *event = QTAILQ_FIRST(&events_list);
        replay_run_event(event);
        QTAILQ_REMOVE(&events_list, event, events);
        g_free(event);
    }
}

void replay_disable_events(void)
{
    if (replay_mode != REPLAY_MODE_NONE) {
        events_enabled = false;
        /* Flush events queue before waiting of completion */
        replay_flush_events();
    }
}

/*! Adds specified async event to the queue */
void replay_add_event(ReplayAsyncEventKind event_kind,
                      void *opaque,
                      void *opaque2, uint64_t id)
{
    assert(event_kind < REPLAY_ASYNC_COUNT);

    if (!replay_file || replay_mode == REPLAY_MODE_NONE
        || !events_enabled) {
        Event e;
        e.event_kind = event_kind;
        e.opaque = opaque;
        e.opaque2 = opaque2;
        e.id = id;
        replay_run_event(&e);
        return;
    }

    Event *event = g_malloc0(sizeof(Event));
    event->event_kind = event_kind;
    event->opaque = opaque;
    event->opaque2 = opaque2;
    event->id = id;

    g_assert(replay_mutex_locked());
    QTAILQ_INSERT_TAIL(&events_list, event, events);
}

void replay_bh_schedule_event(QEMUBH *bh)
{
    if (events_enabled) {
        uint64_t id = replay_get_current_icount();
        replay_add_event(REPLAY_ASYNC_EVENT_BH, bh, NULL, id);
    } else {
        qemu_bh_schedule(bh);
    }
}

void replay_add_input_event(struct InputEvent *event)
{
    replay_add_event(REPLAY_ASYNC_EVENT_INPUT, event, NULL, 0);
}

void replay_add_input_sync_event(void)
{
    replay_add_event(REPLAY_ASYNC_EVENT_INPUT_SYNC, NULL, NULL, 0);
}

void replay_block_event(QEMUBH *bh, uint64_t id)
{
    if (events_enabled) {
        replay_add_event(REPLAY_ASYNC_EVENT_BLOCK, bh, NULL, id);
    } else {
        qemu_bh_schedule(bh);
    }
}

static void replay_save_event(Event *event, int checkpoint)
{
    if (replay_mode != REPLAY_MODE_PLAY) {
        /* put the event into the file */
        replay_put_event(EVENT_ASYNC);
        replay_put_byte(checkpoint);
        replay_put_byte(event->event_kind);

        /* save event-specific data */
        switch (event->event_kind) {
        case REPLAY_ASYNC_EVENT_BH:
            replay_put_qword(event->id);
            break;
        case REPLAY_ASYNC_EVENT_INPUT:
            replay_save_input_event(event->opaque);
            break;
        case REPLAY_ASYNC_EVENT_INPUT_SYNC:
            break;
        case REPLAY_ASYNC_EVENT_CHAR_READ:
            replay_event_char_read_save(event->opaque);
            break;
        case REPLAY_ASYNC_EVENT_BLOCK:
            replay_put_qword(event->id);
            break;
        case REPLAY_ASYNC_EVENT_NET:
            replay_event_net_save(event->opaque);
            break;
        default:
            error_report("Unknown ID %" PRId64 " of replay event", event->id);
            exit(1);
        }
    }
}

/* Called with replay mutex locked */
void replay_save_events(int checkpoint)
{
    g_assert(replay_mutex_locked());
    g_assert(checkpoint != CHECKPOINT_CLOCK_WARP_START);
    g_assert(checkpoint != CHECKPOINT_CLOCK_VIRTUAL);
    while (!QTAILQ_EMPTY(&events_list)) {
        Event *event = QTAILQ_FIRST(&events_list);
        replay_save_event(event, checkpoint);
        replay_run_event(event);
        QTAILQ_REMOVE(&events_list, event, events);
        g_free(event);
    }
}

static Event *replay_read_event(int checkpoint)
{
    Event *event;
    if (replay_state.read_event_kind == -1) {
        replay_state.read_event_checkpoint = replay_get_byte();
        replay_state.read_event_kind = replay_get_byte();
        replay_state.read_event_id = -1;
        replay_check_error();
    }

    if (checkpoint != replay_state.read_event_checkpoint) {
        return NULL;
    }

    /* Events that has not to be in the queue */
    switch (replay_state.read_event_kind) {
    case REPLAY_ASYNC_EVENT_BH:
        if (replay_state.read_event_id == -1) {
            replay_state.read_event_id = replay_get_qword();
        }
        break;
    case REPLAY_ASYNC_EVENT_INPUT:
        event = g_malloc0(sizeof(Event));
        event->event_kind = replay_state.read_event_kind;
        event->opaque = replay_read_input_event();
        return event;
    case REPLAY_ASYNC_EVENT_INPUT_SYNC:
        event = g_malloc0(sizeof(Event));
        event->event_kind = replay_state.read_event_kind;
        event->opaque = 0;
        return event;
    case REPLAY_ASYNC_EVENT_CHAR_READ:
        event = g_malloc0(sizeof(Event));
        event->event_kind = replay_state.read_event_kind;
        event->opaque = replay_event_char_read_load();
        return event;
    case REPLAY_ASYNC_EVENT_BLOCK:
        if (replay_state.read_event_id == -1) {
            replay_state.read_event_id = replay_get_qword();
        }
        break;
    case REPLAY_ASYNC_EVENT_NET:
        event = g_malloc0(sizeof(Event));
        event->event_kind = replay_state.read_event_kind;
        event->opaque = replay_event_net_load();
        return event;
    default:
        error_report("Unknown ID %d of replay event",
            replay_state.read_event_kind);
        exit(1);
        break;
    }

    QTAILQ_FOREACH(event, &events_list, events) {
        if (event->event_kind == replay_state.read_event_kind
            && (replay_state.read_event_id == -1
                || replay_state.read_event_id == event->id)) {
            break;
        }
    }

    if (event) {
        QTAILQ_REMOVE(&events_list, event, events);
    } else {
        return NULL;
    }

    /* Read event-specific data */

    return event;
}

/* Called with replay mutex locked */
void replay_read_events(int checkpoint)
{
    g_assert(replay_mutex_locked());
    while (replay_state.data_kind == EVENT_ASYNC) {
        Event *event = replay_read_event(checkpoint);
        if (!event) {
            break;
        }
        replay_finish_event();
        replay_state.read_event_kind = -1;
        replay_run_event(event);

        g_free(event);
    }
}

void replay_init_events(void)
{
    replay_state.read_event_kind = -1;
}

void replay_finish_events(void)
{
    events_enabled = false;
    replay_flush_events();
}

bool replay_events_enabled(void)
{
    return events_enabled;
}

uint64_t blkreplay_next_id(void)
{
    if (replay_events_enabled()) {
        return replay_state.block_request_id++;
    }
    return 0;
}
Commit	Line	Data
c0c071d0 PD	1	/*
	2	* replay-events.c
	3	*
	4	* Copyright (c) 2010-2015 Institute for System Programming
	5	* of the Russian Academy of Sciences.
	6	*
	7	* This work is licensed under the terms of the GNU GPL, version 2 or later.
	8	* See the COPYING file in the top-level directory.
	9	*
	10	*/
	11
d38ea87a	12	#include "qemu/osdep.h"
c0c071d0 PD	13	#include "qemu/error-report.h"
	14	#include "sysemu/replay.h"
	15	#include "replay-internal.h"
8a354bd9	16	#include "block/aio.h"
ee312992	17	#include "ui/input.h"
c0c071d0 PD	18
	19	typedef struct Event {
	20	ReplayAsyncEventKind event_kind;
	21	void *opaque;
	22	void *opaque2;
	23	uint64_t id;
	24
	25	QTAILQ_ENTRY(Event) events;
	26	} Event;
	27
	28	static QTAILQ_HEAD(, Event) events_list = QTAILQ_HEAD_INITIALIZER(events_list);
c0c071d0 PD	29	static bool events_enabled;
	30
	31	/* Functions */
	32
	33	static void replay_run_event(Event *event)
	34	{
	35	switch (event->event_kind) {
8a354bd9 PD	36	case REPLAY_ASYNC_EVENT_BH:
	37	aio_bh_call(event->opaque);
	38	break;
ee312992 PD	39	case REPLAY_ASYNC_EVENT_INPUT:
	40	qemu_input_event_send_impl(NULL, (InputEvent *)event->opaque);
	41	qapi_free_InputEvent((InputEvent *)event->opaque);
	42	break;
	43	case REPLAY_ASYNC_EVENT_INPUT_SYNC:
	44	qemu_input_event_sync_impl();
	45	break;
33577b47 PD	46	case REPLAY_ASYNC_EVENT_CHAR_READ:
	47	replay_event_char_read_run(event->opaque);
	48	break;
63785678 PD	49	case REPLAY_ASYNC_EVENT_BLOCK:
	50	aio_bh_call(event->opaque);
	51	break;
646c5478 PD	52	case REPLAY_ASYNC_EVENT_NET:
	53	replay_event_net_run(event->opaque);
	54	break;
c0c071d0 PD	55	default:
	56	error_report("Replay: invalid async event ID (%d) in the queue",
	57	event->event_kind);
	58	exit(1);
	59	break;
	60	}
	61	}
	62
	63	void replay_enable_events(void)
	64	{
1652e0c3 PD	65	if (replay_mode != REPLAY_MODE_NONE) {
	66	events_enabled = true;
	67	}
c0c071d0 PD	68	}
	69
	70	bool replay_has_events(void)
	71	{
	72	return !QTAILQ_EMPTY(&events_list);
	73	}
	74
	75	void replay_flush_events(void)
	76	{
d759c951 AB	77	g_assert(replay_mutex_locked());
d759c951 AB	78
c0c071d0 PD	79	while (!QTAILQ_EMPTY(&events_list)) {
c0c071d0 PD	80	Event *event = QTAILQ_FIRST(&events_list);
c0c071d0	81	replay_run_event(event);
c0c071d0 PD	82	QTAILQ_REMOVE(&events_list, event, events);
	83	g_free(event);
	84	}
c0c071d0 PD	85	}
	86
	87	void replay_disable_events(void)
	88	{
	89	if (replay_mode != REPLAY_MODE_NONE) {
	90	events_enabled = false;
	91	/* Flush events queue before waiting of completion */
	92	replay_flush_events();
	93	}
	94	}
	95
c0c071d0	96	/! Adds specified async event to the queue /
33577b47 PD	97	void replay_add_event(ReplayAsyncEventKind event_kind,
	98	void *opaque,
	99	void *opaque2, uint64_t id)
c0c071d0 PD	100	{
	101	assert(event_kind < REPLAY_ASYNC_COUNT);
	102
	103	if (!replay_file \|\| replay_mode == REPLAY_MODE_NONE
	104	\|\| !events_enabled) {
	105	Event e;
	106	e.event_kind = event_kind;
	107	e.opaque = opaque;
	108	e.opaque2 = opaque2;
	109	e.id = id;
	110	replay_run_event(&e);
	111	return;
	112	}
	113
	114	Event *event = g_malloc0(sizeof(Event));
	115	event->event_kind = event_kind;
	116	event->opaque = opaque;
	117	event->opaque2 = opaque2;
	118	event->id = id;
	119
d759c951	120	g_assert(replay_mutex_locked());
c0c071d0	121	QTAILQ_INSERT_TAIL(&events_list, event, events);
c0c071d0	122	}
8a354bd9 PD	123
	124	void replay_bh_schedule_event(QEMUBH *bh)
	125	{
1652e0c3	126	if (events_enabled) {
13f26713	127	uint64_t id = replay_get_current_icount();
8a354bd9 PD	128	replay_add_event(REPLAY_ASYNC_EVENT_BH, bh, NULL, id);
	129	} else {
	130	qemu_bh_schedule(bh);
	131	}
	132	}
c0c071d0	133
ee312992 PD	134	void replay_add_input_event(struct InputEvent *event)
	135	{
	136	replay_add_event(REPLAY_ASYNC_EVENT_INPUT, event, NULL, 0);
	137	}
	138
	139	void replay_add_input_sync_event(void)
	140	{
	141	replay_add_event(REPLAY_ASYNC_EVENT_INPUT_SYNC, NULL, NULL, 0);
	142	}
	143
63785678 PD	144	void replay_block_event(QEMUBH *bh, uint64_t id)
63785678 PD	145	{
1652e0c3	146	if (events_enabled) {
63785678 PD	147	replay_add_event(REPLAY_ASYNC_EVENT_BLOCK, bh, NULL, id);
	148	} else {
	149	qemu_bh_schedule(bh);
	150	}
	151	}
	152
c0c071d0 PD	153	static void replay_save_event(Event *event, int checkpoint)
	154	{
	155	if (replay_mode != REPLAY_MODE_PLAY) {
	156	/* put the event into the file */
	157	replay_put_event(EVENT_ASYNC);
	158	replay_put_byte(checkpoint);
	159	replay_put_byte(event->event_kind);
	160
	161	/* save event-specific data */
	162	switch (event->event_kind) {
8a354bd9 PD	163	case REPLAY_ASYNC_EVENT_BH:
	164	replay_put_qword(event->id);
	165	break;
ee312992 PD	166	case REPLAY_ASYNC_EVENT_INPUT:
	167	replay_save_input_event(event->opaque);
	168	break;
	169	case REPLAY_ASYNC_EVENT_INPUT_SYNC:
	170	break;
33577b47 PD	171	case REPLAY_ASYNC_EVENT_CHAR_READ:
	172	replay_event_char_read_save(event->opaque);
	173	break;
63785678 PD	174	case REPLAY_ASYNC_EVENT_BLOCK:
	175	replay_put_qword(event->id);
	176	break;
646c5478 PD	177	case REPLAY_ASYNC_EVENT_NET:
	178	replay_event_net_save(event->opaque);
	179	break;
c0c071d0	180	default:
95b4aed5	181	error_report("Unknown ID %" PRId64 " of replay event", event->id);
c0c071d0	182	exit(1);
c0c071d0 PD	183	}
	184	}
	185	}
	186
	187	/* Called with replay mutex locked */
	188	void replay_save_events(int checkpoint)
	189	{
d759c951	190	g_assert(replay_mutex_locked());
89e46eb4	191	g_assert(checkpoint != CHECKPOINT_CLOCK_WARP_START);
ca9759c2	192	g_assert(checkpoint != CHECKPOINT_CLOCK_VIRTUAL);
c0c071d0 PD	193	while (!QTAILQ_EMPTY(&events_list)) {
	194	Event *event = QTAILQ_FIRST(&events_list);
	195	replay_save_event(event, checkpoint);
c0c071d0	196	replay_run_event(event);
c0c071d0 PD	197	QTAILQ_REMOVE(&events_list, event, events);
	198	g_free(event);
	199	}
	200	}
	201
	202	static Event *replay_read_event(int checkpoint)
	203	{
	204	Event *event;
0b30dc01 PD	205	if (replay_state.read_event_kind == -1) {
	206	replay_state.read_event_checkpoint = replay_get_byte();
	207	replay_state.read_event_kind = replay_get_byte();
	208	replay_state.read_event_id = -1;
c0c071d0 PD	209	replay_check_error();
	210	}
	211
0b30dc01	212	if (checkpoint != replay_state.read_event_checkpoint) {
c0c071d0 PD	213	return NULL;
	214	}
	215
	216	/* Events that has not to be in the queue */
0b30dc01	217	switch (replay_state.read_event_kind) {
8a354bd9	218	case REPLAY_ASYNC_EVENT_BH:
0b30dc01 PD	219	if (replay_state.read_event_id == -1) {
0b30dc01 PD	220	replay_state.read_event_id = replay_get_qword();
8a354bd9 PD	221	}
8a354bd9 PD	222	break;
ee312992 PD	223	case REPLAY_ASYNC_EVENT_INPUT:
ee312992 PD	224	event = g_malloc0(sizeof(Event));
0b30dc01	225	event->event_kind = replay_state.read_event_kind;
ee312992 PD	226	event->opaque = replay_read_input_event();
	227	return event;
	228	case REPLAY_ASYNC_EVENT_INPUT_SYNC:
	229	event = g_malloc0(sizeof(Event));
0b30dc01	230	event->event_kind = replay_state.read_event_kind;
ee312992 PD	231	event->opaque = 0;
ee312992 PD	232	return event;
33577b47 PD	233	case REPLAY_ASYNC_EVENT_CHAR_READ:
33577b47 PD	234	event = g_malloc0(sizeof(Event));
0b30dc01	235	event->event_kind = replay_state.read_event_kind;
33577b47 PD	236	event->opaque = replay_event_char_read_load();
33577b47 PD	237	return event;
63785678	238	case REPLAY_ASYNC_EVENT_BLOCK:
0b30dc01 PD	239	if (replay_state.read_event_id == -1) {
0b30dc01 PD	240	replay_state.read_event_id = replay_get_qword();
63785678 PD	241	}
63785678 PD	242	break;
646c5478 PD	243	case REPLAY_ASYNC_EVENT_NET:
646c5478 PD	244	event = g_malloc0(sizeof(Event));
0b30dc01	245	event->event_kind = replay_state.read_event_kind;
646c5478 PD	246	event->opaque = replay_event_net_load();
646c5478 PD	247	return event;
c0c071d0	248	default:
0b30dc01 PD	249	error_report("Unknown ID %d of replay event",
0b30dc01 PD	250	replay_state.read_event_kind);
c0c071d0 PD	251	exit(1);
	252	break;
	253	}
	254
	255	QTAILQ_FOREACH(event, &events_list, events) {
0b30dc01 PD	256	if (event->event_kind == replay_state.read_event_kind
	257	&& (replay_state.read_event_id == -1
	258	\|\| replay_state.read_event_id == event->id)) {
c0c071d0 PD	259	break;
	260	}
	261	}
	262
	263	if (event) {
	264	QTAILQ_REMOVE(&events_list, event, events);
	265	} else {
	266	return NULL;
	267	}
	268
	269	/* Read event-specific data */
	270
	271	return event;
	272	}
	273
	274	/* Called with replay mutex locked */
	275	void replay_read_events(int checkpoint)
	276	{
d759c951	277	g_assert(replay_mutex_locked());
f186d64d	278	while (replay_state.data_kind == EVENT_ASYNC) {
c0c071d0 PD	279	Event *event = replay_read_event(checkpoint);
	280	if (!event) {
	281	break;
	282	}
1a96e3c1	283	replay_finish_event();
0b30dc01	284	replay_state.read_event_kind = -1;
c0c071d0	285	replay_run_event(event);
c0c071d0 PD	286
c0c071d0 PD	287	g_free(event);
c0c071d0 PD	288	}
	289	}
	290
	291	void replay_init_events(void)
	292	{
0b30dc01	293	replay_state.read_event_kind = -1;
c0c071d0 PD	294	}
	295
	296	void replay_finish_events(void)
	297	{
	298	events_enabled = false;
d873fe03	299	replay_flush_events();
c0c071d0 PD	300	}
	301
	302	bool replay_events_enabled(void)
	303	{
	304	return events_enabled;
	305	}
6d0ceb80 PD	306
	307	uint64_t blkreplay_next_id(void)
	308	{
	309	if (replay_events_enabled()) {
	310	return replay_state.block_request_id++;
	311	}
	312	return 0;
	313	}