file-spec>string ( file-listing spec -- string )

Vocabulary

tools.files

Inputs

file-listing	an object
spec	an object

Outputs

string

an object

Definition

USING: system ;

IN: tools.files

HOOK: file-spec>string os ( file-listing spec -- string )

Methods

USING: accessors calendar.format combinators kernel math.parser
tools.files tools.files.private ;

M: object file-spec>string
    {
        { +file-name+ [ directory-entry>> name>> ] }
        { +directory-or-size+ [ file-info>> dir-or-size ] }
        { +file-size+ [ file-info>> size>> number>string ] }
        { +file-date+ [ file-info>> modified>> listing-date ] }
        { +file-time+ [ file-info>> modified>> listing-time ] }
        {
            +file-datetime+
            [ file-info>> modified>> timestamp>ymdhms ]
        }
        [ unknown-file-spec ]
    } case ;


USING: accessors combinators generic io.files.info.unix kernel
math.parser sequences system tools.files
tools.files.unix.private unix.groups unix.users ;

M: unix file-spec>string
    {
        {
            +file-name/type+
            [
                directory-entry>>
                [ name>> ] [ file-type>trailing ] bi append
            ]
        }
        { +permissions+ [ file-info>> permissions-string ] }
        { +nlinks+ [ file-info>> nlink>> number>string ] }
        { +user+ [ file-info>> uid>> user-name ] }
        { +group+ [ file-info>> gid>> group-name ] }
        { +uid+ [ file-info>> uid>> number>string ] }
        { +gid+ [ file-info>> gid>> number>string ] }
        [ M\ unix file-spec>string (call-next-method) ]
    } case ;