2 * Unix SMB/CIFS implementation.
3 * SMB parameters and setup
4 * Copyright (C) Andrew Tridgell 1992-1998 Modified by Jeremy Allison 1995.
6 * This program is free software; you can redistribute it and/or modify it under
7 * the terms of the GNU General Public License as published by the Free
8 * Software Foundation; either version 2 of the License, or (at your option)
11 * This program is distributed in the hope that it will be useful, but WITHOUT
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
16 * You should have received a copy of the GNU General Public License along with
17 * this program; if not, write to the Free Software Foundation, Inc., 675
18 * Mass Ave, Cambridge, MA 02139, USA.
25 /***************************************************************
26 Signal function to tell us we timed out.
27 ****************************************************************/
29 static void gotalarm_sig(void)
34 /***************************************************************
35 Lock or unlock a fd for a known lock type. Abandon after waitsecs
37 ****************************************************************/
39 BOOL do_file_lock(int fd, int waitsecs, int type)
41 SMB_STRUCT_FLOCK lock;
43 void (*oldsig_handler)(int);
46 oldsig_handler = CatchSignal(SIGALRM, SIGNAL_CAST gotalarm_sig);
49 lock.l_whence = SEEK_SET;
55 /* Note we must *NOT* use sys_fcntl here ! JRA */
56 ret = fcntl(fd, SMB_F_SETLKW, &lock);
58 CatchSignal(SIGALRM, SIGNAL_CAST oldsig_handler);
61 DEBUG(0, ("do_file_lock: failed to %s file.\n",
62 type == F_UNLCK ? "unlock" : "lock"));
70 /***************************************************************
71 Lock an fd. Abandon after waitsecs seconds.
72 ****************************************************************/
74 BOOL file_lock(int fd, int type, int secs, int *plock_depth)
81 if ((*plock_depth) == 0)
83 if (!do_file_lock(fd, secs, type)) {
84 DEBUG(10,("file_lock: locking file failed, error = %s.\n",
93 /***************************************************************
94 Unlock an fd. Abandon after waitsecs seconds.
95 ****************************************************************/
97 BOOL file_unlock(int fd, int *plock_depth)
101 if(*plock_depth == 1)
102 ret = do_file_lock(fd, 5, F_UNLCK);
107 DEBUG(10,("file_unlock: unlocking file failed, error = %s.\n",
112 /***************************************************************
113 locks a file for enumeration / modification.
114 update to be set = True if modification is required.
115 ****************************************************************/
117 void *startfilepwent(char *pfile, char *s_readbuf, int bufsize,
118 int *file_lock_depth, BOOL update)
124 DEBUG(0, ("startfilepwent: No file set\n"));
127 DEBUG(10, ("startfilepwent: opening file %s\n", pfile));
129 fp = sys_fopen(pfile, update ? "r+b" : "rb");
132 DEBUG(0, ("startfilepwent: unable to open file %s\n", pfile));
136 /* Set a buffer to do more efficient reads */
137 setvbuf(fp, s_readbuf, _IOFBF, bufsize);
139 if (!file_lock(fileno(fp), (update ? F_WRLCK : F_RDLCK), 5, file_lock_depth))
141 DEBUG(0, ("startfilepwent: unable to lock file %s\n", pfile));
146 /* Make sure it is only rw by the owner */
149 /* We have a lock on the file. */
153 /***************************************************************
154 End enumeration of the file.
155 ****************************************************************/
156 void endfilepwent(void *vp, int *file_lock_depth)
158 FILE *fp = (FILE *)vp;
160 file_unlock(fileno(fp), file_lock_depth);
162 DEBUG(7, ("endfilepwent: closed file.\n"));
165 /*************************************************************************
166 Return the current position in the file list as an SMB_BIG_UINT.
167 This must be treated as an opaque token.
168 *************************************************************************/
169 SMB_BIG_UINT getfilepwpos(void *vp)
171 return (SMB_BIG_UINT)sys_ftell((FILE *)vp);
174 /*************************************************************************
175 Set the current position in the file list from an SMB_BIG_UINT.
176 This must be treated as an opaque token.
177 *************************************************************************/
178 BOOL setfilepwpos(void *vp, SMB_BIG_UINT tok)
180 return !sys_fseek((FILE *)vp, (SMB_OFF_T)tok, SEEK_SET);
183 /*************************************************************************
184 gets a line out of a file.
185 line is of format "xxxx:xxxxxx:xxxxx:".
186 lines with "#" at the front are ignored.
187 *************************************************************************/
188 int getfileline(void *vp, char *linebuf, int linebuf_size)
190 /* Static buffers we will return. */
191 FILE *fp = (FILE *)vp;
198 DEBUG(0,("getfileline: Bad file pointer.\n"));
203 * Scan the file, a line at a time.
209 fgets(linebuf, linebuf_size, fp);
216 * Check if the string is terminated with a newline - if not
217 * then we must keep reading and discard until we get one.
220 linebuf_len = strlen(linebuf);
221 if (linebuf_len == 0)
227 if (linebuf[linebuf_len - 1] != '\n')
230 while (!ferror(fp) && !feof(fp))
241 linebuf[linebuf_len - 1] = '\0';
244 #ifdef DEBUG_PASSWORD
245 DEBUG(100, ("getfileline: got line |%s|\n", linebuf));
247 if ((linebuf[0] == 0) && feof(fp))
249 DEBUG(4, ("getfileline: end of file reached\n"));
253 if (linebuf[0] == '#' || linebuf[0] == '\0')
255 DEBUG(6, ("getfileline: skipping comment or blank line\n"));
259 p = (unsigned char *) strchr_m(linebuf, ':');
262 DEBUG(0, ("getfileline: malformed line entry (no :)\n"));
271 /****************************************************************************
272 read a line from a file with possible \ continuation chars.
273 Blanks at the start or end of a line are stripped.
274 The string will be allocated if s2 is NULL
275 ****************************************************************************/
276 char *fgets_slash(char *s2,int maxlen,XFILE *f)
281 BOOL start_of_line = True;
286 if (maxlen <2) return(NULL);
290 maxlen = MIN(maxlen,8);
291 s = (char *)malloc(maxlen);
294 if (!s) return(NULL);
298 while (len < maxlen-1)
306 while (len > 0 && s[len-1] == ' ')
310 if (len > 0 && s[len-1] == '\\')
313 start_of_line = True;
320 return(len>0?s:NULL);
325 start_of_line = False;
329 if (!s2 && len > maxlen-3)
334 t = (char *)Realloc(s,maxlen);
336 DEBUG(0,("fgets_slash: failed to expand buffer!\n"));
346 /****************************************************************************
347 load from a pipe into memory
348 ****************************************************************************/
349 char *file_pload(char *syscmd, size_t *size)
356 fd = sys_popen(syscmd);
357 if (fd == -1) return NULL;
362 while ((n = read(fd, buf, sizeof(buf))) > 0) {
363 tp = Realloc(p, total + n + 1);
365 DEBUG(0,("file_pload: failed to expand buffer!\n"));
370 memcpy(p+total, buf, n);
375 /* FIXME: Perhaps ought to check that the command completed
376 * successfully (returned 0); if not the data may be
380 if (size) *size = total;
385 /****************************************************************************
386 load a file into memory from a fd.
387 ****************************************************************************/
389 char *fd_load(int fd, size_t *size)
391 SMB_STRUCT_STAT sbuf;
394 if (sys_fstat(fd, &sbuf) != 0) return NULL;
396 p = (char *)malloc(sbuf.st_size+1);
399 if (read(fd, p, sbuf.st_size) != sbuf.st_size) {
405 if (size) *size = sbuf.st_size;
410 /****************************************************************************
411 load a file into memory
412 ****************************************************************************/
413 char *file_load(const char *fname, size_t *size)
418 if (!fname || !*fname) return NULL;
420 fd = open(fname,O_RDONLY);
421 if (fd == -1) return NULL;
423 p = fd_load(fd, size);
431 /*******************************************************************
432 mmap (if possible) or read a file
433 ********************************************************************/
434 void *map_file(char *fname, size_t size)
441 fd = open(fname, O_RDONLY, 0);
443 DEBUG(2,("Failed to load %s - %s\n", fname, strerror(errno)));
446 p = mmap(NULL, size, PROT_READ, MAP_SHARED|MAP_FILE, fd, 0);
448 if (p == MAP_FAILED) {
449 DEBUG(1,("Failed to mmap %s - %s\n", fname, strerror(errno)));
455 p = file_load(fname, &s2);
458 DEBUG(1,("incorrect size for %s - got %lu expected %lu\n",
459 fname, (unsigned long)s2, (unsigned long)size));
469 /****************************************************************************
470 parse a buffer into lines
471 ****************************************************************************/
472 static char **file_lines_parse(char *p, size_t size, int *numlines)
479 for (s = p, i=0; s < p+size; s++) {
480 if (s[0] == '\n') i++;
483 ret = (char **)malloc(sizeof(ret[0])*(i+2));
488 memset(ret, 0, sizeof(ret[0])*(i+2));
489 if (numlines) *numlines = i;
492 for (s = p, i=0; s < p+size; s++) {
498 if (s[0] == '\r') s[0] = 0;
505 /****************************************************************************
506 load a file into memory and return an array of pointers to lines in the file
507 must be freed with file_lines_free().
508 ****************************************************************************/
509 char **file_lines_load(const char *fname, int *numlines)
514 p = file_load(fname, &size);
517 return file_lines_parse(p, size, numlines);
520 /****************************************************************************
521 load a fd into memory and return an array of pointers to lines in the file
522 must be freed with file_lines_free(). If convert is true calls unix_to_dos on
524 ****************************************************************************/
525 char **fd_lines_load(int fd, int *numlines)
530 p = fd_load(fd, &size);
533 return file_lines_parse(p, size, numlines);
537 /****************************************************************************
538 load a pipe into memory and return an array of pointers to lines in the data
539 must be freed with file_lines_free().
540 ****************************************************************************/
541 char **file_lines_pload(char *syscmd, int *numlines)
546 p = file_pload(syscmd, &size);
549 return file_lines_parse(p, size, numlines);
552 /****************************************************************************
553 free lines loaded with file_lines_load
554 ****************************************************************************/
555 void file_lines_free(char **lines)
563 /****************************************************************************
564 take a lislist of lines and modify them to produce a list where \ continues
566 ****************************************************************************/
567 void file_lines_slashcont(char **lines)
571 for (i=0; lines[i];) {
572 int len = strlen(lines[i]);
573 if (lines[i][len-1] == '\\') {
574 lines[i][len-1] = ' ';
576 char *p = &lines[i][len];
577 while (p < lines[i+1]) *p++ = ' ';
578 for (j = i+1; lines[j]; j++) lines[j] = lines[j+1];
587 save a lump of data into a file. Mostly used for debugging
589 BOOL file_save(const char *fname, void *packet, size_t length)
592 fd = open(fname, O_WRONLY|O_CREAT|O_TRUNC, 0644);
596 if (write(fd, packet, length) != (size_t)length) {