int main(int argc, char const *const argv[]) { lagopus_result_t ret = LAGOPUS_RESULT_ANY_FAILURES; int i; int n = 10000; lagopus_thread_t thread = NULL; pthread_t tid = LAGOPUS_INVALID_THREAD; lagopus_log_set_debug_level(10); if (argc > 1) { int tmp; if (lagopus_str_parse_int32(argv[1], &tmp) == LAGOPUS_RESULT_OK && tmp > 0) { n = tmp; } } /* create, start, wait, destroy */ for (i = 0; i < n; i++) { thread = NULL; if ((ret = lagopus_thread_create( (lagopus_thread_t *)&thread, (lagopus_thread_main_proc_t)s_main_proc, (lagopus_thread_finalize_proc_t)s_finalize_proc, (lagopus_thread_freeup_proc_t)s_freeup_proc, (const char *) "thread", (void *) NULL)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); lagopus_exit_fatal("Can't create a thread.\n"); } else { fprintf(stderr, "create a thread [%d]\n", i); if ((ret = lagopus_thread_get_pthread_id(&thread, &tid)) != LAGOPUS_RESULT_NOT_STARTED) { lagopus_perror(ret); goto done; } } if ((ret = lagopus_thread_start(&thread, false)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); lagopus_exit_fatal("Can't start the thread.\n"); } else { ret = lagopus_thread_get_pthread_id(&thread, &tid); if (ret == LAGOPUS_RESULT_OK || ret == LAGOPUS_RESULT_ALREADY_HALTED) { fprintf(stderr, " start thread: %lu\n", tid); } else { lagopus_perror(ret); goto done; } } s_check_cancelled(&thread, false); if ((ret = lagopus_thread_wait(&thread, 1000LL * 1000LL * 1000LL)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); lagopus_msg_error("Can't wait the thread.\n"); } else { if ((ret = lagopus_thread_get_pthread_id(&thread, &tid)) == LAGOPUS_RESULT_OK) { lagopus_msg_error( "Thread has been completed, but I can get thread ID, %lu\n", tid); } else if (ret != LAGOPUS_RESULT_ALREADY_HALTED) { lagopus_perror(ret); goto done; } } s_check_cancelled(&thread, false); lagopus_thread_destroy(&thread); fprintf(stderr, "destroy the thread [%d]\n", i); fprintf(stderr, "\n"); } /* create, start, cancel, destroy */ for (i = 0; i < n; i++) { thread = NULL; if ((ret = lagopus_thread_create( (lagopus_thread_t *)&thread, (lagopus_thread_main_proc_t)s_main_proc_with_sleep, (lagopus_thread_finalize_proc_t)s_finalize_proc, (lagopus_thread_freeup_proc_t)s_freeup_proc, (const char *) "thread", (void *) NULL)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); lagopus_exit_fatal("Can't create a thread.\n"); } else { fprintf(stderr, "create a thread [%d]\n", i); if ((ret = lagopus_thread_get_pthread_id(&thread, &tid)) != LAGOPUS_RESULT_NOT_STARTED) { lagopus_perror(ret); goto done; } } if ((ret = lagopus_thread_start(&thread, false)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); lagopus_exit_fatal("Can't start the thread.\n"); } else { ret = lagopus_thread_get_pthread_id(&thread, &tid); if (ret == LAGOPUS_RESULT_OK || ret == LAGOPUS_RESULT_ALREADY_HALTED) { fprintf(stderr, " start thread: %lu\n", tid); } else { lagopus_perror(ret); goto done; } } s_check_cancelled(&thread, false); if ((ret = lagopus_thread_cancel(&thread)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); lagopus_msg_error("Can't cancel the thread.\n"); } else { if ((ret = lagopus_thread_get_pthread_id(&thread, &tid)) == LAGOPUS_RESULT_OK) { lagopus_msg_error( "Thread has been canceled, but I can get thread ID, %lu\n", tid); } else if (ret != LAGOPUS_RESULT_NOT_STARTED && ret != LAGOPUS_RESULT_ALREADY_HALTED) { lagopus_perror(ret); goto done; } } s_check_cancelled(&thread, true); lagopus_thread_destroy(&thread); fprintf(stderr, "destroy the thread [%d]\n", i); fprintf(stderr, "\n"); } /* create, start, destroy */ for (i = 0; i < n; i++) { thread = NULL; if ((ret = lagopus_thread_create( (lagopus_thread_t *)&thread, (lagopus_thread_main_proc_t)s_main_proc_with_sleep, (lagopus_thread_finalize_proc_t)s_finalize_proc, (lagopus_thread_freeup_proc_t)s_freeup_proc, (const char *) "thread", (void *) NULL)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); lagopus_exit_fatal("Can't create a thread.\n"); } else { fprintf(stderr, "create a thread [%d]\n", i); if ((ret = lagopus_thread_get_pthread_id(&thread, &tid)) != LAGOPUS_RESULT_NOT_STARTED) { lagopus_perror(ret); goto done; } } if ((ret = lagopus_thread_start(&thread, false)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); lagopus_exit_fatal("Can't start the thread.\n"); } else { ret = lagopus_thread_get_pthread_id(&thread, &tid); if (ret == LAGOPUS_RESULT_OK || ret == LAGOPUS_RESULT_ALREADY_HALTED) { fprintf(stderr, " start thread: %lu\n", tid); } else { lagopus_perror(ret); goto done; } } lagopus_thread_destroy(&thread); fprintf(stderr, "destroy the thread [%d]\n", i); fprintf(stderr, "\n"); } done: return (ret == LAGOPUS_RESULT_OK) ? 0 : 1; }
static int do_run(size_t nthds, ssize_t nputs) { int ret = 1; lagopus_result_t r; size_t i; size_t j; char thdname[16]; lagopus_chrono_t *put_dates = NULL; size_t n_need_watch = 0; size_t n_valid_polls = 0; ssize_t qsz; test_thread_t tt; lagopus_bbq_t bbq; lagopus_chrono_t t_begin; lagopus_chrono_t t_end; lagopus_chrono_t p_begin; lagopus_chrono_t p_t; ssize_t n_gets = 0; lagopus_chrono_t p_min = LLONG_MAX; lagopus_chrono_t p_max = LLONG_MIN; double p_sum = 0.0; double p_sum2 = 0.0; double p_avg; double p_sd; lagopus_chrono_t t_total = 0; double t_avg; /* * This is only for choking clang/scan-build. */ WHAT_TIME_IS_IT_NOW_IN_NSEC(t_begin); put_dates = (lagopus_chrono_t *) malloc(sizeof(lagopus_chrono_t) * (size_t)nputs); if (put_dates == NULL) { goto done; } if ((r = lagopus_mutex_create(&start_lock)) != LAGOPUS_RESULT_OK) { lagopus_perror(r); goto done; } if ((r = lagopus_mutex_create(&stop_lock)) != LAGOPUS_RESULT_OK) { lagopus_perror(r); goto done; } /* * Create the qmuxer. */ if ((r = lagopus_qmuxer_create(&qmx)) != LAGOPUS_RESULT_OK) { lagopus_perror(r); goto done; } /* * Then create queues. */ bbqs = (lagopus_bbq_t *)malloc(sizeof(lagopus_bbq_t) * nthds); if (bbqs == NULL) { goto done; } for (i = 0; i < nthds; i++) { if ((r = lagopus_bbq_create(&(bbqs[i]), lagopus_chrono_t, 1000LL * 1000LL, NULL)) != LAGOPUS_RESULT_OK) { lagopus_perror(r); goto done; } n_created_bbqs++; } if (n_created_bbqs == 0) { goto done; } /* * Then create poll objects for the each queue. */ polls = (lagopus_qmuxer_poll_t *)malloc(sizeof(lagopus_qmuxer_poll_t) * n_created_bbqs); if (polls == NULL) { goto done; } for (i = 0; i < n_created_bbqs; i++) { if ((r = lagopus_qmuxer_poll_create(&(polls[i]), bbqs[i], LAGOPUS_QMUXER_POLL_READABLE)) != LAGOPUS_RESULT_OK) { lagopus_perror(r); goto done; } n_created_polls++; } if (n_created_polls == 0) { goto done; } /* * Then create threads for the each poll objects/queues. */ tts = (test_thread_record *)malloc(sizeof(test_thread_record) * n_created_polls); if (tts == NULL) { goto done; } for (i = 0; i < n_created_polls; i++) { snprintf(thdname, sizeof(thdname), "putter " PFSZS(4, u), i); tt = &(tts[i]); if (test_thread_create(&tt, start_lock, bbqs[i], nputs, (const char *)thdname) != true) { goto done; } n_created_thds++; } if (n_created_thds == 0) { goto done; } /* * Let the initiation begin. */ /* * Ready, note that all the created threads do this lock. */ (void)lagopus_mutex_lock(&start_lock); /* * Steady, */ for (i = 0; i < n_created_thds; i++) { tt = &(tts[i]); if (lagopus_thread_start((lagopus_thread_t *)&tt, false) != LAGOPUS_RESULT_OK) { (void)lagopus_mutex_unlock(&start_lock); goto done; } } fprintf(stdout, "Test for " PFSZ(u) " threads " PFSZ(u) " events/thdread start.\n", n_created_thds, (size_t)nputs); /* * Go. */ (void)lagopus_mutex_unlock(&start_lock); WHAT_TIME_IS_IT_NOW_IN_NSEC(t_begin); while (true) { /* * Like the select(2)/poll(2), initialize poll objects before * checking events. */ n_need_watch = 0; n_valid_polls = 0; for (i = 0; i < n_created_thds; i++) { /* * Check if the poll has a valid queue. */ bbq = NULL; if ((r = lagopus_qmuxer_poll_get_queue(&(polls[i]), &bbq)) != LAGOPUS_RESULT_OK) { lagopus_perror(r); break; } if (bbq != NULL) { n_valid_polls++; } /* * Reset the poll status. */ if ((r = lagopus_qmuxer_poll_reset(&(polls[i]))) != LAGOPUS_RESULT_OK) { lagopus_perror(r); break; } n_need_watch++; } /* * If there are no valid queues, exit. */ if (n_valid_polls == 0) { break; } /* * Wait for an event. * * Note that we better set timeout, not waiting forever. */ r = lagopus_qmuxer_poll(&qmx, (lagopus_qmuxer_poll_t *const)polls, n_need_watch, 100LL * 1000LL * 1000LL); if (r > 0) { /* * Check which poll got an event. Actually, check all the queues * in this sample. */ size_t n_actual_get = 0LL; for (i = 0; i < n_created_thds; i++) { if ((qsz = lagopus_bbq_size(&(bbqs[i]))) > 0) { lagopus_msg_debug(1, "Got " PFSZS(8, u) " events from the Q" PFSZS(03, u) ".\n", (size_t)qsz, (size_t)i); if ((r = lagopus_bbq_get_n(&(bbqs[i]), (void **)put_dates, (size_t)nputs, 1LL, lagopus_chrono_t, 1000LL * 1000LL * 1000LL, &n_actual_get)) > 0) { #if 1 WHAT_TIME_IS_IT_NOW_IN_NSEC(p_begin); #endif for (j = 0; j < n_actual_get; j++) { /* * In this sample, -1LL is kinda 'EOF'. Check if we got * the EOF. */ if (put_dates[j] == -1LL) { /* * The queue is kinda 'closed'. From now on we don't * check this queue anymore. To specify this: */ lagopus_msg_debug(1, "Got an EOF from the Q" PFSZS(04, u) ".\n", i); goto nullify; } #if 0 WHAT_TIME_IS_IT_NOW_IN_NSEC(p_begin); #endif p_t = p_begin - put_dates[j]; if (p_t < p_min) { p_min = p_t; } if (p_t > p_max) { p_max = p_t; } p_sum += (double)p_t; p_sum2 += ((double)p_t * (double)p_t); n_gets++; } } else { /* * Something wrong for the queue. But we must not exit * here. Keep on checking other queues. In order to do * this, set NULL as the queue into the poll object for * the queue. */ lagopus_perror(r); nullify: if ((r = lagopus_qmuxer_poll_set_queue(&(polls[i]), NULL)) == LAGOPUS_RESULT_OK) { lagopus_msg_debug(1, "Q" PFSZS(04, u) " is not valid " "anymore, ignore the queue.\n", i); break; } else { /* * There is nothing we can do now. */ lagopus_perror(r); goto done; } } } } } else if (r == LAGOPUS_RESULT_TIMEDOUT) { lagopus_msg_debug(1, "Timedout. continue.\n"); continue; } else { lagopus_perror(r); lagopus_msg_debug(1, "Break the loop due to error(s).\n"); goto done; } } ret = 0; done: WHAT_TIME_IS_IT_NOW_IN_NSEC(t_end); if (is_signaled == false) { fprintf(stdout, "Done.\n"); } else { fprintf(stdout, "Stopped.\n"); } fprintf(stdout, "Total # of the events:\t" PFSZS(22, u) "\n\n", n_gets); p_avg = p_sum / (double)n_gets; p_sd = (p_sum2 - 2.0 * p_avg * p_sum + p_avg * p_avg * (double)n_gets) / (double)(n_gets - 1); p_sd = sqrt(p_sd); fprintf(stdout, "Queue stats:\n"); fprintf(stdout, "wait time min =\t" PFSZS(22, d) " nsec.\n", p_min); fprintf(stdout, "wait time max =\t" PFSZS(22, d) " nsec.\n", p_max); fprintf(stdout, "wait time avg =\t%25.2f nsec.\n", p_avg); fprintf(stdout, "wait time sd =\t%25.2f.\n\n", p_sd); t_total = t_end - t_begin; t_avg = (double)t_total / (double)n_gets; fprintf(stdout, "Throughput:\n"); fprintf(stdout, "total time:\t" PFSZS(22, d) " msec.\n", (size_t)(t_total / 1000LL / 1000LL)); fprintf(stdout, "total avg:\t%25.2f nsec/event.\n", t_avg); s_destroy_all(); free((void *)put_dates); return ret; }
static inline lagopus_result_t s_start_callout_main_loop(void) { lagopus_result_t ret = LAGOPUS_RESULT_ANY_FAILURES; global_state_t s; shutdown_grace_level_t l; ret = global_state_wait_for(GLOBAL_STATE_STARTED, &s, &l, -1LL); if (likely(ret == LAGOPUS_RESULT_OK)) { if (likely(s == GLOBAL_STATE_STARTED)) { lagopus_chrono_t timeout = s_idle_interval; lagopus_callout_task_t out_tasks[CALLOUT_TASK_MAX * 3]; size_t n_out_tasks; lagopus_callout_task_t urgent_tasks[CALLOUT_TASK_MAX]; lagopus_result_t sn_urgent_tasks; lagopus_callout_task_t idle_tasks[CALLOUT_TASK_MAX]; lagopus_result_t sn_idle_tasks; lagopus_callout_task_t timed_tasks[CALLOUT_TASK_MAX]; lagopus_result_t sn_timed_tasks; lagopus_result_t r; lagopus_chrono_t now; lagopus_chrono_t next_wakeup; lagopus_chrono_t prev_wakeup; int cstate = 0; WHAT_TIME_IS_IT_NOW_IN_NSEC(prev_wakeup); (void)lagopus_mutex_enter_critical(&s_sched_lck, &cstate); { s_is_stopped = false; mbar(); while (s_do_loop == true) { n_out_tasks = 0; /* * Get the current time. */ WHAT_TIME_IS_IT_NOW_IN_NSEC(now); #ifdef CO_MSG_DEBUG lagopus_msg_debug(3, "now: " PF64(d) "\n", now); lagopus_msg_debug(3, "prv: " PF64(d) "\n", prev_wakeup); lagopus_msg_debug(3, "to: " PF64(d) "\n", timeout); #endif /* CO_MSG_DEBUG */ s_lock_global(); { /* * Acquire the global lock to make the task * submisson/fetch atomic. */ sn_urgent_tasks = lagopus_bbq_get_n(&s_urgent_tsk_q, (void **)urgent_tasks, CALLOUT_TASK_MAX, 1LL, lagopus_callout_task_t, 0LL, NULL); sn_idle_tasks = lagopus_bbq_get_n(&s_idle_tsk_q, (void **)idle_tasks, CALLOUT_TASK_MAX, 1LL, lagopus_callout_task_t, 0LL, NULL); } s_unlock_global(); /* * Pack the tasks into a buffer. */ sn_timed_tasks = s_get_runnable_timed_task(now, timed_tasks, CALLOUT_TASK_MAX, &next_wakeup); if (sn_timed_tasks > 0) { /* * Pack the timed tasks. */ (void)memcpy((void *)(out_tasks + n_out_tasks), timed_tasks, (size_t)(sn_timed_tasks) * sizeof(lagopus_callout_task_t)); n_out_tasks += (size_t)sn_timed_tasks; #ifdef CO_MSG_DEBUG lagopus_msg_debug(3, "timed task " PF64(u) ".\n", sn_timed_tasks); lagopus_msg_debug(3, "nw: " PF64(d) ".\n", next_wakeup); #endif /* CO_MSG_DEBUG */ } else if (sn_timed_tasks < 0) { /* * We can't be treat this as a fatal error. Carry on. */ lagopus_perror(sn_timed_tasks); lagopus_msg_error("timed tasks fetch failed.\n"); } if (sn_urgent_tasks > 0) { /* * Pack the urgent tasks. */ (void)memcpy((void *)(out_tasks + n_out_tasks), urgent_tasks, (size_t)(sn_urgent_tasks) * sizeof(lagopus_callout_task_t)); n_out_tasks += (size_t)sn_urgent_tasks; } else if (sn_urgent_tasks < 0) { /* * We can't be treat this as a fatal error. Carry on. */ lagopus_perror(sn_urgent_tasks); lagopus_msg_error("urgent tasks fetch failed.\n"); } if (sn_idle_tasks > 0) { /* * Pack the idle tasks. */ (void)memcpy((void *)(out_tasks + n_out_tasks), idle_tasks, (size_t)(sn_idle_tasks) * sizeof(lagopus_callout_task_t)); n_out_tasks += (size_t)sn_idle_tasks; } else if (sn_idle_tasks < 0) { /* * We can't be treat this as a fatal error. Carry on. */ lagopus_perror(sn_idle_tasks); lagopus_msg_error("idle tasks fetch failed.\n"); } if (n_out_tasks > 0) { /* * Run/Submit the tasks. */ r = (s_final_task_sched_proc)(out_tasks, now, n_out_tasks); if (unlikely(r <= 0)) { /* * We can't be treat this as a fatal error. Carry on. */ lagopus_perror(r); lagopus_msg_error("failed to submit " PFSZ(u) " urgent/timed tasks.\n", n_out_tasks); } } if (s_idle_proc != NULL && s_next_idle_abstime < (now + CALLOUT_TASK_SCHED_JITTER)) { if (likely(s_idle_proc(s_idle_proc_arg) == LAGOPUS_RESULT_OK)) { s_next_idle_abstime = now + s_idle_interval; } else { /* * Stop the main loop and return (clean finish.) */ s_do_loop = false; goto critical_end; } } /* * fetch the start time of the timed task in the queue head. */ next_wakeup = s_peek_current_wakeup_time(); if (next_wakeup <= 0LL) { /* * Nothing in the timed Q. */ if (s_next_idle_abstime <= 0LL) { s_next_idle_abstime = now + s_idle_interval; } next_wakeup = s_next_idle_abstime; } /* * TODO * * Re-optimize forcible waje up by timed task submission * timing and times. See also * callout_queue.c:s_do_sched(). */ /* * calculate the timeout and sleep. */ timeout = next_wakeup - now; if (likely(timeout > 0LL)) { if (timeout > s_idle_interval) { timeout = s_idle_interval; next_wakeup = now + timeout; } #ifdef CO_MSG_DEBUG lagopus_msg_debug(4, "about to sleep, timeout " PF64(d) " nsec.\n", timeout); #endif /* CO_MSG_DEBUG */ prev_wakeup = next_wakeup; r = lagopus_bbq_wait_gettable(&s_urgent_tsk_q, timeout); if (unlikely(r <= 0 && r != LAGOPUS_RESULT_TIMEDOUT && r != LAGOPUS_RESULT_WAKEUP_REQUESTED)) { lagopus_perror(r); lagopus_msg_error("Event wait failure.\n"); ret = r; goto critical_end; } else { if (r == LAGOPUS_RESULT_WAKEUP_REQUESTED) { #ifdef CO_MSG_DEBUG lagopus_msg_debug(4, "woke up.\n"); #endif /* CO_MSG_DEBUG */ } } } else { timeout = 0LL; WHAT_TIME_IS_IT_NOW_IN_NSEC(next_wakeup); prev_wakeup = next_wakeup; #ifdef CO_MSG_DEBUG lagopus_msg_debug(4, "timeout zero. contiune.\n"); #endif /* CO_MSG_DEBUG */ } /* * The end of the desired potion of the loop. */ } /* while (s_do_loop == true) */ } critical_end: s_is_stopped = true; s_wakeup_sched(); (void)lagopus_mutex_leave_critical(&s_sched_lck, cstate); if (s_do_loop == false) { /* * The clean finish. */ ret = LAGOPUS_RESULT_OK; } } else { /* s == GLOBAL_STATE_STARTED */ s_is_stopped = true; ret = LAGOPUS_RESULT_INVALID_STATE_TRANSITION; } } else { s_is_stopped = true; } return ret; }
lagopus_result_t snmp_cmd_serialize(lagopus_dstring_t *result) { lagopus_result_t ret = LAGOPUS_RESULT_ANY_FAILURES; /* master-agentx-socket */ char *master_agentx_socket_str = NULL; char *escaped_master_agentx_socket_str = NULL; /* ping-interval-second */ uint16_t ping_interval_second = 0; bool is_escaped = false; if (result != NULL) { /* cmmand name. */ if ((ret = lagopus_dstring_appendf(result, SNMP_CMD_NAME)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); goto done; } /* master-agentx-socket opt. */ if ((ret = lagopus_snmp_get_agentx_sock(&master_agentx_socket_str)) == LAGOPUS_RESULT_OK) { if (IS_VALID_STRING(master_agentx_socket_str) == true) { if ((ret = lagopus_str_escape(master_agentx_socket_str, "\"", &is_escaped, &escaped_master_agentx_socket_str)) == LAGOPUS_RESULT_OK) { if ((ret = lagopus_dstring_appendf(result, " -master-agentx-socket")) == LAGOPUS_RESULT_OK) { if ((ret = lagopus_dstring_appendf( result, ESCAPE_NAME_FMT(is_escaped, escaped_master_agentx_socket_str), escaped_master_agentx_socket_str)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); goto done; } } else { lagopus_perror(ret); goto done; } } else { lagopus_perror(ret); goto done; } } } else { lagopus_perror(ret); goto done; } /* ping-interval-second opt. */ if ((ret = lagopus_snmp_get_ping_interval(&ping_interval_second)) == LAGOPUS_RESULT_OK) { if ((ret = lagopus_dstring_appendf(result, " -ping-interval-second")) == LAGOPUS_RESULT_OK) { if ((ret = lagopus_dstring_appendf(result, " %d", ping_interval_second)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); goto done; } } else { lagopus_perror(ret); goto done; } } else { lagopus_perror(ret); goto done; } /* Add newline. */ if ((ret = lagopus_dstring_appendf(result, "\n\n")) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); goto done; } done: free((void *) master_agentx_socket_str); free((void *) escaped_master_agentx_socket_str); } else { ret = LAGOPUS_RESULT_INVALID_ARGS; } return ret; }
int main(int argc, const char *const argv[]) { lagopus_result_t st = LAGOPUS_RESULT_ANY_FAILURES; lagopus_pipeline_stage_t s = NULL; size_t nthd = 1; (void)argc; if (IS_VALID_STRING(argv[1]) == true) { size_t tmp; if (lagopus_str_parse_uint64(argv[1], &tmp) == LAGOPUS_RESULT_OK && tmp > 0LL) { nthd = tmp; } } #if 0 fprintf(stdout, "Creating... "); st = lagopus_pipeline_stage_create(&s, 0, "a_test", nthd, sizeof(void *), 1024, s_pre_pause, s_sched, s_setup, s_fetch, s_main, s_throw, s_shutdown, s_finalize, s_freeup); if (st == LAGOPUS_RESULT_OK) { fprintf(stdout, "Created.\n"); fprintf(stdout, "Setting up... "); st = lagopus_pipeline_stage_setup(&s); if (st == LAGOPUS_RESULT_OK) { fprintf(stdout, "Set up.\n"); fprintf(stdout, "Starting... "); st = lagopus_pipeline_stage_start(&s); if (st == LAGOPUS_RESULT_OK) { fprintf(stdout, "Started.\n"); fprintf(stdout, "Opening the front door... "); st = global_state_set(GLOBAL_STATE_STARTED); if (st == LAGOPUS_RESULT_OK) { char buf[1024]; char *cmd = NULL; fprintf(stdout, "The front door is open.\n"); fprintf(stdout, "> "); while (fgets(buf, sizeof(buf), stdin) != NULL && st == LAGOPUS_RESULT_OK) { (void)lagopus_str_trim_right(buf, "\r\n\t ", &cmd); if (strcasecmp(cmd, "pause") == 0 || strcasecmp(cmd, "spause") == 0) { fprintf(stdout, "Pausing... "); if ((st = lagopus_pipeline_stage_pause(&s, -1LL)) == LAGOPUS_RESULT_OK) { if (strcasecmp(cmd, "spause") == 0) { s_set(0LL); } fprintf(stdout, "Paused " PF64(u) "\n", s_get()); } else { fprintf(stdout, "Failure.\n"); } } else if (strcasecmp(cmd, "resume") == 0) { fprintf(stdout, "Resuming... "); if ((st = lagopus_pipeline_stage_resume(&s)) == LAGOPUS_RESULT_OK) { fprintf(stdout, "Resumed.\n"); } else { fprintf(stdout, "Failure.\n"); } } else if (strcasecmp(cmd, "get") == 0) { fprintf(stdout, PF64(u) "\n", s_get()); } free((void *)cmd); cmd = NULL; fprintf(stdout, "> "); } fprintf(stdout, "\nDone.\n"); fprintf(stdout, "Shutting down... "); st = lagopus_pipeline_stage_shutdown(&s, SHUTDOWN_GRACEFULLY); if (st == LAGOPUS_RESULT_OK) { fprintf(stdout, "Shutdown accepted... "); sleep(1); s_do_stop = true; fprintf(stdout, "Waiting shutdown... "); st = lagopus_pipeline_stage_wait(&s, -1LL); if (st == LAGOPUS_RESULT_OK) { fprintf(stdout, "OK, Shutdown.\n"); } } } } } } fflush(stdout); if (st != LAGOPUS_RESULT_OK) { lagopus_perror(st); } fprintf(stdout, "Destroying... "); lagopus_pipeline_stage_destroy(&s); fprintf(stdout, "Destroyed.\n"); #endif return (st == LAGOPUS_RESULT_OK) ? 0 : 1; }
static lagopus_result_t s_update(datastore_interp_t *iptr, datastore_interp_state_t state, void *obj, lagopus_dstring_t *result) { lagopus_result_t ret = LAGOPUS_RESULT_ANY_FAILURES; (void)result; if (iptr != NULL && *iptr != NULL && obj != NULL) { testobj_config_t *o = (testobj_config_t *)obj; switch (state) { case DATASTORE_INTERP_STATE_AUTO_COMMIT: { bool is_created = false; if (o->m_obj == NULL || (o->m_modified_attr != NULL && s_testobj_attr_equals(o->m_current_attr, o->m_modified_attr) == false)) { /* * (re-)create the obj. */ /* * Destroy the current obj if needed. */ if (o->m_obj != NULL) { s_testobj_destroy(o->m_obj); o->m_obj = NULL; } if (o->m_modified_attr != NULL) { o->m_obj = s_testobj_create(o->m_modified_attr->m_intval, o->m_modified_attr->m_strval); if (o->m_obj != NULL) { /* * Created successfully. */ lagopus_msg_debug(1, "obj \"%s\": created.\n", o->m_name); is_created = true; ret = LAGOPUS_RESULT_OK; } else { ret = LAGOPUS_RESULT_NO_MEMORY; } } else { ret = LAGOPUS_RESULT_INVALID_ARGS; } } else { /* * no need to re-create. */ ret = LAGOPUS_RESULT_OK; } if (ret == LAGOPUS_RESULT_OK) { /* * Then start/shutdown if needed. */ if (is_created == true) { /* * Update attrs. */ if (o->m_current_attr != NULL) { s_testobj_attr_destroy(o->m_current_attr); } o->m_current_attr = o->m_modified_attr; o->m_modified_attr = NULL; if (o->m_is_enabled == true) { /* * start the obj if it WAS started. */ ret = s_testobj_start(o->m_obj); if (ret == LAGOPUS_RESULT_OK) { lagopus_msg_debug(1, "obj \"%s\": created and enabled.\n", o->m_name); } else { lagopus_perror(ret); } } } else { if (o->m_is_enabled == true) { ret = s_testobj_start(o->m_obj); if (ret == LAGOPUS_RESULT_OK) { lagopus_msg_debug(1, "obj \"%s\": enabled.\n", o->m_name); } else { lagopus_perror(ret); } } else { ret = s_testobj_shutdown(o->m_obj, SHUTDOWN_RIGHT_NOW); if (ret == LAGOPUS_RESULT_OK) { lagopus_msg_debug(1, "obj \"%s\": disabled.\n", o->m_name); } else { lagopus_perror(ret); } } } } break; } default: { break; } } } else { ret = LAGOPUS_RESULT_INVALID_ARGS; } return ret; }
lagopus_result_t lagopus_module_wait_all(lagopus_chrono_t nsec) { lagopus_result_t ret = LAGOPUS_RESULT_ANY_FAILURES; s_lock(); { if (s_n_modules > 0) { lagopus_result_t first_err = LAGOPUS_RESULT_OK; size_t i; a_module *mptr; /* * Reverse order. */ if (nsec < 0LL) { for (i = 0; i < s_n_modules; i++) { mptr = &(s_modules[s_n_modules - i - 1]); ret = s_wait_module(mptr, -1LL); if (ret != LAGOPUS_RESULT_OK) { lagopus_perror(ret); lagopus_msg_error("can't wait module \"%s\".\n", mptr->m_name); if (first_err == LAGOPUS_RESULT_OK) { first_err = ret; } } /* * Just carry on wait no matter what kind of errors * occur. */ } } else { lagopus_chrono_t w_begin; lagopus_chrono_t w_end; lagopus_chrono_t w = nsec; for (i = 0; i < s_n_modules; i++) { mptr = &(s_modules[s_n_modules - i - 1]); WHAT_TIME_IS_IT_NOW_IN_NSEC(w_begin); ret = s_wait_module(mptr, w); WHAT_TIME_IS_IT_NOW_IN_NSEC(w_end); if (ret != LAGOPUS_RESULT_OK) { lagopus_perror(ret); lagopus_msg_error("can't wait module \"%s\".\n", mptr->m_name); if (first_err == LAGOPUS_RESULT_OK) { first_err = ret; } } /* * Just carry on wait no matter what kind of errors * occur. */ w = nsec - (w_end - w_begin); if (w < 0LL) { w = 0LL; } } } ret = first_err; } else { ret = LAGOPUS_RESULT_OK; } } s_unlock(); return ret; }
int main(int argc, const char *const argv[]) { lagopus_result_t st = LAGOPUS_RESULT_ANY_FAILURES; test_stage_t t = NULL; size_t tmp; size_t nthd = 1; size_t c_max = 1000LL * 1000LL * 100LL; size_t mod = 0; lagopus_chrono_t t_begin; lagopus_chrono_t t_end; lagopus_chrono_t t_total; (void)argc; WHAT_TIME_IS_IT_NOW_IN_NSEC(t_begin); if (IS_VALID_STRING(argv[1]) == true) { if (lagopus_str_parse_uint64(argv[1], &tmp) == LAGOPUS_RESULT_OK && tmp > 0LL) { nthd = tmp; } if (IS_VALID_STRING(argv[2]) == true) { if (lagopus_str_parse_uint64(argv[2], &tmp) == LAGOPUS_RESULT_OK && tmp > 0LL) { c_max = tmp; } if (IS_VALID_STRING(argv[3]) == true) { if (lagopus_str_parse_uint64(argv[3], &tmp) == LAGOPUS_RESULT_OK) { mod = tmp; } } } } st = lagopus_pipeline_stage_create((lagopus_pipeline_stage_t *)&t, sizeof(*t), "a_test", nthd, sizeof(void *), 1024, s_pre_pause, s_sched, s_setup, /* s_fetch, */ NULL, s_main, /* s_throw, */ NULL, s_shutdown, s_finalize, s_freeup); if (st == LAGOPUS_RESULT_OK) { t->m_n_max_count = c_max; t->m_mod = mod; st = lagopus_pipeline_stage_setup((lagopus_pipeline_stage_t *)&t); if (st == LAGOPUS_RESULT_OK) { st = lagopus_pipeline_stage_start((lagopus_pipeline_stage_t *)&t); if (st == LAGOPUS_RESULT_OK) { WHAT_TIME_IS_IT_NOW_IN_NSEC(t_begin); st = global_state_set(GLOBAL_STATE_STARTED); if (st == LAGOPUS_RESULT_OK) { sleep(1); st = lagopus_pipeline_stage_shutdown((lagopus_pipeline_stage_t *)&t, SHUTDOWN_GRACEFULLY); if (st == LAGOPUS_RESULT_OK) { st = lagopus_pipeline_stage_wait((lagopus_pipeline_stage_t *)&t, -1LL); } } } } } WHAT_TIME_IS_IT_NOW_IN_NSEC(t_end); t_total = t_end - t_begin; if (st != LAGOPUS_RESULT_OK) { lagopus_perror(st); } fprintf(stdout, "total %f sec.\n\n" "single thd throughput: %f Mops/s\n" "total throuput: %f Mops/s\n\n" "%f nsec/op\n", (double)t_total / 1000.0 / 1000.0 / 1000.0, (double)c_max / (double)t_total * 1000.0, (double)c_max * (double)nthd / (double)t_total * 1000.0, (double)t_total / (double)c_max); return (st == LAGOPUS_RESULT_OK) ? 0 : 1; }
lagopus_result_t datastore_cmd_serialize(lagopus_dstring_t *result) { lagopus_result_t ret = LAGOPUS_RESULT_ANY_FAILURES; /* addr */ char *addr_str = NULL; char *escaped_addr_str = NULL; /* protocol */ const char *protocol_str = NULL; char *escaped_protocol_str = NULL; /* tls */ const char *tls_str = NULL; bool is_escaped = false; if (result != NULL) { /* cmmand name. */ if ((ret = lagopus_dstring_appendf(result, DATASTORE_CMD_NAME)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); goto done; } /* addr opt. */ if ((ret = lagopus_ip_address_str_get(s_bindaddr, &addr_str)) == LAGOPUS_RESULT_OK) { if (IS_VALID_STRING(addr_str) == true) { if ((ret = lagopus_str_escape(addr_str, "\"", &is_escaped, &escaped_addr_str)) == LAGOPUS_RESULT_OK) { if ((ret = lagopus_dstring_appendf(result, " -addr")) == LAGOPUS_RESULT_OK) { if ((ret = lagopus_dstring_appendf( result, ESCAPE_NAME_FMT(is_escaped, escaped_addr_str), escaped_addr_str)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); goto done; } } else { lagopus_perror(ret); goto done; } } else { lagopus_perror(ret); goto done; } } } else { lagopus_perror(ret); goto done; } /* port opt. */ if ((ret = lagopus_dstring_appendf(result, " -port")) == LAGOPUS_RESULT_OK) { if ((ret = lagopus_dstring_appendf(result, " %d", s_port)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); goto done; } } else { lagopus_perror(ret); goto done; } /* protocol opt. */ if (session_type_is_tcp(s_protocol) == true) { protocol_str = "tcp"; } else if (session_type_is_tcp6(s_protocol) == true) { protocol_str = "tcp6"; } else { lagopus_perror(LAGOPUS_RESULT_ANY_FAILURES); goto done; } if (IS_VALID_STRING(protocol_str) == true) { if ((ret = lagopus_str_escape(protocol_str, "\"", &is_escaped, &escaped_protocol_str)) == LAGOPUS_RESULT_OK) { if ((ret = lagopus_dstring_appendf(result, " -protocol")) == LAGOPUS_RESULT_OK) { if ((ret = lagopus_dstring_appendf( result, ESCAPE_NAME_FMT(is_escaped, escaped_protocol_str), escaped_protocol_str)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); goto done; } } else { lagopus_perror(ret); goto done; } } else { lagopus_perror(ret); goto done; } } /* tls opt. */ if ((ret = lagopus_dstring_appendf(result, " -tls")) == LAGOPUS_RESULT_OK) { if (s_tls == true) { tls_str = "true"; } else { tls_str = "false"; } if ((ret = lagopus_dstring_appendf(result, " %s", tls_str)) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); goto done; } } else { lagopus_perror(ret); goto done; } /* Add newline. */ if ((ret = lagopus_dstring_appendf(result, "\n\n")) != LAGOPUS_RESULT_OK) { lagopus_perror(ret); goto done; } done: free(addr_str); free(escaped_addr_str); free(escaped_protocol_str); } else { ret = LAGOPUS_RESULT_INVALID_ARGS; } return ret; }