2 * Network Block Device - server
4 * Copyright 1996-1998 Pavel Machek, distribute under GPL
5 * <pavel@atrey.karlin.mff.cuni.cz>
6 * Copyright 2001-2004 Wouter Verhelst <wouter@debian.org>
7 * Copyright 2002 Anton Altaparmakov <aia21@cam.ac.uk>
9 * Version 1.0 - hopefully 64-bit-clean
10 * Version 1.1 - merging enhancements from Josh Parsons, <josh@coombs.anu.edu.au>
11 * Version 1.2 - autodetect size of block devices, thanx to Peter T. Breuer" <ptb@it.uc3m.es>
12 * Version 1.5 - can compile on Unix systems that don't have 64 bit integer
13 * type, or don't have 64 bit file offsets by defining FS_32BIT
14 * in compile options for nbd-server *only*. This can be done
15 * with make FSCHOICE=-DFS_32BIT nbd-server. (I don't have the
16 * original autoconf input file, or I would make it a configure
17 * option.) Ken Yap <ken@nlc.net.au>.
18 * Version 1.6 - fix autodetection of block device size and really make 64 bit
19 * clean on 32 bit machines. Anton Altaparmakov <aia21@cam.ac.uk>
20 * Version 2.0 - Version synchronised with client
21 * Version 2.1 - Reap zombie client processes when they exit. Removed
22 * (uncommented) the _IO magic, it's no longer necessary. Wouter
23 * Verhelst <wouter@debian.org>
24 * Version 2.2 - Auto switch to read-only mode (usefull for floppies).
25 * Version 2.3 - Fixed code so that Large File Support works. This
26 * removes the FS_32BIT compile-time directive; define
27 * _FILE_OFFSET_BITS=64 and _LARGEFILE_SOURCE if you used to be
28 * using FS_32BIT. This will allow you to use files >2GB instead of
29 * having to use the -m option. Wouter Verhelst <wouter@debian.org>
30 * Version 2.4 - Added code to keep track of children, so that we can
31 * properly kill them from initscripts. Add a call to daemon(),
32 * so that processes don't think they have to wait for us, which is
33 * interesting for initscripts as well. Wouter Verhelst
35 * Version 2.5 - Bugfix release: forgot to reset child_arraysize to
36 * zero after fork()ing, resulting in nbd-server going berserk
37 * when it receives a signal with at least one child open. Wouter
38 * Verhelst <wouter@debian.org>
39 * 10/10/2003 - Added socket option SO_KEEPALIVE (sf.net bug 819235);
40 * rectified type of mainloop::size_host (sf.net bugs 814435 and
41 * 817385); close the PID file after writing to it, so that the
42 * daemon can actually be found. Wouter Verhelst
44 * 10/10/2003 - Size of the data "size_host" was wrong and so was not
45 * correctly put in network endianness. Many types were corrected
46 * (size_t and off_t instead of int). <vspaceg@sourceforge.net>
47 * Version 2.6 - Some code cleanup.
48 * Version 2.7 - Better build system.
49 * 11/02/2004 - Doxygenified the source, modularized it a bit. Needs a
50 * lot more work, but this is a start. Wouter Verhelst
52 * 16/03/2010 - Add IPv6 support.
53 * Kitt Tientanopajai <kitt@kitty.in.th>
54 * Neutron Soutmun <neo.neutron@gmail.com>
55 * Suriya Soutmun <darksolar@gmail.com>
58 /* Includes LFS defines, which defines behaviours of some of the following
59 * headers, so must come before those */
62 #include <sys/types.h>
63 #include <sys/socket.h>
65 #include <sys/select.h> /* select */
66 #include <sys/wait.h> /* wait */
67 #ifdef HAVE_SYS_IOCTL_H
68 #include <sys/ioctl.h>
70 #include <sys/param.h>
71 #ifdef HAVE_SYS_MOUNT_H
72 #include <sys/mount.h> /* For BLKGETSIZE */
74 #include <signal.h> /* sigaction */
76 #include <netinet/tcp.h>
77 #include <netinet/in.h>
85 #include <arpa/inet.h>
95 /* used in cliserv.h, so must come first */
96 #define MY_NAME "nbd_server"
99 /** Default position of the config file */
101 #define SYSCONFDIR "/etc"
103 #define CFILE SYSCONFDIR "/nbd-server/config"
105 /** Where our config file actually is */
106 gchar* config_file_pos;
108 /** What user we're running as */
110 /** What group we're running as */
111 gchar* rungroup=NULL;
112 /** whether to export using the old negotiation protocol (port-based) */
113 gboolean do_oldstyle=FALSE;
115 /** Logging macros, now nothing goes to syslog unless you say ISSERVER */
117 #define msg2(a,b) syslog(a,b)
118 #define msg3(a,b,c) syslog(a,b,c)
119 #define msg4(a,b,c,d) syslog(a,b,c,d)
121 #define msg2(a,b) g_message(b)
122 #define msg3(a,b,c) g_message(b,c)
123 #define msg4(a,b,c,d) g_message(b,c,d)
126 /* Debugging macros */
129 #define DEBUG( a ) printf( a )
130 #define DEBUG2( a,b ) printf( a,b )
131 #define DEBUG3( a,b,c ) printf( a,b,c )
132 #define DEBUG4( a,b,c,d ) printf( a,b,c,d )
135 #define DEBUG2( a,b )
136 #define DEBUG3( a,b,c )
137 #define DEBUG4( a,b,c,d )
139 #ifndef PACKAGE_VERSION
140 #define PACKAGE_VERSION ""
143 * The highest value a variable of type off_t can reach. This is a signed
144 * integer, so set all bits except for the leftmost one.
146 #define OFFT_MAX ~((off_t)1<<(sizeof(off_t)*8-1))
147 #define LINELEN 256 /**< Size of static buffer used to read the
148 authorization file (yuck) */
149 #define BUFSIZE (1024*1024) /**< Size of buffer that can hold requests */
150 #define DIFFPAGESIZE 4096 /**< diff file uses those chunks */
151 #define F_READONLY 1 /**< flag to tell us a file is readonly */
152 #define F_MULTIFILE 2 /**< flag to tell us a file is exported using -m */
153 #define F_COPYONWRITE 4 /**< flag to tell us a file is exported using
155 #define F_AUTOREADONLY 8 /**< flag to tell us a file is set to autoreadonly */
156 #define F_SPARSE 16 /**< flag to tell us copyronwrite should use a sparse file */
157 #define F_SDP 32 /**< flag to tell us the export should be done using the Socket Direct Protocol for RDMA */
158 #define F_SYNC 64 /**< Whether to fsync() after a write */
159 GHashTable *children;
160 char pidfname[256]; /**< name of our PID file */
161 char pidftemplate[256]; /**< template to be used for the filename of the PID file */
162 char default_authname[] = SYSCONFDIR "/nbd-server/allow"; /**< default name of allow file */
164 int modernsock=0; /**< Socket for the modern handler. Not used
165 if a client was only specified on the
166 command line; only port used if
167 oldstyle is set to false (and then the
168 command-line client isn't used, gna gna) */
169 char* modern_listen; /**< listenaddr value for modernsock */
172 * Types of virtuatlization
175 VIRT_NONE=0, /**< No virtualization */
176 VIRT_IPLIT, /**< Literal IP address as part of the filename */
177 VIRT_IPHASH, /**< Replacing all dots in an ip address by a / before
178 doing the same as in IPLIT */
179 VIRT_CIDR, /**< Every subnet in its own directory */
183 * Variables associated with a server.
186 gchar* exportname; /**< (unprocessed) filename of the file we're exporting */
187 off_t expected_size; /**< size of the exported file as it was told to
188 us through configuration */
189 gchar* listenaddr; /**< The IP address we're listening on */
190 unsigned int port; /**< port we're exporting this file at */
191 char* authname; /**< filename of the authorization file */
192 int flags; /**< flags associated with this exported file */
193 int socket; /**< The socket of this server. */
194 int socket_family; /**< family of the socket */
195 VIRT_STYLE virtstyle;/**< The style of virtualization, if any */
196 uint8_t cidrlen; /**< The length of the mask when we use
197 CIDR-style virtualization */
198 gchar* prerun; /**< command to be ran after connecting a client,
199 but before starting to serve */
200 gchar* postrun; /**< command that will be ran after the client
202 gchar* servename; /**< name of the export as selected by nbd-client */
206 * Variables associated with a client socket.
209 int fhandle; /**< file descriptor */
210 off_t startoff; /**< starting offset of this file */
214 off_t exportsize; /**< size of the file we're exporting */
215 char *clientname; /**< peer */
216 char *exportname; /**< (processed) filename of the file we're exporting */
217 GArray *export; /**< array of FILE_INFO of exported files;
218 array size is always 1 unless we're
219 doing the multiple file option */
220 int net; /**< The actual client socket */
221 SERVER *server; /**< The server this client is getting data from */
222 char* difffilename; /**< filename of the copy-on-write file, if any */
223 int difffile; /**< filedescriptor of copyonwrite file. @todo
224 shouldn't this be an array too? (cfr export) Or
225 make -m and -c mutually exclusive */
226 u32 difffilelen; /**< number of pages in difffile */
227 u32 *difmap; /**< see comment on the global difmap for this one */
228 gboolean modern; /**< client was negotiated using modern negotiation protocol */
232 * Type of configuration file values
235 PARAM_INT, /**< This parameter is an integer */
236 PARAM_STRING, /**< This parameter is a string */
237 PARAM_BOOL, /**< This parameter is a boolean */
241 * Configuration file values
244 gchar *paramname; /**< Name of the parameter, as it appears in
246 gboolean required; /**< Whether this is a required (as opposed to
247 optional) parameter */
248 PARAM_TYPE ptype; /**< Type of the parameter. */
249 gpointer target; /**< Pointer to where the data of this
250 parameter should be written. If ptype is
251 PARAM_BOOL, the data is or'ed rather than
253 gint flagval; /**< Flag mask for this parameter in case ptype
258 * Check whether a client is allowed to connect. Works with an authorization
259 * file which contains one line per machine, no wildcards.
261 * @param opts The client who's trying to connect.
262 * @return 0 - authorization refused, 1 - OK
264 int authorized_client(CLIENT *opts) {
265 const char *ERRMSG="Invalid entry '%s' in authfile '%s', so, refusing all connections.";
270 struct in_addr client;
271 struct in_addr cltemp;
274 if ((f=fopen(opts->server->authname,"r"))==NULL) {
275 msg4(LOG_INFO,"Can't open authorization file %s (%s).",
276 opts->server->authname,strerror(errno)) ;
280 inet_aton(opts->clientname, &client);
281 while (fgets(line,LINELEN,f)!=NULL) {
282 if((tmp=index(line, '/'))) {
283 if(strlen(line)<=tmp-line) {
284 msg4(LOG_CRIT, ERRMSG, line, opts->server->authname);
288 if(!inet_aton(line,&addr)) {
289 msg4(LOG_CRIT, ERRMSG, line, opts->server->authname);
292 len=strtol(tmp, NULL, 0);
293 addr.s_addr>>=32-len;
294 addr.s_addr<<=32-len;
295 memcpy(&cltemp,&client,sizeof(client));
296 cltemp.s_addr>>=32-len;
297 cltemp.s_addr<<=32-len;
298 if(addr.s_addr == cltemp.s_addr) {
302 if (strncmp(line,opts->clientname,strlen(opts->clientname))==0) {
312 * Read data from a file descriptor into a buffer
314 * @param f a file descriptor
315 * @param buf a buffer
316 * @param len the number of bytes to be read
318 inline void readit(int f, void *buf, size_t len) {
322 if ((res = read(f, buf, len)) <= 0) {
323 if(errno != EAGAIN) {
324 err("Read failed: %m");
334 * Write data from a buffer into a filedescriptor
336 * @param f a file descriptor
337 * @param buf a buffer containing data
338 * @param len the number of bytes to be written
340 inline void writeit(int f, void *buf, size_t len) {
344 if ((res = write(f, buf, len)) <= 0)
345 err("Send failed: %m");
352 * Print out a message about how to use nbd-server. Split out to a separate
353 * function so that we can call it from multiple places
356 printf("This is nbd-server version " VERSION "\n");
357 printf("Usage: [ip:|ip6@]port file_to_export [size][kKmM] [-l authorize_file] [-r] [-m] [-c] [-C configuration file] [-p PID file name] [-o section name]\n"
358 "\t-r|--read-only\t\tread only\n"
359 "\t-m|--multi-file\t\tmultiple file\n"
360 "\t-c|--copy-on-write\tcopy on write\n"
361 "\t-C|--config-file\tspecify an alternate configuration file\n"
362 "\t-l|--authorize-file\tfile with list of hosts that are allowed to\n\t\t\t\tconnect.\n"
363 "\t-p|--pid-file\t\tspecify a filename to write our PID to\n"
364 "\t-o|--output-config\toutput a config file section for what you\n\t\t\t\tspecified on the command line, with the\n\t\t\t\tspecified section name\n\n"
365 "\tif port is set to 0, stdin is used (for running from inetd)\n"
366 "\tif file_to_export contains '%%s', it is substituted with the IP\n"
367 "\t\taddress of the machine trying to connect\n"
368 "\tif ip is set, it contains the local IP address on which we're listening.\n\tif not, the server will listen on all local IP addresses\n");
369 printf("Using configuration file %s\n", CFILE);
372 /* Dumps a config file section of the given SERVER*, and exits. */
373 void dump_section(SERVER* serve, gchar* section_header) {
374 printf("[%s]\n", section_header);
375 printf("\texportname = %s\n", serve->exportname);
376 printf("\tlistenaddr = %s\n", serve->listenaddr);
377 printf("\tport = %d\n", serve->port);
378 if(serve->flags & F_READONLY) {
379 printf("\treadonly = true\n");
381 if(serve->flags & F_MULTIFILE) {
382 printf("\tmultifile = true\n");
384 if(serve->flags & F_COPYONWRITE) {
385 printf("\tcopyonwrite = true\n");
387 if(serve->expected_size) {
388 printf("\tfilesize = %lld\n", (long long int)serve->expected_size);
390 if(serve->authname) {
391 printf("\tauthfile = %s\n", serve->authname);
397 * Parse the command line.
399 * @param argc the argc argument to main()
400 * @param argv the argv argument to main()
402 SERVER* cmdline(int argc, char *argv[]) {
406 struct option long_options[] = {
407 {"read-only", no_argument, NULL, 'r'},
408 {"multi-file", no_argument, NULL, 'm'},
409 {"copy-on-write", no_argument, NULL, 'c'},
410 {"authorize-file", required_argument, NULL, 'l'},
411 {"config-file", required_argument, NULL, 'C'},
412 {"pid-file", required_argument, NULL, 'p'},
413 {"output-config", required_argument, NULL, 'o'},
420 gboolean do_output=FALSE;
421 gchar* section_header="";
427 serve=g_new0(SERVER, 1);
428 serve->authname = g_strdup(default_authname);
429 serve->virtstyle=VIRT_IPLIT;
430 while((c=getopt_long(argc, argv, "-C:cl:mo:rp:", long_options, &i))>=0) {
433 /* non-option argument */
434 switch(nonspecial++) {
436 if(strchr(optarg, ':') == strrchr(optarg, ':')) {
437 addr_port=g_strsplit(optarg, ":", 2);
439 /* Check for "@" - maybe user using this separator
442 g_strfreev(addr_port);
443 addr_port=g_strsplit(optarg, "@", 2);
446 addr_port=g_strsplit(optarg, "@", 2);
450 serve->port=strtol(addr_port[1], NULL, 0);
451 serve->listenaddr=g_strdup(addr_port[0]);
453 serve->listenaddr=NULL;
454 serve->port=strtol(addr_port[0], NULL, 0);
456 g_strfreev(addr_port);
459 serve->exportname = g_strdup(optarg);
460 if(serve->exportname[0] != '/') {
461 fprintf(stderr, "E: The to be exported file needs to be an absolute filename!\n");
466 last=strlen(optarg)-1;
468 if (suffix == 'k' || suffix == 'K' ||
469 suffix == 'm' || suffix == 'M')
471 es = (off_t)atoll(optarg);
479 serve->expected_size = es;
484 serve->flags |= F_READONLY;
487 serve->flags |= F_MULTIFILE;
491 section_header = g_strdup(optarg);
494 strncpy(pidftemplate, optarg, 256);
497 serve->flags |=F_COPYONWRITE;
500 g_free(config_file_pos);
501 config_file_pos=g_strdup(optarg);
504 g_free(serve->authname);
505 serve->authname=g_strdup(optarg);
513 /* What's left: the port to export, the name of the to be exported
514 * file, and, optionally, the size of the file, in that order. */
521 g_critical("Need a complete configuration on the command line to output a config file section!");
524 dump_section(serve, section_header);
530 * Error codes for config file parsing
533 CFILE_NOTFOUND, /**< The configuration file is not found */
534 CFILE_MISSING_GENERIC, /**< The (required) group "generic" is missing */
535 CFILE_KEY_MISSING, /**< A (required) key is missing */
536 CFILE_VALUE_INVALID, /**< A value is syntactically invalid */
537 CFILE_VALUE_UNSUPPORTED,/**< A value is not supported in this build */
538 CFILE_PROGERR, /**< Programmer error */
539 CFILE_NO_EXPORTS, /**< A config file was specified that does not
540 define any exports */
541 CFILE_INCORRECT_PORT, /**< The reserved port was specified for an
546 * Remove a SERVER from memory. Used from the hash table
548 void remove_server(gpointer s) {
552 g_free(server->exportname);
554 g_free(server->authname);
555 if(server->listenaddr)
556 g_free(server->listenaddr);
558 g_free(server->prerun);
560 g_free(server->postrun);
566 * @param s the old server we want to duplicate
567 * @return new duplicated server
569 SERVER* dup_serve(SERVER *s) {
570 SERVER *serve = NULL;
572 serve=g_new0(SERVER, 1);
577 serve->exportname = g_strdup(s->exportname);
579 serve->expected_size = s->expected_size;
582 serve->listenaddr = g_strdup(s->listenaddr);
584 serve->port = s->port;
587 serve->authname = strdup(s->authname);
589 serve->flags = s->flags;
590 serve->socket = serve->socket;
591 serve->socket_family = serve->socket_family;
592 serve->cidrlen = s->cidrlen;
595 serve->prerun = g_strdup(s->prerun);
598 serve->postrun = g_strdup(s->postrun);
601 serve->servename = g_strdup(s->servename);
607 * append new server to array
609 * @param a server array
610 * @return 0 success, -1 error
612 int append_serve(SERVER *s, GArray *a) {
614 struct addrinfo hints;
615 struct addrinfo *ai = NULL;
616 struct addrinfo *rp = NULL;
617 char host[NI_MAXHOST];
623 err("Invalid parsing server");
627 port = g_strdup_printf("%d", s->port);
629 memset(&hints,'\0',sizeof(hints));
630 hints.ai_family = AF_UNSPEC;
631 hints.ai_socktype = SOCK_STREAM;
632 hints.ai_flags = AI_ADDRCONFIG | AI_PASSIVE;
633 hints.ai_protocol = IPPROTO_TCP;
635 e = getaddrinfo(s->listenaddr, port, &hints, &ai);
641 for (rp = ai; rp != NULL; rp = rp->ai_next) {
642 e = getnameinfo(rp->ai_addr, rp->ai_addrlen, host, sizeof(host), NULL, 0, NI_NUMERICHOST);
644 if (e != 0) { // error
645 fprintf(stderr, "getnameinfo: %s\n", gai_strerror(e));
649 // duplicate server and set listenaddr to resolved IP address
652 ns->listenaddr = g_strdup(host);
653 ns->socket_family = rp->ai_family;
654 g_array_append_val(a, *ns);
662 fprintf(stderr, "getaddrinfo failed on listen host/address: %s (%s)\n", s->listenaddr ? s->listenaddr : "any", gai_strerror(e));
673 * Parse the config file.
675 * @param f the name of the config file
676 * @param e a GError. @see CFILE_ERRORS for what error values this function can
678 * @return a Array of SERVER* pointers, If the config file is empty or does not
679 * exist, returns an empty GHashTable; if the config file contains an
680 * error, returns NULL, and e is set appropriately
682 GArray* parse_cfile(gchar* f, GError** e) {
683 const char* DEFAULT_ERROR = "Could not parse %s in group %s: %s";
684 const char* MISSING_REQUIRED_ERROR = "Could not find required value %s in group %s: %s";
686 gchar *virtstyle=NULL;
688 { "exportname", TRUE, PARAM_STRING, NULL, 0 },
689 { "port", TRUE, PARAM_INT, NULL, 0 },
690 { "authfile", FALSE, PARAM_STRING, NULL, 0 },
691 { "filesize", FALSE, PARAM_INT, NULL, 0 },
692 { "virtstyle", FALSE, PARAM_STRING, NULL, 0 },
693 { "prerun", FALSE, PARAM_STRING, NULL, 0 },
694 { "postrun", FALSE, PARAM_STRING, NULL, 0 },
695 { "readonly", FALSE, PARAM_BOOL, NULL, F_READONLY },
696 { "multifile", FALSE, PARAM_BOOL, NULL, F_MULTIFILE },
697 { "copyonwrite", FALSE, PARAM_BOOL, NULL, F_COPYONWRITE },
698 { "sparse_cow", FALSE, PARAM_BOOL, NULL, F_SPARSE },
699 { "sdp", FALSE, PARAM_BOOL, NULL, F_SDP },
700 { "sync", FALSE, PARAM_BOOL, NULL, F_SYNC },
701 { "listenaddr", FALSE, PARAM_STRING, NULL, 0 },
703 const int lp_size=sizeof(lp)/sizeof(PARAM);
705 { "user", FALSE, PARAM_STRING, &runuser, 0 },
706 { "group", FALSE, PARAM_STRING, &rungroup, 0 },
707 { "oldstyle", FALSE, PARAM_BOOL, &do_oldstyle, 1 },
708 { "listenaddr", FALSE, PARAM_STRING, &modern_listen, 0 },
711 int p_size=sizeof(gp)/sizeof(PARAM);
714 const char *err_msg=NULL;
723 errdomain = g_quark_from_string("parse_cfile");
724 cfile = g_key_file_new();
725 retval = g_array_new(FALSE, TRUE, sizeof(SERVER));
726 if(!g_key_file_load_from_file(cfile, f, G_KEY_FILE_KEEP_COMMENTS |
727 G_KEY_FILE_KEEP_TRANSLATIONS, &err)) {
728 g_set_error(e, errdomain, CFILE_NOTFOUND, "Could not open config file %s.", f);
729 g_key_file_free(cfile);
732 startgroup = g_key_file_get_start_group(cfile);
733 if(!startgroup || strcmp(startgroup, "generic")) {
734 g_set_error(e, errdomain, CFILE_MISSING_GENERIC, "Config file does not contain the [generic] group!");
735 g_key_file_free(cfile);
738 groups = g_key_file_get_groups(cfile, NULL);
739 for(i=0;groups[i];i++) {
740 memset(&s, '\0', sizeof(SERVER));
741 lp[0].target=&(s.exportname);
742 lp[1].target=&(s.port);
743 lp[2].target=&(s.authname);
744 lp[3].target=&(s.expected_size);
745 lp[4].target=&(virtstyle);
746 lp[5].target=&(s.prerun);
747 lp[6].target=&(s.postrun);
748 lp[7].target=lp[8].target=lp[9].target=
749 lp[10].target=lp[11].target=
750 lp[12].target=&(s.flags);
751 lp[13].target=&(s.listenaddr);
753 /* After the [generic] group, start parsing exports */
758 for(j=0;j<p_size;j++) {
759 g_assert(p[j].target != NULL);
760 g_assert(p[j].ptype==PARAM_INT||p[j].ptype==PARAM_STRING||p[j].ptype==PARAM_BOOL);
763 *((gint*)p[j].target) =
764 g_key_file_get_integer(cfile,
770 *((gchar**)p[j].target) =
771 g_key_file_get_string(cfile,
777 value = g_key_file_get_boolean(cfile,
779 p[j].paramname, &err);
782 *((gint*)p[j].target) |= p[j].flagval;
784 *((gint*)p[j].target) &= ~(p[j].flagval);
789 if(!strcmp(p[j].paramname, "port") && !strcmp(p[j].target, NBD_DEFAULT_PORT)) {
790 g_set_error(e, errdomain, CFILE_INCORRECT_PORT, "Config file specifies default port for oldstyle export");
791 g_key_file_free(cfile);
795 if(err->code == G_KEY_FILE_ERROR_KEY_NOT_FOUND) {
797 /* Ignore not-found error for optional values */
801 err_msg = MISSING_REQUIRED_ERROR;
804 err_msg = DEFAULT_ERROR;
806 g_set_error(e, errdomain, CFILE_VALUE_INVALID, err_msg, p[j].paramname, groups[i], err->message);
807 g_array_free(retval, TRUE);
809 g_key_file_free(cfile);
814 if(!strncmp(virtstyle, "none", 4)) {
815 s.virtstyle=VIRT_NONE;
816 } else if(!strncmp(virtstyle, "ipliteral", 9)) {
817 s.virtstyle=VIRT_IPLIT;
818 } else if(!strncmp(virtstyle, "iphash", 6)) {
819 s.virtstyle=VIRT_IPHASH;
820 } else if(!strncmp(virtstyle, "cidrhash", 8)) {
821 s.virtstyle=VIRT_CIDR;
822 if(strlen(virtstyle)<10) {
823 g_set_error(e, errdomain, CFILE_VALUE_INVALID, "Invalid value %s for parameter virtstyle in group %s: missing length", virtstyle, groups[i]);
824 g_array_free(retval, TRUE);
825 g_key_file_free(cfile);
828 s.cidrlen=strtol(virtstyle+8, NULL, 0);
830 g_set_error(e, errdomain, CFILE_VALUE_INVALID, "Invalid value %s for parameter virtstyle in group %s", virtstyle, groups[i]);
831 g_array_free(retval, TRUE);
832 g_key_file_free(cfile);
836 s.virtstyle=VIRT_IPLIT;
838 /* Don't need to free this, it's not our string */
840 /* Don't append values for the [generic] group */
842 s.socket_family = AF_UNSPEC;
843 s.servename = groups[i];
845 append_serve(&s, retval);
852 if(s.flags & F_SDP) {
853 g_set_error(e, errdomain, CFILE_VALUE_UNSUPPORTED, "This nbd-server was built without support for SDP, yet group %s uses it", groups[i]);
854 g_array_free(retval, TRUE);
855 g_key_file_free(cfile);
861 g_set_error(e, errdomain, CFILE_NO_EXPORTS, "The config file does not specify any exports");
863 g_key_file_free(cfile);
868 * Signal handler for SIGCHLD
869 * @param s the signal we're handling (must be SIGCHLD, or something
872 void sigchld_handler(int s) {
877 while((pid=waitpid(-1, &status, WNOHANG)) > 0) {
878 if(WIFEXITED(status)) {
879 msg3(LOG_INFO, "Child exited with %d", WEXITSTATUS(status));
881 i=g_hash_table_lookup(children, &pid);
883 msg3(LOG_INFO, "SIGCHLD received for an unknown child with PID %ld", (long)pid);
885 DEBUG2("Removing %d from the list of children", pid);
886 g_hash_table_remove(children, &pid);
892 * Kill a child. Called from sigterm_handler::g_hash_table_foreach.
895 * @param value the value corresponding to the above key
896 * @param user_data a pointer which we always set to 1, so that we know what
899 void killchild(gpointer key, gpointer value, gpointer user_data) {
901 int *parent=user_data;
908 * Handle SIGTERM and dispatch it to our children
909 * @param s the signal we're handling (must be SIGTERM, or something
910 * is severely wrong).
912 void sigterm_handler(int s) {
915 g_hash_table_foreach(children, killchild, &parent);
925 * Detect the size of a file.
927 * @param fhandle An open filedescriptor
928 * @return the size of the file, or OFFT_MAX if detection was
931 off_t size_autodetect(int fhandle) {
934 struct stat stat_buf;
937 #ifdef HAVE_SYS_MOUNT_H
938 #ifdef HAVE_SYS_IOCTL_H
940 DEBUG("looking for export size with ioctl BLKGETSIZE64\n");
941 if (!ioctl(fhandle, BLKGETSIZE64, &bytes) && bytes) {
944 #endif /* BLKGETSIZE64 */
945 #endif /* HAVE_SYS_IOCTL_H */
946 #endif /* HAVE_SYS_MOUNT_H */
948 DEBUG("looking for fhandle size with fstat\n");
949 stat_buf.st_size = 0;
950 error = fstat(fhandle, &stat_buf);
952 if(stat_buf.st_size > 0)
953 return (off_t)stat_buf.st_size;
955 err("fstat failed: %m");
958 DEBUG("looking for fhandle size with lseek SEEK_END\n");
959 es = lseek(fhandle, (off_t)0, SEEK_END);
960 if (es > ((off_t)0)) {
963 DEBUG2("lseek failed: %d", errno==EBADF?1:(errno==ESPIPE?2:(errno==EINVAL?3:4)));
966 err("Could not find size of exported block device: %m");
971 * Get the file handle and offset, given an export offset.
973 * @param export An array of export files
974 * @param a The offset to get corresponding file/offset for
975 * @param fhandle [out] File descriptor
976 * @param foffset [out] Offset into fhandle
977 * @param maxbytes [out] Tells how many bytes can be read/written
978 * from fhandle starting at foffset (0 if there is no limit)
979 * @return 0 on success, -1 on failure
981 int get_filepos(GArray* export, off_t a, int* fhandle, off_t* foffset, size_t* maxbytes ) {
982 /* Negative offset not allowed */
986 /* Binary search for last file with starting offset <= a */
989 int end = export->len - 1;
990 while( start <= end ) {
991 int mid = (start + end) / 2;
992 fi = g_array_index(export, FILE_INFO, mid);
993 if( fi.startoff < a ) {
995 } else if( fi.startoff > a ) {
1003 /* end should never go negative, since first startoff is 0 and a >= 0 */
1006 fi = g_array_index(export, FILE_INFO, end);
1007 *fhandle = fi.fhandle;
1008 *foffset = a - fi.startoff;
1010 if( end+1 < export->len ) {
1011 FILE_INFO fi_next = g_array_index(export, FILE_INFO, end+1);
1012 *maxbytes = fi_next.startoff - a;
1019 * seek to a position in a file, with error handling.
1020 * @param handle a filedescriptor
1021 * @param a position to seek to
1022 * @todo get rid of this; lastpoint is a global variable right now, but it
1023 * shouldn't be. If we pass it on as a parameter, that makes things a *lot*
1026 void myseek(int handle,off_t a) {
1027 if (lseek(handle, a, SEEK_SET) < 0) {
1028 err("Can not seek locally!\n");
1033 * Write an amount of bytes at a given offset to the right file. This
1034 * abstracts the write-side of the multiple file option.
1036 * @param a The offset where the write should start
1037 * @param buf The buffer to write from
1038 * @param len The length of buf
1039 * @param client The client we're serving for
1040 * @return The number of bytes actually written, or -1 in case of an error
1042 ssize_t rawexpwrite(off_t a, char *buf, size_t len, CLIENT *client) {
1048 if(get_filepos(client->export, a, &fhandle, &foffset, &maxbytes))
1050 if(maxbytes && len > maxbytes)
1053 DEBUG4("(WRITE to fd %d offset %llu len %u), ", fhandle, foffset, len);
1055 myseek(fhandle, foffset);
1056 retval = write(fhandle, buf, len);
1057 if(client->server->flags & F_SYNC) {
1064 * Call rawexpwrite repeatedly until all data has been written.
1065 * @return 0 on success, nonzero on failure
1067 int rawexpwrite_fully(off_t a, char *buf, size_t len, CLIENT *client) {
1070 while(len > 0 && (ret=rawexpwrite(a, buf, len, client)) > 0 ) {
1075 return (ret < 0 || len != 0);
1079 * Read an amount of bytes at a given offset from the right file. This
1080 * abstracts the read-side of the multiple files option.
1082 * @param a The offset where the read should start
1083 * @param buf A buffer to read into
1084 * @param len The size of buf
1085 * @param client The client we're serving for
1086 * @return The number of bytes actually read, or -1 in case of an
1089 ssize_t rawexpread(off_t a, char *buf, size_t len, CLIENT *client) {
1094 if(get_filepos(client->export, a, &fhandle, &foffset, &maxbytes))
1096 if(maxbytes && len > maxbytes)
1099 DEBUG4("(READ from fd %d offset %llu len %u), ", fhandle, foffset, len);
1101 myseek(fhandle, foffset);
1102 return read(fhandle, buf, len);
1106 * Call rawexpread repeatedly until all data has been read.
1107 * @return 0 on success, nonzero on failure
1109 int rawexpread_fully(off_t a, char *buf, size_t len, CLIENT *client) {
1112 while(len > 0 && (ret=rawexpread(a, buf, len, client)) > 0 ) {
1117 return (ret < 0 || len != 0);
1121 * Read an amount of bytes at a given offset from the right file. This
1122 * abstracts the read-side of the copyonwrite stuff, and calls
1123 * rawexpread() with the right parameters to do the actual work.
1124 * @param a The offset where the read should start
1125 * @param buf A buffer to read into
1126 * @param len The size of buf
1127 * @param client The client we're going to read for
1128 * @return 0 on success, nonzero on failure
1130 int expread(off_t a, char *buf, size_t len, CLIENT *client) {
1131 off_t rdlen, offset;
1132 off_t mapcnt, mapl, maph, pagestart;
1134 if (!(client->server->flags & F_COPYONWRITE))
1135 return(rawexpread_fully(a, buf, len, client));
1136 DEBUG3("Asked to read %d bytes at %llu.\n", len, (unsigned long long)a);
1138 mapl=a/DIFFPAGESIZE; maph=(a+len-1)/DIFFPAGESIZE;
1140 for (mapcnt=mapl;mapcnt<=maph;mapcnt++) {
1141 pagestart=mapcnt*DIFFPAGESIZE;
1143 rdlen=(0<DIFFPAGESIZE-offset && len<(size_t)(DIFFPAGESIZE-offset)) ?
1144 len : (size_t)DIFFPAGESIZE-offset;
1145 if (client->difmap[mapcnt]!=(u32)(-1)) { /* the block is already there */
1146 DEBUG3("Page %llu is at %lu\n", (unsigned long long)mapcnt,
1147 (unsigned long)(client->difmap[mapcnt]));
1148 myseek(client->difffile, client->difmap[mapcnt]*DIFFPAGESIZE+offset);
1149 if (read(client->difffile, buf, rdlen) != rdlen) return -1;
1150 } else { /* the block is not there */
1151 DEBUG2("Page %llu is not here, we read the original one\n",
1152 (unsigned long long)mapcnt);
1153 if(rawexpread_fully(a, buf, rdlen, client)) return -1;
1155 len-=rdlen; a+=rdlen; buf+=rdlen;
1161 * Write an amount of bytes at a given offset to the right file. This
1162 * abstracts the write-side of the copyonwrite option, and calls
1163 * rawexpwrite() with the right parameters to do the actual work.
1165 * @param a The offset where the write should start
1166 * @param buf The buffer to write from
1167 * @param len The length of buf
1168 * @param client The client we're going to write for.
1169 * @return 0 on success, nonzero on failure
1171 int expwrite(off_t a, char *buf, size_t len, CLIENT *client) {
1172 char pagebuf[DIFFPAGESIZE];
1173 off_t mapcnt,mapl,maph;
1178 if (!(client->server->flags & F_COPYONWRITE))
1179 return(rawexpwrite_fully(a, buf, len, client));
1180 DEBUG3("Asked to write %d bytes at %llu.\n", len, (unsigned long long)a);
1182 mapl=a/DIFFPAGESIZE ; maph=(a+len-1)/DIFFPAGESIZE ;
1184 for (mapcnt=mapl;mapcnt<=maph;mapcnt++) {
1185 pagestart=mapcnt*DIFFPAGESIZE ;
1186 offset=a-pagestart ;
1187 wrlen=(0<DIFFPAGESIZE-offset && len<(size_t)(DIFFPAGESIZE-offset)) ?
1188 len : (size_t)DIFFPAGESIZE-offset;
1190 if (client->difmap[mapcnt]!=(u32)(-1)) { /* the block is already there */
1191 DEBUG3("Page %llu is at %lu\n", (unsigned long long)mapcnt,
1192 (unsigned long)(client->difmap[mapcnt])) ;
1193 myseek(client->difffile,
1194 client->difmap[mapcnt]*DIFFPAGESIZE+offset);
1195 if (write(client->difffile, buf, wrlen) != wrlen) return -1 ;
1196 } else { /* the block is not there */
1197 myseek(client->difffile,client->difffilelen*DIFFPAGESIZE) ;
1198 client->difmap[mapcnt]=(client->server->flags&F_SPARSE)?mapcnt:client->difffilelen++;
1199 DEBUG3("Page %llu is not here, we put it at %lu\n",
1200 (unsigned long long)mapcnt,
1201 (unsigned long)(client->difmap[mapcnt]));
1202 rdlen=DIFFPAGESIZE ;
1203 if (rawexpread_fully(pagestart, pagebuf, rdlen, client))
1205 memcpy(pagebuf+offset,buf,wrlen) ;
1206 if (write(client->difffile, pagebuf, DIFFPAGESIZE) !=
1210 len-=wrlen ; a+=wrlen ; buf+=wrlen ;
1216 * Do the initial negotiation.
1218 * @param client The client we're negotiating with.
1220 CLIENT* negotiate(int net, CLIENT *client, GArray* servers) {
1223 uint32_t flags = NBD_FLAG_HAS_FLAGS;
1224 uint16_t smallflags = 0;
1227 memset(zeros, '\0', sizeof(zeros));
1228 if(!client || !client->modern) {
1229 if (write(net, INIT_PASSWD, 8) < 0) {
1230 err_nonfatal("Negotiation failed: %m");
1234 magic = htonll(opts_magic);
1235 if (write(net, &magic, sizeof(magic)) < 0) {
1236 err_nonfatal("Negotiation failed: %m");
1249 err("programmer error");
1250 write(net, &smallflags, sizeof(uint16_t));
1251 read(net, &reserved, sizeof(reserved));
1252 read(net, &magic, sizeof(magic));
1253 magic = ntohll(magic);
1254 if(magic != cliserv_magic) {
1258 read(net, &opt, sizeof(opt));
1260 if(opt != NBD_OPT_EXPORT_NAME) {
1264 read(net, &namelen, sizeof(namelen));
1265 namelen = ntohll(namelen);
1266 name = malloc(namelen+1);
1268 read(net, name, namelen);
1269 for(i=0; i<servers->len; i++) {
1270 SERVER* serve = &(g_array_index(servers, SERVER, i));
1271 if(!strcmp(serve->servename, name)) {
1272 CLIENT* client = g_new0(CLIENT, 1);
1273 client->server = serve;
1274 client->exportsize = OFFT_MAX;
1276 client->modern = TRUE;
1281 size_host = htonll((u64)(client->exportsize));
1282 if (write(net, &size_host, 8) < 0)
1283 err("Negotiation failed: %m");
1284 if (client->server->flags & F_READONLY)
1285 flags |= NBD_FLAG_READ_ONLY;
1286 if (!client->modern) {
1287 flags = htonl(flags);
1288 if (write(client->net, &flags, 4) < 0)
1289 err("Negotiation failed: %m");
1291 smallflags = (uint16_t)(flags & ~((uint16_t)0));
1292 smallflags = htons(smallflags);
1293 if (write(client->net, &smallflags, sizeof(smallflags)) < 0) {
1294 err("Negotiation failed: %m");
1297 if (write(client->net, zeros, 124) < 0)
1298 err("Negotiation failed: %m");
1302 /** sending macro. */
1303 #define SEND(net,reply) writeit( net, &reply, sizeof( reply ));
1305 #define ERROR(client,reply,errcode) { reply.error = htonl(errcode); SEND(client->net,reply); reply.error = 0; }
1307 * Serve a file to a single client.
1309 * @todo This beast needs to be split up in many tiny little manageable
1310 * pieces. Preferably with a chainsaw.
1312 * @param client The client we're going to serve to.
1313 * @return when the client disconnects
1315 int mainloop(CLIENT *client) {
1316 struct nbd_request request;
1317 struct nbd_reply reply;
1318 gboolean go_on=TRUE;
1322 negotiate(client->net, client, NULL);
1323 DEBUG("Entering request loop!\n");
1324 reply.magic = htonl(NBD_REPLY_MAGIC);
1333 readit(client->net, &request, sizeof(request));
1334 request.from = ntohll(request.from);
1335 request.type = ntohl(request.type);
1337 if (request.type==NBD_CMD_DISC) {
1338 msg2(LOG_INFO, "Disconnect request received.");
1339 if (client->server->flags & F_COPYONWRITE) {
1340 if (client->difmap) g_free(client->difmap) ;
1341 close(client->difffile);
1342 unlink(client->difffilename);
1343 free(client->difffilename);
1349 len = ntohl(request.len);
1351 if (request.magic != htonl(NBD_REQUEST_MAGIC))
1352 err("Not enough magic.");
1353 if (len > BUFSIZE + sizeof(struct nbd_reply))
1354 err("Request too big!");
1356 printf("%s from %llu (%llu) len %d, ", request.type ? "WRITE" :
1357 "READ", (unsigned long long)request.from,
1358 (unsigned long long)request.from / 512, len);
1360 memcpy(reply.handle, request.handle, sizeof(reply.handle));
1361 if ((request.from + len) > (OFFT_MAX)) {
1362 DEBUG("[Number too large!]");
1363 ERROR(client, reply, EINVAL);
1367 if (((ssize_t)((off_t)request.from + len) > client->exportsize)) {
1369 ERROR(client, reply, EINVAL);
1373 if (request.type==NBD_CMD_WRITE) {
1374 DEBUG("wr: net->buf, ");
1375 readit(client->net, buf, len);
1376 DEBUG("buf->exp, ");
1377 if ((client->server->flags & F_READONLY) ||
1378 (client->server->flags & F_AUTOREADONLY)) {
1379 DEBUG("[WRITE to READONLY!]");
1380 ERROR(client, reply, EPERM);
1383 if (expwrite(request.from, buf, len, client)) {
1384 DEBUG("Write failed: %m" );
1385 ERROR(client, reply, errno);
1388 SEND(client->net, reply);
1394 DEBUG("exp->buf, ");
1395 if (expread(request.from, buf + sizeof(struct nbd_reply), len, client)) {
1396 DEBUG("Read failed: %m");
1397 ERROR(client, reply, errno);
1401 DEBUG("buf->net, ");
1402 memcpy(buf, &reply, sizeof(struct nbd_reply));
1403 writeit(client->net, buf, len + sizeof(struct nbd_reply));
1410 * Set up client export array, which is an array of FILE_INFO.
1411 * Also, split a single exportfile into multiple ones, if that was asked.
1412 * @param client information on the client which we want to setup export for
1414 void setupexport(CLIENT* client) {
1416 off_t laststartoff = 0, lastsize = 0;
1417 int multifile = (client->server->flags & F_MULTIFILE);
1419 client->export = g_array_new(TRUE, TRUE, sizeof(FILE_INFO));
1421 /* If multi-file, open as many files as we can.
1422 * If not, open exactly one file.
1423 * Calculate file sizes as we go to get total size. */
1427 gchar* error_string;
1428 mode_t mode = (client->server->flags & F_READONLY) ? O_RDONLY : O_RDWR;
1431 tmpname=g_strdup_printf("%s.%d", client->exportname, i);
1433 tmpname=g_strdup(client->exportname);
1435 DEBUG2( "Opening %s\n", tmpname );
1436 fi.fhandle = open(tmpname, mode);
1437 if(fi.fhandle == -1 && mode == O_RDWR) {
1438 /* Try again because maybe media was read-only */
1439 fi.fhandle = open(tmpname, O_RDONLY);
1440 if(fi.fhandle != -1) {
1441 /* Opening the base file in copyonwrite mode is
1443 if(!(client->server->flags & F_COPYONWRITE)) {
1444 client->server->flags |= F_AUTOREADONLY;
1445 client->server->flags |= F_READONLY;
1449 if(fi.fhandle == -1) {
1450 if(multifile && i>0)
1452 error_string=g_strdup_printf(
1453 "Could not open exported file %s: %%m",
1457 fi.startoff = laststartoff + lastsize;
1458 g_array_append_val(client->export, fi);
1461 /* Starting offset and size of this file will be used to
1462 * calculate starting offset of next file */
1463 laststartoff = fi.startoff;
1464 lastsize = size_autodetect(fi.fhandle);
1470 /* Set export size to total calculated size */
1471 client->exportsize = laststartoff + lastsize;
1473 /* Export size may be overridden */
1474 if(client->server->expected_size) {
1475 /* desired size must be <= total calculated size */
1476 if(client->server->expected_size > client->exportsize) {
1477 err("Size of exported file is too big\n");
1480 client->exportsize = client->server->expected_size;
1483 msg3(LOG_INFO, "Size of exported file/device is %llu", (unsigned long long)client->exportsize);
1485 msg3(LOG_INFO, "Total number of files: %d", i);
1489 int copyonwrite_prepare(CLIENT* client) {
1491 if ((client->difffilename = malloc(1024))==NULL)
1492 err("Failed to allocate string for diff file name");
1493 snprintf(client->difffilename, 1024, "%s-%s-%d.diff",client->exportname,client->clientname,
1495 client->difffilename[1023]='\0';
1496 msg3(LOG_INFO,"About to create map and diff file %s",client->difffilename) ;
1497 client->difffile=open(client->difffilename,O_RDWR | O_CREAT | O_TRUNC,0600) ;
1498 if (client->difffile<0) err("Could not create diff file (%m)") ;
1499 if ((client->difmap=calloc(client->exportsize/DIFFPAGESIZE,sizeof(u32)))==NULL)
1500 err("Could not allocate memory") ;
1501 for (i=0;i<client->exportsize/DIFFPAGESIZE;i++) client->difmap[i]=(u32)-1 ;
1507 * Run a command. This is used for the ``prerun'' and ``postrun'' config file
1510 * @param command the command to be ran. Read from the config file
1511 * @param file the file name we're about to export
1513 int do_run(gchar* command, gchar* file) {
1517 if(command && *command) {
1518 cmd = g_strdup_printf(command, file);
1526 * Serve a connection.
1528 * @todo allow for multithreading, perhaps use libevent. Not just yet, though;
1529 * follow the road map.
1531 * @param client a connected client
1533 void serveconnection(CLIENT *client) {
1534 if(do_run(client->server->prerun, client->exportname)) {
1537 setupexport(client);
1539 if (client->server->flags & F_COPYONWRITE) {
1540 copyonwrite_prepare(client);
1543 setmysockopt(client->net);
1546 do_run(client->server->postrun, client->exportname);
1550 * Find the name of the file we have to serve. This will use g_strdup_printf
1551 * to put the IP address of the client inside a filename containing
1552 * "%s" (in the form as specified by the "virtstyle" option). That name
1553 * is then written to client->exportname.
1555 * @param net A socket connected to an nbd client
1556 * @param client information about the client. The IP address in human-readable
1557 * format will be written to a new char* buffer, the address of which will be
1558 * stored in client->clientname.
1560 void set_peername(int net, CLIENT *client) {
1561 struct sockaddr_storage addrin;
1562 struct sockaddr_storage netaddr;
1563 struct sockaddr_in *netaddr4 = NULL;
1564 struct sockaddr_in6 *netaddr6 = NULL;
1565 size_t addrinlen = sizeof( addrin );
1566 struct addrinfo hints;
1567 struct addrinfo *ai = NULL;
1568 char peername[NI_MAXHOST];
1569 char netname[NI_MAXHOST];
1575 if (getpeername(net, (struct sockaddr *) &addrin, (socklen_t *)&addrinlen) < 0)
1576 err("getsockname failed: %m");
1578 getnameinfo((struct sockaddr *)&addrin, (socklen_t)addrinlen,
1579 peername, sizeof (peername), NULL, 0, NI_NUMERICHOST);
1581 memset(&hints, '\0', sizeof (hints));
1582 hints.ai_flags = AI_ADDRCONFIG;
1583 e = getaddrinfo(peername, NULL, &hints, &ai);
1586 fprintf(stderr, "getaddrinfo failed: %s\n", gai_strerror(e));
1591 switch(client->server->virtstyle) {
1593 client->exportname=g_strdup(client->server->exportname);
1596 for(i=0;i<strlen(peername);i++) {
1597 if(peername[i]=='.') {
1602 client->exportname=g_strdup_printf(client->server->exportname, peername);
1605 memcpy(&netaddr, &addrin, addrinlen);
1606 if(ai->ai_family == AF_INET) {
1607 netaddr4 = (struct sockaddr_in *)&netaddr;
1608 (netaddr4->sin_addr).s_addr>>=32-(client->server->cidrlen);
1609 (netaddr4->sin_addr).s_addr<<=32-(client->server->cidrlen);
1611 getnameinfo((struct sockaddr *) netaddr4, (socklen_t) addrinlen,
1612 netname, sizeof (netname), NULL, 0, NI_NUMERICHOST);
1613 tmp=g_strdup_printf("%s/%s", netname, peername);
1614 }else if(ai->ai_family == AF_INET6) {
1615 netaddr6 = (struct sockaddr_in6 *)&netaddr;
1617 shift = 128-(client->server->cidrlen);
1619 while(shift >= 32) {
1620 ((netaddr6->sin6_addr).s6_addr32[i])=0;
1624 (netaddr6->sin6_addr).s6_addr32[i]>>=shift;
1625 (netaddr6->sin6_addr).s6_addr32[i]<<=shift;
1627 getnameinfo((struct sockaddr *)netaddr6, (socklen_t)addrinlen,
1628 netname, sizeof(netname), NULL, 0, NI_NUMERICHOST);
1629 tmp=g_strdup_printf("%s/%s", netname, peername);
1633 client->exportname=g_strdup_printf(client->server->exportname, tmp);
1639 msg4(LOG_INFO, "connect from %s, assigned file is %s",
1640 peername, client->exportname);
1641 client->clientname=g_strdup(peername);
1646 * @param data a pointer to pid_t which should be freed
1648 void destroy_pid_t(gpointer data) {
1653 * Loop through the available servers, and serve them. Never returns.
1655 int serveloop(GArray* servers) {
1656 struct sockaddr_storage addrin;
1657 socklen_t addrinlen=sizeof(addrin);
1665 * Set up the master fd_set. The set of descriptors we need
1666 * to select() for never changes anyway and it buys us a *lot*
1667 * of time to only build this once. However, if we ever choose
1668 * to not fork() for clients anymore, we may have to revisit
1673 for(i=0;i<servers->len;i++) {
1674 if((sock=(g_array_index(servers, SERVER, i)).socket)) {
1675 FD_SET(sock, &mset);
1676 max=sock>max?sock:max;
1680 FD_SET(modernsock, &mset);
1681 max=modernsock>max?modernsock:max;
1684 CLIENT *client = NULL;
1687 memcpy(&rset, &mset, sizeof(fd_set));
1688 if(select(max+1, &rset, NULL, NULL, NULL)>0) {
1693 if(FD_ISSET(modernsock, &rset)) {
1694 if((net=accept(modernsock, (struct sockaddr *) &addrin, &addrinlen)) < 0)
1696 client = negotiate(net, NULL, servers);
1698 err_nonfatal("negotiation failed");
1702 for(i=0;i<servers->len && !net;i++) {
1703 serve=&(g_array_index(servers, SERVER, i));
1704 if(FD_ISSET(serve->socket, &rset)) {
1705 if ((net=accept(serve->socket, (struct sockaddr *) &addrin, &addrinlen)) < 0)
1712 if((sock_flags = fcntl(net, F_GETFL, 0))==-1) {
1713 err("fcntl F_GETFL");
1715 if(fcntl(net, F_SETFL, sock_flags &~O_NONBLOCK)==-1) {
1716 err("fcntl F_SETFL ~O_NONBLOCK");
1719 client = g_new0(CLIENT, 1);
1720 client->server=serve;
1721 client->exportsize=OFFT_MAX;
1724 set_peername(net, client);
1725 if (!authorized_client(client)) {
1726 msg2(LOG_INFO,"Unauthorized client") ;
1730 msg2(LOG_INFO,"Authorized client") ;
1731 pid=g_malloc(sizeof(pid_t));
1733 if ((*pid=fork())<0) {
1734 msg3(LOG_INFO,"Could not fork (%s)",strerror(errno)) ;
1738 if (*pid>0) { /* parent */
1740 g_hash_table_insert(children, pid, pid);
1744 g_hash_table_destroy(children);
1745 for(i=0;i<servers->len;i++) {
1746 serve=&g_array_index(servers, SERVER, i);
1747 close(serve->socket);
1749 /* FALSE does not free the
1750 actual data. This is required,
1751 because the client has a
1752 direct reference into that
1753 data, and otherwise we get a
1755 g_array_free(servers, FALSE);
1757 msg2(LOG_INFO,"Starting to serve");
1758 serveconnection(client);
1765 void dosockopts(int socket) {
1773 /* lose the pesky "Address already in use" error message */
1774 if (setsockopt(socket,SOL_SOCKET,SO_REUSEADDR,&yes,sizeof(int)) == -1) {
1775 err("setsockopt SO_REUSEADDR");
1777 if (setsockopt(socket,SOL_SOCKET,SO_KEEPALIVE,&yes,sizeof(int)) == -1) {
1778 err("setsockopt SO_KEEPALIVE");
1781 /* make the listening socket non-blocking */
1782 if ((sock_flags = fcntl(socket, F_GETFL, 0)) == -1) {
1783 err("fcntl F_GETFL");
1785 if (fcntl(socket, F_SETFL, sock_flags | O_NONBLOCK) == -1) {
1786 err("fcntl F_SETFL O_NONBLOCK");
1791 * Connect a server's socket.
1793 * @param serve the server we want to connect.
1795 int setup_serve(SERVER *serve) {
1796 struct addrinfo hints;
1797 struct addrinfo *ai = NULL;
1802 return serve->servename ? 1 : 0;
1804 memset(&hints,'\0',sizeof(hints));
1805 hints.ai_flags = AI_PASSIVE | AI_ADDRCONFIG | AI_NUMERICSERV;
1806 hints.ai_socktype = SOCK_STREAM;
1807 hints.ai_family = serve->socket_family;
1809 port = g_strdup_printf ("%d", serve->port);
1813 e = getaddrinfo(serve->listenaddr,port,&hints,&ai);
1818 fprintf(stderr, "getaddrinfo failed: %s\n", gai_strerror(e));
1824 if(serve->socket_family == AF_UNSPEC)
1825 serve->socket_family = ai->ai_family;
1828 if ((serve->flags) && F_SDP) {
1829 if (ai->ai_family == AF_INET)
1830 ai->ai_family = AF_INET_SDP;
1831 else (ai->ai_family == AF_INET6)
1832 ai->ai_family = AF_INET6_SDP;
1835 if ((serve->socket = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol)) < 0)
1838 dosockopts(serve->socket);
1840 DEBUG("Waiting for connections... bind, ");
1841 e = bind(serve->socket, ai->ai_addr, ai->ai_addrlen);
1842 if (e != 0 && errno != EADDRINUSE)
1845 if (listen(serve->socket, 1) < 0)
1849 if(serve->servename) {
1856 void open_modern(void) {
1857 struct addrinfo hints;
1858 struct addrinfo* ai = NULL;
1862 memset(&hints, '\0', sizeof(hints));
1863 hints.ai_flags = AI_PASSIVE | AI_ADDRCONFIG;
1864 hints.ai_socktype = SOCK_STREAM;
1865 hints.ai_family = AF_UNSPEC;
1866 hints.ai_protocol = IPPROTO_TCP;
1867 e = getaddrinfo(modern_listen, NBD_DEFAULT_PORT, &hints, &ai);
1869 fprintf(stderr, "getaddrinfo failed: %s\n", gai_strerror(e));
1872 if((modernsock = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol))<0) {
1876 dosockopts(modernsock);
1878 if(bind(modernsock, ai->ai_addr, ai->ai_addrlen)) {
1881 if(listen(modernsock, 10) <0) {
1889 * Connect our servers.
1891 void setup_servers(GArray* servers) {
1893 struct sigaction sa;
1896 for(i=0;i<servers->len;i++) {
1897 want_modern |= setup_serve(&(g_array_index(servers, SERVER, i)));
1902 children=g_hash_table_new_full(g_int_hash, g_int_equal, NULL, destroy_pid_t);
1904 sa.sa_handler = sigchld_handler;
1905 sigemptyset(&sa.sa_mask);
1906 sa.sa_flags = SA_RESTART;
1907 if(sigaction(SIGCHLD, &sa, NULL) == -1)
1908 err("sigaction: %m");
1909 sa.sa_handler = sigterm_handler;
1910 sigemptyset(&sa.sa_mask);
1911 sa.sa_flags = SA_RESTART;
1912 if(sigaction(SIGTERM, &sa, NULL) == -1)
1913 err("sigaction: %m");
1917 * Go daemon (unless we specified at compile time that we didn't want this)
1918 * @param serve the first server of our configuration. If its port is zero,
1919 * then do not daemonize, because we're doing inetd then. This parameter
1920 * is only used to create a PID file of the form
1921 * /var/run/nbd-server.<port>.pid; it's not modified in any way.
1923 #if !defined(NODAEMON) && !defined(NOFORK)
1924 void daemonize(SERVER* serve) {
1927 if(serve && !(serve->port)) {
1933 if(!*pidftemplate) {
1935 strncpy(pidftemplate, "/var/run/nbd-server.%d.pid", 255);
1937 strncpy(pidftemplate, "/var/run/nbd-server.pid", 255);
1940 snprintf(pidfname, 255, pidftemplate, serve ? serve->port : 0);
1941 pidf=fopen(pidfname, "w");
1943 fprintf(pidf,"%d\n", (int)getpid());
1947 fprintf(stderr, "Not fatal; continuing");
1951 #define daemonize(serve)
1952 #endif /* !defined(NODAEMON) && !defined(NOFORK) */
1955 * Everything beyond this point (in the file) is run in non-daemon mode.
1956 * The stuff above daemonize() isn't.
1959 void serve_err(SERVER* serve, const char* msg) G_GNUC_NORETURN;
1961 void serve_err(SERVER* serve, const char* msg) {
1962 g_message("Export of %s on port %d failed:", serve->exportname,
1968 * Set up user-ID and/or group-ID
1970 void dousers(void) {
1975 gr=getgrnam(rungroup);
1977 str = g_strdup_printf("Invalid group name: %s", rungroup);
1980 if(setgid(gr->gr_gid)<0) {
1981 err("Could not set GID: %m");
1985 pw=getpwnam(runuser);
1987 str = g_strdup_printf("Invalid user name: %s", runuser);
1990 if(setuid(pw->pw_uid)<0) {
1991 err("Could not set UID: %m");
1997 void glib_message_syslog_redirect(const gchar *log_domain,
1998 GLogLevelFlags log_level,
1999 const gchar *message,
2002 int level=LOG_DEBUG;
2006 case G_LOG_FLAG_FATAL:
2007 case G_LOG_LEVEL_CRITICAL:
2008 case G_LOG_LEVEL_ERROR:
2011 case G_LOG_LEVEL_WARNING:
2014 case G_LOG_LEVEL_MESSAGE:
2015 case G_LOG_LEVEL_INFO:
2018 case G_LOG_LEVEL_DEBUG:
2023 syslog(level, message);
2028 * Main entry point...
2030 int main(int argc, char *argv[]) {
2035 if (sizeof( struct nbd_request )!=28) {
2036 fprintf(stderr,"Bad size of structure. Alignment problems?\n");
2037 exit(EXIT_FAILURE) ;
2040 memset(pidftemplate, '\0', 256);
2043 config_file_pos = g_strdup(CFILE);
2044 serve=cmdline(argc, argv);
2045 servers = parse_cfile(config_file_pos, &err);
2048 serve->socket_family = AF_UNSPEC;
2050 append_serve(serve, servers);
2052 if (!(serve->port)) {
2055 /* You really should define ISSERVER if you're going to use
2056 * inetd mode, but if you don't, closing stdout and stderr
2057 * (which inetd had connected to the client socket) will let it
2061 open("/dev/null", O_WRONLY);
2062 open("/dev/null", O_WRONLY);
2063 g_log_set_default_handler( glib_message_syslog_redirect, NULL );
2065 client=g_malloc(sizeof(CLIENT));
2066 client->server=serve;
2068 client->exportsize=OFFT_MAX;
2069 set_peername(0,client);
2070 serveconnection(client);
2075 if(!servers || !servers->len) {
2076 g_warning("Could not parse config file: %s",
2077 err ? err->message : "Unknown error");
2080 g_warning("Specifying an export on the command line is deprecated.");
2081 g_warning("Please use a configuration file instead.");
2084 if((!serve) && (!servers||!servers->len)) {
2085 g_message("Nothing to do! Bye!");
2089 setup_servers(servers);