/*
* Test: n = size of the counter, t = timeout value
*/
static void test_timeout(uint32_t *c, uint32_t n, uint32_t timeout) {
double start, end;
printf("---> test: size = %"PRIu32", timeout = %"PRIu32" s\n", n, timeout);
fflush(stdout);
wrapper.interrupted = false;
start_timeout(timeout, handler, &wrapper);
start = get_cpu_time();
loop(c, n);
clear_timeout();
end = get_cpu_time();
printf(" cpu time = %.2f s\n", end - start);
fflush(stdout);
if (wrapper.interrupted) {
printf(" interrupted at: ");
show_counter(c, n);
printf("\n");
fflush(stdout);
} else {
printf(" completed: ");
show_counter(c, n);
printf("\n");
fflush(stdout);
}
}
static gboolean game_server_start(Game * game, gboolean register_server,
const gchar * meta_server_name)
{
gchar *error_message;
game->accept_fd =
net_open_listening_socket(game->server_port, &error_message);
if (game->accept_fd == -1) {
log_message(MSG_ERROR, "%s\n", error_message);
g_free(error_message);
return FALSE;
}
game->is_running = TRUE;
start_timeout(game);
game->accept_tag = driver->input_add_read(game->accept_fd,
(InputFunc)
player_connect, game);
if (register_server) {
g_assert(meta_server_name != NULL);
meta_register(meta_server_name, PIONEERS_DEFAULT_META_PORT,
game);
}
return TRUE;
}
/**
* _dolphin_getc - receive one byte from the parallel port (DD A816)
*
* This function tries to receive one byte via parallel and returns
* it if successful. Returns -1 instead if the device state has
* changed.
*/
static int16_t _dolphin_getc(void) {
/* wait until CLOCK is high */
while (!IEC_CLOCK) // A818
if (iec_check_atn())
return -1;
set_data(1); // A81F
/* start EOI timeout */
start_timeout(86);
/* wait until CLOCK is low or 86 microseconds passed */
uint8_t tmp;
do {
if (iec_check_atn())
return -1;
tmp = has_timed_out();
} while (!tmp && IEC_CLOCK);
if (tmp) { // A835
/* acknowledge EOI */
set_data(0);
delay_us(57);
set_data(1);
uart_putc('E');
iec_data.iecflags |= EOI_RECVD;
/* wait until CLOCK is low - A849 */
while (IEC_CLOCK)
if (iec_check_atn())
return -1;
}
/* read byte */
uint8_t b = parallel_read();
parallel_send_handshake();
set_data(0);
return b;
}
AvahiSServiceResolver *avahi_s_service_resolver_new(
AvahiServer *server,
AvahiIfIndex interface,
AvahiProtocol protocol,
const char *name,
const char *type,
const char *domain,
AvahiProtocol aprotocol,
AvahiLookupFlags flags,
AvahiSServiceResolverCallback callback,
void* userdata) {
AvahiSServiceResolver *r;
AvahiKey *k;
char n[AVAHI_DOMAIN_NAME_MAX];
int ret;
assert(server);
assert(type);
assert(callback);
AVAHI_CHECK_VALIDITY_RETURN_NULL(server, AVAHI_IF_VALID(interface), AVAHI_ERR_INVALID_INTERFACE);
AVAHI_CHECK_VALIDITY_RETURN_NULL(server, AVAHI_PROTO_VALID(protocol), AVAHI_ERR_INVALID_PROTOCOL);
AVAHI_CHECK_VALIDITY_RETURN_NULL(server, AVAHI_PROTO_VALID(aprotocol), AVAHI_ERR_INVALID_PROTOCOL);
AVAHI_CHECK_VALIDITY_RETURN_NULL(server, !domain || avahi_is_valid_domain_name(domain), AVAHI_ERR_INVALID_DOMAIN_NAME);
AVAHI_CHECK_VALIDITY_RETURN_NULL(server, !name || avahi_is_valid_service_name(name), AVAHI_ERR_INVALID_SERVICE_NAME);
AVAHI_CHECK_VALIDITY_RETURN_NULL(server, avahi_is_valid_service_type_strict(type), AVAHI_ERR_INVALID_SERVICE_TYPE);
AVAHI_CHECK_VALIDITY_RETURN_NULL(server, AVAHI_FLAGS_VALID(flags, AVAHI_LOOKUP_USE_WIDE_AREA|AVAHI_LOOKUP_USE_MULTICAST|AVAHI_LOOKUP_NO_TXT|AVAHI_LOOKUP_NO_ADDRESS), AVAHI_ERR_INVALID_FLAGS);
if (!domain)
domain = server->domain_name;
if ((ret = avahi_service_name_join(n, sizeof(n), name, type, domain)) < 0) {
avahi_server_set_errno(server, ret);
return NULL;
}
if (!(r = avahi_new(AvahiSServiceResolver, 1))) {
avahi_server_set_errno(server, AVAHI_ERR_NO_MEMORY);
return NULL;
}
r->server = server;
r->service_name = avahi_strdup(name);
r->service_type = avahi_normalize_name_strdup(type);
r->domain_name = avahi_normalize_name_strdup(domain);
r->callback = callback;
r->userdata = userdata;
r->address_protocol = aprotocol;
r->srv_record = r->txt_record = r->address_record = NULL;
r->srv_flags = r->txt_flags = r->address_flags = 0;
r->interface = interface;
r->protocol = protocol;
r->user_flags = flags;
r->record_browser_a = r->record_browser_aaaa = r->record_browser_srv = r->record_browser_txt = NULL;
r->time_event = NULL;
AVAHI_LLIST_PREPEND(AvahiSServiceResolver, resolver, server->service_resolvers, r);
k = avahi_key_new(n, AVAHI_DNS_CLASS_IN, AVAHI_DNS_TYPE_SRV);
r->record_browser_srv = avahi_s_record_browser_new(server, interface, protocol, k, flags & ~(AVAHI_LOOKUP_NO_TXT|AVAHI_LOOKUP_NO_ADDRESS), record_browser_callback, r);
avahi_key_unref(k);
if (!r->record_browser_srv) {
avahi_s_service_resolver_free(r);
return NULL;
}
if (!(flags & AVAHI_LOOKUP_NO_TXT)) {
k = avahi_key_new(n, AVAHI_DNS_CLASS_IN, AVAHI_DNS_TYPE_TXT);
r->record_browser_txt = avahi_s_record_browser_new(server, interface, protocol, k, flags & ~(AVAHI_LOOKUP_NO_TXT|AVAHI_LOOKUP_NO_ADDRESS), record_browser_callback, r);
avahi_key_unref(k);
if (!r->record_browser_txt) {
avahi_s_service_resolver_free(r);
return NULL;
}
}
start_timeout(r);
return r;
}
static void record_browser_callback(
AvahiSRecordBrowser*rr,
AvahiIfIndex interface,
AvahiProtocol protocol,
AvahiBrowserEvent event,
AvahiRecord *record,
AvahiLookupResultFlags flags,
void* userdata) {
AvahiSServiceResolver *r = userdata;
assert(rr);
assert(r);
if (rr == r->record_browser_aaaa || rr == r->record_browser_a)
r->address_flags = flags;
else if (rr == r->record_browser_srv)
r->srv_flags = flags;
else if (rr == r->record_browser_txt)
r->txt_flags = flags;
switch (event) {
case AVAHI_BROWSER_NEW: {
int changed = 0;
assert(record);
if (r->interface > 0 && interface > 0 && interface != r->interface)
return;
if (r->protocol != AVAHI_PROTO_UNSPEC && protocol != AVAHI_PROTO_UNSPEC && protocol != r->protocol)
return;
if (r->interface <= 0)
r->interface = interface;
if (r->protocol == AVAHI_PROTO_UNSPEC)
r->protocol = protocol;
switch (record->key->type) {
case AVAHI_DNS_TYPE_SRV:
if (!r->srv_record) {
r->srv_record = avahi_record_ref(record);
changed = 1;
if (r->record_browser_a) {
avahi_s_record_browser_free(r->record_browser_a);
r->record_browser_a = NULL;
}
if (r->record_browser_aaaa) {
avahi_s_record_browser_free(r->record_browser_aaaa);
r->record_browser_aaaa = NULL;
}
if (!(r->user_flags & AVAHI_LOOKUP_NO_ADDRESS)) {
if (r->address_protocol == AVAHI_PROTO_INET || r->address_protocol == AVAHI_PROTO_UNSPEC) {
AvahiKey *k = avahi_key_new(r->srv_record->data.srv.name, AVAHI_DNS_CLASS_IN, AVAHI_DNS_TYPE_A);
r->record_browser_a = avahi_s_record_browser_new(r->server, r->interface, r->protocol, k, r->user_flags & ~(AVAHI_LOOKUP_NO_TXT|AVAHI_LOOKUP_NO_ADDRESS), record_browser_callback, r);
avahi_key_unref(k);
}
if (r->address_protocol == AVAHI_PROTO_INET6 || r->address_protocol == AVAHI_PROTO_UNSPEC) {
AvahiKey *k = avahi_key_new(r->srv_record->data.srv.name, AVAHI_DNS_CLASS_IN, AVAHI_DNS_TYPE_AAAA);
r->record_browser_aaaa = avahi_s_record_browser_new(r->server, r->interface, r->protocol, k, r->user_flags & ~(AVAHI_LOOKUP_NO_TXT|AVAHI_LOOKUP_NO_ADDRESS), record_browser_callback, r);
avahi_key_unref(k);
}
}
}
break;
case AVAHI_DNS_TYPE_TXT:
assert(!(r->user_flags & AVAHI_LOOKUP_NO_TXT));
if (!r->txt_record) {
r->txt_record = avahi_record_ref(record);
changed = 1;
}
break;
case AVAHI_DNS_TYPE_A:
case AVAHI_DNS_TYPE_AAAA:
assert(!(r->user_flags & AVAHI_LOOKUP_NO_ADDRESS));
if (!r->address_record) {
r->address_record = avahi_record_ref(record);
changed = 1;
}
break;
default:
abort();
}
if (changed &&
r->srv_record &&
(r->txt_record || (r->user_flags & AVAHI_LOOKUP_NO_TXT)) &&
(r->address_record || (r->user_flags & AVAHI_LOOKUP_NO_ADDRESS)))
finish(r, AVAHI_RESOLVER_FOUND);
break;
}
case AVAHI_BROWSER_REMOVE:
assert(record);
switch (record->key->type) {
case AVAHI_DNS_TYPE_SRV:
if (r->srv_record && avahi_record_equal_no_ttl(record, r->srv_record)) {
avahi_record_unref(r->srv_record);
r->srv_record = NULL;
if (r->record_browser_a) {
avahi_s_record_browser_free(r->record_browser_a);
r->record_browser_a = NULL;
}
if (r->record_browser_aaaa) {
avahi_s_record_browser_free(r->record_browser_aaaa);
r->record_browser_aaaa = NULL;
}
/** Look for a replacement */
avahi_s_record_browser_restart(r->record_browser_srv);
start_timeout(r);
}
break;
case AVAHI_DNS_TYPE_TXT:
assert(!(r->user_flags & AVAHI_LOOKUP_NO_TXT));
if (r->txt_record && avahi_record_equal_no_ttl(record, r->txt_record)) {
avahi_record_unref(r->txt_record);
r->txt_record = NULL;
/** Look for a replacement */
avahi_s_record_browser_restart(r->record_browser_txt);
start_timeout(r);
}
break;
case AVAHI_DNS_TYPE_A:
case AVAHI_DNS_TYPE_AAAA:
assert(!(r->user_flags & AVAHI_LOOKUP_NO_ADDRESS));
if (r->address_record && avahi_record_equal_no_ttl(record, r->address_record)) {
avahi_record_unref(r->address_record);
r->address_record = NULL;
/** Look for a replacement */
if (r->record_browser_aaaa)
avahi_s_record_browser_restart(r->record_browser_aaaa);
if (r->record_browser_a)
avahi_s_record_browser_restart(r->record_browser_a);
start_timeout(r);
}
break;
default:
abort();
}
break;
case AVAHI_BROWSER_CACHE_EXHAUSTED:
case AVAHI_BROWSER_ALL_FOR_NOW:
break;
case AVAHI_BROWSER_FAILURE:
if (rr == r->record_browser_a && r->record_browser_aaaa) {
/* We were looking for both AAAA and A, and the other query is still living, so we'll not die */
avahi_s_record_browser_free(r->record_browser_a);
r->record_browser_a = NULL;
break;
}
if (rr == r->record_browser_aaaa && r->record_browser_a) {
/* We were looking for both AAAA and A, and the other query is still living, so we'll not die */
avahi_s_record_browser_free(r->record_browser_aaaa);
r->record_browser_aaaa = NULL;
break;
}
/* Hmm, everything's lost, tell the user */
if (r->record_browser_srv)
avahi_s_record_browser_free(r->record_browser_srv);
if (r->record_browser_txt)
avahi_s_record_browser_free(r->record_browser_txt);
if (r->record_browser_a)
avahi_s_record_browser_free(r->record_browser_a);
if (r->record_browser_aaaa)
avahi_s_record_browser_free(r->record_browser_aaaa);
r->record_browser_srv = r->record_browser_txt = r->record_browser_a = r->record_browser_aaaa = NULL;
finish(r, AVAHI_RESOLVER_FAILURE);
break;
}
}
static void record_browser_callback(
AvahiSRecordBrowser*rr,
AvahiIfIndex interface,
AvahiProtocol protocol,
AvahiBrowserEvent event,
AvahiRecord *record,
AvahiLookupResultFlags flags,
void* userdata) {
AvahiSAddressResolver *r = userdata;
assert(rr);
assert(r);
switch (event) {
case AVAHI_BROWSER_NEW:
assert(record);
assert(record->key->type == AVAHI_DNS_TYPE_PTR);
if (flags & AVAHI_LOOKUP_RESULT_LLMNR)
r->llmnr_has_record = 1;
if (r->interface > 0 && interface != r->interface)
return;
if (r->protocol != AVAHI_PROTO_UNSPEC && protocol != r->protocol)
return;
if (r->interface <= 0)
r->interface = interface;
if (r->protocol == AVAHI_PROTO_UNSPEC)
r->protocol = protocol;
if (!r->ptr_record) {
r->ptr_record = avahi_record_ref(record);
r->flags = flags;
finish(r, AVAHI_RESOLVER_FOUND);
}
break;
case AVAHI_BROWSER_REMOVE:
assert(record);
assert(record->key->type == AVAHI_DNS_TYPE_PTR);
if (r->ptr_record && avahi_record_equal_no_ttl(record, r->ptr_record)) {
avahi_record_unref(r->ptr_record);
r->ptr_record = NULL;
r->flags = flags;
/** Look for a replacement */
avahi_s_record_browser_restart(r->record_browser);
start_timeout(r);
}
break;
case AVAHI_BROWSER_CACHE_EXHAUSTED:
break;
case AVAHI_BROWSER_ALL_FOR_NOW:
/* when called by _LLMNR we trigger lookup by _MULTICAST*/
if ((flags & AVAHI_LOOKUP_RESULT_LLMNR) && (r->retry_with_multicast) && !r->llmnr_has_record) {
r->retry_with_multicast = 0;
avahi_s_record_browser_free(r->record_browser);
r->record_browser = avahi_s_record_browser_new(r->server, r->interface, r->protocol, r->key, AVAHI_LOOKUP_USE_MULTICAST, record_browser_callback, r);
if (r->record_browser) {
start_timeout(r);
break;
}
}
break;
case AVAHI_BROWSER_FAILURE:
if (r->retry_with_llmnr) {
r->retry_with_llmnr = 0;
avahi_s_record_browser_free(r->record_browser);
r->record_browser = avahi_s_record_browser_new(r->server, r->interface, r->protocol, r->key, AVAHI_LOOKUP_USE_LLMNR, record_browser_callback, r);
if (r->record_browser) {
start_timeout(r);
break;
}
}
break;
}
}
AvahiSAddressResolver *avahi_s_address_resolver_new(
AvahiServer *server,
AvahiIfIndex interface,
AvahiProtocol protocol,
const AvahiAddress *address,
AvahiLookupFlags flags,
AvahiSAddressResolverCallback callback,
void* userdata) {
AvahiSAddressResolver *r;
AvahiKey *k;
char n[AVAHI_DOMAIN_NAME_MAX];
assert(server);
assert(address);
assert(callback);
AVAHI_CHECK_VALIDITY_RETURN_NULL(server, AVAHI_IF_VALID(interface), AVAHI_ERR_INVALID_INTERFACE);
AVAHI_CHECK_VALIDITY_RETURN_NULL(server, AVAHI_PROTO_VALID(protocol), AVAHI_ERR_INVALID_PROTOCOL);
AVAHI_CHECK_VALIDITY_RETURN_NULL(server, address->proto == AVAHI_PROTO_INET || address->proto == AVAHI_PROTO_INET6, AVAHI_ERR_INVALID_PROTOCOL);
AVAHI_CHECK_VALIDITY_RETURN_NULL(server, AVAHI_FLAGS_VALID(flags, AVAHI_LOOKUP_USE_WIDE_AREA|AVAHI_LOOKUP_USE_MULTICAST|AVAHI_LOOKUP_USE_LLMNR), AVAHI_ERR_INVALID_FLAGS);
avahi_reverse_lookup_name(address, n, sizeof(n));
if (!(k = avahi_key_new(n, AVAHI_DNS_CLASS_IN, AVAHI_DNS_TYPE_PTR))) {
avahi_server_set_errno(server, AVAHI_ERR_NO_MEMORY);
return NULL;
}
if (!(r = avahi_new(AvahiSAddressResolver, 1))) {
avahi_server_set_errno(server, AVAHI_ERR_NO_MEMORY);
avahi_key_unref(k);
return NULL;
}
r->server = server;
r->address = *address;
r->callback = callback;
r->userdata = userdata;
r->ptr_record = NULL;
r->interface = interface;
r->protocol = protocol;
r->flags = 0;
r->retry_with_multicast = 0;
r->retry_with_llmnr = 0;
r->llmnr_has_record = 0;
r->key = k;
r->record_browser = NULL;
AVAHI_LLIST_PREPEND(AvahiSAddressResolver, resolver, server->address_resolvers, r);
r->time_event = NULL;
if (!(flags & (AVAHI_LOOKUP_USE_MULTICAST|AVAHI_LOOKUP_USE_WIDE_AREA|AVAHI_LOOKUP_USE_LLMNR))) {
if (!server->wide_area.wide_area_lookup_engine || !avahi_wide_area_has_servers(server->wide_area.wide_area_lookup_engine))
flags |= AVAHI_LOOKUP_USE_LLMNR;
else {
flags |= AVAHI_LOOKUP_USE_WIDE_AREA;
r->retry_with_llmnr = 1;
}
r->retry_with_multicast = 1;
}
r->record_browser = avahi_s_record_browser_new(server, interface, protocol, k, flags, record_browser_callback, r);
if (!r->record_browser) {
avahi_s_address_resolver_free(r);
return NULL;
}
start_timeout(r);
return r;
}
