uint32_t DNS_init
(
void
)
{ /* Body */
DNS_CONTROL_STRUCT *control_ptr = RTCS_getcfg(DNS);
uint32_t temp_socket = 0;
int32_t error;
if (control_ptr != NULL) {
return RTCS_OK;
}
/*
** Please note, if this is modified to use a value other than
** DNS_MAX_UDP_MESSAGE_SIZE, the recvfrom() in the DNS_Resolver_task
** will need to be modified as well, as they rely on this constant.
*/
control_ptr = RTCS_mem_alloc_system_zero(sizeof(DNS_CONTROL_STRUCT)+DNS_MAX_UDP_MESSAGE_SIZE);
if (control_ptr == NULL) {
return RTCSERR_DNS_UNABLE_TO_ALLOCATE_MEMORY;
} /* Endif */
_mem_set_type(control_ptr, MEM_TYPE_DNS_CONTROL_STRUCT);
RTCS_setcfg(DNS, control_ptr);
temp_socket = socket(PF_INET, SOCK_DGRAM, 0);
if (temp_socket == RTCS_HANDLE_ERROR) {
DNS_init_unwind(control_ptr, temp_socket);
return RTCSERR_DNS_UNABLE_TO_OPEN_SOCKET;
} /* Endif */
error = RTCS_detachsock(temp_socket);
if (error != RTCS_OK) {
DNS_init_unwind(control_ptr, temp_socket);
return error;
} /* Endif */
control_ptr->INT_QUERY_PARTID = RTCS_part_create(
sizeof(DNS_INTERNAL_QUERY_STRUCT), DNSALLOC_SIZE, DNSALLOC_SIZE, 0,
NULL, NULL);
if (control_ptr->INT_QUERY_PARTID == 0) {
DNS_init_unwind(control_ptr, temp_socket);
return RTCSERR_DNS_UNABLE_TO_CREATE_PARTITION;
} /* Endif */
control_ptr->ADDR_RR_PARTID = RTCS_part_create(
sizeof(DNS_ADDR_RECORD_STRUCT), DNSALLOC_SIZE, DNSALLOC_SIZE, 0,
NULL, NULL);
if (control_ptr->ADDR_RR_PARTID == 0) {
DNS_init_unwind(control_ptr, temp_socket);
return RTCSERR_DNS_UNABLE_TO_CREATE_PARTITION;
} /* Endif */
control_ptr->NAME_RR_PARTID = RTCS_part_create(
sizeof(DNS_NAME_RECORD_STRUCT), DNSALLOC_SIZE, DNSALLOC_SIZE, 0,
NULL, NULL);
if (control_ptr->NAME_RR_PARTID == 0) {
DNS_init_unwind(control_ptr, temp_socket);
return RTCSERR_DNS_UNABLE_TO_CREATE_PARTITION;
} /* Endif */
control_ptr->RR_LIST_PARTID = RTCS_part_create(
sizeof(DNS_RR_LIST_STRUCT), DNSALLOC_SIZE, DNSALLOC_SIZE, 0,
NULL, NULL);
if (control_ptr->RR_LIST_PARTID == 0) {
DNS_init_unwind(control_ptr, temp_socket);
return RTCSERR_DNS_UNABLE_TO_CREATE_PARTITION;
} /* Endif */
control_ptr->CNAME_PARTID = RTCS_part_create(
sizeof(DNS_CNAME_STRUCT), DNSALLOC_SIZE, DNSALLOC_SIZE, 0,
NULL, NULL);
if (control_ptr->CNAME_PARTID == 0) {
DNS_init_unwind(control_ptr, temp_socket);
return RTCSERR_DNS_UNABLE_TO_CREATE_PARTITION;
} /* Endif */
control_ptr->ROOT_SLIST_PTR = DNS_A_Root_server;
control_ptr->LOCAL_SLIST_PTR = DNS_First_Local_server;
control_ptr->NS_BUFFER = NULL;
control_ptr->RES_BUFFER = (unsigned char *)(control_ptr + 1);
control_ptr->RES_SOCKET = temp_socket;
control_ptr->UPDATING = FALSE;
error = RTCS_mutex_init(&control_ptr->CACHE_MUTEX);
if (error != RTCS_OK) {
DNS_init_unwind(control_ptr, temp_socket);
return error;
} /* Endif */
error = RTCS_mutex_init(&control_ptr->SLIST_MUTEX);
if (error != RTCS_OK) {
DNS_init_unwind(control_ptr, temp_socket);
return error;
} /* Endif */
error = RTCS_task_create("DNS Resolver", _RTCSTASK_priority,
_RTCSTASK_stacksize + 500 * sizeof(uint32_t),
DNS_Resolver_task, control_ptr);
if (error) {
DNS_init_unwind(control_ptr, temp_socket);
return error;
} /* Endif */
return RTCS_OK;
} /* Endbody */
static void Clock_server_task
(
pointer unused1,
pointer unused2
)
{
sockaddr_in laddr, raddr={0};
uint_32 sock, listensock;
uint_32 error;
uint_16 rlen;
/* Clock server services port 999 */
laddr.sin_family = AF_INET;
laddr.sin_port = 999;
laddr.sin_addr.s_addr = INADDR_ANY;
/* Listen on TCP port */
listensock= socket(PF_INET, SOCK_STREAM, 0);
if (listensock == RTCS_HANDLE_ERROR) {
printf("\nCreate stream socket failed");
_task_block();
}
error = bind(listensock, &laddr, sizeof(laddr));
if (error != RTCS_OK) {
printf("\nStream bind failed - 0x%lx", error);
_task_block();
}
error = listen(listensock, 0);
if (error != RTCS_OK) {
printf("\nListen failed - 0x%lx", error);
_task_block();
}
printf("\nClock Server active on port 999\n");
for (;;) {
/* Connection requested; accept it */
rlen = sizeof(raddr);
printf("Clock server: Waiting on accept\n");
sock = accept(listensock, &raddr, &rlen);
if (sock == RTCS_HANDLE_ERROR) {
printf("\n\n*** Clock server: Accept failed, error 0x%lx *** \n\n\n",
RTCS_geterror(listensock));
} else {
printf("Clock server: Connection from %ld.%ld.%ld.%ld, port %d, socket %x\n",
(raddr.sin_addr.s_addr >> 24) & 0xFF,
(raddr.sin_addr.s_addr >> 16) & 0xFF,
(raddr.sin_addr.s_addr >> 8) & 0xFF,
raddr.sin_addr.s_addr & 0xFF,
raddr.sin_port, sock);
/* Create a task to look after it */
printf("Clock server: detaching socket %x\n",sock);
#if USE_RTCS_ATTACH_DETACH
RTCS_detachsock(sock);
#endif
printf("Clock server: spawning child task\n");
#if CREATE_WITH_RTCS
RTCS_task_create("Clock_child", SHELL_CLOCK_CHILD_PRIO,
SHELL_CLOCK_CHILD_STACK, Clock_child_task, (pointer) sock);
#else
{
TASK_TEMPLATE_STRUCT task_template = {0};
task_template.TASK_NAME = "Clock_child";
task_template.TASK_PRIORITY = SHELL_CLOCK_CHILD_PRIO;
task_template.TASK_STACKSIZE = SHELL_CLOCK_CHILD_STACK;
task_template.TASK_ADDRESS = Clock_child_task;
task_template.CREATION_PARAMETER = (uint_32)sock;
if (_task_create(0, 0, (uint_32)&task_template) == MQX_NULL_TASK_ID) {
printf("Clock server: failed to spawn child task\n");
}
}
#endif
}
}
} /* Endbody */