r10656: BIG merge from trunk. Features not copied over
[tprouty/samba.git] / source3 / smbd / connection.c
index c3b6ba0199149cce77b4d3e89610c7dae0979b34..07d3181144f7dfd53c70fdbacdf3cd35c22c21ab 100644 (file)
@@ -1,6 +1,5 @@
 /* 
-   Unix SMB/Netbios implementation.
-   Version 1.9.
+   Unix SMB/CIFS implementation.
    connection claim routines
    Copyright (C) Andrew Tridgell 1998
    
 
 #include "includes.h"
 
-
-extern fstring remote_machine;
-
-extern int DEBUGLEVEL;
+static TDB_CONTEXT *tdb;
 
 /****************************************************************************
-simple routines to do connection counting
+ Return the connection tdb context (used for message send all).
 ****************************************************************************/
-BOOL yield_connection(connection_struct *conn,char *name,int max_connections)
-{
-       struct connect_record crec;
-       pstring fname;
-       int fd;
-       int mypid = getpid();
-       int i;
 
-       DEBUG(3,("Yielding connection to %s\n",name));
+TDB_CONTEXT *conn_tdb_ctx(void)
+{
+       if (!tdb)
+               tdb = tdb_open_log(lock_path("connections.tdb"), 0, TDB_CLEAR_IF_FIRST|TDB_DEFAULT, 
+                              O_RDWR | O_CREAT, 0644);
 
-       if (max_connections <= 0)
-               return(True);
+       return tdb;
+}
 
-       bzero(&crec,sizeof(crec));
+static void make_conn_key(connection_struct *conn, const char *name, TDB_DATA *pkbuf, struct connections_key *pkey)
+{
+       ZERO_STRUCTP(pkey);
+       pkey->pid = procid_self();
+       pkey->cnum = conn?conn->cnum:-1;
+       fstrcpy(pkey->name, name);
+#ifdef DEVELOPER
+       /* valgrind fixer... */
+       {
+               size_t sl = strlen(pkey->name);
+               if (sizeof(fstring)-sl)
+                       memset(&pkey->name[sl], '\0', sizeof(fstring)-sl);
+       }
+#endif
 
-       pstrcpy(fname,lp_lockdir());
-       trim_string(fname,"","/");
+       pkbuf->dptr = (char *)pkey;
+       pkbuf->dsize = sizeof(*pkey);
+}
 
-       pstrcat(fname,"/");
-       pstrcat(fname,name);
-       pstrcat(fname,".LCK");
+/****************************************************************************
+ Delete a connection record.
+****************************************************************************/
 
-       fd = open(fname,O_RDWR);
-       if (fd == -1) {
-               DEBUG(2,("Couldn't open lock file %s (%s)\n",fname,strerror(errno)));
-               return(False);
-       }
+BOOL yield_connection(connection_struct *conn, const char *name)
+{
+       struct connections_key key;
+       TDB_DATA kbuf;
 
-       if (fcntl_lock(fd,F_SETLKW,0,1,F_WRLCK)==False) {
-               DEBUG(0,("ERROR: can't get lock on %s\n", fname));
+       if (!tdb)
                return False;
-       }
 
-       /* find the right spot */
-       for (i=0;i<max_connections;i++) {
-               if (read(fd, &crec,sizeof(crec)) != sizeof(crec)) {
-                       DEBUG(2,("Entry not found in lock file %s\n",fname));
-                       if (fcntl_lock(fd,F_SETLKW,0,1,F_UNLCK)==False) {
-                               DEBUG(0,("ERROR: can't release lock on %s\n", fname));
-                       }
-                       close(fd);
-                       return(False);
-               }
-               if (crec.pid == mypid && crec.cnum == conn->cnum)
-                       break;
-       }
+       DEBUG(3,("Yielding connection to %s\n",name));
 
-       if (crec.pid != mypid || crec.cnum != conn->cnum) {
-               if (fcntl_lock(fd,F_SETLKW,0,1,F_UNLCK)==False) {
-                       DEBUG(0,("ERROR: can't release lock on %s\n", fname));
-               }
-               close(fd);
-               DEBUG(2,("Entry not found in lock file %s\n",fname));
-               return(False);
-       }
+       make_conn_key(conn, name, &kbuf, &key);
 
-       bzero((void *)&crec,sizeof(crec));
-  
-       /* remove our mark */
-       if (sys_lseek(fd,i*sizeof(crec),SEEK_SET) != i*sizeof(crec) ||
-           write(fd, &crec,sizeof(crec)) != sizeof(crec)) {
-               DEBUG(2,("Couldn't update lock file %s (%s)\n",fname,strerror(errno)));
-               if (fcntl_lock(fd,F_SETLKW,0,1,F_UNLCK)==False) {
-                       DEBUG(0,("ERROR: can't release lock on %s\n", fname));
-               }
-               close(fd);
-               return(False);
+       if (tdb_delete(tdb, kbuf) != 0) {
+               int dbg_lvl = (!conn && (tdb_error(tdb) == TDB_ERR_NOEXIST)) ? 3 : 0;
+               DEBUG(dbg_lvl,("yield_connection: tdb_delete for name %s failed with error %s.\n",
+                       name, tdb_errorstr(tdb) ));
+               return (False);
        }
 
-       if (fcntl_lock(fd,F_SETLKW,0,1,F_UNLCK)==False) {
-               DEBUG(0,("ERROR: can't release lock on %s\n", fname));
-       }
-
-       DEBUG(3,("Yield successful\n"));
-
-       close(fd);
        return(True);
 }
 
+struct count_stat {
+       pid_t mypid;
+       int curr_connections;
+       char *name;
+       BOOL Clear;
+};
 
 /****************************************************************************
-simple routines to do connection counting
+ Count the entries belonging to a service in the connection db.
 ****************************************************************************/
-BOOL claim_connection(connection_struct *conn,char *name,int max_connections,BOOL Clear)
+
+static int count_fn( TDB_CONTEXT *the_tdb, TDB_DATA kbuf, TDB_DATA dbuf, void *udp)
 {
-       extern int Client;
-       struct connect_record crec;
-       pstring fname;
-       int fd=-1;
-       int i,foundi= -1;
-       int total_recs;
-       
-       if (max_connections <= 0)
-               return(True);
-       
-       DEBUG(5,("trying claim %s %s %d\n",lp_lockdir(),name,max_connections));
-       
-       pstrcpy(fname,lp_lockdir());
-       trim_string(fname,"","/");
-       
-       if (!directory_exist(fname,NULL))
-               mkdir(fname,0755);
-       
-       pstrcat(fname,"/");
-       pstrcat(fname,name);
-       pstrcat(fname,".LCK");
-       
-       if (!file_exist(fname,NULL)) {
-               fd = open(fname,O_RDWR|O_CREAT|O_EXCL, 0644);
+       struct connections_data crec;
+       struct count_stat *cs = (struct count_stat *)udp;
+       if (dbuf.dsize != sizeof(crec))
+               return 0;
+
+       memcpy(&crec, dbuf.dptr, sizeof(crec));
+       if (crec.cnum == -1)
+               return 0;
+
+       /* If the pid was not found delete the entry from connections.tdb */
+
+       if (cs->Clear && !process_exists(crec.pid) && (errno == ESRCH)) {
+               DEBUG(2,("pid %s doesn't exist - deleting connections %d [%s]\n",
+                       procid_str_static(&crec.pid), crec.cnum, crec.name));
+               if (tdb_delete(the_tdb, kbuf) != 0)
+                       DEBUG(0,("count_fn: tdb_delete failed with error %s\n", tdb_errorstr(tdb) ));
+               return 0;
        }
 
-       if (fd == -1) {
-               fd = open(fname,O_RDWR);
-       }
-       
-       if (fd == -1) {
-               DEBUG(1,("couldn't open lock file %s\n",fname));
-               return(False);
-       }
+       if (strequal(crec.name, cs->name))
+               cs->curr_connections++;
+
+       return 0;
+}
 
-       if (fcntl_lock(fd,F_SETLKW,0,1,F_WRLCK)==False) {
-               DEBUG(0,("ERROR: can't get lock on %s\n", fname));
+/****************************************************************************
+ Claim an entry in the connections database.
+****************************************************************************/
+
+BOOL claim_connection(connection_struct *conn, const char *name,int max_connections,BOOL Clear, uint32 msg_flags)
+{
+       struct connections_key key;
+       struct connections_data crec;
+       TDB_DATA kbuf, dbuf;
+
+       if (!tdb)
+               tdb = tdb_open_log(lock_path("connections.tdb"), 0, TDB_CLEAR_IF_FIRST|TDB_DEFAULT, 
+                              O_RDWR | O_CREAT, 0644);
+
+       if (!tdb)
                return False;
-       }
 
-       total_recs = file_size(fname) / sizeof(crec);
-                       
-       /* find a free spot */
-       for (i=0;i<max_connections;i++) {
-               if (i>=total_recs || 
-                   sys_lseek(fd,i*sizeof(crec),SEEK_SET) != i*sizeof(crec) ||
-                   read(fd,&crec,sizeof(crec)) != sizeof(crec)) {
-                       if (foundi < 0) foundi = i;
-                       break;
-               }
-               
-               if (Clear && crec.pid && !process_exists(crec.pid)) {
-                       sys_lseek(fd,i*sizeof(crec),SEEK_SET);
-                       bzero((void *)&crec,sizeof(crec));
-                       write(fd, &crec,sizeof(crec));
-                       if (foundi < 0) foundi = i;
-                       continue;
-               }
-               if (foundi < 0 && (!crec.pid || !process_exists(crec.pid))) {
-                       foundi=i;
-                       if (!Clear) break;
+       /*
+        * Enforce the max connections parameter.
+        */
+
+       if (max_connections > 0) {
+               struct count_stat cs;
+
+               cs.mypid = sys_getpid();
+               cs.curr_connections = 0;
+               cs.name = lp_servicename(SNUM(conn));
+               cs.Clear = Clear;
+
+               /*
+                * This has a race condition, but locking the chain before hand is worse
+                * as it leads to deadlock.
+                */
+
+               if (tdb_traverse(tdb, count_fn, &cs) == -1) {
+                       DEBUG(0,("claim_connection: traverse of connections.tdb failed with error %s.\n",
+                               tdb_errorstr(tdb) ));
+                       return False;
                }
-       }  
-       
-       if (foundi < 0) {
-               DEBUG(3,("no free locks in %s\n",fname));
-               if (fcntl_lock(fd,F_SETLKW,0,1,F_UNLCK)==False) {
-                       DEBUG(0,("ERROR: can't release lock on %s\n", fname));
+
+               if (cs.curr_connections >= max_connections) {
+                       DEBUG(1,("claim_connection: Max connections (%d) exceeded for %s\n",
+                               max_connections, name ));
+                       return False;
                }
-               close(fd);
-               return(False);
-       }      
-       
+       }
+
+       DEBUG(5,("claiming %s %d\n",name,max_connections));
+
+       make_conn_key(conn, name, &kbuf, &key);
+
        /* fill in the crec */
-       bzero((void *)&crec,sizeof(crec));
+       ZERO_STRUCT(crec);
        crec.magic = 0x280267;
-       crec.pid = getpid();
+       crec.pid = procid_self();
+       crec.cnum = conn?conn->cnum:-1;
        if (conn) {
-               crec.cnum = conn->cnum;
                crec.uid = conn->uid;
                crec.gid = conn->gid;
-               StrnCpy(crec.name,
-                       lp_servicename(SNUM(conn)),sizeof(crec.name)-1);
-       } else {
-               crec.cnum = -1;
+               safe_strcpy(crec.name,
+                           lp_servicename(SNUM(conn)),sizeof(crec.name)-1);
        }
        crec.start = time(NULL);
+       crec.bcast_msg_flags = msg_flags;
        
-       StrnCpy(crec.machine,remote_machine,sizeof(crec.machine)-1);
-       StrnCpy(crec.addr,client_addr(Client),sizeof(crec.addr)-1);
-       
-       /* make our mark */
-       if (sys_lseek(fd,foundi*sizeof(crec),SEEK_SET) != foundi*sizeof(crec) ||
-           write(fd, &crec,sizeof(crec)) != sizeof(crec)) {
-               if (fcntl_lock(fd,F_SETLKW,0,1,F_UNLCK)==False) {
-                       DEBUG(0,("ERROR: can't release lock on %s\n", fname));
-               }
-               close(fd);
-               return(False);
+       safe_strcpy(crec.machine,get_remote_machine_name(),sizeof(crec.machine)-1);
+       safe_strcpy(crec.addr,conn?conn->client_address:client_addr(),sizeof(crec.addr)-1);
+
+       dbuf.dptr = (char *)&crec;
+       dbuf.dsize = sizeof(crec);
+
+       if (tdb_store(tdb, kbuf, dbuf, TDB_REPLACE) != 0) {
+               DEBUG(0,("claim_connection: tdb_store failed with error %s.\n",
+                       tdb_errorstr(tdb) ));
+               return False;
        }
 
-       if (fcntl_lock(fd,F_SETLKW,0,1,F_UNLCK)==False) {
-               DEBUG(0,("ERROR: can't release lock on %s\n", fname));
+       return True;
+}
+
+BOOL register_message_flags(BOOL doreg, uint32 msg_flags)
+{
+       struct connections_key key;
+       struct connections_data *pcrec;
+       TDB_DATA kbuf, dbuf;
+
+       if (!tdb)
+               return False;
+
+       DEBUG(10,("register_message_flags: %s flags 0x%x\n",
+               doreg ? "adding" : "removing",
+               (unsigned int)msg_flags ));
+
+       make_conn_key(NULL, "", &kbuf, &key);
+
+        dbuf = tdb_fetch(tdb, kbuf);
+        if (!dbuf.dptr) {
+               DEBUG(0,("register_message_flags: tdb_fetch failed: %s\n",
+                       tdb_errorstr(tdb)));
+               return False;
        }
-       
-       close(fd);
-       return(True);
+
+       pcrec = (struct connections_data *)dbuf.dptr;
+       if (doreg)
+               pcrec->bcast_msg_flags |= msg_flags;
+       else
+               pcrec->bcast_msg_flags &= ~msg_flags;
+
+       if (tdb_store(tdb, kbuf, dbuf, TDB_REPLACE) != 0) {
+               DEBUG(0,("register_message_flags: tdb_store failed: %s.\n",
+                       tdb_errorstr(tdb) ));
+               SAFE_FREE(dbuf.dptr);
+               return False;
+       }
+
+       DEBUG(10,("register_message_flags: new flags 0x%x\n",
+               (unsigned int)pcrec->bcast_msg_flags ));
+
+       SAFE_FREE(dbuf.dptr);
+       return True;
 }