/*	$OpenBSD: stat.c,v 1.21 2015/10/10 20:35:01 deraadt Exp $ */

/*	$NetBSD: stat.c,v 1.19 2004/06/20 22:20:16 jmc Exp $ */

/*

 * Copyright (c) 2002 The NetBSD Foundation, Inc.

 * All rights reserved.

 *

 * This code is derived from software contributed to The NetBSD Foundation

 * by Andrew Brown.

 *

 * 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.

 *

 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. 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 FOUNDATION 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/types.h>

#include <sys/stat.h>

#include <ctype.h>

#include <err.h>

#include <errno.h>

#include <grp.h>

#include <limits.h>

#include <pwd.h>

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <time.h>

#include <unistd.h>

#define DEF_FORMAT \

	"%d %i %Sp %l %Su %Sg %r %z \"%Sa\" \"%Sm\" \"%Sc\" " \

	"%k %b %#Xf %N"

#define RAW_FORMAT	"%d %i %#p %l %u %g %r %z %a %m %c " \

	"%k %b %f %N"

#define LS_FORMAT	"%Sp %l %Su %Sg %Z %Sm %N%SY"

#define LSF_FORMAT	"%Sp %l %Su %Sg %Z %Sm %N%T%SY"

#define SHELL_FORMAT \

	"st_dev=%d st_ino=%i st_mode=%#p st_nlink=%l " \

	"st_uid=%u st_gid=%g st_rdev=%r st_size=%z " \

	"st_atime=%a st_mtime=%m st_ctime=%c " \

	"st_blksize=%k st_blocks=%b st_flags=%f"

#define LINUX_FORMAT \

	"  File: \"%N\"%n" \

	"  Size: %-11z  FileType: %HT%n" \

	"  Mode: (%01Mp%03OLp/%.10Sp)         Uid: (%5u/%8Su)  Gid: (%5g/%8Sg)%n" \

	"Device: %Hd,%Ld   Inode: %i    Links: %l%n" \

	"Access: %Sa%n" \

	"Modify: %Sm%n" \

	"Change: %Sc"

#define TIME_FORMAT	"%b %e %T %Y"

#define FLAG_POUND	0x01

#define FLAG_SPACE	0x02

#define FLAG_PLUS	0x04

#define FLAG_ZERO	0x08

#define FLAG_MINUS	0x10

/*

 * These format characters must all be unique, except the magic one.

 */

#define FMT_MAGIC	'%'

#define FMT_DOT		'.'

#define SIMPLE_NEWLINE	'n'

#define SIMPLE_TAB	't'

#define SIMPLE_PERCENT	'%'

#define SIMPLE_NUMBER	'@'

#define FMT_POUND	'#'

#define FMT_SPACE	' '

#define FMT_PLUS	'+'

#define FMT_ZERO	'0'

#define FMT_MINUS	'-'

#define FMT_DECIMAL	'D'

#define FMT_OCTAL	'O'

#define FMT_UNSIGNED	'U'

#define FMT_HEX		'X'

#define FMT_FLOAT	'F'

#define FMT_STRING	'S'

#define FMTF_DECIMAL	0x01

#define FMTF_OCTAL	0x02

#define FMTF_UNSIGNED	0x04

#define FMTF_HEX	0x08

#define FMTF_FLOAT	0x10

#define FMTF_STRING	0x20

#define HIGH_PIECE	'H'

#define MIDDLE_PIECE	'M'

#define LOW_PIECE	'L'

#define SHOW_st_dev	'd'

#define SHOW_st_ino	'i'

#define SHOW_st_mode	'p'

#define SHOW_st_nlink	'l'

#define SHOW_st_uid	'u'

#define SHOW_st_gid	'g'

#define SHOW_st_rdev	'r'

#define SHOW_st_atime	'a'

#define SHOW_st_mtime	'm'

#define SHOW_st_ctime	'c'

#define SHOW_st_btime	'B'

#define SHOW_st_size	'z'

#define SHOW_st_blocks	'b'

#define SHOW_st_blksize	'k'

#define SHOW_st_flags	'f'

#define SHOW_st_gen	'v'

#define SHOW_symlink	'Y'

#define SHOW_filetype	'T'

#define SHOW_filename	'N'

#define SHOW_sizerdev	'Z'

void	usage(const char *);

void	output(const struct stat *, const char *,

	    const char *, int, int);

int	format1(const struct stat *,	/* stat info */

	    const char *,		/* the file name */

	    const char *, int,		/* the format string itself */

	    char *, size_t,		/* a place to put the output */

	    int, int, int, int,		/* the parsed format */

	    int, int);

char *timefmt;

