1// SPDX-License-Identifier: LGPL-2.1
2/*
3 *
4 *   vfs operations that deal with io control
5 *
6 *   Copyright (C) International Business Machines  Corp., 2005,2013
7 *   Author(s): Steve French (sfrench@us.ibm.com)
8 *
9 */
10
11#include <linux/fs.h>
12#include <linux/file.h>
13#include <linux/mount.h>
14#include <linux/mm.h>
15#include <linux/pagemap.h>
16#include "cifspdu.h"
17#include "cifsglob.h"
18#include "cifsproto.h"
19#include "cifs_debug.h"
20#include "cifsfs.h"
21#include "cifs_ioctl.h"
22#include "smb2proto.h"
23#include "smb2glob.h"
24#include <linux/btrfs.h>
25
26static long cifs_ioctl_query_info(unsigned int xid, struct file *filep,
27				  unsigned long p)
28{
29	struct inode *inode = file_inode(filep);
30	struct cifs_sb_info *cifs_sb = CIFS_SB(inode->i_sb);
31	struct cifs_tcon *tcon = cifs_sb_master_tcon(cifs_sb);
32	struct dentry *dentry = filep->f_path.dentry;
33	const unsigned char *path;
34	void *page = alloc_dentry_path();
35	__le16 *utf16_path = NULL, root_path;
36	int rc = 0;
37
38	path = build_path_from_dentry(dentry, page);
39	if (IS_ERR(path)) {
40		free_dentry_path(page);
41		return PTR_ERR(path);
42	}
43
44	cifs_dbg(FYI, "%s %s\n", __func__, path);
45
46	if (!path[0]) {
47		root_path = 0;
48		utf16_path = &root_path;
49	} else {
50		utf16_path = cifs_convert_path_to_utf16(path + 1, cifs_sb);
51		if (!utf16_path) {
52			rc = -ENOMEM;
53			goto ici_exit;
54		}
55	}
56
57	if (tcon->ses->server->ops->ioctl_query_info)
58		rc = tcon->ses->server->ops->ioctl_query_info(
59				xid, tcon, cifs_sb, utf16_path,
60				filep->private_data ? 0 : 1, p);
61	else
62		rc = -EOPNOTSUPP;
63
64 ici_exit:
65	if (utf16_path != &root_path)
66		kfree(utf16_path);
67	free_dentry_path(page);
68	return rc;
69}
70
71static long cifs_ioctl_copychunk(unsigned int xid, struct file *dst_file,
72			unsigned long srcfd)
73{
74	int rc;
75	struct fd src_file;
76	struct inode *src_inode;
77
78	cifs_dbg(FYI, "ioctl copychunk range\n");
79	/* the destination must be opened for writing */
80	if (!(dst_file->f_mode & FMODE_WRITE)) {
81		cifs_dbg(FYI, "file target not open for write\n");
82		return -EINVAL;
83	}
84
85	/* check if target volume is readonly and take reference */
86	rc = mnt_want_write_file(dst_file);
87	if (rc) {
88		cifs_dbg(FYI, "mnt_want_write failed with rc %d\n", rc);
89		return rc;
90	}
91
92	src_file = fdget(srcfd);
93	if (!src_file.file) {
94		rc = -EBADF;
95		goto out_drop_write;
96	}
97
98	if (src_file.file->f_op->unlocked_ioctl != cifs_ioctl) {
99		rc = -EBADF;
100		cifs_dbg(VFS, "src file seems to be from a different filesystem type\n");
101		goto out_fput;
102	}
103
104	src_inode = file_inode(src_file.file);
105	rc = -EINVAL;
106	if (S_ISDIR(src_inode->i_mode))
107		goto out_fput;
108
109	rc = cifs_file_copychunk_range(xid, src_file.file, 0, dst_file, 0,
110					src_inode->i_size, 0);
111	if (rc > 0)
112		rc = 0;
113out_fput:
114	fdput(src_file);
115out_drop_write:
116	mnt_drop_write_file(dst_file);
117	return rc;
118}
119
120static long smb_mnt_get_tcon_info(struct cifs_tcon *tcon, void __user *arg)
121{
122	int rc = 0;
123	struct smb_mnt_tcon_info tcon_inf;
124
125	tcon_inf.tid = tcon->tid;
126	tcon_inf.session_id = tcon->ses->Suid;
127
128	if (copy_to_user(arg, &tcon_inf, sizeof(struct smb_mnt_tcon_info)))
129		rc = -EFAULT;
130
131	return rc;
132}
133
134static long smb_mnt_get_fsinfo(unsigned int xid, struct cifs_tcon *tcon,
135				void __user *arg)
136{
137	int rc = 0;
138	struct smb_mnt_fs_info *fsinf;
139
140	fsinf = kzalloc(sizeof(struct smb_mnt_fs_info), GFP_KERNEL);
141	if (fsinf == NULL)
142		return -ENOMEM;
143
144	fsinf->version = 1;
145	fsinf->protocol_id = tcon->ses->server->vals->protocol_id;
146	fsinf->tcon_flags = tcon->Flags;
147	fsinf->device_characteristics =
148			le32_to_cpu(tcon->fsDevInfo.DeviceCharacteristics);
149	fsinf->device_type = le32_to_cpu(tcon->fsDevInfo.DeviceType);
150	fsinf->fs_attributes = le32_to_cpu(tcon->fsAttrInfo.Attributes);
151	fsinf->max_path_component =
152		le32_to_cpu(tcon->fsAttrInfo.MaxPathNameComponentLength);
153	fsinf->vol_serial_number = tcon->vol_serial_number;
154	fsinf->vol_create_time = le64_to_cpu(tcon->vol_create_time);
155	fsinf->share_flags = tcon->share_flags;
156	fsinf->share_caps = le32_to_cpu(tcon->capabilities);
157	fsinf->sector_flags = tcon->ss_flags;
158	fsinf->optimal_sector_size = tcon->perf_sector_size;
159	fsinf->max_bytes_chunk = tcon->max_bytes_chunk;
160	fsinf->maximal_access = tcon->maximal_access;
161	fsinf->cifs_posix_caps = le64_to_cpu(tcon->fsUnixInfo.Capability);
162
163	if (copy_to_user(arg, fsinf, sizeof(struct smb_mnt_fs_info)))
164		rc = -EFAULT;
165
166	kfree(fsinf);
167	return rc;
168}
169
170static int cifs_shutdown(struct super_block *sb, unsigned long arg)
171{
172	struct cifs_sb_info *sbi = CIFS_SB(sb);
173	__u32 flags;
174
175	if (!capable(CAP_SYS_ADMIN))
176		return -EPERM;
177
178	if (get_user(flags, (__u32 __user *)arg))
179		return -EFAULT;
180
181	if (flags > CIFS_GOING_FLAGS_NOLOGFLUSH)
182		return -EINVAL;
183
184	if (cifs_forced_shutdown(sbi))
185		return 0;
186
187	cifs_dbg(VFS, "shut down requested (%d)", flags);
188/*	trace_cifs_shutdown(sb, flags);*/
189
190	/*
191	 * see:
192	 *   https://man7.org/linux/man-pages/man2/ioctl_xfs_goingdown.2.html
193	 * for more information and description of original intent of the flags
194	 */
195	switch (flags) {
196	/*
197	 * We could add support later for default flag which requires:
198	 *     "Flush all dirty data and metadata to disk"
199	 * would need to call syncfs or equivalent to flush page cache for
200	 * the mount and then issue fsync to server (if nostrictsync not set)
201	 */
202	case CIFS_GOING_FLAGS_DEFAULT:
203		cifs_dbg(FYI, "shutdown with default flag not supported\n");
204		return -EINVAL;
205	/*
206	 * FLAGS_LOGFLUSH is easy since it asks to write out metadata (not
207	 * data) but metadata writes are not cached on the client, so can treat
208	 * it similarly to NOLOGFLUSH
209	 */
210	case CIFS_GOING_FLAGS_LOGFLUSH:
211	case CIFS_GOING_FLAGS_NOLOGFLUSH:
212		sbi->mnt_cifs_flags |= CIFS_MOUNT_SHUTDOWN;
213		return 0;
214	default:
215		return -EINVAL;
216	}
217	return 0;
218}
219
220static int cifs_dump_full_key(struct cifs_tcon *tcon, struct smb3_full_key_debug_info __user *in)
221{
222	struct smb3_full_key_debug_info out;
223	struct cifs_ses *ses;
224	int rc = 0;
225	bool found = false;
226	u8 __user *end;
227
228	if (!smb3_encryption_required(tcon)) {
229		rc = -EOPNOTSUPP;
230		goto out;
231	}
232
233	/* copy user input into our output buffer */
234	if (copy_from_user(&out, in, sizeof(out))) {
235		rc = -EINVAL;
236		goto out;
237	}
238
239	if (!out.session_id) {
240		/* if ses id is 0, use current user session */
241		ses = tcon->ses;
242	} else {
243		/* otherwise if a session id is given, look for it in all our sessions */
244		struct cifs_ses *ses_it = NULL;
245		struct TCP_Server_Info *server_it = NULL;
246
247		spin_lock(&cifs_tcp_ses_lock);
248		list_for_each_entry(server_it, &cifs_tcp_ses_list, tcp_ses_list) {
249			list_for_each_entry(ses_it, &server_it->smb_ses_list, smb_ses_list) {
250				spin_lock(&ses_it->ses_lock);
251				if (ses_it->ses_status != SES_EXITING &&
252				    ses_it->Suid == out.session_id) {
253					ses = ses_it;
254					/*
255					 * since we are using the session outside the crit
256					 * section, we need to make sure it won't be released
257					 * so increment its refcount
258					 */
259					cifs_smb_ses_inc_refcount(ses);
260					spin_unlock(&ses_it->ses_lock);
261					found = true;
262					goto search_end;
263				}
264				spin_unlock(&ses_it->ses_lock);
265			}
266		}
267search_end:
268		spin_unlock(&cifs_tcp_ses_lock);
269		if (!found) {
270			rc = -ENOENT;
271			goto out;
272		}
273	}
274
275	switch (ses->server->cipher_type) {
276	case SMB2_ENCRYPTION_AES128_CCM:
277	case SMB2_ENCRYPTION_AES128_GCM:
278		out.session_key_length = CIFS_SESS_KEY_SIZE;
279		out.server_in_key_length = out.server_out_key_length = SMB3_GCM128_CRYPTKEY_SIZE;
280		break;
281	case SMB2_ENCRYPTION_AES256_CCM:
282	case SMB2_ENCRYPTION_AES256_GCM:
283		out.session_key_length = CIFS_SESS_KEY_SIZE;
284		out.server_in_key_length = out.server_out_key_length = SMB3_GCM256_CRYPTKEY_SIZE;
285		break;
286	default:
287		rc = -EOPNOTSUPP;
288		goto out;
289	}
290
291	/* check if user buffer is big enough to store all the keys */
292	if (out.in_size < sizeof(out) + out.session_key_length + out.server_in_key_length
293	    + out.server_out_key_length) {
294		rc = -ENOBUFS;
295		goto out;
296	}
297
298	out.session_id = ses->Suid;
299	out.cipher_type = le16_to_cpu(ses->server->cipher_type);
300
301	/* overwrite user input with our output */
302	if (copy_to_user(in, &out, sizeof(out))) {
303		rc = -EINVAL;
304		goto out;
305	}
306
307	/* append all the keys at the end of the user buffer */
308	end = in->data;
309	if (copy_to_user(end, ses->auth_key.response, out.session_key_length)) {
310		rc = -EINVAL;
311		goto out;
312	}
313	end += out.session_key_length;
314
315	if (copy_to_user(end, ses->smb3encryptionkey, out.server_in_key_length)) {
316		rc = -EINVAL;
317		goto out;
318	}
319	end += out.server_in_key_length;
320
321	if (copy_to_user(end, ses->smb3decryptionkey, out.server_out_key_length)) {
322		rc = -EINVAL;
323		goto out;
324	}
325
326out:
327	if (found)
328		cifs_put_smb_ses(ses);
329	return rc;
330}
331
332long cifs_ioctl(struct file *filep, unsigned int command, unsigned long arg)
333{
334	struct inode *inode = file_inode(filep);
335	struct smb3_key_debug_info pkey_inf;
336	int rc = -ENOTTY; /* strange error - but the precedent */
337	unsigned int xid;
338	struct cifsFileInfo *pSMBFile = filep->private_data;
339	struct cifs_tcon *tcon;
340	struct tcon_link *tlink;
341	struct cifs_sb_info *cifs_sb;
342	__u64	ExtAttrBits = 0;
343#ifdef CONFIG_CIFS_POSIX
344#ifdef CONFIG_CIFS_ALLOW_INSECURE_LEGACY
345	__u64   caps;
346#endif /* CONFIG_CIFS_ALLOW_INSECURE_LEGACY */
347#endif /* CONFIG_CIFS_POSIX */
348
349	xid = get_xid();
350
351	cifs_dbg(FYI, "cifs ioctl 0x%x\n", command);
352	if (pSMBFile == NULL)
353		trace_smb3_ioctl(xid, 0, command);
354	else
355		trace_smb3_ioctl(xid, pSMBFile->fid.persistent_fid, command);
356
357	switch (command) {
358		case FS_IOC_GETFLAGS:
359			if (pSMBFile == NULL)
360				break;
361			tcon = tlink_tcon(pSMBFile->tlink);
362#ifdef CONFIG_CIFS_POSIX
363#ifdef CONFIG_CIFS_ALLOW_INSECURE_LEGACY
364			caps = le64_to_cpu(tcon->fsUnixInfo.Capability);
365			if (CIFS_UNIX_EXTATTR_CAP & caps) {
366				__u64	ExtAttrMask = 0;
367				rc = CIFSGetExtAttr(xid, tcon,
368						    pSMBFile->fid.netfid,
369						    &ExtAttrBits, &ExtAttrMask);
370				if (rc == 0)
371					rc = put_user(ExtAttrBits &
372						FS_FL_USER_VISIBLE,
373						(int __user *)arg);
374				if (rc != -EOPNOTSUPP)
375					break;
376			}
377#endif /* CONFIG_CIFS_ALLOW_INSECURE_LEGACY */
378#endif /* CONFIG_CIFS_POSIX */
379			rc = 0;
380			if (CIFS_I(inode)->cifsAttrs & ATTR_COMPRESSED) {
381				/* add in the compressed bit */
382				ExtAttrBits = FS_COMPR_FL;
383				rc = put_user(ExtAttrBits & FS_FL_USER_VISIBLE,
384					      (int __user *)arg);
385			}
386			break;
387		case FS_IOC_SETFLAGS:
388			if (pSMBFile == NULL)
389				break;
390			tcon = tlink_tcon(pSMBFile->tlink);
391			/* caps = le64_to_cpu(tcon->fsUnixInfo.Capability); */
392
393			if (get_user(ExtAttrBits, (int __user *)arg)) {
394				rc = -EFAULT;
395				break;
396			}
397
398			/*
399			 * if (CIFS_UNIX_EXTATTR_CAP & caps)
400			 *	rc = CIFSSetExtAttr(xid, tcon,
401			 *		       pSMBFile->fid.netfid,
402			 *		       extAttrBits,
403			 *		       &ExtAttrMask);
404			 * if (rc != -EOPNOTSUPP)
405			 *	break;
406			 */
407
408			/* Currently only flag we can set is compressed flag */
409			if ((ExtAttrBits & FS_COMPR_FL) == 0)
410				break;
411
412			/* Try to set compress flag */
413			if (tcon->ses->server->ops->set_compression) {
414				rc = tcon->ses->server->ops->set_compression(
415							xid, tcon, pSMBFile);
416				cifs_dbg(FYI, "set compress flag rc %d\n", rc);
417			}
418			break;
419		case CIFS_IOC_COPYCHUNK_FILE:
420			rc = cifs_ioctl_copychunk(xid, filep, arg);
421			break;
422		case CIFS_QUERY_INFO:
423			rc = cifs_ioctl_query_info(xid, filep, arg);
424			break;
425		case CIFS_IOC_SET_INTEGRITY:
426			if (pSMBFile == NULL)
427				break;
428			tcon = tlink_tcon(pSMBFile->tlink);
429			if (tcon->ses->server->ops->set_integrity)
430				rc = tcon->ses->server->ops->set_integrity(xid,
431						tcon, pSMBFile);
432			else
433				rc = -EOPNOTSUPP;
434			break;
435		case CIFS_IOC_GET_MNT_INFO:
436			if (pSMBFile == NULL)
437				break;
438			tcon = tlink_tcon(pSMBFile->tlink);
439			rc = smb_mnt_get_fsinfo(xid, tcon, (void __user *)arg);
440			break;
441		case CIFS_IOC_GET_TCON_INFO:
442			cifs_sb = CIFS_SB(inode->i_sb);
443			tlink = cifs_sb_tlink(cifs_sb);
444			if (IS_ERR(tlink)) {
445				rc = PTR_ERR(tlink);
446				break;
447			}
448			tcon = tlink_tcon(tlink);
449			rc = smb_mnt_get_tcon_info(tcon, (void __user *)arg);
450			cifs_put_tlink(tlink);
451			break;
452		case CIFS_ENUMERATE_SNAPSHOTS:
453			if (pSMBFile == NULL)
454				break;
455			if (arg == 0) {
456				rc = -EINVAL;
457				goto cifs_ioc_exit;
458			}
459			tcon = tlink_tcon(pSMBFile->tlink);
460			if (tcon->ses->server->ops->enum_snapshots)
461				rc = tcon->ses->server->ops->enum_snapshots(xid, tcon,
462						pSMBFile, (void __user *)arg);
463			else
464				rc = -EOPNOTSUPP;
465			break;
466		case CIFS_DUMP_KEY:
467			/*
468			 * Dump encryption keys. This is an old ioctl that only
469			 * handles AES-128-{CCM,GCM}.
470			 */
471			if (!capable(CAP_SYS_ADMIN)) {
472				rc = -EACCES;
473				break;
474			}
475
476			cifs_sb = CIFS_SB(inode->i_sb);
477			tlink = cifs_sb_tlink(cifs_sb);
478			if (IS_ERR(tlink)) {
479				rc = PTR_ERR(tlink);
480				break;
481			}
482			tcon = tlink_tcon(tlink);
483			if (!smb3_encryption_required(tcon)) {
484				rc = -EOPNOTSUPP;
485				cifs_put_tlink(tlink);
486				break;
487			}
488			pkey_inf.cipher_type =
489				le16_to_cpu(tcon->ses->server->cipher_type);
490			pkey_inf.Suid = tcon->ses->Suid;
491			memcpy(pkey_inf.auth_key, tcon->ses->auth_key.response,
492					16 /* SMB2_NTLMV2_SESSKEY_SIZE */);
493			memcpy(pkey_inf.smb3decryptionkey,
494			      tcon->ses->smb3decryptionkey, SMB3_SIGN_KEY_SIZE);
495			memcpy(pkey_inf.smb3encryptionkey,
496			      tcon->ses->smb3encryptionkey, SMB3_SIGN_KEY_SIZE);
497			if (copy_to_user((void __user *)arg, &pkey_inf,
498					sizeof(struct smb3_key_debug_info)))
499				rc = -EFAULT;
500			else
501				rc = 0;
502			cifs_put_tlink(tlink);
503			break;
504		case CIFS_DUMP_FULL_KEY:
505			/*
506			 * Dump encryption keys (handles any key sizes)
507			 */
508			if (pSMBFile == NULL)
509				break;
510			if (!capable(CAP_SYS_ADMIN)) {
511				rc = -EACCES;
512				break;
513			}
514			cifs_sb = CIFS_SB(inode->i_sb);
515			tlink = cifs_sb_tlink(cifs_sb);
516			if (IS_ERR(tlink)) {
517				rc = PTR_ERR(tlink);
518				break;
519			}
520
521			tcon = tlink_tcon(tlink);
522			rc = cifs_dump_full_key(tcon, (void __user *)arg);
523			cifs_put_tlink(tlink);
524			break;
525		case CIFS_IOC_NOTIFY:
526			if (!S_ISDIR(inode->i_mode)) {
527				/* Notify can only be done on directories */
528				rc = -EOPNOTSUPP;
529				break;
530			}
531			cifs_sb = CIFS_SB(inode->i_sb);
532			tlink = cifs_sb_tlink(cifs_sb);
533			if (IS_ERR(tlink)) {
534				rc = PTR_ERR(tlink);
535				break;
536			}
537			tcon = tlink_tcon(tlink);
538			if (tcon && tcon->ses->server->ops->notify) {
539				rc = tcon->ses->server->ops->notify(xid,
540						filep, (void __user *)arg,
541						false /* no ret data */);
542				cifs_dbg(FYI, "ioctl notify rc %d\n", rc);
543			} else
544				rc = -EOPNOTSUPP;
545			cifs_put_tlink(tlink);
546			break;
547		case CIFS_IOC_NOTIFY_INFO:
548			if (!S_ISDIR(inode->i_mode)) {
549				/* Notify can only be done on directories */
550				rc = -EOPNOTSUPP;
551				break;
552			}
553			cifs_sb = CIFS_SB(inode->i_sb);
554			tlink = cifs_sb_tlink(cifs_sb);
555			if (IS_ERR(tlink)) {
556				rc = PTR_ERR(tlink);
557				break;
558			}
559			tcon = tlink_tcon(tlink);
560			if (tcon && tcon->ses->server->ops->notify) {
561				rc = tcon->ses->server->ops->notify(xid,
562						filep, (void __user *)arg,
563						true /* return details */);
564				cifs_dbg(FYI, "ioctl notify info rc %d\n", rc);
565			} else
566				rc = -EOPNOTSUPP;
567			cifs_put_tlink(tlink);
568			break;
569		case CIFS_IOC_SHUTDOWN:
570			rc = cifs_shutdown(inode->i_sb, arg);
571			break;
572		default:
573			cifs_dbg(FYI, "unsupported ioctl\n");
574			break;
575	}
576cifs_ioc_exit:
577	free_xid(xid);
578	return rc;
579}
580