s3-talloc Change TALLOC_REALLOC_ARRAY() to talloc_realloc()
[ira/wip.git] / source3 / nmbd / nmbd_packets.c
index 1e72c188882ab897edeaae44712847aef1d07d92..12e3ab17e3295d1c17d56f4945fdb67438759fbd 100644 (file)
@@ -22,6 +22,8 @@
 #include "includes.h"
 #include "nmbd/nmbd.h"
 #include "../lib/util/select.h"
+#include "system/select.h"
+#include "libsmb/libsmb.h"
 
 extern int ClientNMB;
 extern int ClientDGRAM;
@@ -31,6 +33,24 @@ extern int num_response_packets;
 
 bool rescan_listen_set = False;
 
+static struct nb_packet_server *packet_server;
+
+bool nmbd_init_packet_server(void)
+{
+       NTSTATUS status;
+
+       status = nb_packet_server_create(
+               NULL, nmbd_event_context(),
+               lp_parm_int(-1, "nmbd", "unexpected_clients", 200),
+               &packet_server);
+       if (!NT_STATUS_IS_OK(status)) {
+               DEBUG(0, ("ERROR: nb_packet_server_create failed: %s\n",
+                         nt_errstr(status)));
+               return false;
+       }
+       return true;
+}
+
 
 /*******************************************************************
   The global packet linked-list. Incoming entries are 
@@ -89,7 +109,7 @@ void set_nb_flags(char *buf, uint16 nb_flags)
 Dumps out the browse packet data.
 **************************************************************************/
 