#define addchar(s, c, nl) \

	do { \

		(void)fputc((c), (s)); \

		(*nl) = ((c) == '\n'); \

	} while (0/*CONSTCOND*/)

extern char *__progname;

int

main(int argc, char *argv[])

{

	int ch, rc, errs;

	int lsF, fmtchar, usestat, fn, nonl, quiet;

	char *statfmt, *options, *synopsis;

	lsF = 0;

	fmtchar = '\0';

	usestat = 0;

	nonl = 0;

	quiet = 0;

	statfmt = NULL;

	options = "f:FlLnqrst:x";

	synopsis = "[-FLnq] [-f format | -l | -r | -s | -x] "

	    "[-t timefmt] [file ...]";

		case 'F':

			lsF = 1;

		case 'L':

			usestat = 1;

		case 'n':

			nonl = 1;

		case 'q':

			quiet = 1;

		case 'f':

			/* FALLTHROUGH */

		case 'l':

		case 'r':

		case 's':

		case 'x':

				    fmtchar, ch);

			fmtchar = ch;

		case 't':

		default:

		}

	fn = 1;

		else {

			fmtchar = 'f';

			statfmt = DEF_FORMAT;

		}

	}

	case 'f':

		/* statfmt already set */

		break;

	case 'l':

	case 'r':

		statfmt = RAW_FORMAT;

	case 's':

		statfmt = SHELL_FORMAT;

	case 'x':

		statfmt = LINUX_FORMAT;

		break;

	default:

		/*NOTREACHED*/

	}

	errs = 0;

			/*

			 * Try stat() and if it fails, fall back to

			 * lstat() just in case we're examining a

			 * broken symlink.

			 */

		} else

			errs = 1;

		} else

void

usage(const char *synopsis)

{

}

/*

 * Parses a format string.

 */

void

output(const struct stat *st, const char *file,

    const char *statfmt, int fn, int nonl)

{

	int flags, size, prec, ofmt, hilo, what;

	const char *subfmt;

	int nl, t, i;

	nl = 1;

		/*

		 * Non-format characters go straight out.

		 */

		}

		/*

		 * The current format "substring" starts here,

		 * and then we skip the magic.

		 */

		subfmt = statfmt;

		/*

		 * Some simple one-character "formats".

		 */

		case SIMPLE_NEWLINE:

		case SIMPLE_TAB:

		case SIMPLE_PERCENT:

		case SIMPLE_NUMBER: {

			continue;

		}

		}

		/*

		 * This must be an actual format string.  Format strings are

		 * similar to printf(3) formats up to a point, and are of

		 * the form:

		 *

		 *	%	required start of format

		 *	[-# +0]	opt. format characters

		 *	size	opt. field width

		 *	.	opt. decimal separator, followed by

		 *	prec	opt. precision

		 *	fmt	opt. output specifier (string, numeric, etc.)

		 *	sub	opt. sub field specifier (high, middle, low)

		 *	datum	required field specifier (size, mode, etc)

		 *

		 * Only the % and the datum selector are required.  All data

		 * have reasonable default output forms.  The "sub" specifier

		 * only applies to certain data (mode, dev, rdev, filetype).

		 * The symlink output defaults to STRING, yet will only emit

		 * the leading " -> " if STRING is explicitly specified.  The

		 * sizerdev datum will generate rdev output for character or

		 * block devices, and size output for all others.

		 */

		flags = 0;

			else

				break;

		size = -1;

			size = 0;

					goto badfmt;

			}

		}

		prec = -1;

			prec = 0;

					goto badfmt;

			}

		}

#define fmtcase(x, y)		case (y): (x) = (y); statfmt++; break

#define fmtcasef(x, y, z)	case (y): (x) = (z); statfmt++; break

		default:

			ofmt = 0;

		}

		default:

			hilo = 0;

		}

		default:

			goto badfmt;

		}

#undef fmtcasef

#undef fmtcase

		    sizeof(buf), flags, size, prec, ofmt, hilo, what);

	badfmt:

	}

/*

 * Arranges output according to a single parsed format substring.

 */

int

format1(const struct stat *st,

    const char *file,

    const char *fmt, int flen,

    char *buf, size_t blen,

    int flags, int size, int prec, int ofmt,

    int hilo, int what)

