/* Unix SMB/CIFS implementation. SMB NT transaction handling Copyright (C) Jeremy Allison 1994-1998 Copyright (C) Stefan (metze) Metzmacher 2003 This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #include "includes.h" extern int Protocol; extern int smb_read_error; extern int global_oplock_break; extern BOOL case_sensitive; extern BOOL case_preserve; extern BOOL short_case_preserve; extern struct current_user current_user; static const char *known_nt_pipes[] = { "\\LANMAN", "\\srvsvc", "\\samr", "\\wkssvc", "\\NETLOGON", "\\ntlsa", "\\ntsvcs", "\\lsass", "\\lsarpc", "\\winreg", "\\spoolss", "\\netdfs", "\\rpcecho", "\\epmapper", NULL }; /* Map generic permissions to file object specific permissions */ struct generic_mapping file_generic_mapping = { FILE_GENERIC_READ, FILE_GENERIC_WRITE, FILE_GENERIC_EXECUTE, FILE_GENERIC_ALL }; static char *nttrans_realloc(char **ptr, size_t size) { char *tptr = NULL; if (ptr==NULL) smb_panic("nttrans_realloc() called with NULL ptr\n"); tptr = Realloc_zero(*ptr, size); if(tptr == NULL) { *ptr = NULL; return NULL; } *ptr = tptr; return tptr; } /**************************************************************************** Send the required number of replies back. We assume all fields other than the data fields are set correctly for the type of call. HACK ! Always assumes smb_setup field is zero. ****************************************************************************/ static int send_nt_replies(char *inbuf, char *outbuf, int bufsize, NTSTATUS nt_error, char *params, int paramsize, char *pdata, int datasize) { extern int max_send; int data_to_send = datasize; int params_to_send = paramsize; int useable_space; char *pp = params; char *pd = pdata; int params_sent_thistime, data_sent_thistime, total_sent_thistime; int alignment_offset = 3; int data_alignment_offset = 0; /* * Initially set the wcnt area to be 18 - this is true for all * transNT replies. */ set_message(outbuf,18,0,True); if (NT_STATUS_V(nt_error)) ERROR_NT(nt_error); /* * If there genuinely are no parameters or data to send just send * the empty packet. */ if(params_to_send == 0 && data_to_send == 0) { if (!send_smb(smbd_server_fd(),outbuf)) exit_server("send_nt_replies: send_smb failed."); return 0; } /* * When sending params and data ensure that both are nicely aligned. * Only do this alignment when there is also data to send - else * can cause NT redirector problems. */ if (((params_to_send % 4) != 0) && (data_to_send != 0)) data_alignment_offset = 4 - (params_to_send % 4); /* * Space is bufsize minus Netbios over TCP header minus SMB header. * The alignment_offset is to align the param bytes on a four byte * boundary (2 bytes for data len, one byte pad). * NT needs this to work correctly. */ useable_space = bufsize - ((smb_buf(outbuf)+ alignment_offset+data_alignment_offset) - outbuf); /* * useable_space can never be more than max_send minus the * alignment offset. */ useable_space = MIN(useable_space, max_send - (alignment_offset+data_alignment_offset)); while (params_to_send || data_to_send) { /* * Calculate whether we will totally or partially fill this packet. */ total_sent_thistime = params_to_send + data_to_send + alignment_offset + data_alignment_offset; /* * We can never send more than useable_space. */ total_sent_thistime = MIN(total_sent_thistime, useable_space); set_message(outbuf, 18, total_sent_thistime, True); /* * Set total params and data to be sent. */ SIVAL(outbuf,smb_ntr_TotalParameterCount,paramsize); SIVAL(outbuf,smb_ntr_TotalDataCount,datasize); /* * Calculate how many parameters and data we can fit into * this packet. Parameters get precedence. */ params_sent_thistime = MIN(params_to_send,useable_space); data_sent_thistime = useable_space - params_sent_thistime; data_sent_thistime = MIN(data_sent_thistime,data_to_send); SIVAL(outbuf,smb_ntr_ParameterCount,params_sent_thistime); if(params_sent_thistime == 0) { SIVAL(outbuf,smb_ntr_ParameterOffset,0); SIVAL(outbuf,smb_ntr_ParameterDisplacement,0); } else { /* * smb_ntr_ParameterOffset is the offset from the start of the SMB header to the * parameter bytes, however the first 4 bytes of outbuf are * the Netbios over TCP header. Thus use smb_base() to subtract * them from the calculation. */ SIVAL(outbuf,smb_ntr_ParameterOffset, ((smb_buf(outbuf)+alignment_offset) - smb_base(outbuf))); /* * Absolute displacement of param bytes sent in this packet. */ SIVAL(outbuf,smb_ntr_ParameterDisplacement,pp - params); } /* * Deal with the data portion. */ SIVAL(outbuf,smb_ntr_DataCount, data_sent_thistime); if(data_sent_thistime == 0) { SIVAL(outbuf,smb_ntr_DataOffset,0); SIVAL(outbuf,smb_ntr_DataDisplacement, 0); } else { /* * The offset of the data bytes is the offset of the * parameter bytes plus the number of parameters being sent this time. */ SIVAL(outbuf,smb_ntr_DataOffset,((smb_buf(outbuf)+alignment_offset) - smb_base(outbuf)) + params_sent_thistime + data_alignment_offset); SIVAL(outbuf,smb_ntr_DataDisplacement, pd - pdata); } /* * Copy the param bytes into the packet. */ if(params_sent_thistime) memcpy((smb_buf(outbuf)+alignment_offset),pp,params_sent_thistime); /* * Copy in the data bytes */ if(data_sent_thistime) memcpy(smb_buf(outbuf)+alignment_offset+params_sent_thistime+ data_alignment_offset,pd,data_sent_thistime); DEBUG(9,("nt_rep: params_sent_thistime = %d, data_sent_thistime = %d, useable_space = %d\n", params_sent_thistime, data_sent_thistime, useable_space)); DEBUG(9,("nt_rep: params_to_send = %d, data_to_send = %d, paramsize = %d, datasize = %d\n", params_to_send, data_to_send, paramsize, datasize)); /* Send the packet */ if (!send_smb(smbd_server_fd(),outbuf)) exit_server("send_nt_replies: send_smb failed."); pp += params_sent_thistime; pd += data_sent_thistime; params_to_send -= params_sent_thistime; data_to_send -= data_sent_thistime; /* * Sanity check */ if(params_to_send < 0 || data_to_send < 0) { DEBUG(0,("send_nt_replies failed sanity check pts = %d, dts = %d\n!!!", params_to_send, data_to_send)); return -1; } } return 0; } /**************************************************************************** Save case statics. ****************************************************************************/ static BOOL saved_case_sensitive; static BOOL saved_case_preserve; static BOOL saved_short_case_preserve; /**************************************************************************** Save case semantics. ****************************************************************************/ static void set_posix_case_semantics(uint32 file_attributes) { if(!(file_attributes & FILE_FLAG_POSIX_SEMANTICS)) return; saved_case_sensitive = case_sensitive; saved_case_preserve = case_preserve; saved_short_case_preserve = short_case_preserve; /* Set to POSIX. */ case_sensitive = True; case_preserve = True; short_case_preserve = True; } /**************************************************************************** Restore case semantics. ****************************************************************************/ static void restore_case_semantics(uint32 file_attributes) { if(!(file_attributes & FILE_FLAG_POSIX_SEMANTICS)) return; case_sensitive = saved_case_sensitive; case_preserve = saved_case_preserve; short_case_preserve = saved_short_case_preserve; } /**************************************************************************** Utility function to map create disposition. ****************************************************************************/ static int map_create_disposition( uint32 create_disposition) { int ret; switch( create_disposition ) { case FILE_CREATE: /* create if not exist, fail if exist */ ret = (FILE_CREATE_IF_NOT_EXIST|FILE_EXISTS_FAIL); break; case FILE_SUPERSEDE: case FILE_OVERWRITE_IF: /* create if not exist, trunc if exist */ ret = (FILE_CREATE_IF_NOT_EXIST|FILE_EXISTS_TRUNCATE); break; case FILE_OPEN: /* fail if not exist, open if exists */ ret = (FILE_FAIL_IF_NOT_EXIST|FILE_EXISTS_OPEN); break; case FILE_OPEN_IF: /* create if not exist, open if exists */ ret = (FILE_CREATE_IF_NOT_EXIST|FILE_EXISTS_OPEN); break; case FILE_OVERWRITE: /* fail if not exist, truncate if exists */ ret = (FILE_FAIL_IF_NOT_EXIST|FILE_EXISTS_TRUNCATE); break; default: DEBUG(0,("map_create_disposition: Incorrect value for create_disposition = %d\n", create_disposition )); return -1; } DEBUG(10,("map_create_disposition: Mapped create_disposition 0x%lx to 0x%x\n", (unsigned long)create_disposition, ret )); return ret; } /**************************************************************************** Utility function to map share modes. ****************************************************************************/ static int map_share_mode( char *fname, uint32 create_options, uint32 *desired_access, uint32 share_access, uint32 file_attributes) { int smb_open_mode = -1; /* * Convert GENERIC bits to specific bits. */ se_map_generic(desired_access, &file_generic_mapping); switch( *desired_access & (FILE_READ_DATA|FILE_WRITE_DATA|FILE_APPEND_DATA) ) { case FILE_READ_DATA: smb_open_mode = DOS_OPEN_RDONLY; break; case FILE_WRITE_DATA: case FILE_APPEND_DATA: case FILE_WRITE_DATA|FILE_APPEND_DATA: smb_open_mode = DOS_OPEN_WRONLY; break; case FILE_READ_DATA|FILE_WRITE_DATA: case FILE_READ_DATA|FILE_WRITE_DATA|FILE_APPEND_DATA: case FILE_READ_DATA|FILE_APPEND_DATA: smb_open_mode = DOS_OPEN_RDWR; break; } /* * NB. For DELETE_ACCESS we should really check the * directory permissions, as that is what controls * delete, and for WRITE_DAC_ACCESS we should really * check the ownership, as that is what controls the * chmod. Note that this is *NOT* a security hole (this * note is for you, Andrew) as we are not *allowing* * the access at this point, the actual unlink or * chown or chmod call would do this. We are just helping * clients out by telling them if they have a hope * of any of this succeeding. POSIX acls may still * deny the real call. JRA. */ if (smb_open_mode == -1) { if(*desired_access & (DELETE_ACCESS|WRITE_DAC_ACCESS|WRITE_OWNER_ACCESS|SYNCHRONIZE_ACCESS| FILE_EXECUTE|FILE_READ_ATTRIBUTES| FILE_READ_EA|FILE_WRITE_EA|SYSTEM_SECURITY_ACCESS| FILE_WRITE_ATTRIBUTES|READ_CONTROL_ACCESS)) { smb_open_mode = DOS_OPEN_RDONLY; } else if(*desired_access == 0) { /* * JRA - NT seems to sometimes send desired_access as zero. play it safe * and map to a stat open. */ smb_open_mode = DOS_OPEN_RDONLY; } else { DEBUG(0,("map_share_mode: Incorrect value 0x%lx for desired_access to file %s\n", (unsigned long)*desired_access, fname)); return -1; } } /* * Set the special bit that means allow share delete. * This is held outside the normal share mode bits at 1<<15. * JRA. */ if(share_access & FILE_SHARE_DELETE) { smb_open_mode |= ALLOW_SHARE_DELETE; DEBUG(10,("map_share_mode: FILE_SHARE_DELETE requested. open_mode = 0x%x\n", smb_open_mode)); } /* * We need to store the intent to open for Delete. This * is what determines if a delete on close flag can be set. * This is the wrong way (and place) to store this, but for 2.2 this * is the only practical way. JRA. */ if(*desired_access & DELETE_ACCESS) { DEBUG(10,("map_share_mode: DELETE_ACCESS requested. open_mode = 0x%x\n", smb_open_mode)); } if (create_options & FILE_DELETE_ON_CLOSE) { /* Implicit delete access is *NOT* requested... */ smb_open_mode |= DELETE_ON_CLOSE_FLAG; DEBUG(10,("map_share_mode: FILE_DELETE_ON_CLOSE requested. open_mode = 0x%x\n", smb_open_mode)); } /* Add in the requested share mode. */ switch( share_access & (FILE_SHARE_READ|FILE_SHARE_WRITE)) { case FILE_SHARE_READ: smb_open_mode |= SET_DENY_MODE(DENY_WRITE); break; case FILE_SHARE_WRITE: smb_open_mode |= SET_DENY_MODE(DENY_READ); break; case (FILE_SHARE_READ|FILE_SHARE_WRITE): smb_open_mode |= SET_DENY_MODE(DENY_NONE); break; case FILE_SHARE_NONE: smb_open_mode |= SET_DENY_MODE(DENY_ALL); break; } /* * Handle an O_SYNC request. */ if(file_attributes & FILE_FLAG_WRITE_THROUGH) smb_open_mode |= FILE_SYNC_OPENMODE; DEBUG(10,("map_share_mode: Mapped desired access 0x%lx, share access 0x%lx, file attributes 0x%lx \ to open_mode 0x%x\n", (unsigned long)*desired_access, (unsigned long)share_access, (unsigned long)file_attributes, smb_open_mode )); return smb_open_mode; } /**************************************************************************** Reply to an NT create and X call on a pipe. ****************************************************************************/ static int nt_open_pipe(char *fname, connection_struct *conn, char *inbuf, char *outbuf, int *ppnum) { smb_np_struct *p = NULL; uint16 vuid = SVAL(inbuf, smb_uid); int i; DEBUG(4,("nt_open_pipe: Opening pipe %s.\n", fname)); /* See if it is one we want to handle. */ if (lp_disable_spoolss() && strequal(fname, "\\spoolss")) return(ERROR_BOTH(NT_STATUS_OBJECT_NAME_NOT_FOUND,ERRDOS,ERRbadpipe)); for( i = 0; known_nt_pipes[i]; i++ ) if( strequal(fname,known_nt_pipes[i])) break; if ( known_nt_pipes[i] == NULL ) return(ERROR_BOTH(NT_STATUS_OBJECT_NAME_NOT_FOUND,ERRDOS,ERRbadpipe)); /* Strip \\ off the name. */ fname++; DEBUG(3,("nt_open_pipe: Known pipe %s opening.\n", fname)); p = open_rpc_pipe_p(fname, conn, vuid); if (!p) return(ERROR_DOS(ERRSRV,ERRnofids)); *ppnum = p->pnum; return 0; } /**************************************************************************** Reply to an NT create and X call for pipes. ****************************************************************************/ static int do_ntcreate_pipe_open(connection_struct *conn, char *inbuf,char *outbuf,int length,int bufsize) { pstring fname; int ret; int pnum = -1; char *p = NULL; NTSTATUS status; srvstr_get_path(inbuf, fname, smb_buf(inbuf), sizeof(fname), STR_TERMINATE,&status); if (!NT_STATUS_IS_OK(status)) return ERROR_NT(status); if ((ret = nt_open_pipe(fname, conn, inbuf, outbuf, &pnum)) != 0) return ret; /* * Deal with pipe return. */ set_message(outbuf,34,0,True); p = outbuf + smb_vwv2; p++; SSVAL(p,0,pnum); p += 2; SIVAL(p,0,FILE_WAS_OPENED); p += 4; p += 32; SIVAL(p,0,FILE_ATTRIBUTE_NORMAL); /* File Attributes. */ p += 20; /* File type. */ SSVAL(p,0,FILE_TYPE_MESSAGE_MODE_PIPE); /* Device state. */ SSVAL(p,2, 0x5FF); /* ? */ DEBUG(5,("do_ntcreate_pipe_open: open pipe = %s\n", fname)); return chain_reply(inbuf,outbuf,length,bufsize); } /**************************************************************************** Reply to an NT create and X call. ****************************************************************************/ int reply_ntcreate_and_X(connection_struct *conn, char *inbuf,char *outbuf,int length,int bufsize) { int result; pstring fname; enum FAKE_FILE_TYPE fake_file_type = FAKE_FILE_TYPE_NONE; uint32 flags = IVAL(inbuf,smb_ntcreate_Flags); uint32 desired_access = IVAL(inbuf,smb_ntcreate_DesiredAccess); uint32 file_attributes = IVAL(inbuf,smb_ntcreate_FileAttributes); uint32 share_access = IVAL(inbuf,smb_ntcreate_ShareAccess); uint32 create_disposition = IVAL(inbuf,smb_ntcreate_CreateDisposition); uint32 create_options = IVAL(inbuf,smb_ntcreate_CreateOptions); uint16 root_dir_fid = (uint16)IVAL(inbuf,smb_ntcreate_RootDirectoryFid); SMB_BIG_UINT allocation_size = 0; int smb_ofun; int smb_open_mode; int smb_attr = (file_attributes & SAMBA_ATTRIBUTES_MASK); /* Breakout the oplock request bits so we can set the reply bits separately. */ int oplock_request = 0; mode_t unixmode; int fmode=0,rmode=0; SMB_OFF_T file_len = 0; SMB_STRUCT_STAT sbuf; int smb_action = 0; BOOL bad_path = False; files_struct *fsp=NULL; char *p = NULL; time_t c_time; BOOL extended_oplock_granted = False; NTSTATUS status; START_PROFILE(SMBntcreateX); DEBUG(10,("reply_ntcreateX: flags = 0x%x, desired_access = 0x%x \ file_attributes = 0x%x, share_access = 0x%x, create_disposition = 0x%x \ create_options = 0x%x root_dir_fid = 0x%x\n", flags, desired_access, file_attributes, share_access, create_disposition, create_options, root_dir_fid )); /* If it's an IPC, use the pipe handler. */ if (IS_IPC(conn)) { if (lp_nt_pipe_support()) { END_PROFILE(SMBntcreateX); return do_ntcreate_pipe_open(conn,inbuf,outbuf,length,bufsize); } else { END_PROFILE(SMBntcreateX); return(ERROR_DOS(ERRDOS,ERRnoaccess)); } } if (create_options & FILE_OPEN_BY_FILE_ID) { END_PROFILE(SMBntcreateX); return ERROR_NT(NT_STATUS_NOT_SUPPORTED); } /* * We need to construct the open_and_X ofun value from the * NT values, as that's what our code is structured to accept. */ if((smb_ofun = map_create_disposition( create_disposition )) == -1) { END_PROFILE(SMBntcreateX); return(ERROR_DOS(ERRDOS,ERRnoaccess)); } /* * Get the file name. */ if(root_dir_fid != 0) { /* * This filename is relative to a directory fid. */ files_struct *dir_fsp = file_fsp(inbuf,smb_ntcreate_RootDirectoryFid); size_t dir_name_len; if(!dir_fsp) { END_PROFILE(SMBntcreateX); return(ERROR_DOS(ERRDOS,ERRbadfid)); } if(!dir_fsp->is_directory) { srvstr_get_path(inbuf, fname, smb_buf(inbuf), sizeof(fname), STR_TERMINATE,&status); if (!NT_STATUS_IS_OK(status)) { END_PROFILE(SMBntcreateX); return ERROR_NT(status); } /* * Check to see if this is a mac fork of some kind. */ if( strchr_m(fname, ':')) { END_PROFILE(SMBntcreateX); return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND); } /* we need to handle the case when we get a relative open relative to a file and the pathname is blank - this is a reopen! (hint from demyn plantenberg) */ END_PROFILE(SMBntcreateX); return(ERROR_DOS(ERRDOS,ERRbadfid)); } /* * Copy in the base directory name. */ pstrcpy( fname, dir_fsp->fsp_name ); dir_name_len = strlen(fname); /* * Ensure it ends in a '\'. */ if(fname[dir_name_len-1] != '\\' && fname[dir_name_len-1] != '/') { pstrcat(fname, "\\"); dir_name_len++; } srvstr_get_path(inbuf, &fname[dir_name_len], smb_buf(inbuf), sizeof(fname)-dir_name_len, STR_TERMINATE,&status); if (!NT_STATUS_IS_OK(status)) { END_PROFILE(SMBntcreateX); return ERROR_NT(status); } } else { srvstr_get_path(inbuf, fname, smb_buf(inbuf), sizeof(fname), STR_TERMINATE,&status); if (!NT_STATUS_IS_OK(status)) { END_PROFILE(SMBntcreateX); return ERROR_NT(status); } /* * Check to see if this is a mac fork of some kind. */ if( strchr_m(fname, ':')) { #ifdef HAVE_SYS_QUOTAS if ((fake_file_type=is_fake_file(fname))!=FAKE_FILE_TYPE_NONE) { /* * here we go! support for changing the disk quotas --metze * * we need to fake up to open this MAGIC QUOTA file * and return a valid FID * * w2k close this file directly after openening * xp also tries a QUERY_FILE_INFO on the file and then close it */ } else { #endif END_PROFILE(SMBntcreateX); return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND); #ifdef HAVE_SYS_QUOTAS } #endif } } /* * Now contruct the smb_open_mode value from the filename, * desired access and the share access. */ RESOLVE_DFSPATH(fname, conn, inbuf, outbuf); if((smb_open_mode = map_share_mode(fname, create_options, &desired_access, share_access, file_attributes)) == -1) { END_PROFILE(SMBntcreateX); return ERROR_DOS(ERRDOS,ERRnoaccess); } oplock_request = (flags & REQUEST_OPLOCK) ? EXCLUSIVE_OPLOCK : 0; if (oplock_request) { oplock_request |= (flags & REQUEST_BATCH_OPLOCK) ? BATCH_OPLOCK : 0; } /* * Ordinary file or directory. */ /* * Check if POSIX semantics are wanted. */ set_posix_case_semantics(file_attributes); unix_convert(fname,conn,0,&bad_path,&sbuf); unixmode = unix_mode(conn,smb_attr | aARCH, fname); /* * If it's a request for a directory open, deal with it separately. */ if(create_options & FILE_DIRECTORY_FILE) { oplock_request = 0; /* Can't open a temp directory. IFS kit test. */ if (file_attributes & FILE_ATTRIBUTE_TEMPORARY) { END_PROFILE(SMBntcreateX); return ERROR_NT(NT_STATUS_INVALID_PARAMETER); } fsp = open_directory(conn, fname, &sbuf, desired_access, smb_open_mode, smb_ofun, unixmode, &smb_action); restore_case_semantics(file_attributes); if(!fsp) { END_PROFILE(SMBntcreateX); return set_bad_path_error(errno, bad_path, outbuf, ERRDOS,ERRnoaccess); } } else { /* * Ordinary file case. */ /* NB. We have a potential bug here. If we * cause an oplock break to ourselves, then we * could end up processing filename related * SMB requests whilst we await the oplock * break response. As we may have changed the * filename case semantics to be POSIX-like, * this could mean a filename request could * fail when it should succeed. This is a rare * condition, but eventually we must arrange * to restore the correct case semantics * before issuing an oplock break request to * our client. JRA. */ if (fake_file_type==FAKE_FILE_TYPE_NONE) { fsp = open_file_shared1(conn,fname,&sbuf, desired_access, smb_open_mode, smb_ofun,unixmode, oplock_request, &rmode,&smb_action); } else { /* to open a fake_file --metze */ fsp = open_fake_file_shared1(fake_file_type,conn,fname,&sbuf, desired_access, smb_open_mode, smb_ofun,unixmode, oplock_request, &rmode,&smb_action); } if (!fsp) { /* We cheat here. There are two cases we * care about. One is a directory rename, * where the NT client will attempt to * open the source directory for * DELETE access. Note that when the * NT client does this it does *not* * set the directory bit in the * request packet. This is translated * into a read/write open * request. POSIX states that any open * for write request on a directory * will generate an EISDIR error, so * we can catch this here and open a * pseudo handle that is flagged as a * directory. The second is an open * for a permissions read only, which * we handle in the open_file_stat case. JRA. */ if(errno == EISDIR) { /* * Fail the open if it was explicitly a non-directory file. */ if (create_options & FILE_NON_DIRECTORY_FILE) { restore_case_semantics(file_attributes); SSVAL(outbuf, smb_flg2, SVAL(outbuf,smb_flg2) | FLAGS2_32_BIT_ERROR_CODES); END_PROFILE(SMBntcreateX); return ERROR_NT(NT_STATUS_FILE_IS_A_DIRECTORY); } oplock_request = 0; fsp = open_directory(conn, fname, &sbuf, desired_access, smb_open_mode, smb_ofun, unixmode, &smb_action); if(!fsp) { restore_case_semantics(file_attributes); END_PROFILE(SMBntcreateX); return set_bad_path_error(errno, bad_path, outbuf, ERRDOS,ERRnoaccess); } } else { restore_case_semantics(file_attributes); END_PROFILE(SMBntcreateX); return set_bad_path_error(errno, bad_path, outbuf, ERRDOS,ERRnoaccess); } } } restore_case_semantics(file_attributes); file_len = sbuf.st_size; fmode = dos_mode(conn,fname,&sbuf); if(fmode == 0) fmode = FILE_ATTRIBUTE_NORMAL; if (!fsp->is_directory && (fmode & aDIR)) { close_file(fsp,False); END_PROFILE(SMBntcreateX); return ERROR_DOS(ERRDOS,ERRnoaccess); } /* Save the requested allocation size. */ allocation_size = (SMB_BIG_UINT)IVAL(inbuf,smb_ntcreate_AllocationSize); #ifdef LARGE_SMB_OFF_T allocation_size |= (((SMB_BIG_UINT)IVAL(inbuf,smb_ntcreate_AllocationSize + 4)) << 32); #endif if (allocation_size && (allocation_size > (SMB_BIG_UINT)file_len)) { fsp->initial_allocation_size = SMB_ROUNDUP(allocation_size,SMB_ROUNDUP_ALLOCATION_SIZE); if (vfs_allocate_file_space(fsp, fsp->initial_allocation_size) == -1) { close_file(fsp,False); END_PROFILE(SMBntcreateX); return ERROR_NT(NT_STATUS_DISK_FULL); } } else { fsp->initial_allocation_size = SMB_ROUNDUP(((SMB_BIG_UINT)file_len),SMB_ROUNDUP_ALLOCATION_SIZE); } /* * If the caller set the extended oplock request bit * and we granted one (by whatever means) - set the * correct bit for extended oplock reply. */ if (oplock_request && lp_fake_oplocks(SNUM(conn))) extended_oplock_granted = True; if(oplock_request && EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) extended_oplock_granted = True; #if 0 /* W2K sends back 42 words here ! If we do the same it breaks offline sync. Go figure... ? JRA. */ set_message(outbuf,42,0,True); #else set_message(outbuf,34,0,True); #endif p = outbuf + smb_vwv2; /* * Currently as we don't support level II oplocks we just report * exclusive & batch here. */ if (extended_oplock_granted) { if (flags & REQUEST_BATCH_OPLOCK) { SCVAL(p,0, BATCH_OPLOCK_RETURN); } else { SCVAL(p,0, EXCLUSIVE_OPLOCK_RETURN); } } else if (LEVEL_II_OPLOCK_TYPE(fsp->oplock_type)) { SCVAL(p,0, LEVEL_II_OPLOCK_RETURN); } else { SCVAL(p,0,NO_OPLOCK_RETURN); } p++; SSVAL(p,0,fsp->fnum); p += 2; if ((create_disposition == FILE_SUPERSEDE) && (smb_action == FILE_WAS_OVERWRITTEN)) SIVAL(p,0,FILE_WAS_SUPERSEDED); else SIVAL(p,0,smb_action); p += 4; /* Create time. */ c_time = get_create_time(&sbuf,lp_fake_dir_create_times(SNUM(conn))); if (lp_dos_filetime_resolution(SNUM(conn))) { c_time &= ~1; sbuf.st_atime &= ~1; sbuf.st_mtime &= ~1; sbuf.st_mtime &= ~1; } put_long_date(p,c_time); p += 8; put_long_date(p,sbuf.st_atime); /* access time */ p += 8; put_long_date(p,sbuf.st_mtime); /* write time */ p += 8; put_long_date(p,sbuf.st_mtime); /* change time */ p += 8; SIVAL(p,0,fmode); /* File Attributes. */ p += 4; SOFF_T(p, 0, get_allocation_size(fsp,&sbuf)); p += 8; SOFF_T(p,0,file_len); p += 12; SCVAL(p,0,fsp->is_directory ? 1 : 0); DEBUG(5,("reply_ntcreate_and_X: fnum = %d, open name = %s\n", fsp->fnum, fsp->fsp_name)); result = chain_reply(inbuf,outbuf,length,bufsize); END_PROFILE(SMBntcreateX); return result; } /**************************************************************************** Reply to a NT_TRANSACT_CREATE call to open a pipe. ****************************************************************************/ static int do_nt_transact_create_pipe( connection_struct *conn, char *inbuf, char *outbuf, int length, int bufsize, char **ppsetup, uint32 setup_count, char **ppparams, uint32 parameter_count, char **ppdata, uint32 data_count) { pstring fname; char *params = *ppparams; int ret; int pnum = -1; char *p = NULL; NTSTATUS status; /* * Ensure minimum number of parameters sent. */ if(parameter_count < 54) { DEBUG(0,("do_nt_transact_create_pipe - insufficient parameters (%u)\n", (unsigned int)parameter_count)); return ERROR_DOS(ERRDOS,ERRnoaccess); } srvstr_pull(inbuf, fname, params+53, sizeof(fname), parameter_count-53, STR_TERMINATE); status = check_path_syntax(fname); if (!NT_STATUS_IS_OK(status)) { return ERROR_NT(status); } if ((ret = nt_open_pipe(fname, conn, inbuf, outbuf, &pnum)) != 0) return ret; /* Realloc the size of parameters and data we will return */ params = nttrans_realloc(ppparams, 69); if(params == NULL) return ERROR_DOS(ERRDOS,ERRnomem); p = params; SCVAL(p,0,NO_OPLOCK_RETURN); p += 2; SSVAL(p,0,pnum); p += 2; SIVAL(p,0,FILE_WAS_OPENED); p += 8; p += 32; SIVAL(p,0,FILE_ATTRIBUTE_NORMAL); /* File Attributes. */ p += 20; /* File type. */ SSVAL(p,0,FILE_TYPE_MESSAGE_MODE_PIPE); /* Device state. */ SSVAL(p,2, 0x5FF); /* ? */ DEBUG(5,("do_nt_transact_create_pipe: open name = %s\n", fname)); /* Send the required number of replies */ send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_OK, params, 69, *ppdata, 0); return -1; } /**************************************************************************** Internal fn to set security descriptors. ****************************************************************************/ static NTSTATUS set_sd(files_struct *fsp, char *data, uint32 sd_len, uint32 security_info_sent) { prs_struct pd; SEC_DESC *psd = NULL; TALLOC_CTX *mem_ctx; BOOL ret; if (sd_len == 0) { return NT_STATUS_OK; } /* * Init the parse struct we will unmarshall from. */ if ((mem_ctx = talloc_init("set_sd")) == NULL) { DEBUG(0,("set_sd: talloc_init failed.\n")); return NT_STATUS_NO_MEMORY; } prs_init(&pd, 0, mem_ctx, UNMARSHALL); /* * Setup the prs_struct to point at the memory we just * allocated. */ prs_give_memory( &pd, data, sd_len, False); /* * Finally, unmarshall from the data buffer. */ if(!sec_io_desc( "sd data", &psd, &pd, 1)) { DEBUG(0,("set_sd: Error in unmarshalling security descriptor.\n")); /* * Return access denied for want of a better error message.. */ talloc_destroy(mem_ctx); return NT_STATUS_NO_MEMORY; } if (psd->off_owner_sid==0) security_info_sent &= ~OWNER_SECURITY_INFORMATION; if (psd->off_grp_sid==0) security_info_sent &= ~GROUP_SECURITY_INFORMATION; if (psd->off_sacl==0) security_info_sent &= ~SACL_SECURITY_INFORMATION; if (psd->off_dacl==0) security_info_sent &= ~DACL_SECURITY_INFORMATION; ret = SMB_VFS_FSET_NT_ACL( fsp, fsp->fd, security_info_sent, psd); if (!ret) { talloc_destroy(mem_ctx); return NT_STATUS_ACCESS_DENIED; } talloc_destroy(mem_ctx); return NT_STATUS_OK; } /**************************************************************************** Reply to a NT_TRANSACT_CREATE call (needs to process SD's). ****************************************************************************/ static int call_nt_transact_create(connection_struct *conn, char *inbuf, char *outbuf, int length, int bufsize, char **ppsetup, uint32 setup_count, char **ppparams, uint32 parameter_count, char **ppdata, uint32 data_count) { pstring fname; char *params = *ppparams; char *data = *ppdata; /* Breakout the oplock request bits so we can set the reply bits separately. */ int oplock_request = 0; mode_t unixmode; int fmode=0,rmode=0; SMB_OFF_T file_len = 0; SMB_STRUCT_STAT sbuf; int smb_action = 0; BOOL bad_path = False; files_struct *fsp = NULL; char *p = NULL; BOOL extended_oplock_granted = False; uint32 flags; uint32 desired_access; uint32 file_attributes; uint32 share_access; uint32 create_disposition; uint32 create_options; uint32 sd_len; uint16 root_dir_fid; SMB_BIG_UINT allocation_size = 0; int smb_ofun; int smb_open_mode; int smb_attr; time_t c_time; NTSTATUS nt_status; DEBUG(5,("call_nt_transact_create\n")); /* * If it's an IPC, use the pipe handler. */ if (IS_IPC(conn)) { if (lp_nt_pipe_support()) return do_nt_transact_create_pipe(conn, inbuf, outbuf, length, bufsize, ppsetup, setup_count, ppparams, parameter_count, ppdata, data_count); else return ERROR_DOS(ERRDOS,ERRnoaccess); } /* * Ensure minimum number of parameters sent. */ if(parameter_count < 54) { DEBUG(0,("call_nt_transact_create - insufficient parameters (%u)\n", (unsigned int)parameter_count)); return ERROR_DOS(ERRDOS,ERRnoaccess); } flags = IVAL(params,0); desired_access = IVAL(params,8); file_attributes = IVAL(params,20); share_access = IVAL(params,24); create_disposition = IVAL(params,28); create_options = IVAL(params,32); sd_len = IVAL(params,36); root_dir_fid = (uint16)IVAL(params,4); smb_attr = (file_attributes & SAMBA_ATTRIBUTES_MASK); if (create_options & FILE_OPEN_BY_FILE_ID) { return ERROR_NT(NT_STATUS_NOT_SUPPORTED); } /* * We need to construct the open_and_X ofun value from the * NT values, as that's what our code is structured to accept. */ if((smb_ofun = map_create_disposition( create_disposition )) == -1) return ERROR_DOS(ERRDOS,ERRbadmem); /* * Get the file name. */ if(root_dir_fid != 0) { /* * This filename is relative to a directory fid. */ files_struct *dir_fsp = file_fsp(params,4); size_t dir_name_len; if(!dir_fsp) return ERROR_DOS(ERRDOS,ERRbadfid); if(!dir_fsp->is_directory) { srvstr_pull(inbuf, fname, params+53, sizeof(fname), parameter_count-53, STR_TERMINATE); nt_status = check_path_syntax(fname); if (!NT_STATUS_IS_OK(nt_status)) { return ERROR_NT(nt_status); } /* * Check to see if this is a mac fork of some kind. */ if( strchr_m(fname, ':')) return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND); return ERROR_DOS(ERRDOS,ERRbadfid); } /* * Copy in the base directory name. */ pstrcpy( fname, dir_fsp->fsp_name ); dir_name_len = strlen(fname); /* * Ensure it ends in a '\'. */ if((fname[dir_name_len-1] != '\\') && (fname[dir_name_len-1] != '/')) { pstrcat(fname, "\\"); dir_name_len++; } srvstr_pull(inbuf, &fname[dir_name_len], params+53, sizeof(fname)-dir_name_len, parameter_count-53, STR_TERMINATE); nt_status = check_path_syntax(fname); if (!NT_STATUS_IS_OK(nt_status)) { return ERROR_NT(nt_status); } } else { srvstr_pull(inbuf, fname, params+53, sizeof(fname), parameter_count-53, STR_TERMINATE); nt_status = check_path_syntax(fname); if (!NT_STATUS_IS_OK(nt_status)) { return ERROR_NT(nt_status); } /* * Check to see if this is a mac fork of some kind. */ if( strchr_m(fname, ':')) return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND); } /* * Now contruct the smb_open_mode value from the desired access * and the share access. */ if((smb_open_mode = map_share_mode( fname, create_options, &desired_access, share_access, file_attributes)) == -1) return ERROR_DOS(ERRDOS,ERRnoaccess); oplock_request = (flags & REQUEST_OPLOCK) ? EXCLUSIVE_OPLOCK : 0; oplock_request |= (flags & REQUEST_BATCH_OPLOCK) ? BATCH_OPLOCK : 0; /* * Check if POSIX semantics are wanted. */ set_posix_case_semantics(file_attributes); RESOLVE_DFSPATH(fname, conn, inbuf, outbuf); unix_convert(fname,conn,0,&bad_path,&sbuf); unixmode = unix_mode(conn,smb_attr | aARCH, fname); /* * If it's a request for a directory open, deal with it separately. */ if(create_options & FILE_DIRECTORY_FILE) { /* Can't open a temp directory. IFS kit test. */ if (file_attributes & FILE_ATTRIBUTE_TEMPORARY) { return ERROR_NT(NT_STATUS_INVALID_PARAMETER); } oplock_request = 0; /* * We will get a create directory here if the Win32 * app specified a security descriptor in the * CreateDirectory() call. */ fsp = open_directory(conn, fname, &sbuf, desired_access, smb_open_mode, smb_ofun, unixmode, &smb_action); if(!fsp) { restore_case_semantics(file_attributes); return set_bad_path_error(errno, bad_path, outbuf, ERRDOS,ERRnoaccess); } } else { /* * Ordinary file case. */ fsp = open_file_shared1(conn,fname,&sbuf,desired_access, smb_open_mode,smb_ofun,unixmode, oplock_request,&rmode,&smb_action); if (!fsp) { if(errno == EISDIR) { /* * Fail the open if it was explicitly a non-directory file. */ if (create_options & FILE_NON_DIRECTORY_FILE) { restore_case_semantics(file_attributes); SSVAL(outbuf, smb_flg2, SVAL(outbuf,smb_flg2) | FLAGS2_32_BIT_ERROR_CODES); return ERROR_NT(NT_STATUS_FILE_IS_A_DIRECTORY); } oplock_request = 0; fsp = open_directory(conn, fname, &sbuf, desired_access, smb_open_mode, smb_ofun, unixmode, &smb_action); if(!fsp) { restore_case_semantics(file_attributes); return set_bad_path_error(errno, bad_path, outbuf, ERRDOS,ERRnoaccess); } } else { restore_case_semantics(file_attributes); return set_bad_path_error(errno, bad_path, outbuf, ERRDOS,ERRnoaccess); } } file_len = sbuf.st_size; fmode = dos_mode(conn,fname,&sbuf); if(fmode == 0) fmode = FILE_ATTRIBUTE_NORMAL; if (fmode & aDIR) { close_file(fsp,False); restore_case_semantics(file_attributes); return ERROR_DOS(ERRDOS,ERRnoaccess); } /* * If the caller set the extended oplock request bit * and we granted one (by whatever means) - set the * correct bit for extended oplock reply. */ if (oplock_request && lp_fake_oplocks(SNUM(conn))) extended_oplock_granted = True; if(oplock_request && EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) extended_oplock_granted = True; } /* * Now try and apply the desired SD. */ if (sd_len && !NT_STATUS_IS_OK(nt_status = set_sd( fsp, data, sd_len, ALL_SECURITY_INFORMATION))) { close_file(fsp,False); restore_case_semantics(file_attributes); return ERROR_NT(nt_status); } restore_case_semantics(file_attributes); /* Save the requested allocation size. */ allocation_size = (SMB_BIG_UINT)IVAL(params,12); #ifdef LARGE_SMB_OFF_T allocation_size |= (((SMB_BIG_UINT)IVAL(params,16)) << 32); #endif if (allocation_size && (allocation_size > file_len)) { fsp->initial_allocation_size = SMB_ROUNDUP(allocation_size,SMB_ROUNDUP_ALLOCATION_SIZE); if (vfs_allocate_file_space(fsp, fsp->initial_allocation_size) == -1) { close_file(fsp,False); return ERROR_NT(NT_STATUS_DISK_FULL); } } else { fsp->initial_allocation_size = SMB_ROUNDUP(((SMB_BIG_UINT)file_len),SMB_ROUNDUP_ALLOCATION_SIZE); } /* Realloc the size of parameters and data we will return */ params = nttrans_realloc(ppparams, 69); if(params == NULL) return ERROR_DOS(ERRDOS,ERRnomem); p = params; if (extended_oplock_granted) SCVAL(p,0, BATCH_OPLOCK_RETURN); else if (LEVEL_II_OPLOCK_TYPE(fsp->oplock_type)) SCVAL(p,0, LEVEL_II_OPLOCK_RETURN); else SCVAL(p,0,NO_OPLOCK_RETURN); p += 2; SSVAL(p,0,fsp->fnum); p += 2; if ((create_disposition == FILE_SUPERSEDE) && (smb_action == FILE_WAS_OVERWRITTEN)) SIVAL(p,0,FILE_WAS_SUPERSEDED); else SIVAL(p,0,smb_action); p += 8; /* Create time. */ c_time = get_create_time(&sbuf,lp_fake_dir_create_times(SNUM(conn))); if (lp_dos_filetime_resolution(SNUM(conn))) { c_time &= ~1; sbuf.st_atime &= ~1; sbuf.st_mtime &= ~1; sbuf.st_mtime &= ~1; } put_long_date(p,c_time); p += 8; put_long_date(p,sbuf.st_atime); /* access time */ p += 8; put_long_date(p,sbuf.st_mtime); /* write time */ p += 8; put_long_date(p,sbuf.st_mtime); /* change time */ p += 8; SIVAL(p,0,fmode); /* File Attributes. */ p += 4; SOFF_T(p, 0, get_allocation_size(fsp,&sbuf)); p += 8; SOFF_T(p,0,file_len); DEBUG(5,("call_nt_transact_create: open name = %s\n", fname)); /* Send the required number of replies */ send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_OK, params, 69, *ppdata, 0); return -1; } /**************************************************************************** Reply to a NT CANCEL request. ****************************************************************************/ int reply_ntcancel(connection_struct *conn, char *inbuf,char *outbuf,int length,int bufsize) { /* * Go through and cancel any pending change notifies. */ int mid = SVAL(inbuf,smb_mid); START_PROFILE(SMBntcancel); remove_pending_change_notify_requests_by_mid(mid); remove_pending_lock_requests_by_mid(mid); srv_cancel_sign_response(mid); DEBUG(3,("reply_ntcancel: cancel called on mid = %d.\n", mid)); END_PROFILE(SMBntcancel); return(-1); } /**************************************************************************** Reply to an unsolicited SMBNTtranss - just ignore it! ****************************************************************************/ int reply_nttranss(connection_struct *conn, char *inbuf,char *outbuf,int length,int bufsize) { START_PROFILE(SMBnttranss); DEBUG(4,("Ignoring nttranss of length %d\n",length)); END_PROFILE(SMBnttranss); return(-1); } /**************************************************************************** Reply to a notify change - queue the request and don't allow a directory to be opened. ****************************************************************************/ static int call_nt_transact_notify_change(connection_struct *conn, char *inbuf, char *outbuf, int length, int bufsize, char **ppsetup, uint32 setup_count, char **ppparams, uint32 parameter_count, char **ppdata, uint32 data_count) { char *setup = *ppsetup; files_struct *fsp; uint32 flags; if(setup_count < 6) return ERROR_DOS(ERRDOS,ERRbadfunc); fsp = file_fsp(setup,4); flags = IVAL(setup, 0); DEBUG(3,("call_nt_transact_notify_change\n")); if(!fsp) return ERROR_DOS(ERRDOS,ERRbadfid); if((!fsp->is_directory) || (conn != fsp->conn)) return ERROR_DOS(ERRDOS,ERRbadfid); if (!change_notify_set(inbuf, fsp, conn, flags)) return(UNIXERROR(ERRDOS,ERRbadfid)); DEBUG(3,("call_nt_transact_notify_change: notify change called on directory \ name = %s\n", fsp->fsp_name )); return -1; } /**************************************************************************** Reply to an NT transact rename command. ****************************************************************************/ static int call_nt_transact_rename(connection_struct *conn, char *inbuf, char *outbuf, int length, int bufsize, char **ppsetup, uint32 setup_count, char **ppparams, uint32 parameter_count, char **ppdata, uint32 data_count) { char *params = *ppparams; pstring new_name; files_struct *fsp = NULL; BOOL replace_if_exists = False; NTSTATUS status; if(parameter_count < 4) return ERROR_DOS(ERRDOS,ERRbadfunc); fsp = file_fsp(params, 0); replace_if_exists = (SVAL(params,2) & RENAME_REPLACE_IF_EXISTS) ? True : False; CHECK_FSP(fsp, conn); srvstr_pull(inbuf, new_name, params+4, sizeof(new_name), -1, STR_TERMINATE); status = check_path_syntax(new_name); if (!NT_STATUS_IS_OK(status)) { return ERROR_NT(status); } status = rename_internals(conn, fsp->fsp_name, new_name, replace_if_exists); if (!NT_STATUS_IS_OK(status)) return ERROR_NT(status); /* * Rename was successful. */ send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_OK, NULL, 0, NULL, 0); DEBUG(3,("nt transact rename from = %s, to = %s succeeded.\n", fsp->fsp_name, new_name)); /* * Win2k needs a changenotify request response before it will * update after a rename.. */ process_pending_change_notify_queue((time_t)0); return -1; } /****************************************************************************** Fake up a completely empty SD. *******************************************************************************/ static size_t get_null_nt_acl(TALLOC_CTX *mem_ctx, SEC_DESC **ppsd) { extern DOM_SID global_sid_World; size_t sd_size; *ppsd = make_standard_sec_desc( mem_ctx, &global_sid_World, &global_sid_World, NULL, &sd_size); if(!*ppsd) { DEBUG(0,("get_null_nt_acl: Unable to malloc space for security descriptor.\n")); sd_size = 0; } return sd_size; } /**************************************************************************** Reply to query a security descriptor. ****************************************************************************/ static int call_nt_transact_query_security_desc(connection_struct *conn, char *inbuf, char *outbuf, int length, int bufsize, char **ppsetup, uint32 setup_count, char **ppparams, uint32 parameter_count, char **ppdata, uint32 data_count) { uint32 max_data_count = IVAL(inbuf,smb_nt_MaxDataCount); char *params = *ppparams; char *data = *ppdata; prs_struct pd; SEC_DESC *psd = NULL; size_t sd_size; uint32 security_info_wanted; TALLOC_CTX *mem_ctx; files_struct *fsp = NULL; if(parameter_count < 8) return ERROR_DOS(ERRDOS,ERRbadfunc); fsp = file_fsp(params,0); if(!fsp) return ERROR_DOS(ERRDOS,ERRbadfid); security_info_wanted = IVAL(params,4); DEBUG(3,("call_nt_transact_query_security_desc: file = %s\n", fsp->fsp_name )); params = nttrans_realloc(ppparams, 4); if(params == NULL) return ERROR_DOS(ERRDOS,ERRnomem); if ((mem_ctx = talloc_init("call_nt_transact_query_security_desc")) == NULL) { DEBUG(0,("call_nt_transact_query_security_desc: talloc_init failed.\n")); return ERROR_DOS(ERRDOS,ERRnomem); } /* * Get the permissions to return. */ if (!lp_nt_acl_support(SNUM(conn))) sd_size = get_null_nt_acl(mem_ctx, &psd); else sd_size = SMB_VFS_FGET_NT_ACL(fsp, fsp->fd, security_info_wanted, &psd); if (sd_size == 0) { talloc_destroy(mem_ctx); return(UNIXERROR(ERRDOS,ERRnoaccess)); } DEBUG(3,("call_nt_transact_query_security_desc: sd_size = %d.\n",(int)sd_size)); SIVAL(params,0,(uint32)sd_size); if(max_data_count < sd_size) { send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_BUFFER_TOO_SMALL, params, 4, *ppdata, 0); talloc_destroy(mem_ctx); return -1; } /* * Allocate the data we will point this at. */ data = nttrans_realloc(ppdata, sd_size); if(data == NULL) { talloc_destroy(mem_ctx); return ERROR_DOS(ERRDOS,ERRnomem); } /* * Init the parse struct we will marshall into. */ prs_init(&pd, 0, mem_ctx, MARSHALL); /* * Setup the prs_struct to point at the memory we just * allocated. */ prs_give_memory( &pd, data, (uint32)sd_size, False); /* * Finally, linearize into the outgoing buffer. */ if(!sec_io_desc( "sd data", &psd, &pd, 1)) { DEBUG(0,("call_nt_transact_query_security_desc: Error in marshalling \ security descriptor.\n")); /* * Return access denied for want of a better error message.. */ talloc_destroy(mem_ctx); return(UNIXERROR(ERRDOS,ERRnoaccess)); } /* * Now we can delete the security descriptor. */ talloc_destroy(mem_ctx); send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_OK, params, 4, data, (int)sd_size); return -1; } /**************************************************************************** Reply to set a security descriptor. Map to UNIX perms or POSIX ACLs. ****************************************************************************/ static int call_nt_transact_set_security_desc(connection_struct *conn, char *inbuf, char *outbuf, int length, int bufsize, char **ppsetup, uint32 setup_count, char **ppparams, uint32 parameter_count, char **ppdata, uint32 data_count) { char *params= *ppparams; char *data = *ppdata; files_struct *fsp = NULL; uint32 security_info_sent = 0; NTSTATUS nt_status; if(parameter_count < 8) return ERROR_DOS(ERRDOS,ERRbadfunc); if((fsp = file_fsp(params,0)) == NULL) return ERROR_DOS(ERRDOS,ERRbadfid); if(!lp_nt_acl_support(SNUM(conn))) goto done; security_info_sent = IVAL(params,4); DEBUG(3,("call_nt_transact_set_security_desc: file = %s, sent 0x%x\n", fsp->fsp_name, (unsigned int)security_info_sent )); if (data_count == 0) return ERROR_DOS(ERRDOS, ERRnoaccess); if (!NT_STATUS_IS_OK(nt_status = set_sd( fsp, data, data_count, security_info_sent))) return ERROR_NT(nt_status); done: send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_OK, NULL, 0, NULL, 0); return -1; } /**************************************************************************** Reply to NT IOCTL ****************************************************************************/ static int call_nt_transact_ioctl(connection_struct *conn, char *inbuf, char *outbuf, int length, int bufsize, char **ppsetup, uint32 setup_count, char **ppparams, uint32 parameter_count, char **ppdata, uint32 data_count) { uint32 function; uint16 fidnum; files_struct *fsp; uint8 isFSctl; uint8 compfilter; static BOOL logged_message; char *pdata = *ppdata; if (setup_count != 8) { DEBUG(3,("call_nt_transact_ioctl: invalid setup count %d\n", setup_count)); return ERROR_NT(NT_STATUS_NOT_SUPPORTED); } function = IVAL(*ppsetup, 0); fidnum = SVAL(*ppsetup, 4); isFSctl = CVAL(*ppsetup, 6); compfilter = CVAL(*ppsetup, 7); DEBUG(10,("call_nt_transact_ioctl: function[0x%08X] FID[0x%04X] isFSctl[0x%02X] compfilter[0x%02X]\n", function, fidnum, isFSctl, compfilter)); fsp=file_fsp(*ppsetup, 4); /* this check is done in each implemented function case for now because I don't want to break anything... --metze FSP_BELONGS_CONN(fsp,conn);*/ switch (function) { case FSCTL_SET_SPARSE: /* pretend this succeeded - tho strictly we should mark the file sparse (if the local fs supports it) so we can know if we need to pre-allocate or not */ DEBUG(10,("FSCTL_SET_SPARSE: called on FID[0x%04X](but not implemented)\n", fidnum)); send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_OK, NULL, 0, NULL, 0); return -1; case FSCTL_0x000900C0: /* pretend this succeeded - don't know what this really is but works ok like this --metze */ DEBUG(10,("FSCTL_0x000900C0: called on FID[0x%04X](but not implemented)\n",fidnum)); send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_OK, NULL, 0, NULL, 0); return -1; case FSCTL_GET_REPARSE_POINT: /* pretend this fail - my winXP does it like this * --metze */ DEBUG(10,("FSCTL_GET_REPARSE_POINT: called on FID[0x%04X](but not implemented)\n",fidnum)); send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_NOT_A_REPARSE_POINT, NULL, 0, NULL, 0); return -1; case FSCTL_SET_REPARSE_POINT: /* pretend this fail - I'm assuming this because of the FSCTL_GET_REPARSE_POINT case. * --metze */ DEBUG(10,("FSCTL_SET_REPARSE_POINT: called on FID[0x%04X](but not implemented)\n",fidnum)); send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_NOT_A_REPARSE_POINT, NULL, 0, NULL, 0); return -1; case FSCTL_GET_SHADOW_COPY_DATA: /* don't know if this name is right...*/ { /* * This is called to retrieve the number of Shadow Copies (a.k.a. snapshots) * and return their volume names. If max_data_count is 16, then it is just * asking for the number of volumes and length of the combined names. * * pdata is the data allocated by our caller, but that uses * total_data_count (which is 0 in our case) rather than max_data_count. * Allocate the correct amount and return the pointer to let * it be deallocated when we return. */ uint32 max_data_count = IVAL(inbuf,smb_nt_MaxDataCount); SHADOW_COPY_DATA *shadow_data = NULL; TALLOC_CTX *shadow_mem_ctx = NULL; BOOL labels = False; uint32 labels_data_count = 0; uint32 i; char *cur_pdata; FSP_BELONGS_CONN(fsp,conn); if (max_data_count < 16) { DEBUG(0,("FSCTL_GET_SHADOW_COPY_DATA: max_data_count(%u) < 16 is invalid!\n", max_data_count)); return ERROR_NT(NT_STATUS_INVALID_PARAMETER); } if (max_data_count > 16) { labels = True; } shadow_mem_ctx = talloc_init("SHADOW_COPY_DATA"); if (shadow_mem_ctx == NULL) { DEBUG(0,("talloc_init(SHADOW_COPY_DATA) failed!\n")); return ERROR_NT(NT_STATUS_NO_MEMORY); } shadow_data = (SHADOW_COPY_DATA *)talloc_zero(shadow_mem_ctx,sizeof(SHADOW_COPY_DATA)); if (shadow_data == NULL) { DEBUG(0,("talloc_zero() failed!\n")); return ERROR_NT(NT_STATUS_NO_MEMORY); } shadow_data->mem_ctx = shadow_mem_ctx; /* * Call the VFS routine to actually do the work. */ if (SMB_VFS_GET_SHADOW_COPY_DATA(fsp, shadow_data, labels)!=0) { talloc_destroy(shadow_data->mem_ctx); if (errno == ENOSYS) { DEBUG(5,("FSCTL_GET_SHADOW_COPY_DATA: connectpath %s, not supported.\n", conn->connectpath)); return ERROR_NT(NT_STATUS_NOT_SUPPORTED); } else { DEBUG(0,("FSCTL_GET_SHADOW_COPY_DATA: connectpath %s, failed.\n", conn->connectpath)); return ERROR_NT(NT_STATUS_UNSUCCESSFUL); } } labels_data_count = (shadow_data->num_volumes*2*sizeof(SHADOW_COPY_LABEL))+2; if (!labels) { data_count = 16; } else { data_count = 12+labels_data_count+4; } if (max_data_countmem_ctx); return ERROR_NT(NT_STATUS_BUFFER_TOO_SMALL); } pdata = nttrans_realloc(ppdata, data_count); if (pdata == NULL) { talloc_destroy(shadow_data->mem_ctx); return ERROR_NT(NT_STATUS_NO_MEMORY); } cur_pdata = pdata; /* num_volumes 4 bytes */ SIVAL(pdata,0,shadow_data->num_volumes); if (labels) { /* num_labels 4 bytes */ SIVAL(pdata,4,shadow_data->num_volumes); } /* needed_data_count 4 bytes */ SIVAL(pdata,8,labels_data_count); cur_pdata+=12; DEBUG(10,("FSCTL_GET_SHADOW_COPY_DATA: %u volumes for path[%s].\n", shadow_data->num_volumes,fsp->fsp_name)); if (labels && shadow_data->labels) { for (i=0;inum_volumes;i++) { srvstr_push(outbuf, cur_pdata, shadow_data->labels[i], 2*sizeof(SHADOW_COPY_LABEL), STR_UNICODE|STR_TERMINATE); cur_pdata+=2*sizeof(SHADOW_COPY_LABEL); DEBUGADD(10,("Label[%u]: '%s'\n",i,shadow_data->labels[i])); } } talloc_destroy(shadow_data->mem_ctx); send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_OK, NULL, 0, pdata, data_count); return -1; } case FSCTL_FIND_FILES_BY_SID: /* I hope this name is right */ { /* pretend this succeeded - * * we have to send back a list with all files owned by this SID * * but I have to check that --metze */ DOM_SID sid; uid_t uid; size_t sid_len = MIN(data_count-4,SID_MAX_SIZE); DEBUG(10,("FSCTL_FIND_FILES_BY_SID: called on FID[0x%04X]\n",fidnum)); FSP_BELONGS_CONN(fsp,conn); /* unknown 4 bytes: this is not the length of the sid :-( */ /*unknown = IVAL(pdata,0);*/ sid_parse(pdata+4,sid_len,&sid); DEBUGADD(10,("for SID: %s\n",sid_string_static(&sid))); if (!NT_STATUS_IS_OK(sid_to_uid(&sid, &uid))) { DEBUG(0,("sid_to_uid: failed, sid[%s] sid_len[%lu]\n", sid_string_static(&sid),(unsigned long)sid_len)); uid = (-1); } /* we can take a look at the find source :-) * * find ./ -uid $uid -name '*' is what we need here * * * and send 4bytes len and then NULL terminated unicode strings * for each file * * but I don't know how to deal with the paged results * (maybe we can hang the result anywhere in the fsp struct) * * we don't send all files at once * and at the next we should *not* start from the beginning, * so we have to cache the result * * --metze */ /* this works for now... */ send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_OK, NULL, 0, NULL, 0); return -1; } default: if (!logged_message) { logged_message = True; /* Only print this once... */ DEBUG(0,("call_nt_transact_ioctl(0x%x): Currently not implemented.\n", function)); } } return ERROR_NT(NT_STATUS_NOT_SUPPORTED); } #ifdef HAVE_SYS_QUOTAS /**************************************************************************** Reply to get user quota ****************************************************************************/ static int call_nt_transact_get_user_quota(connection_struct *conn, char *inbuf, char *outbuf, int length, int bufsize, char **ppsetup, uint32 setup_count, char **ppparams, uint32 parameter_count, char **ppdata, uint32 data_count) { NTSTATUS nt_status = NT_STATUS_OK; uint32 max_data_count = IVAL(inbuf,smb_nt_MaxDataCount); char *params = *ppparams; char *pdata = *ppdata; char *entry; int data_len=0,param_len=0; int qt_len=0; int entry_len = 0; files_struct *fsp = NULL; uint16 level = 0; size_t sid_len; DOM_SID sid; BOOL start_enum = True; SMB_NTQUOTA_STRUCT qt; SMB_NTQUOTA_LIST *tmp_list; SMB_NTQUOTA_HANDLE *qt_handle = NULL; extern struct current_user current_user; ZERO_STRUCT(qt); /* access check */ if (current_user.uid != 0) { DEBUG(1,("set_user_quota: access_denied service [%s] user [%s]\n", lp_servicename(SNUM(conn)),conn->user)); return ERROR_DOS(ERRDOS,ERRnoaccess); } /* * Ensure minimum number of parameters sent. */ if (parameter_count < 4) { DEBUG(0,("TRANSACT_GET_USER_QUOTA: requires %d >= 4 bytes parameters\n",parameter_count)); return ERROR_DOS(ERRDOS,ERRinvalidparam); } /* maybe we can check the quota_fnum */ fsp = file_fsp(params,0); if (!CHECK_NTQUOTA_HANDLE_OK(fsp,conn)) { DEBUG(3,("TRANSACT_GET_USER_QUOTA: no valid QUOTA HANDLE\n")); return ERROR_NT(NT_STATUS_INVALID_HANDLE); } /* the NULL pointer cheking for fsp->fake_file_handle->pd * is done by CHECK_NTQUOTA_HANDLE_OK() */ qt_handle = (SMB_NTQUOTA_HANDLE *)fsp->fake_file_handle->pd; level = SVAL(params,2); /* unknown 12 bytes leading in params */ switch (level) { case TRANSACT_GET_USER_QUOTA_LIST_CONTINUE: /* seems that we should continue with the enum here --metze */ if (qt_handle->quota_list!=NULL && qt_handle->tmp_list==NULL) { /* free the list */ free_ntquota_list(&(qt_handle->quota_list)); /* Realloc the size of parameters and data we will return */ param_len = 4; params = nttrans_realloc(ppparams, param_len); if(params == NULL) return ERROR_DOS(ERRDOS,ERRnomem); data_len = 0; SIVAL(params,0,data_len); break; } start_enum = False; case TRANSACT_GET_USER_QUOTA_LIST_START: if (qt_handle->quota_list==NULL && qt_handle->tmp_list==NULL) { start_enum = True; } if (start_enum && vfs_get_user_ntquota_list(fsp,&(qt_handle->quota_list))!=0) return ERROR_DOS(ERRSRV,ERRerror); /* Realloc the size of parameters and data we will return */ param_len = 4; params = nttrans_realloc(ppparams, param_len); if(params == NULL) return ERROR_DOS(ERRDOS,ERRnomem); /* we should not trust the value in max_data_count*/ max_data_count = MIN(max_data_count,2048); pdata = nttrans_realloc(ppdata, max_data_count);/* should be max data count from client*/ if(pdata == NULL) return ERROR_DOS(ERRDOS,ERRnomem); entry = pdata; /* set params Size of returned Quota Data 4 bytes*/ /* but set it later when we know it */ /* for each entry push the data */ if (start_enum) { qt_handle->tmp_list = qt_handle->quota_list; } tmp_list = qt_handle->tmp_list; for (;((tmp_list!=NULL)&&((qt_len +40+SID_MAX_SIZE)next,entry+=entry_len,qt_len+=entry_len) { sid_len = sid_size(&tmp_list->quotas->sid); entry_len = 40 + sid_len; /* nextoffset entry 4 bytes */ SIVAL(entry,0,entry_len); /* then the len of the SID 4 bytes */ SIVAL(entry,4,sid_len); /* unknown data 8 bytes SMB_BIG_UINT */ SBIG_UINT(entry,8,(SMB_BIG_UINT)0); /* this is not 0 in windows...-metze*/ /* the used disk space 8 bytes SMB_BIG_UINT */ SBIG_UINT(entry,16,tmp_list->quotas->usedspace); /* the soft quotas 8 bytes SMB_BIG_UINT */ SBIG_UINT(entry,24,tmp_list->quotas->softlim); /* the hard quotas 8 bytes SMB_BIG_UINT */ SBIG_UINT(entry,32,tmp_list->quotas->hardlim); /* and now the SID */ sid_linearize(entry+40, sid_len, &tmp_list->quotas->sid); } qt_handle->tmp_list = tmp_list; /* overwrite the offset of the last entry */ SIVAL(entry-entry_len,0,0); data_len = 4+qt_len; /* overwrite the params quota_data_len */ SIVAL(params,0,data_len); break; case TRANSACT_GET_USER_QUOTA_FOR_SID: /* unknown 4 bytes IVAL(pdata,0) */ if (data_count < 8) { DEBUG(0,("TRANSACT_GET_USER_QUOTA_FOR_SID: requires %d >= %d bytes data\n",data_count,8)); return ERROR_DOS(ERRDOS,ERRunknownlevel); } sid_len = IVAL(pdata,4); if (data_count < 8+sid_len) { DEBUG(0,("TRANSACT_GET_USER_QUOTA_FOR_SID: requires %d >= %lu bytes data\n",data_count,(unsigned long)(8+sid_len))); return ERROR_DOS(ERRDOS,ERRunknownlevel); } data_len = 4+40+sid_len; if (max_data_count < data_len) { DEBUG(0,("TRANSACT_GET_USER_QUOTA_FOR_SID: max_data_count(%d) < data_len(%d)\n", max_data_count, data_len)); param_len = 4; SIVAL(params,0,data_len); data_len = 0; nt_status = NT_STATUS_BUFFER_TOO_SMALL; break; } sid_parse(pdata+8,sid_len,&sid); if (vfs_get_ntquota(fsp, SMB_USER_QUOTA_TYPE, &sid, &qt)!=0) { ZERO_STRUCT(qt); /* * we have to return zero's in all fields * instead of returning an error here * --metze */ } /* Realloc the size of parameters and data we will return */ param_len = 4; params = nttrans_realloc(ppparams, param_len); if(params == NULL) return ERROR_DOS(ERRDOS,ERRnomem); pdata = nttrans_realloc(ppdata, data_len); if(pdata == NULL) return ERROR_DOS(ERRDOS,ERRnomem); entry = pdata; /* set params Size of returned Quota Data 4 bytes*/ SIVAL(params,0,data_len); /* nextoffset entry 4 bytes */ SIVAL(entry,0,0); /* then the len of the SID 4 bytes */ SIVAL(entry,4,sid_len); /* unknown data 8 bytes SMB_BIG_UINT */ SBIG_UINT(entry,8,(SMB_BIG_UINT)0); /* this is not 0 in windows...-mezte*/ /* the used disk space 8 bytes SMB_BIG_UINT */ SBIG_UINT(entry,16,qt.usedspace); /* the soft quotas 8 bytes SMB_BIG_UINT */ SBIG_UINT(entry,24,qt.softlim); /* the hard quotas 8 bytes SMB_BIG_UINT */ SBIG_UINT(entry,32,qt.hardlim); /* and now the SID */ sid_linearize(entry+40, sid_len, &sid); break; default: DEBUG(0,("do_nt_transact_get_user_quota: fnum %d unknown level 0x%04hX\n",fsp->fnum,level)); return ERROR_DOS(ERRSRV,ERRerror); break; } send_nt_replies(inbuf, outbuf, bufsize, nt_status, params, param_len, pdata, data_len); return -1; } /**************************************************************************** Reply to set user quota ****************************************************************************/ static int call_nt_transact_set_user_quota(connection_struct *conn, char *inbuf, char *outbuf, int length, int bufsize, char **ppsetup, uint32 setup_count, char **ppparams, uint32 parameter_count, char **ppdata, uint32 data_count) { char *params = *ppparams; char *pdata = *ppdata; int data_len=0,param_len=0; SMB_NTQUOTA_STRUCT qt; size_t sid_len; DOM_SID sid; files_struct *fsp = NULL; ZERO_STRUCT(qt); /* access check */ if (conn->admin_user != True) { DEBUG(1,("set_user_quota: access_denied service [%s] user [%s]\n", lp_servicename(SNUM(conn)),conn->user)); return ERROR_DOS(ERRDOS,ERRnoaccess); } /* * Ensure minimum number of parameters sent. */ if (parameter_count < 2) { DEBUG(0,("TRANSACT_SET_USER_QUOTA: requires %d >= 2 bytes parameters\n",parameter_count)); return ERROR_DOS(ERRDOS,ERRinvalidparam); } /* maybe we can check the quota_fnum */ fsp = file_fsp(params,0); if (!CHECK_NTQUOTA_HANDLE_OK(fsp,conn)) { DEBUG(3,("TRANSACT_GET_USER_QUOTA: no valid QUOTA HANDLE\n")); return ERROR_NT(NT_STATUS_INVALID_HANDLE); } if (data_count < 40) { DEBUG(0,("TRANSACT_SET_USER_QUOTA: requires %d >= %d bytes data\n",data_count,40)); return ERROR_DOS(ERRDOS,ERRunknownlevel); } /* offset to next quota record. * 4 bytes IVAL(pdata,0) * unused here... */ /* sid len */ sid_len = IVAL(pdata,4); if (data_count < 40+sid_len) { DEBUG(0,("TRANSACT_SET_USER_QUOTA: requires %d >= %lu bytes data\n",data_count,(unsigned long)40+sid_len)); return ERROR_DOS(ERRDOS,ERRunknownlevel); } /* unknown 8 bytes in pdata * maybe its the change time in NTTIME */ /* the used space 8 bytes (SMB_BIG_UINT)*/ qt.usedspace = (SMB_BIG_UINT)IVAL(pdata,16); #ifdef LARGE_SMB_OFF_T qt.usedspace |= (((SMB_BIG_UINT)IVAL(pdata,20)) << 32); #else /* LARGE_SMB_OFF_T */ if ((IVAL(pdata,20) != 0)&& ((qt.usedspace != 0xFFFFFFFF)|| (IVAL(pdata,20)!=0xFFFFFFFF))) { /* more than 32 bits? */ return ERROR_DOS(ERRDOS,ERRunknownlevel); } #endif /* LARGE_SMB_OFF_T */ /* the soft quotas 8 bytes (SMB_BIG_UINT)*/ qt.softlim = (SMB_BIG_UINT)IVAL(pdata,24); #ifdef LARGE_SMB_OFF_T qt.softlim |= (((SMB_BIG_UINT)IVAL(pdata,28)) << 32); #else /* LARGE_SMB_OFF_T */ if ((IVAL(pdata,28) != 0)&& ((qt.softlim != 0xFFFFFFFF)|| (IVAL(pdata,28)!=0xFFFFFFFF))) { /* more than 32 bits? */ return ERROR_DOS(ERRDOS,ERRunknownlevel); } #endif /* LARGE_SMB_OFF_T */ /* the hard quotas 8 bytes (SMB_BIG_UINT)*/ qt.hardlim = (SMB_BIG_UINT)IVAL(pdata,32); #ifdef LARGE_SMB_OFF_T qt.hardlim |= (((SMB_BIG_UINT)IVAL(pdata,36)) << 32); #else /* LARGE_SMB_OFF_T */ if ((IVAL(pdata,36) != 0)&& ((qt.hardlim != 0xFFFFFFFF)|| (IVAL(pdata,36)!=0xFFFFFFFF))) { /* more than 32 bits? */ return ERROR_DOS(ERRDOS,ERRunknownlevel); } #endif /* LARGE_SMB_OFF_T */ sid_parse(pdata+40,sid_len,&sid); DEBUGADD(8,("SID: %s\n",sid_string_static(&sid))); /* 44 unknown bytes left... */ if (vfs_set_ntquota(fsp, SMB_USER_QUOTA_TYPE, &sid, &qt)!=0) { return ERROR_DOS(ERRSRV,ERRerror); } send_nt_replies(inbuf, outbuf, bufsize, NT_STATUS_OK, params, param_len, pdata, data_len); return -1; } #endif /* HAVE_SYS_QUOTAS */ /**************************************************************************** Reply to a SMBNTtrans. ****************************************************************************/ int reply_nttrans(connection_struct *conn, char *inbuf,char *outbuf,int length,int bufsize) { int outsize = 0; #if 0 /* Not used. */ uint16 max_setup_count = CVAL(inbuf, smb_nt_MaxSetupCount); uint32 max_parameter_count = IVAL(inbuf, smb_nt_MaxParameterCount); uint32 max_data_count = IVAL(inbuf,smb_nt_MaxDataCount); #endif /* Not used. */ uint32 total_parameter_count = IVAL(inbuf, smb_nt_TotalParameterCount); uint32 total_data_count = IVAL(inbuf, smb_nt_TotalDataCount); uint32 parameter_count = IVAL(inbuf,smb_nt_ParameterCount); uint32 parameter_offset = IVAL(inbuf,smb_nt_ParameterOffset); uint32 data_count = IVAL(inbuf,smb_nt_DataCount); uint32 data_offset = IVAL(inbuf,smb_nt_DataOffset); uint16 setup_count = 2*CVAL(inbuf,smb_nt_SetupCount); /* setup count is in *words* */ uint16 function_code = SVAL( inbuf, smb_nt_Function); char *params = NULL, *data = NULL, *setup = NULL; uint32 num_params_sofar, num_data_sofar; START_PROFILE(SMBnttrans); if(global_oplock_break && ((function_code == NT_TRANSACT_CREATE) || (function_code == NT_TRANSACT_RENAME))) { /* * Queue this open message as we are the process of an oplock break. */ DEBUG(2,("reply_nttrans: queueing message code 0x%x \ due to being in oplock break state.\n", (unsigned int)function_code )); push_oplock_pending_smb_message( inbuf, length); END_PROFILE(SMBnttrans); return -1; } if (IS_IPC(conn) && (function_code != NT_TRANSACT_CREATE)) { END_PROFILE(SMBnttrans); return ERROR_DOS(ERRSRV,ERRaccess); } outsize = set_message(outbuf,0,0,True); /* * All nttrans messages we handle have smb_wct == 19 + setup_count. * Ensure this is so as a sanity check. */ if(CVAL(inbuf, smb_wct) != 19 + (setup_count/2)) { DEBUG(2,("Invalid smb_wct %d in nttrans call (should be %d)\n", CVAL(inbuf, smb_wct), 19 + (setup_count/2))); goto bad_param; } /* Allocate the space for the setup, the maximum needed parameters and data */ if(setup_count > 0) setup = (char *)malloc(setup_count); if (total_parameter_count > 0) params = (char *)malloc(total_parameter_count); if (total_data_count > 0) data = (char *)malloc(total_data_count); if ((total_parameter_count && !params) || (total_data_count && !data) || (setup_count && !setup)) { SAFE_FREE(setup); SAFE_FREE(params); SAFE_FREE(data); DEBUG(0,("reply_nttrans : Out of memory\n")); END_PROFILE(SMBnttrans); return ERROR_DOS(ERRDOS,ERRnomem); } /* Copy the param and data bytes sent with this request into the params buffer */ num_params_sofar = parameter_count; num_data_sofar = data_count; if (parameter_count > total_parameter_count || data_count > total_data_count) goto bad_param; if(setup) { DEBUG(10,("reply_nttrans: setup_count = %d\n", setup_count)); if ((smb_nt_SetupStart + setup_count < smb_nt_SetupStart) || (smb_nt_SetupStart + setup_count < setup_count)) goto bad_param; if (smb_nt_SetupStart + setup_count > length) goto bad_param; memcpy( setup, &inbuf[smb_nt_SetupStart], setup_count); dump_data(10, setup, setup_count); } if(params) { DEBUG(10,("reply_nttrans: parameter_count = %d\n", parameter_count)); if ((parameter_offset + parameter_count < parameter_offset) || (parameter_offset + parameter_count < parameter_count)) goto bad_param; if ((smb_base(inbuf) + parameter_offset + parameter_count > inbuf + length)|| (smb_base(inbuf) + parameter_offset + parameter_count < smb_base(inbuf))) goto bad_param; memcpy( params, smb_base(inbuf) + parameter_offset, parameter_count); dump_data(10, params, parameter_count); } if(data) { DEBUG(10,("reply_nttrans: data_count = %d\n",data_count)); if ((data_offset + data_count < data_offset) || (data_offset + data_count < data_count)) goto bad_param; if ((smb_base(inbuf) + data_offset + data_count > inbuf + length) || (smb_base(inbuf) + data_offset + data_count < smb_base(inbuf))) goto bad_param; memcpy( data, smb_base(inbuf) + data_offset, data_count); dump_data(10, data, data_count); } srv_signing_trans_start(SVAL(inbuf,smb_mid)); if(num_data_sofar < total_data_count || num_params_sofar < total_parameter_count) { /* We need to send an interim response then receive the rest of the parameter/data bytes */ outsize = set_message(outbuf,0,0,True); srv_signing_trans_stop(); if (!send_smb(smbd_server_fd(),outbuf)) exit_server("reply_nttrans: send_smb failed."); while( num_data_sofar < total_data_count || num_params_sofar < total_parameter_count) { BOOL ret; uint32 parameter_displacement; uint32 data_displacement; ret = receive_next_smb(inbuf,bufsize,SMB_SECONDARY_WAIT); /* * The sequence number for the trans reply is always * based on the last secondary received. */ srv_signing_trans_start(SVAL(inbuf,smb_mid)); if((ret && (CVAL(inbuf, smb_com) != SMBnttranss)) || !ret) { outsize = set_message(outbuf,0,0,True); if(ret) { DEBUG(0,("reply_nttrans: Invalid secondary nttrans packet\n")); } else { DEBUG(0,("reply_nttrans: %s in getting secondary nttrans response.\n", (smb_read_error == READ_ERROR) ? "error" : "timeout" )); } goto bad_param; } /* Revise total_params and total_data in case they have changed downwards */ if (IVAL(inbuf, smb_nts_TotalParameterCount) < total_parameter_count) total_parameter_count = IVAL(inbuf, smb_nts_TotalParameterCount); if (IVAL(inbuf, smb_nts_TotalDataCount) < total_data_count) total_data_count = IVAL(inbuf, smb_nts_TotalDataCount); parameter_count = IVAL(inbuf,smb_nts_ParameterCount); parameter_offset = IVAL(inbuf, smb_nts_ParameterOffset); parameter_displacement = IVAL(inbuf, smb_nts_ParameterDisplacement); num_params_sofar += parameter_count; data_count = IVAL(inbuf, smb_nts_DataCount); data_displacement = IVAL(inbuf, smb_nts_DataDisplacement); data_offset = IVAL(inbuf, smb_nts_DataOffset); num_data_sofar += data_count; if (num_params_sofar > total_parameter_count || num_data_sofar > total_data_count) { DEBUG(0,("reply_nttrans2: data overflow in secondary nttrans packet")); goto bad_param; } if (parameter_count) { if (parameter_displacement + parameter_count >= total_parameter_count) goto bad_param; if ((parameter_displacement + parameter_count < parameter_displacement) || (parameter_displacement + parameter_count < parameter_count)) goto bad_param; if (parameter_displacement > total_parameter_count) goto bad_param; if ((smb_base(inbuf) + parameter_offset + parameter_count >= inbuf + bufsize) || (smb_base(inbuf) + parameter_offset + parameter_count < smb_base(inbuf))) goto bad_param; if (parameter_displacement + params < params) goto bad_param; memcpy( ¶ms[parameter_displacement], smb_base(inbuf) + parameter_offset, parameter_count); } if (data_count) { if (data_displacement + data_count >= total_data_count) goto bad_param; if ((data_displacement + data_count < data_displacement) || (data_displacement + data_count < data_count)) goto bad_param; if (data_displacement > total_data_count) goto bad_param; if ((smb_base(inbuf) + data_offset + data_count >= inbuf + bufsize) || (smb_base(inbuf) + data_offset + data_count < smb_base(inbuf))) goto bad_param; if (data_displacement + data < data) goto bad_param; memcpy( &data[data_displacement], smb_base(inbuf)+ data_offset, data_count); } } } if (Protocol >= PROTOCOL_NT1) SSVAL(outbuf,smb_flg2,SVAL(outbuf,smb_flg2) | FLAGS2_IS_LONG_NAME); /* Now we must call the relevant NT_TRANS function */ switch(function_code) { case NT_TRANSACT_CREATE: START_PROFILE_NESTED(NT_transact_create); outsize = call_nt_transact_create(conn, inbuf, outbuf, length, bufsize, &setup, setup_count, ¶ms, total_parameter_count, &data, total_data_count); END_PROFILE_NESTED(NT_transact_create); break; case NT_TRANSACT_IOCTL: START_PROFILE_NESTED(NT_transact_ioctl); outsize = call_nt_transact_ioctl(conn, inbuf, outbuf, length, bufsize, &setup, setup_count, ¶ms, total_parameter_count, &data, total_data_count); END_PROFILE_NESTED(NT_transact_ioctl); break; case NT_TRANSACT_SET_SECURITY_DESC: START_PROFILE_NESTED(NT_transact_set_security_desc); outsize = call_nt_transact_set_security_desc(conn, inbuf, outbuf, length, bufsize, &setup, setup_count, ¶ms, total_parameter_count, &data, total_data_count); END_PROFILE_NESTED(NT_transact_set_security_desc); break; case NT_TRANSACT_NOTIFY_CHANGE: START_PROFILE_NESTED(NT_transact_notify_change); outsize = call_nt_transact_notify_change(conn, inbuf, outbuf, length, bufsize, &setup, setup_count, ¶ms, total_parameter_count, &data, total_data_count); END_PROFILE_NESTED(NT_transact_notify_change); break; case NT_TRANSACT_RENAME: START_PROFILE_NESTED(NT_transact_rename); outsize = call_nt_transact_rename(conn, inbuf, outbuf, length, bufsize, &setup, setup_count, ¶ms, total_parameter_count, &data, total_data_count); END_PROFILE_NESTED(NT_transact_rename); break; case NT_TRANSACT_QUERY_SECURITY_DESC: START_PROFILE_NESTED(NT_transact_query_security_desc); outsize = call_nt_transact_query_security_desc(conn, inbuf, outbuf, length, bufsize, &setup, setup_count, ¶ms, total_parameter_count, &data, total_data_count); END_PROFILE_NESTED(NT_transact_query_security_desc); break; #ifdef HAVE_SYS_QUOTAS case NT_TRANSACT_GET_USER_QUOTA: START_PROFILE_NESTED(NT_transact_get_user_quota); outsize = call_nt_transact_get_user_quota(conn, inbuf, outbuf, length, bufsize, &setup, setup_count, ¶ms, total_parameter_count, &data, total_data_count); END_PROFILE_NESTED(NT_transact_get_user_quota); break; case NT_TRANSACT_SET_USER_QUOTA: START_PROFILE_NESTED(NT_transact_set_user_quota); outsize = call_nt_transact_set_user_quota(conn, inbuf, outbuf, length, bufsize, &setup, setup_count, ¶ms, total_parameter_count, &data, total_data_count); END_PROFILE_NESTED(NT_transact_set_user_quota); break; #endif /* HAVE_SYS_QUOTAS */ default: /* Error in request */ DEBUG(0,("reply_nttrans: Unknown request %d in nttrans call\n", function_code)); SAFE_FREE(setup); SAFE_FREE(params); SAFE_FREE(data); END_PROFILE(SMBnttrans); srv_signing_trans_stop(); return ERROR_DOS(ERRSRV,ERRerror); } /* As we do not know how many data packets will need to be returned here the various call_nt_transact_xxxx calls must send their own. Thus a call_nt_transact_xxxx routine only returns a value other than -1 when it wants to send an error packet. */ srv_signing_trans_stop(); SAFE_FREE(setup); SAFE_FREE(params); SAFE_FREE(data); END_PROFILE(SMBnttrans); return outsize; /* If a correct response was needed the call_nt_transact_xxxx calls have already sent it. If outsize != -1 then it is returning an error packet. */ bad_param: srv_signing_trans_stop(); SAFE_FREE(params); SAFE_FREE(data); SAFE_FREE(setup); END_PROFILE(SMBnttrans); return ERROR_NT(NT_STATUS_INVALID_PARAMETER); }