r16945: Sync trunk -> 3.0 for 3.0.24 code. Still need
[vlendec/samba-autobuild/.git] / source3 / smbd / connection.c
index 393a3e7372ffe8fe6cc663cd45830e2824aaa844..0442a9441add06a5fd30af001222c8f7a64419ec 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"
 
+static TDB_CONTEXT *tdb;
 
-extern fstring remote_machine;
+/****************************************************************************
+ Return the connection tdb context (used for message send all).
+****************************************************************************/
+
+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);
 
-extern int DEBUGLEVEL;
+       return tdb;
+}
+
+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
+
+       pkbuf->dptr = (char *)pkey;
+       pkbuf->dsize = sizeof(*pkey);
+}
 
 /****************************************************************************
-simple routines to do connection counting
+ Delete a connection record.
 ****************************************************************************/
-BOOL yield_connection(connection_struct *conn,char *name,int max_connections)
+
+BOOL yield_connection(connection_struct *conn, const char *name)
 {
-       struct connect_record crec;
-       pstring fname;
-       int fd;
-       pid_t mypid = getpid();
-       int i;
+       struct connections_key key;
+       TDB_DATA kbuf;
+
+       if (!tdb)
+               return False;
 
        DEBUG(3,("Yielding connection to %s\n",name));
 
-       if (max_connections <= 0)
-               return(True);
+       make_conn_key(conn, name, &kbuf, &key);
 
-       memset((char *)&crec,'\0',sizeof(crec));
+       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);
+       }
 
-       pstrcpy(fname,lp_lockdir());
-       trim_string(fname,"","/");
+       return(True);
+}
+
+struct count_stat {
+       pid_t mypid;
+       int curr_connections;
+       const char *name;
+       BOOL Clear;
+};
+
+/****************************************************************************
+ Count the entries belonging to a service in the connection db.
+****************************************************************************/
+
+static int count_fn( TDB_CONTEXT *the_tdb, TDB_DATA kbuf, TDB_DATA dbuf, void *udp)
+{
+       struct connections_data crec;
+       struct count_stat *cs = (struct count_stat *)udp;
+       if (dbuf.dsize != sizeof(crec))
+               return 0;
 
-       pstrcat(fname,"/");
-       pstrcat(fname,name);
-       pstrcat(fname,".LCK");
+       memcpy(&crec, dbuf.dptr, sizeof(crec));
+       if (crec.cnum == -1)
+               return 0;
 
-       fd = sys_open(fname,O_RDWR,0);
-       if (fd == -1) {
-               DEBUG(2,("Couldn't open lock file %s (%s)\n",fname,strerror(errno)));
-               return(False);
+       /* 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 (fcntl_lock(fd,SMB_F_SETLKW,0,1,F_WRLCK)==False) {
-               DEBUG(0,("ERROR: can't get lock on %s\n", fname));
+       if (strequal(crec.name, cs->name))
+               cs->curr_connections++;
+
+       return 0;
+}
+
+/****************************************************************************
+ Claim an entry in the connections database.
+****************************************************************************/
+
+int count_current_connections( const char *sharename, BOOL clear  )
+{
+       struct count_stat cs;
+
+       cs.mypid = sys_getpid();
+       cs.curr_connections = 0;
+       cs.name = sharename;
+       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;
        }
+       
+       return cs.curr_connections;
+}
 
-       /* 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,SMB_F_SETLKW,0,1,F_UNLCK)==False) {
-                               DEBUG(0,("ERROR: can't release lock on %s\n", fname));
-                       }
-                       close(fd);
-                       return(False);
+/****************************************************************************
+ 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) {
+               if ( (tdb =conn_tdb_ctx()) == NULL ) {
+                       return False;
                }
-               if (crec.pid == mypid && crec.cnum == conn->cnum)
-                       break;
        }
+       
+       /*
+        * Enforce the max connections parameter.
+        */
 
-       if (crec.pid != mypid || crec.cnum != conn->cnum) {
-               if (fcntl_lock(fd,SMB_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);
-       }
-
-       memset((void *)&crec,'\0',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,SMB_F_SETLKW,0,1,F_UNLCK)==False) {
-                       DEBUG(0,("ERROR: can't release lock on %s\n", fname));
+       if (max_connections > 0) {
+               int curr_connections;
+               
+               curr_connections = count_current_connections( lp_servicename(SNUM(conn)), True );
+
+               if (curr_connections >= max_connections) {
+                       DEBUG(1,("claim_connection: Max connections (%d) exceeded for %s\n",
+                               max_connections, name ));
+                       return False;
                }
-               close(fd);
-               return(False);
        }
 
-       if (fcntl_lock(fd,SMB_F_SETLKW,0,1,F_UNLCK)==False) {
-               DEBUG(0,("ERROR: can't release lock on %s\n", fname));
+       DEBUG(5,("claiming %s %d\n",name,max_connections));
+
+       make_conn_key(conn, name, &kbuf, &key);
+
+       /* fill in the crec */
+       ZERO_STRUCT(crec);
+       crec.magic = 0x280267;
+       crec.pid = procid_self();
+       crec.cnum = conn?conn->cnum:-1;
+       if (conn) {
+               crec.uid = conn->uid;
+               crec.gid = conn->gid;
+               safe_strcpy(crec.name,
+                           lp_servicename(SNUM(conn)),sizeof(crec.name)-1);
        }
+       crec.start = time(NULL);
+       crec.bcast_msg_flags = msg_flags;
+       
+       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);
 
-       DEBUG(3,("Yield successful\n"));
+       dbuf.dptr = (char *)&crec;
+       dbuf.dsize = sizeof(crec);
 
-       close(fd);
-       return(True);
+       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;
+       }
+
+       return True;
 }
 
