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 exand buffer!\n"));
370 memcpy(p
+total
, buf
, n
);
377 if (size
) *size
= total
;
382 /****************************************************************************
383 load a file into memory from a fd.
384 ****************************************************************************/
386 char *fd_load(int fd
, size_t *size
)
388 SMB_STRUCT_STAT sbuf
;
391 if (sys_fstat(fd
, &sbuf
) != 0) return NULL
;
393 p
= (char *)malloc(sbuf
.st_size
+1);
396 if (read(fd
, p
, sbuf
.st_size
) != sbuf
.st_size
) {
402 if (size
) *size
= sbuf
.st_size
;
407 /****************************************************************************
408 load a file into memory
409 ****************************************************************************/
410 char *file_load(const char *fname
, size_t *size
)
415 if (!fname
|| !*fname
) return NULL
;
417 fd
= open(fname
,O_RDONLY
);
418 if (fd
== -1) return NULL
;
420 p
= fd_load(fd
, size
);
428 /*******************************************************************
429 mmap (if possible) or read a file
430 ********************************************************************/
431 void *map_file(char *fname
, size_t size
)
438 fd
= open(fname
, O_RDONLY
, 0);
440 DEBUG(2,("Failed to load %s - %s\n", fname
, strerror(errno
)));
443 p
= mmap(NULL
, size
, PROT_READ
, MAP_SHARED
|MAP_FILE
, fd
, 0);
445 if (p
== MAP_FAILED
) {
446 DEBUG(1,("Failed to mmap %s - %s\n", fname
, strerror(errno
)));
452 p
= file_load(fname
, &s2
);
455 DEBUG(1,("incorrect size for %s - got %d expected %d\n",
466 /****************************************************************************
467 parse a buffer into lines
468 ****************************************************************************/
469 static char **file_lines_parse(char *p
, size_t size
, int *numlines
)
476 for (s
= p
, i
=0; s
< p
+size
; s
++) {
477 if (s
[0] == '\n') i
++;
480 ret
= (char **)malloc(sizeof(ret
[0])*(i
+2));
485 memset(ret
, 0, sizeof(ret
[0])*(i
+2));
486 if (numlines
) *numlines
= i
;
489 for (s
= p
, i
=0; s
< p
+size
; s
++) {
495 if (s
[0] == '\r') s
[0] = 0;
502 /****************************************************************************
503 load a file into memory and return an array of pointers to lines in the file
504 must be freed with file_lines_free().
505 ****************************************************************************/
506 char **file_lines_load(const char *fname
, int *numlines
)
511 p
= file_load(fname
, &size
);
514 return file_lines_parse(p
, size
, numlines
);
517 /****************************************************************************
518 load a fd into memory and return an array of pointers to lines in the file
519 must be freed with file_lines_free(). If convert is true calls unix_to_dos on
521 ****************************************************************************/
522 char **fd_lines_load(int fd
, int *numlines
)
527 p
= fd_load(fd
, &size
);
530 return file_lines_parse(p
, size
, numlines
);
534 /****************************************************************************
535 load a pipe into memory and return an array of pointers to lines in the data
536 must be freed with file_lines_free().
537 ****************************************************************************/
538 char **file_lines_pload(char *syscmd
, int *numlines
)
543 p
= file_pload(syscmd
, &size
);
546 return file_lines_parse(p
, size
, numlines
);
549 /****************************************************************************
550 free lines loaded with file_lines_load
551 ****************************************************************************/
552 void file_lines_free(char **lines
)
560 /****************************************************************************
561 take a lislist of lines and modify them to produce a list where \ continues
563 ****************************************************************************/
564 void file_lines_slashcont(char **lines
)
568 for (i
=0; lines
[i
];) {
569 int len
= strlen(lines
[i
]);
570 if (lines
[i
][len
-1] == '\\') {
571 lines
[i
][len
-1] = ' ';
573 char *p
= &lines
[i
][len
];
574 while (p
< lines
[i
+1]) *p
++ = ' ';
575 for (j
= i
+1; lines
[j
]; j
++) lines
[j
] = lines
[j
+1];
584 save a lump of data into a file. Mostly used for debugging
586 BOOL
file_save(const char *fname
, void *packet
, size_t length
)
589 fd
= open(fname
, O_WRONLY
|O_CREAT
|O_TRUNC
, 0644);
593 if (write(fd
, packet
, length
) != length
) {