/* build a listening socket to connect to */
static int
init_fake_server(int ip_port)
{
struct sockaddr_in sin;
TDS_SYS_SOCKET s;
int err;
memset(&sin, 0, sizeof(sin));
sin.sin_addr.s_addr = INADDR_ANY;
sin.sin_port = htons((short) ip_port);
sin.sin_family = AF_INET;
if (TDS_IS_SOCKET_INVALID(s = socket(AF_INET, SOCK_STREAM, 0))) {
perror("socket");
exit(1);
}
if (bind(s, (struct sockaddr *) &sin, sizeof(sin)) < 0) {
perror("bind");
CLOSESOCKET(s);
return 1;
}
listen(s, 5);
err = tds_thread_create(&fake_thread, fake_thread_proc, int2ptr(s));
if (err != 0) {
perror("tds_thread_create");
exit(1);
}
return 0;
}
int main(void)
{
tds_condition cond;
tds_thread th;
void *res;
check(tds_cond_init(&cond), "failed initializing condition");
tds_mutex_lock(&mtx);
check(tds_thread_create(&th, signal_proc, &cond) != 0, "error creating thread");
sleep(1);
check(tds_cond_wait(&cond, &mtx), "failed waiting condition");
check(tds_thread_join(th, &res) != 0, "error waiting thread");
check(ptr2int(res) != 0, "error signaling condition");
tds_mutex_unlock(&mtx);
check(tds_cond_destroy(&cond), "failed destroying condition");
return 0;
}
int main(void)
{
tds_condition cond;
tds_thread th;
void *res;
check(tds_cond_init(&cond), "failed initializing condition");
tds_mutex_lock(&mtx);
check(tds_thread_create(&th, signal_proc, &cond) != 0, "error creating thread");
tds_sleep_ms(100);
check(tds_cond_wait(&cond, &mtx), "failed waiting condition");
res = &th;
check(tds_thread_join(th, &res) != 0, "error waiting thread");
check(ptr2int(res) != 0, "error signaling condition");
/* under Windows mutex are recursive */
#ifndef _WIN32
check(tds_mutex_trylock(&mtx) == 0, "mutex should be locked");
#endif
/* check timed version */
check(tds_cond_timedwait(&cond, &mtx, 1) == 0, "should not succeed to wait condition");
check(tds_thread_create(&th, signal_proc, &cond) != 0, "error creating thread");
check(tds_cond_timedwait(&cond, &mtx, 1), "error on timed waiting condition");
res = &th;
check(tds_thread_join(th, &res) != 0, "error waiting thread");
check(ptr2int(res) != 0, "error signaling condition");
tds_mutex_unlock(&mtx);
check(tds_cond_destroy(&cond), "failed destroying condition");
return 0;
}
static void
Test(int use_threads, int return_data)
{
tds_thread wait_thread;
#if !HAVE_ALARM
if (!use_threads) return;
#endif
printf("testing with %s\n", use_threads ? "threads" : "signals");
printf(">> Wait 5 minutes...\n");
if (!use_threads) {
alarm(4);
signal(SIGALRM, sigalrm_handler);
} else {
int err;
exit_thread = 0;
err = tds_thread_create(&wait_thread, wait_thread_proc, NULL);
if (err != 0) {
perror("tds_thread_create");
exit(1);
}
}
if (!return_data)
CHKExecDirect(T("WAITFOR DELAY '000:05:00'"), SQL_NTS, "E");
else
odbc_command2("SELECT MAX(p1.k) FROM tab1 p1, tab1 p2, tab1 p3, tab1 p4", "E");
tds_mutex_lock(&mtx);
exit_thread = 1;
tds_mutex_unlock(&mtx);
if (!use_threads) {
alarm(0);
} else {
tds_thread_join(wait_thread, NULL);
}
getErrorInfo(SQL_HANDLE_STMT, odbc_stmt);
if (strcmp(C(sqlstate), "HY008") != 0) {
fprintf(stderr, "Unexpected sql state returned\n");
odbc_disconnect();
exit(1);
}
odbc_reset_statement();
odbc_command("SELECT name FROM sysobjects WHERE 0=1");
}
