void task1(void *cookie)
{
long varl;
rtdm_mutex_lock(&mutex);
rtdm_sem_down(&sem);
rtdm_mutex_unlock(&mutex);
rtdm_sem_up(&sem);
rtdm_sem_down(&sem);
while (1) {
rtdm_mutex_lock(&mutex);
rtdm_mutex_lock(&mutex);
varl = ++var;
rtdm_mutex_unlock(&mutex);
rtdm_mutex_unlock(&mutex);
while(varl == var) rt_sleep(nano2count(TIMEOUT));
if ((var - varl) != 1) {
rt_printk("WRONG INCREMENT OF VARIABLE IN TASK1\n");
break;
}
}
}
static int rtdmtest_ioctl(struct rtdm_dev_context *context,
rtdm_user_info_t *user_info,
unsigned int request,
void *arg)
{
struct rtdmtest_context *ctx;
struct rttst_rtdmtest_config config_buf, *config;
rtdm_toseq_t toseq_local, *toseq = NULL;
int i, err = 0;
ctx = (struct rtdmtest_context *)context->dev_private;
switch (request) {
case RTTST_RTIOC_RTDMTEST_SEM_TIMEDDOWN:
case RTTST_RTIOC_RTDMTEST_EVENT_TIMEDWAIT:
case RTTST_RTIOC_RTDMTEST_MUTEX_TIMEDTEST:
case RTTST_RTIOC_RTDMTEST_MUTEX_TEST:
config = arg;
if (user_info) {
if (rtdm_safe_copy_from_user
(user_info, &config_buf, arg,
sizeof(struct rttst_rtdmtest_config)) < 0)
return -EFAULT;
config = &config_buf;
}
if (!config->seqcount)
config->seqcount = 1;
if (config->timeout && config->seqcount > 1) {
toseq = &toseq_local;
rtdm_toseq_init(toseq, config->timeout);
}
switch(request) {
case RTTST_RTIOC_RTDMTEST_SEM_TIMEDDOWN:
for (i = 0; i < config->seqcount; i++) {
err = rtdm_sem_timeddown(&ctx->sem,
config->timeout,
toseq);
if (err)
break;
}
break;
case RTTST_RTIOC_RTDMTEST_EVENT_TIMEDWAIT:
for (i = 0; i < config->seqcount; i++) {
err = rtdm_event_timedwait(&ctx->event,
config->timeout,
toseq);
if (err)
break;
}
break;
case RTTST_RTIOC_RTDMTEST_MUTEX_TIMEDTEST:
for (i = 0; i < config->seqcount; i++) {
err = rtdm_mutex_timedlock(&ctx->mutex,
config->timeout,
toseq);
if (err)
break;
if (config->delay_jiffies) {
__set_current_state(TASK_INTERRUPTIBLE);
schedule_timeout(config->delay_jiffies);
}
rtdm_lock_count++;
rtdm_mutex_unlock(&ctx->mutex);
}
break;
case RTTST_RTIOC_RTDMTEST_MUTEX_TEST:
for (i = 0; i < config->seqcount; i++) {
if ((err = rtdm_mutex_lock(&ctx->mutex)))
break;
rtdm_lock_count++;
rtdm_mutex_unlock(&ctx->mutex);
}
break;
}
break;
case RTTST_RTIOC_RTDMTEST_SEM_DOWN:
err = rtdm_sem_down(&ctx->sem);
break;
case RTTST_RTIOC_RTDMTEST_SEM_UP:
rtdm_sem_up(&ctx->sem);
break;
case RTTST_RTIOC_RTDMTEST_SEM_DESTROY:
rtdm_sem_destroy(&ctx->sem);
break;
case RTTST_RTIOC_RTDMTEST_EVENT_WAIT:
err = rtdm_event_wait(&ctx->event);
break;
case RTTST_RTIOC_RTDMTEST_EVENT_SIGNAL:
rtdm_event_signal(&ctx->event);
break;
case RTTST_RTIOC_RTDMTEST_EVENT_DESTROY:
rtdm_event_destroy(&ctx->event);
break;
case RTTST_RTIOC_RTDMTEST_MUTEX_DESTROY:
rtdm_mutex_destroy(&ctx->mutex);
break;
case RTTST_RTIOC_RTDMTEST_MUTEX_GETSTAT:
printk("RTTST_RTIOC_RTDMTEST_MUTEX_GETSTAT\n");
if (user_info)
config = &config_buf;
else
config = arg;
config->seqcount = rtdm_lock_count;
if (user_info) {
if (rtdm_safe_copy_to_user
(user_info, arg, &config_buf,
sizeof(struct rttst_rtdmtest_config)) < 0)
return -EFAULT;
}
break;
case RTTST_RTIOC_RTDMTEST_NRTSIG_PEND:
rtdm_nrtsig_pend(&ctx->nrtsig);
break;
case RTTST_RTIOC_RTDMTEST_TASK_CREATE:
case RTTST_RTIOC_RTDMTEST_TASK_SET_PRIO:
config = arg;
if (user_info) {
if (rtdm_safe_copy_from_user
(user_info, &config_buf, arg,
sizeof(struct rttst_rtdmtest_config)) < 0)
return -EFAULT;
config = &config_buf;
}
if (request == RTTST_RTIOC_RTDMTEST_TASK_CREATE) {
task_period = config->timeout;
rtdm_task_init(&task, "RTDMTEST",
rtdmtest_task, (void *)config,
config->priority, 0);
} else {
rtdm_task_set_priority(&task, config->priority);
}
break;
case RTTST_RTIOC_RTDMTEST_TASK_DESTROY:
rtdm_task_destroy(&task);
rtdm_task_join_nrt(&task, 100);
break;
default:
printk("request=%d\n", request);
err = -ENOTTY;
}
return err;
}
void task2(void *cookie)
{
long i, max, varl;
nanosecs_abs_t t, dt;
rt_printk("TESTING TIMING OUT TIMEDLOCK ...");
for (max = i = 0; i < LOOPS; i++) {
t = rtdm_clock_read();
if (rtdm_mutex_timedlock(&mutex, DELAY, NULL) == -ETIMEDOUT) {
dt = rtdm_clock_read() - t - DELAY;
if (dt > max) {
max = dt;
}
} else {
break;
}
}
if (i == LOOPS) {
rt_printk(" OK [%lu (ns)].\n", max);
} else {
rt_printk(" NOT OK [MAXLAT %lu (ns)].\n", max);
}
rt_printk("TESTING FAILING TRY LOCK ...");
for (i = 0; i < LOOPS; i++) {
if (rtdm_mutex_timedlock(&mutex, RTDM_TIMEOUT_NONE, NULL) != -EWOULDBLOCK) {
break;
}
}
if (i == LOOPS) {
rt_printk(" OK.\n");
} else {
rt_printk(" NOT OK.\n", max);
}
rt_printk("TESTING SUCCEEDING TRY LOCK ...");
rtdm_sem_up(&sem);
for (i = 0; i < LOOPS; i++) {
if (!rtdm_mutex_timedlock(&mutex, RTDM_TIMEOUT_NONE, NULL)) {
rtdm_mutex_unlock(&mutex);
} else {
break;
}
}
if (i == LOOPS) {
rt_printk(" OK.\n");
} else {
rt_printk(" NOT OK.\n", max);
}
rt_printk("TESTING LOCK/UNLOCK ...");
rtdm_sem_up(&sem);
rtdm_sem_down(&sem);
for (i = 0; i < LOOPS; i++) {
if (rtdm_mutex_lock(&mutex)) {
break;
}
varl = ++var;
if (rtdm_mutex_lock(&mutex)) {
break;
}
rtdm_mutex_unlock(&mutex);
rtdm_mutex_unlock(&mutex);
while(varl == var) rt_sleep(nano2count(TIMEOUT));
if ((var - varl) != 1) {
rt_printk("WRONG INCREMENT OF VARIABLE IN TASK2\n");
break;
}
}
if (i == LOOPS) {
rt_printk(" OK.\n");
} else {
rt_printk(" NOT OK.\n", max);
}
rt_printk("TESTING NOT TIMING OUT TIMEDLOCK ...");
for (i = 0; i < LOOPS; i++) {
if (rtdm_mutex_timedlock(&mutex, DELAY, NULL)) {
break;
}
if (rtdm_mutex_lock(&mutex)) {
break;
}
varl = ++var;
rtdm_mutex_unlock(&mutex);
rtdm_mutex_unlock(&mutex);
while(varl == var) rt_sleep(nano2count(TIMEOUT));
if ((var - varl) != 1) {
rt_printk("WRONG INCREMENT OF VARIABLE IN TASK2\n");
break;
}
}
if (i == LOOPS) {
rt_printk(" OK.\n");
} else {
rt_printk(" NOT OK.\n", max);
}
}