-static void debug_browse_data(char *outbuf, int len)
+static void debug_browse_data(const char *outbuf, int len)
 {
        int i,j;
 
@@ -479,7 +499,7 @@ struct response_record *queue_register_name( struct subnet_record *subrec,
                return NULL;
 
        in_addr_to_sockaddr_storage(&ss, subrec->bcast_ip);
-       pss = iface_ip((struct sockaddr *)&ss);
+       pss = iface_ip((struct sockaddr *)(void *)&ss);
        if (!pss || pss->ss_family != AF_INET) {
                p->locked = False;
                free_packet(p);
@@ -1043,7 +1063,7 @@ static struct subnet_record *find_subnet_for_dgram_browse_packet(struct packet_s
 Dispatch a browse frame from port 138 to the correct processing function.
 ****************************************************************************/
 
-static void process_browse_packet(struct packet_struct *p, char *buf,int len)
+static void process_browse_packet(struct packet_struct *p, const char *buf,int len)
 {
        struct dgram_packet *dgram = &p->packet.dgram;
        int command = CVAL(buf,0);
@@ -1130,7 +1150,7 @@ command code %d from %s IP %s to %s\n", subrec->subnet_name, command, nmb_namest
  Dispatch a LanMan browse frame from port 138 to the correct processing function.
 ****************************************************************************/
 
-static void process_lanman_packet(struct packet_struct *p, char *buf,int len)
+static void process_lanman_packet(struct packet_struct *p, const char *buf,int len)
 {
        struct dgram_packet *dgram = &p->packet.dgram;
        int command = SVAL(buf,0);
@@ -1197,21 +1217,21 @@ static bool listening(struct packet_struct *p,struct nmb_name *nbname)
 
 static void process_dgram(struct packet_struct *p)
 {
-       char *buf;
-       char *buf2;
+       const char *buf;
+       const char *buf2;
        int len;
        struct dgram_packet *dgram = &p->packet.dgram;
 
        /* If we aren't listening to the destination name then ignore the packet */
        if (!listening(p,&dgram->dest_name)) {
-                       unexpected_packet(p);
+                       nb_packet_dispatch(packet_server, p);
                        DEBUG(5,("process_dgram: ignoring dgram packet sent to name %s from %s\n",
                                nmb_namestr(&dgram->dest_name), inet_ntoa(p->ip)));
                        return;
        }
 
        if (dgram->header.msg_type != 0x10 && dgram->header.msg_type != 0x11 && dgram->header.msg_type != 0x12) {
-               unexpected_packet(p);
+               nb_packet_dispatch(packet_server, p);
                /* Don't process error packets etc yet */
                DEBUG(5,("process_dgram: ignoring dgram packet sent to name %s from IP %s as it is \
 an error packet of type %x\n", nmb_namestr(&dgram->dest_name), inet_ntoa(p->ip), dgram->header.msg_type));
@@ -1271,33 +1291,33 @@ packet sent to name %s from IP %s\n",
 
        DEBUG(4,("process_dgram: datagram from %s to %s IP %s for %s of type %d len=%d\n",
                nmb_namestr(&dgram->source_name),nmb_namestr(&dgram->dest_name),
-               inet_ntoa(p->ip), smb_buf(buf),CVAL(buf2,0),len));
+               inet_ntoa(p->ip), smb_buf_const(buf),CVAL(buf2,0),len));
 
        /* Datagram packet received for the browser mailslot */
-       if (strequal(smb_buf(buf),BROWSE_MAILSLOT)) {
+       if (strequal(smb_buf_const(buf),BROWSE_MAILSLOT)) {
                process_browse_packet(p,buf2,len);
                return;
        }
 
        /* Datagram packet received for the LAN Manager mailslot */
-       if (strequal(smb_buf(buf),LANMAN_MAILSLOT)) {
+       if (strequal(smb_buf_const(buf),LANMAN_MAILSLOT)) {
                process_lanman_packet(p,buf2,len);
                return;
        }
 
        /* Datagram packet received for the domain logon mailslot */
-       if (strequal(smb_buf(buf),NET_LOGON_MAILSLOT)) {
+       if (strequal(smb_buf_const(buf),NET_LOGON_MAILSLOT)) {
                process_logon_packet(p,buf2,len,NET_LOGON_MAILSLOT);
                return;
        }
 
        /* Datagram packet received for the NT domain logon mailslot */
-       if (strequal(smb_buf(buf),NT_LOGON_MAILSLOT)) {
+       if (strequal(smb_buf_const(buf),NT_LOGON_MAILSLOT)) {
                process_logon_packet(p,buf2,len,NT_LOGON_MAILSLOT);
                return;
        }
 
-       unexpected_packet(p);
+       nb_packet_dispatch(packet_server, p);
 }
 
 /****************************************************************************
@@ -1417,7 +1437,7 @@ static struct subnet_record *find_subnet_for_nmb_packet( struct packet_struct *p
                if(rrec == NULL) {
                        DEBUG(3,("find_subnet_for_nmb_packet: response record not found for response id %hu\n",
                                nmb->header.name_trn_id));
-                       unexpected_packet(p);
+                       nb_packet_dispatch(packet_server, p);
                        return NULL;
                }
 
@@ -1656,93 +1676,98 @@ on subnet %s\n", rrec->response_id, inet_ntoa(rrec->packet->ip), subrec->subnet_
   plus the broadcast sockets.
 ***************************************************************************/
 
-static bool create_listen_fdset(fd_set **ppset, int **psock_array, int *listen_number, int *maxfd)
+struct socket_attributes {
+       enum packet_type type;
+       bool broadcast;
+};
+
+static bool create_listen_pollfds(struct pollfd **pfds,
+                                 struct socket_attributes **pattrs,
+                                 int *pnum_sockets)
 {
-       int *sock_array = NULL;
        struct subnet_record *subrec = NULL;
        int count = 0;
        int num = 0;
-       fd_set *pset = SMB_MALLOC_P(fd_set);
-
-       if(pset == NULL) {
-               DEBUG(0,("create_listen_fdset: malloc fail !\n"));
-               return True;
-       }
+       struct pollfd *fds;
+       struct socket_attributes *attrs;
 
-       /* The Client* sockets */
-       count++;
+       /* The ClientNMB and ClientDGRAM sockets */
+       count = 2;
 
        /* Check that we can add all the fd's we need. */
-       for (subrec = FIRST_SUBNET; subrec; subrec = NEXT_SUBNET_EXCLUDING_UNICAST(subrec))
-               count++;
-
-       /* each interface gets 4 sockets */
-       count *= 4;
+       for (subrec = FIRST_SUBNET;
+            subrec != NULL;
+            subrec = NEXT_SUBNET_EXCLUDING_UNICAST(subrec)) {
+               count += 2;     /* nmb_sock and dgram_sock */
+               if (subrec->nmb_bcast != -1) {
+                       count += 1;
+               }
+               if (subrec->dgram_bcast != -1) {
+                       count += 1;
+               }
+       }
 
-       if(count > FD_SETSIZE) {
-               DEBUG(0,("create_listen_fdset: Too many file descriptors needed (%d). We can \
-only use %d.\n", count, FD_SETSIZE));
-               SAFE_FREE(pset);
-               return True;
+       fds = TALLOC_ZERO_ARRAY(NULL, struct pollfd, count);
+       if (fds == NULL) {
+               DEBUG(1, ("create_listen_pollfds: malloc fail for fds. "
+                         "size %d\n", count));
+               return true;
        }
 
-       if((sock_array = SMB_MALLOC_ARRAY(int, count)) == NULL) {
-               DEBUG(0,("create_listen_fdset: malloc fail for socket array. size %d\n", count));
-               SAFE_FREE(pset);
-               return True;
+       attrs = TALLOC_ARRAY(NULL, struct socket_attributes, count);
+       if (fds == NULL) {
+               DEBUG(1, ("create_listen_pollfds: malloc fail for attrs. "
+                         "size %d\n", count));
+               SAFE_FREE(fds);
+               return true;
        }
 
-       FD_ZERO(pset);
+       num = 0;
 
-       /* Add in the lp_socket_address() interface on 137. */
-       FD_SET(ClientNMB,pset);
-       sock_array[num++] = ClientNMB;
-       *maxfd = MAX( *maxfd, ClientNMB);
+       fds[num].fd = ClientNMB;
+       attrs[num].type = NMB_PACKET;
+       attrs[num].broadcast = false;
+       num += 1;
 
-       /* the lp_socket_address() interface has only one socket */
-       sock_array[num++] = -1;
+       fds[num].fd = ClientDGRAM;
+       attrs[num].type = DGRAM_PACKET;
+       attrs[num].broadcast = false;
+       num += 1;
 
-       /* Add in the 137 sockets on all the interfaces. */
        for (subrec = FIRST_SUBNET; subrec; subrec = NEXT_SUBNET_EXCLUDING_UNICAST(subrec)) {
-               FD_SET(subrec->nmb_sock,pset);
-               sock_array[num++] = subrec->nmb_sock;
-               *maxfd = MAX( *maxfd, subrec->nmb_sock);
 
-               sock_array[num++] = subrec->nmb_bcast;
+               fds[num].fd = subrec->nmb_sock;
+               attrs[num].type = NMB_PACKET;
+               attrs[num].broadcast = false;
+               num += 1;
+
                if (subrec->nmb_bcast != -1) {
-                       FD_SET(subrec->nmb_bcast,pset);
-                       *maxfd = MAX( *maxfd, subrec->nmb_bcast);
+                       fds[num].fd = subrec->nmb_bcast;
+                       attrs[num].type = NMB_PACKET;
+                       attrs[num].broadcast = true;
+                       num += 1;
                }
-       }
-
-       /* Add in the lp_socket_address() interface on 138. */
-       FD_SET(ClientDGRAM,pset);
-       sock_array[num++] = ClientDGRAM;
-       *maxfd = MAX( *maxfd, ClientDGRAM);
 
-       /* the lp_socket_address() interface has only one socket */
-       sock_array[num++] = -1;
-
-       /* Add in the 138 sockets on all the interfaces. */
-       for (subrec = FIRST_SUBNET; subrec; subrec = NEXT_SUBNET_EXCLUDING_UNICAST(subrec)) {
-               FD_SET(subrec->dgram_sock,pset);
-               sock_array[num++] = subrec->dgram_sock;
-               *maxfd = MAX( *maxfd, subrec->dgram_sock);
+               fds[num].fd = subrec->dgram_sock;
+               attrs[num].type = DGRAM_PACKET;
+               attrs[num].broadcast = false;
+               num += 1;
 
-               sock_array[num++] = subrec->dgram_bcast;
                if (subrec->dgram_bcast != -1) {
-                       FD_SET(subrec->dgram_bcast,pset);
-                       *maxfd = MAX( *maxfd, subrec->dgram_bcast);
+                       fds[num].fd = subrec->dgram_bcast;
+                       attrs[num].type = DGRAM_PACKET;
+                       attrs[num].broadcast = true;
+                       num += 1;
                }
        }
 
-       *listen_number = count;
+       TALLOC_FREE(*pfds);
+       *pfds = fds;
 
-       SAFE_FREE(*ppset);
-       SAFE_FREE(*psock_array);
+       TALLOC_FREE(*pattrs);
+       *pattrs = attrs;
 
-       *ppset = pset;
-       *psock_array = sock_array;
+       *pnum_sockets = count;
 
        return False;
 }
@@ -1802,6 +1827,7 @@ static bool store_processed_packet(struct processed_packet **pp_processed_packet
        } else if (packet->packet_type == DGRAM_PACKET) {
                p->packet_id = packet->packet.dgram.header.dgm_id;
        } else {
+               SAFE_FREE(p);
                return false;
        }
 
@@ -1831,42 +1857,59 @@ static void free_processed_packet_list(struct processed_packet **pp_processed_pa
 
 bool listen_for_packets(bool run_election)
 {
-       static fd_set *listen_set = NULL;
+       static struct pollfd *fds = NULL;
+       static struct socket_attributes *attrs = NULL;
        static int listen_number = 0;
-       static int *sock_array = NULL;
+       int num_sockets;
        int i;
-       static int maxfd = 0;
 
-       fd_set r_fds;
-       fd_set w_fds;
-       int selrtn = 0;
-       struct timeval timeout;
+       int pollrtn;
+       int timeout;
 #ifndef SYNC_DNS
        int dns_fd;
+       int dns_pollidx = -1;
 #endif
        struct processed_packet *processed_packet_list = NULL;
 
-       if(listen_set == NULL || rescan_listen_set) {
-               if(create_listen_fdset(&listen_set, &sock_array, &listen_number, &maxfd)) {
+       if ((fds == NULL) || rescan_listen_set) {
+               if (create_listen_pollfds(&fds, &attrs, &listen_number)) {
                        DEBUG(0,("listen_for_packets: Fatal error. unable to create listen set. Exiting.\n"));
                        return True;
                }
                rescan_listen_set = False;
        }
 
-       memcpy((char *)&r_fds, (char *)listen_set, sizeof(fd_set));
-       FD_ZERO(&w_fds);
+       /*
+        * "fds" can be enlarged by event_add_to_poll_args
+        * below. Shrink it again to what was given to us by
+        * create_listen_pollfds.
+        */
+
+       fds = talloc_realloc(NULL, fds, struct pollfd, listen_number);
+       if (fds == NULL) {
+               return true;
+       }
+       num_sockets = listen_number;
 
 #ifndef SYNC_DNS
        dns_fd = asyncdns_fd();
        if (dns_fd != -1) {
-               FD_SET(dns_fd, &r_fds);
-               maxfd = MAX( maxfd, dns_fd);
+               fds = talloc_realloc(NULL, fds, struct pollfd, num_sockets+1);
+               if (fds == NULL) {
+                       return true;
+               }
+               dns_pollidx = num_sockets;
+               fds[num_sockets].fd = dns_fd;
+               num_sockets += 1;
        }
 #endif
 
+       for (i=0; i<num_sockets; i++) {
+               fds[i].events = POLLIN|POLLHUP;
+       }
+
        /* Process a signal and timer events now... */
-       if (run_events(nmbd_event_context(), &selrtn, NULL, NULL)) {
+       if (run_events_poll(nmbd_event_context(), 0, NULL, 0)) {
                return False;
        }
 
@@ -1877,24 +1920,25 @@ bool listen_for_packets(bool run_election)
         * the time we are expecting the next netbios packet.
         */
 
-       timeout.tv_sec = (run_election||num_response_packets) ? 1 : NMBD_SELECT_LOOP;
-       timeout.tv_usec = 0;
+       timeout = ((run_election||num_response_packets)
+                  ? 1 : NMBD_SELECT_LOOP) * 1000;
 
-       event_add_to_select_args(nmbd_event_context(),
-                                &r_fds, &w_fds, &timeout, &maxfd);
+       event_add_to_poll_args(nmbd_event_context(), NULL,
+                              &fds, &num_sockets, &timeout);
 
-       selrtn = sys_select(maxfd+1,&r_fds,&w_fds,NULL,&timeout);
+       pollrtn = sys_poll(fds, num_sockets, timeout);
 
-       if (run_events(nmbd_event_context(), &selrtn, &r_fds, &w_fds)) {
+       if (run_events_poll(nmbd_event_context(), pollrtn, fds, num_sockets)) {
                return False;
        }
 
-       if (selrtn == -1) {
+       if (pollrtn == -1) {
                return False;
        }
 
 #ifndef SYNC_DNS
-       if (dns_fd != -1 && FD_ISSET(dns_fd,&r_fds)) {
+       if ((dns_fd != -1) && (dns_pollidx != -1) &&
+           (fds[dns_pollidx].revents & (POLLIN|POLLHUP|POLLERR))) {
                run_dns_queue();
        }
 #endif
@@ -1905,17 +1949,12 @@ bool listen_for_packets(bool run_election)
                const char *packet_name;
                int client_fd;
                int client_port;
-               bool is_requested_send_reply = false;
 
-               if (sock_array[i] == -1) {
+               if ((fds[i].revents & (POLLIN|POLLHUP|POLLERR)) == 0) {
                        continue;
                }
 
-               if (!FD_ISSET(sock_array[i],&r_fds)) {
-                       continue;
-               }
-
-               if (i < (listen_number/2)) {
+               if (attrs[i].type == NMB_PACKET) {
                        /* Port 137 */
                        packet_type = NMB_PACKET;
                        packet_name = "nmb";
@@ -1929,19 +1968,17 @@ bool listen_for_packets(bool run_election)
                        client_port = DGRAM_PORT;
                }
 
-               packet = read_packet(sock_array[i], packet_type);
+               packet = read_packet(fds[i].fd, packet_type);
                if (!packet) {
                        continue;
                }
 
-               is_requested_send_reply = is_requested_send_packet(packet);
-
                /*
                 * If we got a packet on the broadcast socket and interfaces
                 * only is set then check it came from one of our local nets.
                 */
                if (lp_bind_interfaces_only() &&
-                   (sock_array[i] == client_fd) &&
+                   (fds[i].fd == client_fd) &&
                    (!is_local_net_v4(packet->ip))) {
                        DEBUG(7,("discarding %s packet sent to broadcast socket from %s:%d\n",
                                packet_name, inet_ntoa(packet->ip), packet->port));
@@ -1949,8 +1986,7 @@ bool listen_for_packets(bool run_election)
                        continue;
                }
 
-               if (!is_requested_send_reply &&
-                   (is_loopback_ip_v4(packet->ip) || ismyip_v4(packet->ip)) &&
+               if ((is_loopback_ip_v4(packet->ip) || ismyip_v4(packet->ip)) &&
                    packet->port == client_port)
                {
                        if (client_port == DGRAM_PORT) {
@@ -1977,21 +2013,12 @@ bool listen_for_packets(bool run_election)
 
                store_processed_packet(&processed_packet_list, packet);
 
-               /*
-                * 0,2,4,... are unicast sockets
-                * 1,3,5,... are broadcast sockets
-                *
-                * on broadcast socket we only receive packets
-                * and send replies via the unicast socket.
-                *
-                * 0,1 and 2,3 and ... belong together.
-                */
-               if ((i % 2) != 0) {
+               if (attrs[i].broadcast) {
                        /* this is a broadcast socket */
-                       packet->send_fd = sock_array[i-1];
+                       packet->send_fd = fds[i-1].fd;
                } else {
                        /* this is already a unicast socket */
-                       packet->send_fd = sock_array[i];
+                       packet->send_fd = fds[i].fd;
                }
 
                queue_packet(packet);
@@ -2061,7 +2088,7 @@ bool send_mailslot(bool unique, const char *mailslot,char *buf, size_t len,
        SSVAL(ptr,smb_vwv15,1);
        SSVAL(ptr,smb_vwv16,2);
        p2 = smb_buf(ptr);
-       safe_strcpy_base(p2, mailslot, dgram->data, sizeof(dgram->data));
+       strlcpy_base(p2, mailslot, dgram->data, sizeof(dgram->data));
        p2 = skip_string(ptr,MAX_DGRAM_SIZE,p2);
 
        if (((p2+len) > dgram->data+sizeof(dgram->data)) || ((p2+len) < p2)) {