+BOOL register_message_flags(BOOL doreg, uint32 msg_flags)
+{
+       struct connections_key key;
+       struct connections_data *pcrec;
+       TDB_DATA kbuf, dbuf;
 
-/****************************************************************************
-simple routines to do connection counting
-****************************************************************************/
-BOOL claim_connection(connection_struct *conn,char *name,int max_connections,BOOL Clear)
+       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;
+       }
+
+       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;
+}
+
+/*********************************************************************
+*********************************************************************/
+
+static TDB_DATA* make_pipe_rec_key( struct pipe_open_rec *prec )
 {
-       extern int Client;
-       struct connect_record crec;
-       pstring fname;
-       int fd=-1;
-       int i,foundi= -1;
-       int total_recs;
+       TDB_DATA *kbuf = NULL;
+       fstring key_string;
        
-       if (max_connections <= 0)
-               return(True);
+       if ( !prec )
+               return NULL;
        
-       DEBUG(5,("trying claim %s %s %d\n",lp_lockdir(),name,max_connections));
-       
-       pstrcpy(fname,lp_lockdir());
-       trim_string(fname,"","/");
+       if ( (kbuf = TALLOC_P(prec, TDB_DATA)) == NULL ) {
+               return NULL;
+       }
        
-       if (!directory_exist(fname,NULL))
-               mkdir(fname,0755);
+       snprintf( key_string, sizeof(key_string), "%s/%d/%d",
+               prec->name, procid_to_pid(&prec->pid), prec->pnum );
+               
+       if ( (kbuf->dptr = talloc_strdup(prec, key_string)) == NULL )
+               return NULL;
+               
+       kbuf->dsize = strlen(key_string)+1;
        
-       pstrcat(fname,"/");
-       pstrcat(fname,name);
-       pstrcat(fname,".LCK");
+       return kbuf;
+}
+
+/*********************************************************************
+*********************************************************************/
+
+static void fill_pipe_open_rec( struct pipe_open_rec *prec, smb_np_struct *p )
+{
+       prec->pid = pid_to_procid(sys_getpid());
+       prec->pnum = p->pnum;
+       prec->uid = geteuid();
+       fstrcpy( prec->name, p->name );
+
+       return;
+}
+
+/*********************************************************************
+*********************************************************************/
+
+BOOL store_pipe_opendb( smb_np_struct *p )
+{
+       struct pipe_open_rec *prec;
+       TDB_DATA *key;
+       TDB_DATA data;
+       TDB_CONTEXT *pipe_tdb;
+       BOOL ret = False;
        
-       if (!file_exist(fname,NULL)) {
-               fd = sys_open(fname,O_RDWR|O_CREAT|O_EXCL, 0644);
+       if ( (prec = TALLOC_P( NULL, struct pipe_open_rec)) == NULL ) {
+               DEBUG(0,("store_pipe_opendb: talloc failed!\n"));
+               return False;
        }
-
-       if (fd == -1) {
-               fd = sys_open(fname,O_RDWR,0);
+       
+       fill_pipe_open_rec( prec, p );
+       if ( (key = make_pipe_rec_key( prec )) == NULL ) {
+               goto done;
        }
        
-       if (fd == -1) {
-               DEBUG(1,("couldn't open lock file %s\n",fname));
-               return(False);
+       data.dptr = (char*)prec;
+       data.dsize = sizeof(struct pipe_open_rec);
+       
+       if ( (pipe_tdb = conn_tdb_ctx() ) == NULL ) {
+               goto done;
        }
+       
+       ret = (tdb_store( pipe_tdb, *key, data, TDB_REPLACE ) != -1);
+       
+done:
+       TALLOC_FREE( prec );    
+       return ret;
+}
 
-       if (fcntl_lock(fd,SMB_F_SETLKW,0,1,F_WRLCK)==False) {
-               DEBUG(0,("ERROR: can't get lock on %s\n", fname));
-               return False;
-       }
+/*********************************************************************
+*********************************************************************/
 
-       total_recs = get_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)) {
-                       if(sys_lseek(fd,i*sizeof(crec),SEEK_SET) != i*sizeof(crec)) {
-              DEBUG(0,("claim_connection: ERROR: sys_lseek failed to seek \
-to %d\n", (int)(i*sizeof(crec)) ));
-              continue;
-            }
-                       memset((void *)&crec,'\0',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;
-               }
-       }  
-       
-       if (foundi < 0) {
-               DEBUG(3,("no free locks in %s\n",fname));
-               if (fcntl_lock(fd,SMB_F_SETLKW,0,1,F_UNLCK)==False) {
-                       DEBUG(0,("ERROR: can't release lock on %s\n", fname));
-               }
-               close(fd);
-               return(False);
-       }      
+BOOL delete_pipe_opendb( smb_np_struct *p )
+{
+       struct pipe_open_rec *prec;
+       TDB_DATA *key;
+       TDB_CONTEXT *pipe_tdb;
+       BOOL ret = False;
        
-       /* fill in the crec */
-       memset((void *)&crec,'\0',sizeof(crec));
-       crec.magic = 0x280267;
-       crec.pid = getpid();
-       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;
+       if ( (prec = TALLOC_P( NULL, struct pipe_open_rec)) == NULL ) {
+               DEBUG(0,("store_pipe_opendb: talloc failed!\n"));
+               return False;
        }
-       crec.start = time(NULL);
        
-       StrnCpy(crec.machine,remote_machine,sizeof(crec.machine)-1);
-       StrnCpy(crec.addr,client_addr(Client),sizeof(crec.addr)-1);
+       fill_pipe_open_rec( prec, p );
+       if ( (key = make_pipe_rec_key( prec )) == NULL ) {
+               goto done;
+       }
        
-       /* 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,SMB_F_SETLKW,0,1,F_UNLCK)==False) {
-                       DEBUG(0,("ERROR: can't release lock on %s\n", fname));
-               }
-               close(fd);
-               return(False);
+       if ( (pipe_tdb = conn_tdb_ctx() ) == NULL ) {
+               goto done;
        }
 
-       if (fcntl_lock(fd,SMB_F_SETLKW,0,1,F_UNLCK)==False) {
-               DEBUG(0,("ERROR: can't release lock on %s\n", fname));
-       }
+       ret = (tdb_delete( pipe_tdb, *key ) != -1 );
        
-       close(fd);
-       return(True);
+done:
+       TALLOC_FREE( prec );
+       return ret;
 }