/***********************************************************************
* *
* This software is part of the ast package *
* Copyright (c) 1985-2011 AT&T Intellectual Property *
* and is licensed under the *
* Eclipse Public License, Version 1.0 *
* by AT&T Intellectual Property *
* *
* A copy of the License is available at *
* http://www.eclipse.org/org/documents/epl-v10.html *
* (with md5 checksum b35adb5213ca9657e911e9befb180842) *
* *
* Information and Software Systems Research *
* AT&T Research *
* Florham Park NJ *
* *
* Glenn Fowler <gsf@research.att.com> *
* David Korn <dgk@research.att.com> *
* Phong Vo <kpv@research.att.com> *
* *
***********************************************************************/
#pragma prototyped
/*
* Glenn Fowler
* AT&T Bell Laboratories
*
* return ls -l style file mode string given file mode bits
* if external!=0 then mode is modex canonical
*/
#include "modelib.h"
char*
fmtmode(register int mode, int external)
{
register char* s;
register struct modeop* p;
char* buf;
if (!external)
mode = modex(mode);
s = buf = fmtbuf(MODELEN + 1);
for (p = modetab; p < &modetab[MODELEN]; p++)
*s++ = p->name[((mode & p->mask1) >> p->shift1) | ((mode & p->mask2) >> p->shift2)];
*s = 0;
return buf;
}