/*	$NetBSD: ls.c,v 1.19 2006/10/11 19:51:10 apb Exp $	*/

 * Copyright (c) 1989, 1993

 *	The Regents of the University of California.  All rights reserved.

 *

 * Redistribution and use in source and binary forms, with or without

 * modification, are permitted provided that the following conditions

 * are met:

 * 1. Redistributions of source code must retain the above copyright

 *    notice, this list of conditions and the following disclaimer.

 * 2. Redistributions in binary form must reproduce the above copyright

 *    notice, this list of conditions and the following disclaimer in the

 *    documentation and/or other materials provided with the distribution.

 * 3. Neither the name of the University nor the names of its contributors

 *    may be used to endorse or promote products derived from this software

 *    without specific prior written permission.

 *

 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND

 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE

 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE

 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE

 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL

 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS

 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)

 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT

 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY

 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF

 * SUCH DAMAGE.

 */

#include <sys/cdefs.h>

#ifndef lint

#if 0

static char sccsid[] = "from: @(#)ls.c	8.1 (Berkeley) 6/6/93";

#else

__RCSID("$NetBSD: ls.c,v 1.19 2006/10/11 19:51:10 apb Exp $");

#endif

#endif /* not lint */

#define LOGIN_NAME_MAX 256

#include <sys/param.h>

#include <sys/stat.h>

#include <err.h>

#include <errno.h>

#include "fts.h"

#include <grp.h>

#include <pwd.h>

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <time.h>

#include "tzfile.h"

#include <unistd.h>

#include "find.h"

/* Derived from the print routines in the ls(1) source code. */

static void printlink(char *);

static void printtime(time_t);

//#ifdef __SYMBIAN_COMPILE_UNUSED__

void

strmode(mode_t mode, char* p)

{

	 /* print type */

	switch (mode & S_IFMT) {

	case S_IFDIR:			/* directory */

		*p++ = 'd';

		break;

	case S_IFCHR:			/* character special */

		*p++ = 'c';

		break;

	case S_IFBLK:			/* block special */

		*p++ = 'b';

		break;

	case S_IFREG:			/* regular */

		*p++ = '-';

		break;

	case S_IFLNK:			/* symbolic link */

		*p++ = 'l';

		break;

	case S_IFSOCK:			/* socket */

		*p++ = 's';

		break;

#ifdef S_IFIFO

	case S_IFIFO:			/* fifo */

		*p++ = 'p';

		break;

#endif

#ifdef S_IFWHT

	case S_IFWHT:			/* whiteout */

		*p++ = 'w';

		break;

#endif

	default:			/* unknown */

		*p++ = '?';

		break;

	}

	/* usr */

	if (mode & S_IRUSR)

		*p++ = 'r';

	else

		*p++ = '-';

	if (mode & S_IWUSR)

		*p++ = 'w';

	else

		*p++ = '-';

	switch (mode & (S_IXUSR | S_ISUID)) {

	case 0:

		*p++ = '-';

		break;

	case S_IXUSR:

		*p++ = 'x';

		break;

	case S_ISUID:

		*p++ = 'S';

		break;

	case S_IXUSR | S_ISUID:

		*p++ = 's';

		break;

	}

	/* group */

	if (mode & S_IRGRP)

		*p++ = 'r';

	else

		*p++ = '-';

	if (mode & S_IWGRP)

		*p++ = 'w';

	else

		*p++ = '-';

	switch (mode & (S_IXGRP | S_ISGID)) {

	case 0:

		*p++ = '-';

		break;

	case S_IXGRP:

		*p++ = 'x';

		break;

	case S_ISGID:

		*p++ = 'S';

		break;

	case S_IXGRP | S_ISGID:

		*p++ = 's';

		break;

	}

	/* other */

	if (mode & S_IROTH)

		*p++ = 'r';

	else

		*p++ = '-';

	if (mode & S_IWOTH)

		*p++ = 'w';

	else

		*p++ = '-';

	switch (mode & (S_IXOTH | S_ISVTX)) {

	case 0:

		*p++ = '-';

		break;

	case S_IXOTH:

		*p++ = 'x';

		break;

	case S_ISVTX:

		*p++ = 'T';

		break;

	case S_IXOTH | S_ISVTX:

		*p++ = 't';

		break;

	}

	*p++ = ' ';		/* will be a '+' if ACL's implemented */

	*p = '\0';

}

//#endif

void

printlong(char *name,			/* filename to print */

	char *accpath,			/* current valid path to filename */

	struct stat *sb)		/* stat buffer */

{

//	fflush(stdout);

	char modep[15];

	(void)printf("%7lu %6lld ", (u_long)sb->st_ino,

	    (long long)sb->st_blocks);

	(void)strmode(sb->st_mode, modep);

	(void)printf("%s %3lu ", modep, (unsigned long)sb->st_nlink,

	    LOGIN_NAME_MAX, /*user_from_uid(sb->st_uid, 0), */LOGIN_NAME_MAX/*,

	    group_from_gid(sb->st_gid, 0)*/);

	if (S_ISCHR(sb->st_mode) || S_ISBLK(sb->st_mode))

		(void)printf("%3d,%5d ", major(sb->st_rdev),

		    minor(sb->st_rdev));

	else

		(void)printf("%9lld ", (long long)sb->st_size);

	printtime(sb->st_mtime);

	(void)printf("%s", name);

	if (S_ISLNK(sb->st_mode))

		printlink(accpath);

	(void)putchar('\n');

}

static void

printtime(time_t ftime)

{

	int i;

	char *longstring;

	longstring = ctime(&ftime);

	for (i = 4; i < 11; ++i)

		(void)putchar(longstring[i]);

#define	SIXMONTHS	((DAYSPERNYEAR / 2) * SECSPERDAY)

	if (ftime + SIXMONTHS > time((time_t *)NULL))

		for (i = 11; i < 16; ++i)

			(void)putchar(longstring[i]);

	else {

		(void)putchar(' ');

		for (i = 20; i < 24; ++i)

			(void)putchar(longstring[i]);

	}

	(void)putchar(' ');

}

static void

printlink(char *name)

{

	int lnklen;

	char path[MAXPATHLEN + 1];

	if ((lnklen = readlink(name, path, sizeof(path) - 1)) == -1) {

	//	warn("%s", name);

		return;

	}

	path[lnklen] = '\0';

	(void)printf(" -> %s\n", path);

}