Return to path.c CVS log

Up to [CSRG BSD Unix] / 43BSDReno / contrib / mh / sbr

Annotation of 43BSDReno/contrib/mh/sbr/path.c, revision 1.1

1.1     ! root        1: /* path.c - return a pathname */
        !             2: 
        !             3: #include "../h/mh.h"
        !             4: #include <stdio.h>
        !             5: 
        !             6: #define        CWD     "./"
        !             7: #define        NCWD    (sizeof CWD - 1)
        !             8: #define        DOT     "."
        !             9: #define        DOTDOT  ".."
        !            10: #define        PWD     "../"
        !            11: #define        NPWD    (sizeof PWD - 1)
        !            12: 
        !            13: 
        !            14: static char *pwds;
        !            15: 
        !            16: static char *expath();
        !            17: static compath();
        !            18: 
        !            19: 
        !            20: char *
        !            21: path(name, flag)
        !            22:        register char *name;
        !            23:        register int flag;
        !            24: {
        !            25:     register char  *cp,
        !            26:                    *ep;
        !            27: 
        !            28:     if ((cp = expath (name, flag))
        !            29:            && (ep = cp + strlen (cp) - 1) > cp
        !            30:            && *ep == '/')
        !            31:        *ep = NULL;
        !            32: 
        !            33:     return cp;
        !            34: }
        !            35: 
        !            36: /*  */
        !            37: 
        !            38: static char *
        !            39: expath(name, flag)
        !            40:        register char *name;
        !            41:        register int flag;
        !            42: {
        !            43:     register char  *cp,
        !            44:                    *ep;
        !            45:     char    buffer[BUFSIZ];
        !            46: 
        !            47:     if (flag == TSUBCWF) {
        !            48:        (void) sprintf (buffer, "%s/%s", m_getfolder (), name);
        !            49:        name = m_mailpath (buffer);
        !            50:        compath (name);
        !            51:        (void) sprintf (buffer, "%s/", m_maildir (""));
        !            52:        if (ssequal (buffer, name)) {
        !            53:            cp = name;
        !            54:            name = getcpy (name + strlen (buffer));
        !            55:            free (cp);
        !            56:        }
        !            57:        flag = TFOLDER;
        !            58:     }
        !            59: 
        !            60:     if (*name == '/'
        !            61:            || (flag == TFOLDER
        !            62:                && (strncmp (name, CWD, NCWD)
        !            63:                    && strcmp (name, DOT)
        !            64:                    && strcmp (name, DOTDOT)
        !            65:                    && strncmp (name, PWD, NPWD))))
        !            66:        return getcpy (name);
        !            67: 
        !            68:     if (pwds == NULL)
        !            69:        pwds = pwd ();
        !            70: 
        !            71:     if (strcmp (name, DOT) == 0 || strcmp (name, CWD) == 0)
        !            72:        return getcpy (pwds);
        !            73: 
        !            74:     ep = pwds + strlen (pwds);
        !            75:     if ((cp = rindex (pwds, '/')) == NULL)
        !            76:        cp = ep;
        !            77:     else
        !            78:        if (cp == pwds)
        !            79:            cp++;
        !            80: 
        !            81:     if (strncmp (name, CWD, NCWD) == 0)
        !            82:        name += NCWD;
        !            83: 
        !            84:     if (strcmp (name, DOTDOT) == 0 || strcmp (name, PWD) == 0) {
        !            85:        (void) sprintf (buffer, "%.*s", cp - pwds, pwds);
        !            86:        return getcpy (buffer);
        !            87:     }
        !            88: 
        !            89:     if (strncmp (name, PWD, NPWD) == 0)
        !            90:        name += NPWD;
        !            91:     else
        !            92:        cp = ep;
        !            93: 
        !            94:     (void) sprintf (buffer, "%.*s/%s", cp - pwds, pwds, name);
        !            95:     return getcpy (buffer);
        !            96: }
        !            97: 
        !            98: /*  */
        !            99: 
        !           100: static
        !           101: compath(f)
        !           102:        register char *f;
        !           103: {
        !           104:     register char  *cp,
        !           105:                    *dp;
        !           106: 
        !           107:     if (*f != '/')
        !           108:        return;
        !           109: 
        !           110:     for (cp = f; *cp;)
        !           111:        if (*cp == '/') {
        !           112:            switch (*++cp) {
        !           113:                case NULL:
        !           114:                    if (--cp > f)
        !           115:                        *cp = NULL;
        !           116:                    break;
        !           117: 
        !           118:                case '/':
        !           119:                    for (dp = cp; *dp == '/'; dp++)
        !           120:                        continue;
        !           121:                    (void) strcpy (cp--, dp);
        !           122:                    continue;
        !           123: 
        !           124:                case '.':
        !           125:                    if (strcmp (cp, DOT) == 0) {
        !           126:                        if (cp > f + 1)
        !           127:                            cp--;
        !           128:                        *cp = NULL;
        !           129:                        break;
        !           130:                    }
        !           131:                    if (strcmp (cp, DOTDOT) == 0) {
        !           132:                        for (cp -= 2; cp > f; cp--)
        !           133:                            if (*cp == '/')
        !           134:                                break;
        !           135:                        if (cp <= f)
        !           136:                            cp = f + 1;
        !           137:                        *cp = NULL;
        !           138:                        break;
        !           139:                    }
        !           140:                    if (strncmp (cp, PWD, NPWD) == 0) {
        !           141:                        for (dp = cp - 2; dp > f; dp--)
        !           142:                            if (*dp == '/')
        !           143:                                break;
        !           144:                        if (dp <= f)
        !           145:                            dp = f;
        !           146:                        (void) strcpy (dp, cp + NPWD - 1);
        !           147:                        cp = dp;
        !           148:                        continue;
        !           149:                    }
        !           150:                    if (strncmp (cp, CWD, NCWD) == 0) {
        !           151:                        (void) strcpy (cp - 1, cp + NCWD - 1);
        !           152:                        cp--;
        !           153:                        continue;
        !           154:                    }
        !           155:                    continue;
        !           156: 
        !           157:                default:
        !           158:                    cp++;
        !           159:                    continue;
        !           160:            }
        !           161:            break;
        !           162:        }
        !           163:        else
        !           164:            cp++;
        !           165: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.