Fetch the SID of the user we are running as and send with the common
[Samba/nascimento.git] / source3 / modules / vfs_smb_traffic_analyzer.c
blob581aa99ca7d4685ba85358e0448e80b58b8a7e21
1 /*
2 * traffic-analyzer VFS module. Measure the smb traffic users create
3 * on the net.
5 * Copyright (C) Holger Hetterich, 2008
6 * Copyright (C) Jeremy Allison, 2008
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 3 of the License, or
11 * (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, see <http://www.gnu.org/licenses/>.
22 #include "includes.h"
23 #include "../lib/crypto/crypto.h"
25 /* abstraction for the send_over_network function */
26 enum sock_type {INTERNET_SOCKET = 0, UNIX_DOMAIN_SOCKET};
28 #define LOCAL_PATHNAME "/var/tmp/stadsocket"
30 /* VFS Functions identifier table. In protocol version 2, every vfs */
31 /* function is given a unique id. */
32 enum vfs_id {
33 /* care for the order here, required for compatibility */
34 /* with protocol version 1. */
35 vfs_id_read,
36 vfs_id_pread,
37 vfs_id_write,
38 vfs_id_pwrite,
39 /* end of protocol version 1 identifiers. */
40 vfs_id_mkdir,
41 vfs_id_rmdir,
42 vfs_id_rename,
43 vfs_id_chdir
46 /* Specific data sets for the VFS functions. */
48 struct mkdir_data {
49 const char *path;
50 mode_t mode;
51 int result;
54 struct rmdir_data {
55 const char *path;
56 int result;
59 struct rename_data {
60 const char *src;
61 const char *dst;
62 int result;
65 struct chdir_data {
66 const char *path;
67 int result;
70 /* rw_data used for read/write/pread/pwrite */
71 struct rw_data {
72 char *filename;
73 size_t len;
76 static int vfs_smb_traffic_analyzer_debug_level = DBGC_VFS;
78 static enum sock_type smb_traffic_analyzer_connMode(vfs_handle_struct *handle)
80 connection_struct *conn = handle->conn;
81 const char *Mode;
82 Mode=lp_parm_const_string(SNUM(conn), "smb_traffic_analyzer","mode", \
83 "internet_socket");
84 if (strstr(Mode,"unix_domain_socket")) {
85 return UNIX_DOMAIN_SOCKET;
86 } else {
87 return INTERNET_SOCKET;
92 /* Connect to an internet socket */
94 static int smb_traffic_analyzer_connect_inet_socket(vfs_handle_struct *handle,
95 const char *name, uint16_t port)
97 /* Create a streaming Socket */
98 int sockfd = -1;
99 struct addrinfo hints;
100 struct addrinfo *ailist = NULL;
101 struct addrinfo *res = NULL;
102 int ret;
104 ZERO_STRUCT(hints);
105 /* By default make sure it supports TCP. */
106 hints.ai_socktype = SOCK_STREAM;
107 hints.ai_flags = AI_ADDRCONFIG;
109 ret = getaddrinfo(name,
110 NULL,
111 &hints,
112 &ailist);
114 if (ret) {
115 DEBUG(3,("smb_traffic_analyzer_connect_inet_socket: "
116 "getaddrinfo failed for name %s [%s]\n",
117 name,
118 gai_strerror(ret) ));
119 return -1;
122 DEBUG(3,("smb_traffic_analyzer: Internet socket mode. Hostname: %s,"
123 "Port: %i\n", name, port));
125 for (res = ailist; res; res = res->ai_next) {
126 struct sockaddr_storage ss;
127 NTSTATUS status;
129 if (!res->ai_addr || res->ai_addrlen == 0) {
130 continue;
133 ZERO_STRUCT(ss);
134 memcpy(&ss, res->ai_addr, res->ai_addrlen);
136 status = open_socket_out(&ss, port, 10000, &sockfd);
137 if (NT_STATUS_IS_OK(status)) {
138 break;
142 if (ailist) {
143 freeaddrinfo(ailist);
146 if (sockfd == -1) {
147 DEBUG(1, ("smb_traffic_analyzer: unable to create "
148 "socket, error is %s",
149 strerror(errno)));
150 return -1;
153 return sockfd;
156 /* Connect to a unix domain socket */
158 static int smb_traffic_analyzer_connect_unix_socket(vfs_handle_struct *handle,
159 const char *name)
161 /* Create the socket to stad */
162 int len, sock;
163 struct sockaddr_un remote;
165 DEBUG(7, ("smb_traffic_analyzer_connect_unix_socket: "
166 "Unix domain socket mode. Using %s\n",
167 name ));
169 if ((sock = socket(AF_UNIX, SOCK_STREAM, 0)) == -1) {
170 DEBUG(1, ("smb_traffic_analyzer_connect_unix_socket: "
171 "Couldn't create socket, "
172 "make sure stad is running!\n"));
173 return -1;
175 remote.sun_family = AF_UNIX;
176 strlcpy(remote.sun_path, name,
177 sizeof(remote.sun_path));
178 len=strlen(remote.sun_path) + sizeof(remote.sun_family);
179 if (connect(sock, (struct sockaddr *)&remote, len) == -1 ) {
180 DEBUG(1, ("smb_traffic_analyzer_connect_unix_socket: "
181 "Could not connect to "
182 "socket, make sure\nstad is running!\n"));
183 close(sock);
184 return -1;
186 return sock;
189 /* Private data allowing shared connection sockets. */
191 struct refcounted_sock {
192 struct refcounted_sock *next, *prev;
193 char *name;
194 uint16_t port;
195 int sock;
196 unsigned int ref_count;
200 /* The marshaller for the protocol version 2. */
201 static char *smb_traffic_analyzer_create_string( struct tm *tm, \
202 int seconds, vfs_handle_struct *handle, \
203 char *username, int vfs_operation, int count, ... )
206 va_list ap;
207 char *arg = NULL;
208 char *str = NULL;
209 int len;
210 char *header = NULL;
211 char *buf = NULL;
212 char *timestr = NULL;
213 char *opstr = NULL;
214 char *userSID = NULL;
216 /* first create the data that is transfered with any VFS op */
217 opstr = talloc_asprintf(talloc_tos(), "%i", vfs_operation);
218 len = strlen(opstr);
219 buf = talloc_asprintf(talloc_tos(), "%04u%s", len, opstr);
220 len = strlen( username );
221 buf = talloc_asprintf_append(buf, "%04u%s", len, username);
222 userSID = dom_sid_string( talloc_tos(),
223 &handle->conn->server_info->ptok->user_sids[0]);
224 len = strlen( userSID );
225 buf = talloc_asprintf_append(buf, "%04u%s", len, userSID);
226 len = strlen( handle->conn->connectpath );
227 buf = talloc_asprintf_append( buf, "%04u%s", len, \
228 handle->conn->connectpath );
229 len = strlen( pdb_get_domain(handle->conn->server_info->sam_account) );
230 buf = talloc_asprintf_append( buf, "%04u%s", len, \
231 pdb_get_domain(handle->conn->server_info->sam_account) );
232 timestr = talloc_asprintf(talloc_tos(), \
233 "%04d-%02d-%02d %02d:%02d:%02d.%03d", \
234 tm->tm_year+1900, \
235 tm->tm_mon+1, \
236 tm->tm_mday, \
237 tm->tm_hour, \
238 tm->tm_min, \
239 tm->tm_sec, \
240 (int)seconds);
241 len = strlen( timestr );
242 buf = talloc_asprintf_append( buf, "%04u%s", len, timestr);
244 va_start( ap, count );
245 while ( count-- ) {
246 arg = va_arg( ap, char * );
247 /* protocol v2 sends a four byte string */
248 /* as a header to each block, including */
249 /* the numbers of bytes to come in the */
250 /* next string. */
251 len = strlen( arg );
252 buf = talloc_asprintf_append( buf, "%04u%s", len, arg);
254 va_end( ap );
256 /* now create the protocol v2 header. */
257 len = strlen( buf );
258 str = talloc_asprintf_append( str, "V2,%017u%s", len, buf);
259 DEBUG(10, ("smb_traffic_analyzer_create_string: %s\n",str));
260 return str;
263 static void smb_traffic_analyzer_send_data(vfs_handle_struct *handle,
264 void *data,
265 enum vfs_id vfs_operation )
267 struct refcounted_sock *rf_sock = NULL;
268 struct timeval tv;
269 time_t tv_sec;
270 struct tm *tm = NULL;
271 int seconds;
272 char *str = NULL;
273 char *username = NULL;
274 const char *anon_prefix = NULL;
275 const char *total_anonymization = NULL;
276 const char *protocol_version = NULL;
277 bool Write = false;
278 size_t len;
280 SMB_VFS_HANDLE_GET_DATA(handle, rf_sock, struct refcounted_sock, return);
282 if (rf_sock == NULL || rf_sock->sock == -1) {
283 DEBUG(1, ("smb_traffic_analyzer_send_data: socket is "
284 "closed\n"));
285 return;
288 GetTimeOfDay(&tv);
289 tv_sec = convert_timespec_to_time_t(convert_timeval_to_timespec(tv));
290 tm = localtime(&tv_sec);
291 if (!tm) {
292 return;
294 seconds=(float) (tv.tv_usec / 1000);
296 /* check if anonymization is required */
298 total_anonymization=lp_parm_const_string(SNUM(handle->conn),"smb_traffic_analyzer",
299 "total_anonymization", NULL);
301 anon_prefix=lp_parm_const_string(SNUM(handle->conn),"smb_traffic_analyzer",\
302 "anonymize_prefix", NULL );
303 if (anon_prefix!=NULL) {
304 if (total_anonymization!=NULL) {
305 username = talloc_asprintf(talloc_tos(),
306 "%s",
307 anon_prefix);
308 } else {
309 username = talloc_asprintf(talloc_tos(),
310 "%s%i",
311 anon_prefix,
312 str_checksum(
313 handle->conn->server_info->sanitized_username ) );
316 } else {
317 username = handle->conn->server_info->sanitized_username;
320 if (!username) {
321 return;
323 protocol_version = lp_parm_const_string(SNUM(handle->conn),
324 "smb_traffic_analyzer",
325 "protocol_version", NULL );
327 if ( protocol_version == NULL || strcmp( protocol_version,"V1") == 0) {
329 struct rw_data *s_data = (struct rw_data *) data;
331 /* in case of protocol v1, ignore any vfs operations */
332 /* except read,pread,write,pwrite, and set the "Write" */
333 /* bool accordingly. */
335 if ( vfs_operation > vfs_id_pwrite ) return;
337 if ( vfs_operation <= vfs_id_pread ) Write=false;
338 else Write=true;
340 str = talloc_asprintf(talloc_tos(),
341 "V1,%u,\"%s\",\"%s\",\"%c\",\"%s\",\"%s\","
342 "\"%04d-%02d-%02d %02d:%02d:%02d.%03d\"\n",
343 (unsigned int) s_data->len,
344 username,
345 pdb_get_domain(handle->conn->server_info->sam_account),
346 Write ? 'W' : 'R',
347 handle->conn->connectpath,
348 s_data->filename,
349 tm->tm_year+1900,
350 tm->tm_mon+1,
351 tm->tm_mday,
352 tm->tm_hour,
353 tm->tm_min,
354 tm->tm_sec,
355 (int)seconds);
356 } else if ( strcmp( protocol_version, "V2") == 0) {
358 switch( vfs_operation ) {
359 case vfs_id_mkdir: ;
360 str = smb_traffic_analyzer_create_string( tm, \
361 seconds, handle, username, vfs_id_mkdir, 3,\
362 ((struct mkdir_data *) data)->path, \
363 talloc_asprintf( talloc_tos(), "%u", \
364 ((struct mkdir_data *) data)->mode), \
365 talloc_asprintf( talloc_tos(), "%u", \
366 ((struct mkdir_data *) data)->result ));
367 break;
368 case vfs_id_rmdir: ;
369 str = smb_traffic_analyzer_create_string( tm, \
370 seconds, handle, username, vfs_id_rmdir, 2,\
371 ((struct rmdir_data *) data)->path, \
372 talloc_asprintf( talloc_tos(), "%u", \
373 ((struct rmdir_data *) data)->result ));
374 break;
375 case vfs_id_rename: ;
376 str = smb_traffic_analyzer_create_string( tm, \
377 seconds, handle, username, vfs_id_rename, 3,\
378 ((struct rename_data *) data)->src, \
379 ((struct rename_data *) data)->dst,
380 talloc_asprintf(talloc_tos(), "%u", \
381 ((struct rename_data *) data)->result));
382 break;
383 case vfs_id_chdir: ;
384 str = smb_traffic_analyzer_create_string( tm, \
385 seconds, handle, username, vfs_id_chdir, 2,\
386 ((struct chdir_data *) data)->path, \
387 talloc_asprintf(talloc_tos(), "%u", \
388 ((struct chdir_data *) data)->result));
389 break;
391 case vfs_id_write:
392 case vfs_id_pwrite:
393 case vfs_id_read:
394 case vfs_id_pread: ;
395 str = smb_traffic_analyzer_create_string( tm, \
396 seconds, handle, username, vfs_operation, 2,\
397 ((struct rw_data *) data)->filename, \
398 talloc_asprintf(talloc_tos(), "%u", \
399 ((struct rw_data *) data)->len));
400 break;
401 default:
402 DEBUG(1, ("smb_traffic_analyzer: error! "
403 "wrong VFS operation id detected!\n"));
404 return;
407 } else {
408 DEBUG(1, ("smb_traffic_analyzer_send_data_socket: "
409 "error, unkown protocol given!\n"));
410 return;
413 if (!str) {
414 DEBUG(1, ("smb_traffic_analyzer_send_data: "
415 "unable to create string to send!\n"));
416 return;
419 len = strlen(str);
421 DEBUG(10, ("smb_traffic_analyzer_send_data_socket: going to send "
422 "%s\n", str));
423 /* If configured, optain the key and run AES encryption */
424 /* over the data. */
425 size_t size;
426 char *akey = secrets_fetch("smb_traffic_analyzer_key", &size);
427 if ( akey != NULL ) {
428 char *crypted;
429 DEBUG(10, ("smb_traffic_analyzer: a key was found, encrypting "
430 "data!"));
431 AES_KEY *key;
432 samba_AES_set_encrypt_key(akey, 128, key);
433 samba_AES_encrypt( str, crypted, key );
434 len = strlen( crypted );
435 if (write_data(rf_sock->sock, crypted, len) != len) {
436 DEBUG(1, ("smb_traffic_analyzer_send_data_socket: "
437 "error sending crypted data to socket!\n"));
438 free( crypted );
439 return ;
442 if (write_data(rf_sock->sock, str, len) != len) {
443 DEBUG(1, ("smb_traffic_analyzer_send_data_socket: "
444 "error sending data to socket!\n"));
445 return ;
449 static struct refcounted_sock *sock_list;
451 static void smb_traffic_analyzer_free_data(void **pptr)
453 struct refcounted_sock *rf_sock = *(struct refcounted_sock **)pptr;
454 if (rf_sock == NULL) {
455 return;
457 rf_sock->ref_count--;
458 if (rf_sock->ref_count != 0) {
459 return;
461 if (rf_sock->sock != -1) {
462 close(rf_sock->sock);
464 DLIST_REMOVE(sock_list, rf_sock);
465 TALLOC_FREE(rf_sock);
468 static int smb_traffic_analyzer_connect(struct vfs_handle_struct *handle,
469 const char *service,
470 const char *user)
472 connection_struct *conn = handle->conn;
473 enum sock_type st = smb_traffic_analyzer_connMode(handle);
474 struct refcounted_sock *rf_sock = NULL;
475 const char *name = (st == UNIX_DOMAIN_SOCKET) ? LOCAL_PATHNAME :
476 lp_parm_const_string(SNUM(conn),
477 "smb_traffic_analyzer",
478 "host", "localhost");
479 uint16_t port = (st == UNIX_DOMAIN_SOCKET) ? 0 :
480 atoi( lp_parm_const_string(SNUM(conn),
481 "smb_traffic_analyzer", "port", "9430"));
482 int ret = SMB_VFS_NEXT_CONNECT(handle, service, user);
484 if (ret < 0) {
485 return ret;
488 /* Are we already connected ? */
489 for (rf_sock = sock_list; rf_sock; rf_sock = rf_sock->next) {
490 if (port == rf_sock->port &&
491 (strcmp(name, rf_sock->name) == 0)) {
492 break;
496 /* If we're connected already, just increase the
497 * reference count. */
498 if (rf_sock) {
499 rf_sock->ref_count++;
500 } else {
501 /* New connection. */
502 rf_sock = TALLOC_ZERO_P(NULL, struct refcounted_sock);
503 if (rf_sock == NULL) {
504 SMB_VFS_NEXT_DISCONNECT(handle);
505 errno = ENOMEM;
506 return -1;
508 rf_sock->name = talloc_strdup(rf_sock, name);
509 if (rf_sock->name == NULL) {
510 SMB_VFS_NEXT_DISCONNECT(handle);
511 TALLOC_FREE(rf_sock);
512 errno = ENOMEM;
513 return -1;
515 rf_sock->port = port;
516 rf_sock->ref_count = 1;
518 if (st == UNIX_DOMAIN_SOCKET) {
519 rf_sock->sock = smb_traffic_analyzer_connect_unix_socket(handle,
520 name);
521 } else {
523 rf_sock->sock = smb_traffic_analyzer_connect_inet_socket(handle,
524 name,
525 port);
527 if (rf_sock->sock == -1) {
528 SMB_VFS_NEXT_DISCONNECT(handle);
529 TALLOC_FREE(rf_sock);
530 return -1;
532 DLIST_ADD(sock_list, rf_sock);
535 /* Store the private data. */
536 SMB_VFS_HANDLE_SET_DATA(handle, rf_sock, smb_traffic_analyzer_free_data,
537 struct refcounted_sock, return -1);
538 return 0;
541 /* VFS Functions */
542 static int smb_traffic_analyzer_chdir(vfs_handle_struct *handle, \
543 const char *path)
545 struct chdir_data s_data;
546 s_data.result = SMB_VFS_NEXT_CHDIR(handle, path);
547 s_data.path = path;
548 DEBUG(10, ("smb_traffic_analyzer_chdir: CHDIR: %s\n", path));
549 smb_traffic_analyzer_send_data(handle, &s_data, vfs_id_chdir);
550 return s_data.result;
553 static int smb_traffic_analyzer_rename(vfs_handle_struct *handle, \
554 const struct smb_filename *smb_fname_src,
555 const struct smb_filename *smb_fname_dst)
557 struct rename_data s_data;
558 s_data.result = SMB_VFS_NEXT_RENAME(handle, smb_fname_src, \
559 smb_fname_dst);
560 s_data.src = smb_fname_src->base_name;
561 s_data.dst = smb_fname_dst->base_name;
562 DEBUG(10, ("smb_traffic_analyzer_rename: RENAME: %s / %s\n",
563 smb_fname_src->base_name,
564 smb_fname_dst->base_name));
565 smb_traffic_analyzer_send_data(handle, &s_data, vfs_id_rename);
566 return s_data.result;
569 static int smb_traffic_analyzer_rmdir(vfs_handle_struct *handle, \
570 const char *path)
572 struct rmdir_data s_data;
573 s_data.result = SMB_VFS_NEXT_RMDIR(handle, path);
574 s_data.path = path;
575 DEBUG(10, ("smb_traffic_analyzer_rmdir: RMDIR: %s\n", path));
576 smb_traffic_analyzer_send_data(handle, &s_data, vfs_id_rmdir);
577 return s_data.result;
580 static int smb_traffic_analyzer_mkdir(vfs_handle_struct *handle, \
581 const char *path, mode_t mode)
583 struct mkdir_data s_data;
584 s_data.result = SMB_VFS_NEXT_MKDIR(handle, path, mode);
585 s_data.path = path;
586 s_data.mode = mode;
587 DEBUG(10, ("smb_traffic_analyzer_mkdir: MKDIR: %s\n", path));
588 smb_traffic_analyzer_send_data(handle,
589 &s_data,
590 vfs_id_mkdir);
591 return s_data.result;
594 static ssize_t smb_traffic_analyzer_read(vfs_handle_struct *handle, \
595 files_struct *fsp, void *data, size_t n)
597 struct rw_data s_data;
599 s_data.len = SMB_VFS_NEXT_READ(handle, fsp, data, n);
600 s_data.filename = fsp->fsp_name->base_name;
601 DEBUG(10, ("smb_traffic_analyzer_read: READ: %s\n", fsp_str_dbg(fsp)));
603 smb_traffic_analyzer_send_data(handle,
604 &s_data,
605 vfs_id_read);
606 return s_data.len;
610 static ssize_t smb_traffic_analyzer_pread(vfs_handle_struct *handle, \
611 files_struct *fsp, void *data, size_t n, SMB_OFF_T offset)
613 struct rw_data s_data;
615 s_data.len = SMB_VFS_NEXT_PREAD(handle, fsp, data, n, offset);
616 s_data.filename = fsp->fsp_name->base_name;
617 DEBUG(10, ("smb_traffic_analyzer_pread: PREAD: %s\n",
618 fsp_str_dbg(fsp)));
620 smb_traffic_analyzer_send_data(handle,
621 &s_data,
622 vfs_id_pread);
624 return s_data.len;
627 static ssize_t smb_traffic_analyzer_write(vfs_handle_struct *handle, \
628 files_struct *fsp, const void *data, size_t n)
630 struct rw_data s_data;
632 s_data.len = SMB_VFS_NEXT_WRITE(handle, fsp, data, n);
633 s_data.filename = fsp->fsp_name->base_name;
634 DEBUG(10, ("smb_traffic_analyzer_write: WRITE: %s\n",
635 fsp_str_dbg(fsp)));
637 smb_traffic_analyzer_send_data(handle,
638 &s_data,
639 vfs_id_write);
640 return s_data.len;
643 static ssize_t smb_traffic_analyzer_pwrite(vfs_handle_struct *handle, \
644 files_struct *fsp, const void *data, size_t n, SMB_OFF_T offset)
646 struct rw_data s_data;
648 s_data.len = SMB_VFS_NEXT_PWRITE(handle, fsp, data, n, offset);
649 s_data.filename = fsp->fsp_name->base_name;
650 DEBUG(10, ("smb_traffic_analyzer_pwrite: PWRITE: %s\n", \
651 fsp_str_dbg(fsp)));
653 smb_traffic_analyzer_send_data(handle,
654 &s_data,
655 vfs_id_pwrite);
656 return s_data.len;
659 static struct vfs_fn_pointers vfs_smb_traffic_analyzer_fns = {
660 .connect_fn = smb_traffic_analyzer_connect,
661 .vfs_read = smb_traffic_analyzer_read,
662 .pread = smb_traffic_analyzer_pread,
663 .write = smb_traffic_analyzer_write,
664 .pwrite = smb_traffic_analyzer_pwrite,
665 .mkdir = smb_traffic_analyzer_mkdir,
666 .rename = smb_traffic_analyzer_rename,
667 .chdir = smb_traffic_analyzer_chdir
670 /* Module initialization */
672 NTSTATUS vfs_smb_traffic_analyzer_init(void)
674 NTSTATUS ret = smb_register_vfs(SMB_VFS_INTERFACE_VERSION,
675 "smb_traffic_analyzer",
676 &vfs_smb_traffic_analyzer_fns);
678 if (!NT_STATUS_IS_OK(ret)) {
679 return ret;
682 vfs_smb_traffic_analyzer_debug_level =
683 debug_add_class("smb_traffic_analyzer");
685 if (vfs_smb_traffic_analyzer_debug_level == -1) {
686 vfs_smb_traffic_analyzer_debug_level = DBGC_VFS;
687 DEBUG(1, ("smb_traffic_analyzer_init: Couldn't register custom"
688 "debugging class!\n"));
689 } else {
690 DEBUG(3, ("smb_traffic_analyzer_init: Debug class number of"
691 "'smb_traffic_analyzer': %d\n", \
692 vfs_smb_traffic_analyzer_debug_level));
695 return ret;