1 /*****************************************************************************\
3 ** Linux Call Router **
5 **---------------------------------------------------------------------------**
6 ** Copyright: Andreas Eversberg **
8 ** Socket link server **
10 \*****************************************************************************/
15 #include <sys/types.h>
16 //#include <sys/stat.h>
21 #include <sys/ioctl.h>
22 //#include <sys/file.h>
24 //#include <sys/mman.h>
25 //#include <sys/resource.h>
26 #include <sys/socket.h>
32 char *socket_name = SOCKET_NAME;
34 struct sockaddr_un sock_address;
36 struct admin_list *admin_list = NULL;
39 * initialize admin socket
45 /* open and bind socket */
46 if ((sock = socket(PF_UNIX, SOCK_STREAM, 0)) < 0)
48 PERROR("Failed to create admin socket. (errno=%d)\n", errno);
52 memset(&sock_address, 0, sizeof(sock_address));
53 sock_address.sun_family = AF_UNIX;
54 UCPY(sock_address.sun_path, socket_name);
56 if (bind(sock, (struct sockaddr *)(&sock_address), SUN_LEN(&sock_address)) < 0)
62 PERROR("Failed to bind admin socket to \"%s\". (errno=%d)\n", sock_address.sun_path, errno);
65 if (listen(sock, 5) < 0)
71 PERROR("Failed to listen to socket \"%s\". (errno=%d)\n", sock_address.sun_path, errno);
74 if (ioctl(sock, FIONBIO, (unsigned char *)(&on)) < 0)
80 PERROR("Failed to set socket \"%s\" into non-blocking mode. (errno=%d)\n", sock_address.sun_path, errno);
89 * also releases all asterisk joins
91 void free_connection(struct admin_list *admin)
93 struct admin_queue *response;
95 union parameter param;
96 class Join *join, *joinnext;
98 /* free asterisk joins */
104 joinnext = join->next;
105 if (join->c_type == JOIN_TYPE_ASTERISK)
107 memset(¶m, 0, sizeof(param));
108 param.disconnectinfo.cause = CAUSE_OUTOFORDER;
109 param.disconnectinfo.location = LOCATION_PRIVATE_LOCAL;
110 ((class JoinAsterisk *)join)->message_asterisk(0, MESSAGE_RELEASE, ¶m);
111 /* join is now destroyed, so we go to next join */
117 if (admin->sock >= 0)
122 // printf("new\n", response);
123 response = admin->response;
127 // printf("%x\n", response);
128 temp = response->next;
131 response = (struct admin_queue *)temp;
133 // printf("new2\n", response);
135 // printf("new3\n", response);
141 * cleanup admin socket
143 void admin_cleanup(void)
145 struct admin_list *admin, *next;;
152 free_connection(admin);
165 * do interface reload
167 int admin_interface(struct admin_queue **responsep)
169 struct admin_queue *response; /* response pointer */
173 if (read_interfaces())
176 free_interfaces(interface_first);
177 interface_first = interface_newlist;
178 interface_newlist = NULL;
181 err_txt = interface_error;
184 /* create state response */
185 response = (struct admin_queue *)MALLOC(sizeof(struct admin_queue)+sizeof(admin_message));
189 response->am[0].message = ADMIN_RESPONSE_CMD_INTERFACE;
191 response->am[0].u.x.error = err;
193 SCPY(response->am[0].u.x.message, err_txt);
194 /* attach to response chain */
195 *responsep = response;
196 responsep = &response->next;
205 int admin_route(struct admin_queue **responsep)
207 struct route_ruleset *ruleset_new;
208 struct admin_queue *response; /* response pointer */
209 char err_txt[256] = "";
214 class EndpointAppPBX *apppbx;
218 apppbx = apppbx_first;
222 apppbx = apppbx->next;
226 SPRINT(err_txt, "Cannot reload routing, because %d endpoints active\n", n);
231 if (!(ruleset_new = ruleset_parse()))
233 SPRINT(err_txt, ruleset_error);
237 ruleset_free(ruleset_first);
238 ruleset_first = ruleset_new;
239 ruleset_main = getrulesetbyname("main");
242 SPRINT(err_txt, "Ruleset reloaded, but rule 'main' not found.\n");
245 apppbx = apppbx_first;
248 if (apppbx->e_action)
250 switch(apppbx->e_action->index)
252 case ACTION_INTERNAL:
253 apppbx->e_action = &action_internal;
255 case ACTION_EXTERNAL:
256 apppbx->e_action = &action_external;
259 apppbx->e_action = &action_chan;
261 case ACTION_VBOX_RECORD:
262 apppbx->e_action = &action_vbox;
264 case ACTION_PARTYLINE:
265 apppbx->e_action = &action_partyline;
270 } else if (apppbx->e_state != EPOINT_STATE_CONNECT)
273 apppbx->e_callback = 0;
274 apppbx->e_action = NULL;
275 apppbx->release(RELEASE_ALL, LOCATION_PRIVATE_LOCAL, CAUSE_NORMAL, LOCATION_PRIVATE_LOCAL, CAUSE_NORMAL);
278 numberrize_callerinfo(apppbx->e_callerinfo.id, apppbx->e_callerinfo.ntype),
279 apppbx->e_dialinginfo.id,
282 apppbx->ea_endpoint->ep_serial,
283 "KICK (reload routing)");
287 apppbx->e_action_timeout = NULL;
288 apppbx->e_rule = NULL;
289 apppbx->e_ruleset = NULL;
291 apppbx = apppbx->next;
295 /* create state response */
296 response = (struct admin_queue *)MALLOC(sizeof(struct admin_queue)+sizeof(admin_message));
300 response->am[0].message = ADMIN_RESPONSE_CMD_ROUTE;
302 response->am[0].u.x.error = err;
304 SCPY(response->am[0].u.x.message, err_txt);
305 /* attach to response chain */
306 *responsep = response;
307 responsep = &response->next;
316 int admin_dial(struct admin_queue **responsep, char *message)
318 struct extension ext; /* temporary extension's settings */
319 struct admin_queue *response; /* response pointer */
320 char *p; /* pointer to dialing digits */
322 /* create state response */
323 response = (struct admin_queue *)MALLOC(sizeof(struct admin_queue)+sizeof(admin_message));
327 response->am[0].message = ADMIN_RESPONSE_CMD_DIAL;
329 /* process request */
330 if (!(p = strchr(message,':')))
332 response->am[0].u.x.error = -EINVAL;
333 SPRINT(response->am[0].u.x.message, "no seperator ':' in message to seperate number from extension");
338 /* modify extension */
339 if (!read_extension(&ext, message))
341 response->am[0].u.x.error = -EINVAL;
342 SPRINT(response->am[0].u.x.message, "extension doesn't exist");
346 write_extension(&ext, message);
349 /* attach to response chain */
350 *responsep = response;
351 responsep = &response->next;
359 int admin_trace(struct admin_list *admin, struct admin_trace_req *trace)
361 memcpy(&admin->trace, trace, sizeof(struct admin_trace_req));
369 * 0 = make port available
370 * 1 = make port administratively blocked
372 * the result is returned:
373 * 0 = port is now available
374 * 1 = port is now blocked
375 * 2 = port cannot be loaded or has been unloaded
376 * -1 = port doesn't exist
378 int admin_block(struct admin_queue **responsep, int portnum, int block)
380 struct admin_queue *response; /* response pointer */
381 struct interface *interface;
382 struct interface_port *ifport;
384 /* create block response */
385 response = (struct admin_queue *)MALLOC(sizeof(struct admin_queue)+sizeof(admin_message));
389 response->am[0].message = ADMIN_RESPONSE_CMD_BLOCK;
390 response->am[0].u.x.portnum = portnum;
392 /* search for port */
393 interface = interface_first;
396 ifport = interface->ifport;
399 if (ifport->portnum == portnum)
401 ifport = ifport->next;
405 interface = interface->next;
407 /* not found, we return -1 */
410 response->am[0].u.x.block = -1;
411 response->am[0].u.x.error = 1;
412 SPRINT(response->am[0].u.x.message, "Port %d does not exist.", portnum);
417 if (!ifport->mISDNport)
419 /* not loaded anyway */
422 response->am[0].u.x.block = 2;
426 /* try loading interface */
427 ifport->block = block;
430 /* port cannot load */
431 if (ifport->block >= 2)
433 response->am[0].u.x.block = 2;
434 response->am[0].u.x.error = 1;
435 SPRINT(response->am[0].u.x.message, "Port %d will not load.", portnum);
440 response->am[0].u.x.block = ifport->block;
444 /* if we shall unload interface */
447 mISDNport_close(ifport->mISDNport);
448 ifport->mISDNport = 0;
453 /* port new blocking state */
454 ifport->block = response->am[0].u.x.block = block;
457 /* attach to response chain */
458 *responsep = response;
459 responsep = &response->next;
467 int admin_release(struct admin_queue **responsep, char *message)
470 struct admin_queue *response; /* response pointer */
471 class EndpointAppPBX *apppbx;
473 /* create state response */
474 response = (struct admin_queue *)MALLOC(sizeof(struct admin_queue)+sizeof(admin_message));
478 response->am[0].message = ADMIN_RESPONSE_CMD_RELEASE;
481 apppbx = apppbx_first;
484 if (apppbx->ea_endpoint->ep_serial == id)
486 apppbx = apppbx->next;
490 response->am[0].u.x.error = -EINVAL;
491 SPRINT(response->am[0].u.x.message, "Given endpoint %d doesn't exist.", id);
495 apppbx->e_callback = 0;
496 apppbx->release(RELEASE_ALL, LOCATION_PRIVATE_LOCAL, CAUSE_NORMAL, LOCATION_PRIVATE_LOCAL, CAUSE_NORMAL);
499 /* attach to response chain */
500 *responsep = response;
501 responsep = &response->next;
509 int admin_call(struct admin_list *admin, struct admin_message *msg)
511 class Endpoint *epoint;
512 class EndpointAppPBX *apppbx;
514 if (!(epoint = new Endpoint(0, 0, 0)))
515 FATAL("No memory for Endpoint instance\n");
516 if (!(epoint->ep_app = apppbx = new DEFAULT_ENDPOINT_APP(epoint)))
517 FATAL("No memory for Endpoint Application instance\n");
518 apppbx->e_adminid = admin->sockserial;
519 admin->epointid = epoint->ep_serial;
520 SCPY(apppbx->e_callerinfo.id, nationalize_callerinfo(msg->u.call.callerid, &apppbx->e_callerinfo.ntype));
521 if (msg->u.call.present)
522 apppbx->e_callerinfo.present = INFO_PRESENT_ALLOWED;
524 apppbx->e_callerinfo.present = INFO_PRESENT_RESTRICTED;
525 apppbx->e_callerinfo.screen = INFO_SCREEN_NETWORK;
527 //printf("hh=%d\n", apppbx->e_capainfo.hlc);
529 apppbx->e_capainfo.bearer_capa = msg->u.call.bc_capa;
530 apppbx->e_capainfo.bearer_mode = msg->u.call.bc_mode;
531 apppbx->e_capainfo.bearer_info1 = msg->u.call.bc_info1;
532 apppbx->e_capainfo.hlc = msg->u.call.hlc;
533 apppbx->e_capainfo.exthlc = msg->u.call.exthlc;
534 SCPY(apppbx->e_dialinginfo.id, msg->u.call.dialing);
535 SCPY(apppbx->e_dialinginfo.interfaces, msg->u.call.interface);
536 apppbx->e_dialinginfo.sending_complete = 1;
538 apppbx->new_state(PORT_STATE_OUT_SETUP);
545 * this function is called for response whenever a call state changes.
547 void admin_call_response(int adminid, int message, char *connected, int cause, int location, int notify)
549 struct admin_list *admin;
550 struct admin_queue *response, **responsep; /* response pointer */
552 /* searching for admin id
553 * maybe there is no admin instance, because the calling port was not
554 * initiated by admin_call */
558 if (adminid == admin->sockserial)
565 /* seek to end of response list */
566 response = admin->response;
567 responsep = &admin->response;
570 responsep = &response->next;
571 response = response->next;
574 /* create state response */
575 response = (struct admin_queue *)MALLOC(sizeof(struct admin_queue)+sizeof(admin_message));
579 response->am[0].message = message;
580 // printf("MESSAGE: %d\n", message);
582 SCPY(response->am[0].u.call.callerid, connected);
583 response->am[0].u.call.cause = cause;
584 response->am[0].u.call.location = location;
585 response->am[0].u.call.notify = notify;
587 /* attach to response chain */
588 *responsep = response;
589 responsep = &response->next;
594 * send data to the asterisk join instance
596 int admin_message_to_join(struct admin_msg *msg)
599 struct admin_list *admin;
601 /* dummy callref means: asterisk is here */
602 if (msg->type == MESSAGE_HELLO)
604 /* look for second asterisk */
614 PERROR("Asterisk connects twice??? (ignoring)\n");
617 /* set asterisk socket instance */
621 /* find join instance */
625 if (join->c_serial == msg->ref)
630 /* create join instance if not existing */
633 if (msg->ref < 2000000000)
635 PERROR("Asterisk sends us unknown ref %d below 2000000000.\n", msg->ref);
639 /* create new join instance */
640 join = new JoinAsterisk(0); // must have no serial, because no endpoint is connected
642 FATAL("No memory for Asterisk join instance\n");
646 if (join->c_type != JOIN_TYPE_ASTERISK)
647 FATAL("join instance %d must be of type join Asterisk\n", join->c_serial);
648 ((class JoinAsterisk *)join)->message_asterisk(msg->ref, msg->type, &msg->param);
655 * this function is called for every message to asterisk
657 int admin_message_from_join(unsigned long ref, int message_type, union parameter *param)
659 struct admin_list *admin;
660 struct admin_queue *response, **responsep; /* response pointer */
662 /* searching for admin id
663 * maybe there is no asterisk instance
672 /* no asterisk connected */
676 /* seek to end of response list */
677 response = admin->response;
678 responsep = &admin->response;
681 responsep = &response->next;
682 response = response->next;
685 /* create state response */
686 response = (struct admin_queue *)MALLOC(sizeof(struct admin_queue)+sizeof(admin_message));
691 response->am[0].u.msg.type = message_type;
692 response->am[0].u.msg.ref = ref;
693 memcpy(&response->am[0].u.msg.param, param, sizeof(union parameter));
695 /* attach to response chain */
696 *responsep = response;
697 responsep = &response->next;
706 int admin_state(struct admin_queue **responsep)
710 class EndpointAppPBX *apppbx;
713 struct interface *interface;
714 struct interface_port *ifport;
715 struct mISDNport *mISDNport;
719 struct admin_queue *response;
721 /* create state response */
722 response = (struct admin_queue *)MALLOC(sizeof(struct admin_queue)+sizeof(admin_message));
726 response->am[0].message = ADMIN_RESPONSE_STATE;
728 SCPY(response->am[0].u.s.version_string, VERSION_STRING);
730 memcpy(&response->am[0].u.s.tm, now_tm, sizeof(struct tm));
732 SCPY(response->am[0].u.s.logfile, options.log);
733 /* interface count */
735 interface = interface_first;
738 ifport = interface->ifport;
742 ifport = ifport->next;
744 interface = interface->next;
746 response->am[0].u.s.interfaces = i;
755 response->am[0].u.s.joins = i;
757 apppbx = apppbx_first;
762 apppbx = apppbx->next;
764 response->am[0].u.s.epoints = i;
773 response->am[0].u.s.ports = i;
774 /* attach to response chain */
775 *responsep = response;
776 responsep = &response->next;
778 /* create response for all interfaces */
779 num = (response->am[0].u.s.interfaces)+(response->am[0].u.s.joins)+(response->am[0].u.s.epoints)+(response->am[0].u.s.ports);
782 response = (struct admin_queue *)MALLOC(sizeof(admin_queue)+(num*sizeof(admin_message)));
785 *responsep = response;
786 responsep = &response->next;
787 interface = interface_first;
791 ifport = interface->ifport;
795 response->am[num].message = ADMIN_RESPONSE_S_INTERFACE;
797 SCPY(response->am[num].u.i.interface_name, interface->name);
799 response->am[num].u.i.portnum = ifport->portnum;
801 response->am[num].u.i.extension = interface->extension;
803 response->am[num].u.i.block = ifport->block;
804 if (ifport->mISDNport)
806 mISDNport = ifport->mISDNport;
809 response->am[num].u.i.ptp = mISDNport->ptp;
811 response->am[num].u.i.ntmode = mISDNport->ntmode;
813 response->am[num].u.i.pri = mISDNport->pri;
815 response->am[num].u.i.use = mISDNport->use;
817 response->am[num].u.i.l1link = mISDNport->l1link;
819 response->am[num].u.i.l2link = mISDNport->l2link;
821 response->am[num].u.i.channels = mISDNport->b_num;
825 while(i < mISDNport->b_num)
827 response->am[num].u.i.busy[i] = mISDNport->b_state[i];
828 if (mISDNport->b_port[i])
829 response->am[num].u.i.port[i] = mISDNport->b_port[i]->p_serial;
835 ifport = ifport->next;
837 interface = interface->next;
840 /* create response for all joins */
845 response->am[num].message = ADMIN_RESPONSE_S_JOIN;
847 response->am[num].u.j.serial = join->c_serial;
849 if (join->c_type == JOIN_TYPE_PBX)
850 response->am[num].u.j.partyline = ((class JoinPBX *)join)->c_partyline;
856 /* create response for all endpoint */
857 apppbx = apppbx_first;
861 response->am[num].message = ADMIN_RESPONSE_S_EPOINT;
863 response->am[num].u.e.serial = apppbx->ea_endpoint->ep_serial;
865 response->am[num].u.e.join = apppbx->ea_endpoint->ep_join_id;
866 /* rx notification */
867 response->am[num].u.e.rx_state = apppbx->e_rx_state;
868 /* tx notification */
869 response->am[num].u.e.tx_state = apppbx->e_tx_state;
871 switch(apppbx->e_state)
873 case EPOINT_STATE_IN_SETUP:
874 response->am[num].u.e.state = ADMIN_STATE_IN_SETUP;
876 case EPOINT_STATE_OUT_SETUP:
877 response->am[num].u.e.state = ADMIN_STATE_OUT_SETUP;
879 case EPOINT_STATE_IN_OVERLAP:
880 response->am[num].u.e.state = ADMIN_STATE_IN_OVERLAP;
882 case EPOINT_STATE_OUT_OVERLAP:
883 response->am[num].u.e.state = ADMIN_STATE_OUT_OVERLAP;
885 case EPOINT_STATE_IN_PROCEEDING:
886 response->am[num].u.e.state = ADMIN_STATE_IN_PROCEEDING;
888 case EPOINT_STATE_OUT_PROCEEDING:
889 response->am[num].u.e.state = ADMIN_STATE_OUT_PROCEEDING;
891 case EPOINT_STATE_IN_ALERTING:
892 response->am[num].u.e.state = ADMIN_STATE_IN_ALERTING;
894 case EPOINT_STATE_OUT_ALERTING:
895 response->am[num].u.e.state = ADMIN_STATE_OUT_ALERTING;
897 case EPOINT_STATE_CONNECT:
898 response->am[num].u.e.state = ADMIN_STATE_CONNECT;
900 case EPOINT_STATE_IN_DISCONNECT:
901 response->am[num].u.e.state = ADMIN_STATE_IN_DISCONNECT;
903 case EPOINT_STATE_OUT_DISCONNECT:
904 response->am[num].u.e.state = ADMIN_STATE_OUT_DISCONNECT;
907 response->am[num].u.e.state = ADMIN_STATE_IDLE;
910 SCPY(response->am[num].u.e.terminal, apppbx->e_ext.number);
912 SCPY(response->am[num].u.e.callerid, apppbx->e_callerinfo.id);
914 SCPY(response->am[num].u.e.dialing, apppbx->e_dialinginfo.id);
916 if (apppbx->e_action)
917 SCPY(response->am[num].u.e.action, action_defs[apppbx->e_action->index].name);
918 // if (apppbx->e_action)
919 // printf("action=%s\n",action_defs[apppbx->e_action->index].name);
921 response->am[num].u.e.park = apppbx->ea_endpoint->ep_park;
922 if (apppbx->ea_endpoint->ep_park && apppbx->ea_endpoint->ep_park_len && apppbx->ea_endpoint->ep_park_len<=(int)sizeof(response->am[num].u.e.park_callid))
923 memcpy(response->am[num].u.e.park_callid, apppbx->ea_endpoint->ep_park_callid, apppbx->ea_endpoint->ep_park_len);
924 response->am[num].u.e.park_len = apppbx->ea_endpoint->ep_park_len;
926 if (apppbx->e_crypt == CRYPT_ON)
927 response->am[num].u.e.crypt = 1;
929 apppbx = apppbx->next;
933 /* create response for all ports */
938 response->am[num].message = ADMIN_RESPONSE_S_PORT;
940 response->am[num].u.p.serial = port->p_serial;
942 SCPY(response->am[num].u.p.name, port->p_name);
944 response->am[num].u.p.epoint = ACTIVE_EPOINT(port->p_epointlist);
946 switch(port->p_state)
948 case PORT_STATE_IN_SETUP:
949 response->am[num].u.p.state = ADMIN_STATE_IN_SETUP;
951 case PORT_STATE_OUT_SETUP:
952 response->am[num].u.p.state = ADMIN_STATE_OUT_SETUP;
954 case PORT_STATE_IN_OVERLAP:
955 response->am[num].u.p.state = ADMIN_STATE_IN_OVERLAP;
957 case PORT_STATE_OUT_OVERLAP:
958 response->am[num].u.p.state = ADMIN_STATE_OUT_OVERLAP;
960 case PORT_STATE_IN_PROCEEDING:
961 response->am[num].u.p.state = ADMIN_STATE_IN_PROCEEDING;
963 case PORT_STATE_OUT_PROCEEDING:
964 response->am[num].u.p.state = ADMIN_STATE_OUT_PROCEEDING;
966 case PORT_STATE_IN_ALERTING:
967 response->am[num].u.p.state = ADMIN_STATE_IN_ALERTING;
969 case PORT_STATE_OUT_ALERTING:
970 response->am[num].u.p.state = ADMIN_STATE_OUT_ALERTING;
972 case PORT_STATE_CONNECT:
973 response->am[num].u.p.state = ADMIN_STATE_CONNECT;
975 case PORT_STATE_IN_DISCONNECT:
976 response->am[num].u.p.state = ADMIN_STATE_IN_DISCONNECT;
978 case PORT_STATE_OUT_DISCONNECT:
979 response->am[num].u.p.state = ADMIN_STATE_OUT_DISCONNECT;
982 response->am[num].u.p.state = ADMIN_STATE_IDLE;
985 if ((port->p_type&PORT_CLASS_mISDN_MASK) == PORT_CLASS_mISDN_DSS1)
987 response->am[num].u.p.isdn = 1;
988 pdss1 = (class Pdss1 *)port;
989 response->am[num].u.p.isdn_chan = pdss1->p_m_b_channel;
990 response->am[num].u.p.isdn_hold = pdss1->p_m_hold;
991 response->am[num].u.p.isdn_ces = pdss1->p_m_d_ces;
1000 int sockserial = 1; // must start with 1, because 0 is used if no serial is set
1002 * handle admin socket (non blocking)
1004 int admin_handle(void)
1006 struct admin_list *admin, **adminp;
1008 struct admin_message msg;
1011 socklen_t sock_len = sizeof(sock_address);
1012 unsigned long on = 1;
1013 int work = 0; /* if work was done */
1014 struct Endpoint *epoint;
1019 /* check for new incomming connections */
1020 if ((new_sock = accept(sock, (struct sockaddr *)&sock_address, &sock_len)) >= 0)
1023 /* insert new socket */
1024 admin = (struct admin_list *)MALLOC(sizeof(struct admin_list));
1025 if (ioctl(new_sock, FIONBIO, (unsigned char *)(&on)) >= 0)
1028 // PERROR("DEBUG incomming socket %d, serial=%d\n", new_sock, sockserial);
1031 admin->sockserial = sockserial++;
1032 admin->next = admin_list;
1034 admin->sock = new_sock;
1037 FREE(admin, sizeof(struct admin_list));
1041 if (errno != EWOULDBLOCK)
1043 PERROR("Failed to accept connection from socket \"%s\". (errno=%d) Closing socket.\n", sock_address.sun_path, errno);
1049 /* loop all current socket connections */
1051 adminp = &admin_list;
1055 len = read(admin->sock, &msg, sizeof(msg));
1058 if (errno != EWOULDBLOCK)
1062 printf("Broken pipe on socket %d. (errno=%d).\n", admin->sock, errno);
1063 PDEBUG(DEBUG_LOG, "Broken pipe on socket %d. (errno=%d).\n", admin->sock, errno);
1064 *adminp = admin->next;
1065 free_connection(admin);
1073 //PERROR("DEBUG socket %d got data. serial=%d\n", admin->sock, admin->sockserial);
1078 /*release endpoint if exists */
1079 if (admin->epointid)
1081 epoint = find_epoint_id(admin->epointid);
1084 ((class DEFAULT_ENDPOINT_APP *)epoint->ep_app)->
1085 release(RELEASE_ALL, CAUSE_NORMAL, LOCATION_PRIVATE_LOCAL, 0, 0);
1090 //PERROR("DEBUG socket %d closed by remote.\n", admin->sock);
1091 *adminp = admin->next;
1092 free_connection(admin);
1094 //PERROR("DEBUG (admin_list=%x)\n", admin_list);
1097 if (len != sizeof(msg))
1099 PERROR("Short/long read on socket %d. (len=%d != size=%d).\n", admin->sock, len, sizeof(msg));
1100 *adminp = admin->next;
1101 free_connection(admin);
1105 /* process socket command */
1106 if (admin->response)
1108 PERROR("Data from socket %d while sending response.\n", admin->sock);
1109 *adminp = admin->next;
1110 free_connection(admin);
1114 switch (msg.message)
1116 case ADMIN_REQUEST_CMD_INTERFACE:
1117 if (admin_interface(&admin->response) < 0)
1119 PERROR("Failed to create dial response for socket %d.\n", admin->sock);
1120 goto response_error;
1124 case ADMIN_REQUEST_CMD_ROUTE:
1125 if (admin_route(&admin->response) < 0)
1127 PERROR("Failed to create dial response for socket %d.\n", admin->sock);
1128 goto response_error;
1132 case ADMIN_REQUEST_CMD_DIAL:
1133 if (admin_dial(&admin->response, msg.u.x.message) < 0)
1135 PERROR("Failed to create dial response for socket %d.\n", admin->sock);
1136 goto response_error;
1140 case ADMIN_REQUEST_CMD_RELEASE:
1141 if (admin_release(&admin->response, msg.u.x.message) < 0)
1143 PERROR("Failed to create release response for socket %d.\n", admin->sock);
1144 goto response_error;
1148 case ADMIN_REQUEST_STATE:
1149 if (admin_state(&admin->response) < 0)
1151 PERROR("Failed to create state response for socket %d.\n", admin->sock);
1152 goto response_error;
1156 case ADMIN_TRACE_REQUEST:
1157 if (admin_trace(admin, &msg.u.trace_req) < 0)
1159 PERROR("Failed to create trace response for socket %d.\n", admin->sock);
1160 goto response_error;
1164 case ADMIN_REQUEST_CMD_BLOCK:
1165 if (admin_block(&admin->response, msg.u.x.portnum, msg.u.x.block) < 0)
1167 PERROR("Failed to create block response for socket %d.\n", admin->sock);
1168 goto response_error;
1173 if (admin_message_to_join(&msg.u.msg) < 0)
1175 PERROR("Failed to deliver message for socket %d.\n", admin->sock);
1176 goto response_error;
1181 struct admin_queue *response;
1183 response = admin->response;
1186 printf("%c", '0'+response->am[0].message);
1187 response=response->next;
1194 case ADMIN_CALL_SETUP:
1195 if (admin_call(admin, &msg) < 0)
1197 PERROR("Failed to create call for socket %d.\n", admin->sock);
1199 *adminp = admin->next;
1200 free_connection(admin);
1207 PERROR("Invalid message %d from socket %d.\n", msg.message, admin->sock);
1208 *adminp = admin->next;
1209 free_connection(admin);
1215 if (admin->response)
1218 //PERROR("DEBUG socket %d sending data.\n", admin->sock);
1219 len = write(admin->sock, ((unsigned char *)(admin->response->am))+admin->response->offset, sizeof(struct admin_message)*(admin->response->num)-admin->response->offset);
1222 if (errno != EWOULDBLOCK)
1232 if (len < (int)(sizeof(struct admin_message)*(admin->response->num)-admin->response->offset))
1234 admin->response->offset+=len;
1238 temp = admin->response;
1239 admin->response = admin->response->next;
1244 /* done with socket instance */
1246 adminp = &admin->next;
1247 admin = admin->next;