aboutsummaryrefslogtreecommitdiff
path: root/utility.c
diff options
context:
space:
mode:
authorEric Andersen <andersen@codepoet.org>1999-10-09 00:25:00 +0000
committerEric Andersen <andersen@codepoet.org>1999-10-09 00:25:00 +0000
commitf811e07b072600a3784a92e5a1dc8a93dac477eb (patch)
tree820c6366f8bdacf617a9591cc2ca9dfe107b1fa3 /utility.c
parent8341a1565306a54e685455d19efb0516ad3328a1 (diff)
downloadbusybox-f811e07b072600a3784a92e5a1dc8a93dac477eb.tar.gz
More stuff.
Diffstat (limited to 'utility.c')
-rw-r--r--utility.c795
1 files changed, 390 insertions, 405 deletions
diff --git a/utility.c b/utility.c
index 369aa21f2..277e27c70 100644
--- a/utility.c
+++ b/utility.c
@@ -27,31 +27,30 @@
#include <string.h>
#include <errno.h>
#include <fcntl.h>
-//#include <sys/types.h>
-//#include <sys/stat.h>
#include <dirent.h>
#include <time.h>
#include <utime.h>
+#include <sys/stat.h>
+#include <unistd.h>
#if 0
-extern char *
-join_paths(char * buffer, const char * a, const char * b)
+extern char *join_paths(char *buffer, const char *a, const char *b)
{
- int length = 0;
+ int length = 0;
- if ( a && *a ) {
- length = strlen(a);
- memcpy(buffer, a, length);
- }
- if ( b && *b ) {
- if ( length > 0 && buffer[length - 1] != '/' )
- buffer[length++] = '/';
- if ( *b == '/' )
- b++;
- strcpy(&buffer[length], b);
- }
- return buffer;
+ if (a && *a) {
+ length = strlen(a);
+ memcpy(buffer, a, length);
+ }
+ if (b && *b) {
+ if (length > 0 && buffer[length - 1] != '/')
+ buffer[length++] = '/';
+ if (*b == '/')
+ b++;
+ strcpy(&buffer[length], b);
+ }
+ return buffer;
}
#endif
@@ -61,73 +60,72 @@ join_paths(char * buffer, const char * a, const char * b)
-static CHUNK * chunkList;
+static CHUNK *chunkList;
/*
* Return the standard ls-like mode string from a file mode.
* This is static and so is overwritten on each call.
*/
-const char *
-modeString(int mode)
+const char *modeString(int mode)
{
- static char buf[12];
-
- strcpy(buf, "----------");
-
- /*
- * Fill in the file type.
- */
- if (S_ISDIR(mode))
- buf[0] = 'd';
- if (S_ISCHR(mode))
- buf[0] = 'c';
- if (S_ISBLK(mode))
- buf[0] = 'b';
- if (S_ISFIFO(mode))
- buf[0] = 'p';
+ static char buf[12];
+
+ strcpy(buf, "----------");
+
+ /*
+ * Fill in the file type.
+ */
+ if (S_ISDIR(mode))
+ buf[0] = 'd';
+ if (S_ISCHR(mode))
+ buf[0] = 'c';
+ if (S_ISBLK(mode))
+ buf[0] = 'b';
+ if (S_ISFIFO(mode))
+ buf[0] = 'p';
#ifdef S_ISLNK
- if (S_ISLNK(mode))
- buf[0] = 'l';
+ if (S_ISLNK(mode))
+ buf[0] = 'l';
#endif
#ifdef S_ISSOCK
- if (S_ISSOCK(mode))
- buf[0] = 's';
+ if (S_ISSOCK(mode))
+ buf[0] = 's';
#endif
- /*
- * Now fill in the normal file permissions.
- */
- if (mode & S_IRUSR)
- buf[1] = 'r';
- if (mode & S_IWUSR)
- buf[2] = 'w';
- if (mode & S_IXUSR)
- buf[3] = 'x';
- if (mode & S_IRGRP)
- buf[4] = 'r';
- if (mode & S_IWGRP)
- buf[5] = 'w';
- if (mode & S_IXGRP)
- buf[6] = 'x';
- if (mode & S_IROTH)
- buf[7] = 'r';
- if (mode & S_IWOTH)
- buf[8] = 'w';
- if (mode & S_IXOTH)
- buf[9] = 'x';
-
- /*
- * Finally fill in magic stuff like suid and sticky text.
- */
- if (mode & S_ISUID)
- buf[3] = ((mode & S_IXUSR) ? 's' : 'S');
- if (mode & S_ISGID)
- buf[6] = ((mode & S_IXGRP) ? 's' : 'S');
- if (mode & S_ISVTX)
- buf[9] = ((mode & S_IXOTH) ? 't' : 'T');
-
- return buf;
+ /*
+ * Now fill in the normal file permissions.
+ */
+ if (mode & S_IRUSR)
+ buf[1] = 'r';
+ if (mode & S_IWUSR)
+ buf[2] = 'w';
+ if (mode & S_IXUSR)
+ buf[3] = 'x';
+ if (mode & S_IRGRP)
+ buf[4] = 'r';
+ if (mode & S_IWGRP)
+ buf[5] = 'w';
+ if (mode & S_IXGRP)
+ buf[6] = 'x';
+ if (mode & S_IROTH)
+ buf[7] = 'r';
+ if (mode & S_IWOTH)
+ buf[8] = 'w';
+ if (mode & S_IXOTH)
+ buf[9] = 'x';
+
+ /*
+ * Finally fill in magic stuff like suid and sticky text.
+ */
+ if (mode & S_ISUID)
+ buf[3] = ((mode & S_IXUSR) ? 's' : 'S');
+ if (mode & S_ISGID)
+ buf[6] = ((mode & S_IXGRP) ? 's' : 'S');
+ if (mode & S_ISVTX)
+ buf[9] = ((mode & S_IXOTH) ? 't' : 'T');
+
+ return buf;
}
@@ -135,15 +133,14 @@ modeString(int mode)
* Return TRUE if a fileName is a directory.
* Nonexistant files return FALSE.
*/
-BOOL
-isDirectory(const char * name)
+int isDirectory(const char *name)
{
- struct stat statBuf;
+ struct stat statBuf;
- if (stat(name, &statBuf) < 0)
- return FALSE;
+ if (stat(name, &statBuf) < 0)
+ return FALSE;
- return S_ISDIR(statBuf.st_mode);
+ return S_ISDIR(statBuf.st_mode);
}
@@ -151,15 +148,14 @@ isDirectory(const char * name)
* Return TRUE if a filename is a block or character device.
* Nonexistant files return FALSE.
*/
-BOOL
-isDevice(const char * name)
+int isDevice(const char *name)
{
- struct stat statBuf;
+ struct stat statBuf;
- if (stat(name, &statBuf) < 0)
- return FALSE;
+ if (stat(name, &statBuf) < 0)
+ return FALSE;
- return S_ISBLK(statBuf.st_mode) || S_ISCHR(statBuf.st_mode);
+ return S_ISBLK(statBuf.st_mode) || S_ISCHR(statBuf.st_mode);
}
@@ -169,102 +165,118 @@ isDevice(const char * name)
* error message output. (Failure is not indicted if the attributes cannot
* be set.)
*/
-BOOL
+int
copyFile(
- const char * srcName,
- const char * destName,
- BOOL setModes
-)
+ const char *srcName,
+ const char *destName, int setModes, int followLinks)
{
- int rfd;
- int wfd;
- int rcc;
- char buf[BUF_SIZE];
- struct stat statBuf1;
- struct stat statBuf2;
- struct utimbuf times;
-
- if (stat(srcName, &statBuf1) < 0)
- {
- perror(srcName);
-
- return FALSE;
- }
+ int rfd;
+ int wfd;
+ int rcc;
+ char buf[BUF_SIZE];
+ struct stat statBuf1;
+ struct stat statBuf2;
+ struct utimbuf times;
+
+ if (stat(srcName, &statBuf1) < 0) {
+ perror(srcName);
+ return FALSE;
+ }
- if (stat(destName, &statBuf2) < 0)
- {
- statBuf2.st_ino = -1;
- statBuf2.st_dev = -1;
- }
+ if (stat(destName, &statBuf2) < 0) {
+ statBuf2.st_ino = -1;
+ statBuf2.st_dev = -1;
+ }
- if ((statBuf1.st_dev == statBuf2.st_dev) &&
- (statBuf1.st_ino == statBuf2.st_ino))
- {
- fprintf(stderr, "Copying file \"%s\" to itself\n", srcName);
+ if ((statBuf1.st_dev == statBuf2.st_dev) &&
+ (statBuf1.st_ino == statBuf2.st_ino)) {
+ fprintf(stderr, "Copying file \"%s\" to itself\n", srcName);
+ return FALSE;
+ }
- return FALSE;
+ if (S_ISDIR(statBuf1.st_mode)) {
+ /* Make sure the directory is writable */
+ if (mkdir(destName, 0777777 ^ umask(0))) {
+ perror(destName);
+ return (FALSE);
}
-
+ } else if (S_ISFIFO(statBuf1.st_mode)) {
+ if (mkfifo(destName, 644)) {
+ perror(destName);
+ return (FALSE);
+ }
+ } else if (S_ISBLK(statBuf1.st_mode) || S_ISCHR(statBuf1.st_mode)) {
+ if (mknod(destName, 644, statBuf1.st_rdev)) {
+ perror(destName);
+ return (FALSE);
+ }
+ } else if (S_ISLNK(statBuf1.st_mode)) {
+ char *link_val;
+ int link_size;
+
+ link_val = (char *) alloca(PATH_MAX + 2);
+ link_size = readlink(srcName, link_val, PATH_MAX + 1);
+ if (link_size < 0) {
+ perror(srcName);
+ return (FALSE);
+ }
+ link_val[link_size] = '\0';
+ if (symlink(link_val, destName)) {
+ perror(srcName);
+ return (FALSE);
+ }
+ } else {
rfd = open(srcName, O_RDONLY);
-
- if (rfd < 0)
- {
- perror(srcName);
-
- return FALSE;
+ if (rfd < 0) {
+ perror(srcName);
+ return FALSE;
}
wfd = creat(destName, statBuf1.st_mode);
-
- if (wfd < 0)
- {
- perror(destName);
- close(rfd);
-
- return FALSE;
- }
-
- while ((rcc = read(rfd, buf, sizeof(buf))) > 0)
- {
- if (fullWrite(wfd, buf, rcc) < 0)
- goto error_exit;
+ if (wfd < 0) {
+ perror(destName);
+ close(rfd);
+ return FALSE;
}
- if (rcc < 0)
- {
- perror(srcName);
+ while ((rcc = read(rfd, buf, sizeof(buf))) > 0) {
+ if (fullWrite(wfd, buf, rcc) < 0)
goto error_exit;
}
+ if (rcc < 0) {
+ perror(srcName);
+ goto error_exit;
+ }
- (void) close(rfd);
-
- if (close(wfd) < 0)
- {
- perror(destName);
+ close(rfd);
- return FALSE;
+ if (close(wfd) < 0) {
+ perror(destName);
+ return FALSE;
}
+ }
- if (setModes)
- {
- (void) chmod(destName, statBuf1.st_mode);
-
- (void) chown(destName, statBuf1.st_uid, statBuf1.st_gid);
+ if (setModes == TRUE) {
+ chmod(destName, statBuf1.st_mode);
+ if (followLinks == TRUE)
+ chown(destName, statBuf1.st_uid, statBuf1.st_gid);
+ else
+ lchown(destName, statBuf1.st_uid, statBuf1.st_gid);
- times.actime = statBuf1.st_atime;
- times.modtime = statBuf1.st_mtime;
+ times.actime = statBuf1.st_atime;
+ times.modtime = statBuf1.st_mtime;
- (void) utime(destName, &times);
- }
+ utime(destName, &times);
+ }
- return TRUE;
+ return TRUE;
-error_exit:
- close(rfd);
- close(wfd);
+ error_exit:
+ close(rfd);
+ close(wfd);
- return FALSE;
+ return FALSE;
}
@@ -273,25 +285,25 @@ error_exit:
* If the directory name is NULL, then the original fileName is returned.
* The built path is in a static area, and is overwritten for each call.
*/
-const char *
-buildName(const char * dirName, const char * fileName)
+char *buildName(const char *dirName, const char *fileName)
{
- const char * cp;
- static char buf[PATH_LEN];
+ const char *cp;
+ static char buf[PATH_LEN];
- if ((dirName == NULL) || (*dirName == '\0'))
- return fileName;
+ if ((dirName == NULL) || (*dirName == '\0')) {
+ strcpy(buf, fileName);
+ return buf;
+ }
- cp = strrchr(fileName, '/');
+ cp = strrchr(fileName, '/');
- if (cp)
- fileName = cp + 1;
+ if (cp)
+ fileName = cp + 1;
- strcpy(buf, dirName);
- strcat(buf, "/");
- strcat(buf, fileName);
+ strcpy(buf, dirName);
+ strcat(buf, "/");
- return buf;
+ return buf;
}
@@ -302,41 +314,33 @@ buildName(const char * dirName, const char * fileName)
* with an error message given. This does not handle spaces within
* arguments correctly.
*/
-BOOL
-makeString(
- int argc,
- const char ** argv,
- char * buf,
- int bufLen
-)
+int makeString( int argc, const char **argv, char *buf, int bufLen)
{
- int len;
+ int len;
- while (argc-- > 0)
- {
- len = strlen(*argv);
+ while (argc-- > 0) {
+ len = strlen(*argv);
- if (len >= bufLen)
- {
- fprintf(stderr, "Argument string too long\n");
+ if (len >= bufLen) {
+ fprintf(stderr, "Argument string too long\n");
- return FALSE;
- }
+ return FALSE;
+ }
- strcpy(buf, *argv++);
+ strcpy(buf, *argv++);
- buf += len;
- bufLen -= len;
+ buf += len;
+ bufLen -= len;
- if (argc)
- *buf++ = ' ';
+ if (argc)
+ *buf++ = ' ';
- bufLen--;
- }
+ bufLen--;
+ }
- *buf = '\0';
+ *buf = '\0';
- return TRUE;
+ return TRUE;
}
@@ -346,23 +350,22 @@ makeString(
* list of chunks which can be freed all at one time. You CAN NOT free
* an individual chunk.
*/
-char *
-getChunk(int size)
+char *getChunk(int size)
{
- CHUNK * chunk;
+ CHUNK *chunk;
- if (size < CHUNK_INIT_SIZE)
- size = CHUNK_INIT_SIZE;
+ if (size < CHUNK_INIT_SIZE)
+ size = CHUNK_INIT_SIZE;
- chunk = (CHUNK *) malloc(size + sizeof(CHUNK) - CHUNK_INIT_SIZE);
+ chunk = (CHUNK *) malloc(size + sizeof(CHUNK) - CHUNK_INIT_SIZE);
- if (chunk == NULL)
- return NULL;
+ if (chunk == NULL)
+ return NULL;
- chunk->next = chunkList;
- chunkList = chunk;
+ chunk->next = chunkList;
+ chunkList = chunk;
- return chunk->data;
+ return chunk->data;
}
@@ -371,19 +374,18 @@ getChunk(int size)
* The returned string cannot be individually freed, but can only be freed
* with other strings when freeChunks is called. Returns NULL on failure.
*/
-char *
-chunkstrdup(const char * str)
+char *chunkstrdup(const char *str)
{
- int len;
- char * newStr;
+ int len;
+ char *newStr;
- len = strlen(str) + 1;
- newStr = getChunk(len);
+ len = strlen(str) + 1;
+ newStr = getChunk(len);
- if (newStr)
- memcpy(newStr, str, len);
+ if (newStr)
+ memcpy(newStr, str, len);
- return newStr;
+ return newStr;
}
@@ -391,17 +393,15 @@ chunkstrdup(const char * str)
* Free all chunks of memory that had been allocated since the last
* call to this routine.
*/
-void
-freeChunks(void)
+void freeChunks(void)
{
- CHUNK * chunk;
+ CHUNK *chunk;
- while (chunkList)
- {
- chunk = chunkList;
- chunkList = chunk->next;
- free((char *) chunk);
- }
+ while (chunkList) {
+ chunk = chunkList;
+ chunkList = chunk->next;
+ free((char *) chunk);
+ }
}
@@ -411,27 +411,25 @@ freeChunks(void)
* The string is returned from a static buffer, and so is overwritten for
* each call.
*/
-const char *
-timeString(time_t timeVal)
+const char *timeString(time_t timeVal)
{
- time_t now;
- char * str;
- static char buf[26];
+ time_t now;
+ char *str;
+ static char buf[26];
- time(&now);
+ time(&now);
- str = ctime(&timeVal);
+ str = ctime(&timeVal);
- strcpy(buf, &str[4]);
- buf[12] = '\0';
+ strcpy(buf, &str[4]);
+ buf[12] = '\0';
- if ((timeVal > now) || (timeVal < now - 365*24*60*60L))
- {
- strcpy(&buf[7], &str[20]);
- buf[11] = '\0';
- }
+ if ((timeVal > now) || (timeVal < now - 365 * 24 * 60 * 60L)) {
+ strcpy(&buf[7], &str[20]);
+ buf[11] = '\0';
+ }
- return buf;
+ return buf;
}
@@ -445,88 +443,81 @@ timeString(time_t timeVal)
* \c quotes character c
* Adapted from code written by Ingo Wilken.
*/
-BOOL
-match(const char * text, const char * pattern)
+int match(const char *text, const char *pattern)
{
- const char * retryPat;
- const char * retryText;
- int ch;
- BOOL found;
-
- retryPat = NULL;
- retryText = NULL;
-
- while (*text || *pattern)
- {
- ch = *pattern++;
-
- switch (ch)
- {
- case '*':
- retryPat = pattern;
- retryText = text;
- break;
-
- case '[':
- found = FALSE;
-
- while ((ch = *pattern++) != ']')
- {
- if (ch == '\\')
- ch = *pattern++;
-
- if (ch == '\0')
- return FALSE;
-
- if (*text == ch)
- found = TRUE;
- }
-
- if (!found)
- {
- pattern = retryPat;
- text = ++retryText;
- }
-
- /* fall into next case */
-
- case '?':
- if (*text++ == '\0')
- return FALSE;
-
- break;
-
- case '\\':
- ch = *pattern++;
-
- if (ch == '\0')
- return FALSE;
-
- /* fall into next case */
-
- default:
- if (*text == ch)
- {
- if (*text)
- text++;
- break;
- }
-
- if (*text)
- {
- pattern = retryPat;
- text = ++retryText;
- break;
- }
-
- return FALSE;
- }
-
- if (pattern == NULL)
- return FALSE;
+ const char *retryPat;
+ const char *retryText;
+ int ch;
+ int found;
+
+ retryPat = NULL;
+ retryText = NULL;
+
+ while (*text || *pattern) {
+ ch = *pattern++;
+
+ switch (ch) {
+ case '*':
+ retryPat = pattern;
+ retryText = text;
+ break;
+
+ case '[':
+ found = FALSE;
+
+ while ((ch = *pattern++) != ']') {
+ if (ch == '\\')
+ ch = *pattern++;
+
+ if (ch == '\0')
+ return FALSE;
+
+ if (*text == ch)
+ found = TRUE;
+ }
+
+ if (!found) {
+ pattern = retryPat;
+ text = ++retryText;
+ }
+
+ /* fall into next case */
+
+ case '?':
+ if (*text++ == '\0')
+ return FALSE;
+
+ break;
+
+ case '\\':
+ ch = *pattern++;
+
+ if (ch == '\0')
+ return FALSE;
+
+ /* fall into next case */
+
+ default:
+ if (*text == ch) {
+ if (*text)
+ text++;
+ break;
+ }
+
+ if (*text) {
+ pattern = retryPat;
+ text = ++retryText;
+ break;
+ }
+
+ return FALSE;
}
- return TRUE;
+ if (pattern == NULL)
+ return FALSE;
+ }
+
+ return TRUE;
}
@@ -535,27 +526,25 @@ match(const char * text, const char * pattern)
* This does multiple writes as necessary.
* Returns the amount written, or -1 on an error.
*/
-int
-fullWrite(int fd, const char * buf, int len)
+int fullWrite(int fd, const char *buf, int len)
{
- int cc;
- int total;
+ int cc;
+ int total;
- total = 0;
+ total = 0;
- while (len > 0)
- {
- cc = write(fd, buf, len);
+ while (len > 0) {
+ cc = write(fd, buf, len);
- if (cc < 0)
- return -1;
+ if (cc < 0)
+ return -1;
- buf += cc;
- total+= cc;
- len -= cc;
- }
+ buf += cc;
+ total += cc;
+ len -= cc;
+ }
- return total;
+ return total;
}
@@ -565,30 +554,28 @@ fullWrite(int fd, const char * buf, int len)
* Returns the amount read, or -1 on an error.
* A short read is returned on an end of file.
*/
-int
-fullRead(int fd, char * buf, int len)
+int fullRead(int fd, char *buf, int len)
{
- int cc;
- int total;
+ int cc;
+ int total;
- total = 0;
+ total = 0;
- while (len > 0)
- {
- cc = read(fd, buf, len);
+ while (len > 0) {
+ cc = read(fd, buf, len);
- if (cc < 0)
- return -1;
+ if (cc < 0)
+ return -1;
- if (cc == 0)
- break;
+ if (cc == 0)
+ break;
- buf += cc;
- total+= cc;
- len -= cc;
- }
+ buf += cc;
+ total += cc;
+ len -= cc;
+ }
- return total;
+ return total;
}
@@ -598,84 +585,82 @@ fullRead(int fd, char * buf, int len)
* by the fileAction and dirAction function pointers).
*/
int
-recursiveAction( const char *fileName, BOOL recurse, BOOL followLinks,
- int (*fileAction)(const char* fileName),
- int (*dirAction)(const char* fileName))
+recursiveAction(const char *fileName, int recurse, int followLinks,
+ int (*fileAction) (const char *fileName),
+ int (*dirAction) (const char *fileName))
{
- int status;
- struct stat statbuf;
- struct dirent* next;
-
- if (!recurse && S_ISDIR(statbuf.st_mode)) {
- if (dirAction==NULL)
- return(TRUE);
- else
- return(dirAction(fileName));
- } else {
- if (fileAction==NULL)
- return(TRUE);
- else
- return(fileAction(fileName));
- }
+ int status;
+ struct stat statbuf;
+ struct dirent *next;
if (followLinks)
- status = stat(fileName, &statbuf);
- else
status = lstat(fileName, &statbuf);
-
+ else
+ status = stat(fileName, &statbuf);
if (status < 0) {
perror(fileName);
- return( FALSE);
+ return (FALSE);
+ }
+
+ if (recurse == FALSE) {
+ if (S_ISDIR(statbuf.st_mode)) {
+ if (dirAction == NULL)
+ return (TRUE);
+ else
+ return (dirAction(fileName));
+ } else {
+ if (fileAction == NULL)
+ return (TRUE);
+ else
+ return (fileAction(fileName));
+ }
}
if (S_ISDIR(statbuf.st_mode)) {
DIR *dir;
+ fprintf(stderr, "Dir: %s\n", fileName);
dir = opendir(fileName);
if (!dir) {
perror(fileName);
- return(FALSE);
+ return (FALSE);
+ }
+ if (dirAction != NULL) {
+ status = dirAction(fileName);
+ if (status == FALSE) {
+ perror("cp");
+ return (FALSE);
+ }
}
- while ((next = readdir (dir)) != NULL) {
- char nextFile[NAME_MAX];
- if ( (strcmp(next->d_name, "..") == 0) || (strcmp(next->d_name, ".") == 0) ) {
- continue;
- }
- sprintf(nextFile, "%s/%s", fileName, next->d_name);
- status = recursiveAction(nextFile, TRUE, followLinks, fileAction, dirAction);
- if (status < 0) {
- closedir(dir);
- return(FALSE);
- }
+ while ((next = readdir(dir)) != NULL) {
+ char nextFile[NAME_MAX];
+ if ((strcmp(next->d_name, "..") == 0)
+ || (strcmp(next->d_name, ".") == 0)) {
+ continue;
+ }
+ sprintf(nextFile, "%s/%s", fileName, next->d_name);
+ status =
+ recursiveAction(nextFile, TRUE, followLinks, fileAction,
+ dirAction);
+ if (status < 0) {
+ closedir(dir);
+ return (FALSE);
+ }
}
- status = closedir (dir);
+ status = closedir(dir);
if (status < 0) {
perror(fileName);
- return( FALSE);
+ return (FALSE);
}
- if (dirAction==NULL)
- return(TRUE);
- else
- return(dirAction(fileName));
- }
- else {
- if (fileAction==NULL)
- return(TRUE);
+ } else {
+ fprintf(stderr, "File: %s\n", fileName);
+ if (fileAction == NULL)
+ return (TRUE);
else
- return(fileAction(fileName));
+ return (fileAction(fileName));
}
+ return (TRUE);
}
/* END CODE */
-
-
-
-
-
-
-
-
-
-
-