{

	u_int64_t data;

	struct passwd *pw;

	struct group *gr;

	struct tm *tm;

	long nsecs;

	int l, small, formats, gottime, n;

	formats = 0;

	small = 0;

	gottime = 0;

	nsecs = 0;

	/*

	 * First, pick out the data and tweak it based on hilo or

	 * specified output format (symlink output only).

	 */

	case SHOW_st_dev:

	case SHOW_st_rdev:

		small = (sizeof(st->st_dev) == 4);

		    0U);

			sdata = "???";

			hilo = 0;

			hilo = 0;

		}

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX |

		    FMTF_STRING;

		break;

	case SHOW_st_ino:

		small = (sizeof(st->st_ino) == 4);

		sdata = NULL;

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX;

		break;

	case SHOW_st_mode:

		small = (sizeof(st->st_mode) == 4);

		sdata = smode;

			hilo = 0;

			hilo = 0;

			hilo = 0;

		}

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX |

		    FMTF_STRING;

		break;

	case SHOW_st_nlink:

		small = (sizeof(st->st_dev) == 4);

		sdata = NULL;

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX;

		break;

	case SHOW_st_uid:

		small = (sizeof(st->st_uid) == 4);

		else {

			sdata = sid;

		}

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX |

		    FMTF_STRING;

		break;

	case SHOW_st_gid:

		small = (sizeof(st->st_gid) == 4);

		else {

			sdata = sid;

		}

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX |

		    FMTF_STRING;

		break;

	case SHOW_st_atime:

		gottime = 1;

		/* FALLTHROUGH */

	case SHOW_st_mtime:

			gottime = 1;

		}

		/* FALLTHROUGH */

	case SHOW_st_ctime:

			gottime = 1;

		}

		/* FALLTHROUGH */

	case SHOW_st_btime:

			gottime = 1;

		}

		small = (sizeof(secs) == 4);

		small = 1;

		sdata = path;

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX |

		    FMTF_FLOAT | FMTF_STRING;

		break;

	case SHOW_st_size:

		small = (sizeof(st->st_size) == 4);

		sdata = NULL;

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX;

		break;

	case SHOW_st_blocks:

		small = (sizeof(st->st_blocks) == 4);

		sdata = NULL;

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX;

		break;

	case SHOW_st_blksize:

		small = (sizeof(st->st_blksize) == 4);

		sdata = NULL;

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX;

		break;

	case SHOW_st_flags:

		small = (sizeof(st->st_flags) == 4);

		sdata = NULL;

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX;

		break;

	case SHOW_st_gen:

		small = (sizeof(st->st_gen) == 4);

		sdata = NULL;

		formats = FMTF_DECIMAL | FMTF_OCTAL | FMTF_UNSIGNED | FMTF_HEX;

		break;

	case SHOW_symlink:

		small = 0;

		data = 0;

				l = 0;

			}

			sdata = "";

		formats = FMTF_STRING;

		break;

	case SHOW_filetype:

		small = 0;

		data = 0;

			case S_IFIFO:

			case S_IFDIR:

			case S_IFREG:

					    sizeof(smode));

				break;

			case S_IFLNK:

			case S_IFSOCK:

			}

			hilo = 0;

			}

			hilo = 0;

		}

		formats = FMTF_STRING;

		break;

	case SHOW_filename:

		small = 0;

		data = 0;

		else

		sdata = path;

		formats = FMTF_STRING;

		break;

	case SHOW_sizerdev:

			int l1, l2;

			    ofmt, HIGH_PIECE, SHOW_st_rdev);

			    ofmt, LOW_PIECE, SHOW_st_rdev);

			    l1, majdev, l2, mindev);

			    flags, size, prec, ofmt, 0, SHOW_st_size));

		}

		/*NOTREACHED*/

	default:

	}

	/*

	 * If a subdatum was specified but not supported, or an output

	 * format was selected that is not supported, that's an error.

	 */

	/*

	 * Assemble the format string for passing to printf(3).

	 */

	/*

	 * Only the timespecs support the FLOAT output format, and that

	 * requires work that differs from the other formats.

	 */

		/*

		 * Nothing after the decimal point, so just print seconds.

		 */

			}

		}

		/*

		 * Unspecified precision gets all the precision we have:

		 * 9 digits.

		 */

		/*

		 * Adjust the size for the decimal point and the digits

		 * that will follow.

		 */

		/*

		 * Any leftover size that's legitimate will be used.

		 */

		}

		/*

		 * The stuff after the decimal point always needs zero

		 * filling.

		 */

		/*

		 * We can "print" at most nine digits of precision.  The

		 * rest we will pad on at the end.

		 */

		/*

		 * For precision of less that nine digits, trim off the

		 * less significant figures.

		 */

		/*

		 * Use the format, and then tack on any zeroes that

		 * might be required to make up the requested precision.

		 */

	}

	/*

	 * Add on size and precision, if specified, to the format.

	 */

	}

	}

	/*

	 * String output uses the temporary sdata.

	 */

	}

	/*

	 * Ensure that sign extension does not cause bad looking output

	 * for some forms.

	 */

	/*

	 * The four "numeric" output forms.

	 */

	}