Subversion Repositories planix.SVN

Rev

Rev 2 | Blame | Compare with Previous | Last modification | View Log | RSS feed

#include <u.h>
#include <libc.h>
#include <bio.h>
#include <libsec.h>
#include <ctype.h>

#include "iso9660.h"

/*
 * ISO 9660 file names must be uppercase, digits, or underscore.
 * We use lowercase, digits, and underscore, translating lower to upper
 * in mkisostring, and upper to lower in isostring.
 * Files with uppercase letters in their names are thus nonconforming.
 * Conforming files also must have a basename
 * at most 8 letters and at most one suffix of at most 3 letters.
 */
char*
isostring(uchar *buf, int len)
{
        char *p, *q;

        p = emalloc(len+1);
        memmove(p, buf, len);
        p[len] = '\0';
        while(len > 0 && p[len-1] == ' ')
                p[--len] = '\0';
        for(q=p; *q; q++)
                *q = tolower(*q);

        q = atom(p);
        free(p);
        return q;
}

int 
isisofrog(char c)
{
        if(c >= '0' && c <= '9')
                return 0;
        if(c >= 'a' && c <= 'z')
                return 0;
        if(c == '_')
                return 0;

        return 1;
}

int
isbadiso9660(char *s)
{
        char *p, *q;
        int i;

        if((p = strchr(s, '.')) != nil) {
                if(p-s > 8)
                        return 1;
                for(q=s; q<p; q++)
                        if(isisofrog(*q))
                                return 1;
                if(strlen(p+1) > 3)
                        return 1;
                for(q=p+1; *q; q++)
                        if(isisofrog(*q))
                                return 1;
        } else {
                if(strlen(s) > 8)
                        return 1;
                for(q=s; *q; q++)
                        if(isisofrog(*q))
                                return 1;

                /*
                 * we rename files of the form [FD]dddddd
                 * so they don't interfere with us.
                 */
                if(strlen(s) == 7 && (s[0] == 'D' || s[0] == 'F')) {
                        for(i=1; i<7; i++)
                                if(s[i] < '0' || s[i] > '9')
                                        break;
                        if(i == 7)
                                return 1;
                }
        }
        return 0;
}

/*
 * ISO9660 name comparison
 * 
 * The standard algorithm is as follows:
 *   Take the filenames without extensions, pad the shorter with 0x20s (spaces),
 *   and do strcmp.  If they are equal, go on.
 *   Take the extensions, pad the shorter with 0x20s (spaces),
 *   and do strcmp.  If they are equal, go on.
 *   Compare the version numbers.
 *
 * Since Plan 9 names are not allowed to contain characters 0x00-0x1F,
 * the padded comparisons are equivalent to using strcmp directly.
 * We still need to handle the base and extension differently,
 * so that .foo sorts before !foo.foo.
 */
int
isocmp(const void *va, const void *vb)
{
        int i;
        char s1[32], s2[32], *b1, *b2, *e1, *e2;
        const Direc *a, *b;

        a = va;
        b = vb;

        strecpy(s1, s1+sizeof s1, a->confname);
        b1 = s1;
        strecpy(s2, s2+sizeof s2, b->confname);
        b2 = s2;
        if((e1 = strchr(b1, '.')) != nil)
                *e1++ = '\0';
        else
                e1 = "";
        if((e2 = strchr(b2, '.')) != nil)
                *e2++ = '\0';
        else
                e2 = "";

        if((i = strcmp(b1, b2)) != 0)
                return i;

        return strcmp(e1, e2);
}

static char*
mkisostring(char *isobuf, int n, char *s)
{
        char *p, *q, *eq;

        eq = isobuf+n;
        for(p=s, q=isobuf; *p && q < eq; p++)
                if('a' <= *p && *p <= 'z')
                        *q++ = *p+'A'-'a';
                else
                        *q++ = *p;

        while(q < eq)
                *q++ = ' ';

        return isobuf;
}

void
Cputisopvd(Cdimg *cd, Cdinfo info)
{
        char buf[130];

        Cputc(cd, 1);                           /* primary volume descriptor */
        Cputs(cd, "CD001", 5);                  /* standard identifier */
        Cputc(cd, 1);                           /* volume descriptor version */
        Cputc(cd, 0);                           /* unused */

        assert(~info.flags & (CDplan9|CDrockridge));

        /* system identifier */
        strcpy(buf, "");
        if(info.flags & CDplan9)
                strcat(buf, "plan 9 ");
        if(info.flags & CDrockridge)
                strcat(buf, "rrip ");
        if(info.flags & CDbootable)
                strcat(buf, "boot ");
        if(info.flags & CDconform)
                strcat(buf, "iso9660");
        else
                strcat(buf, "utf8");
        
        struprcpy(buf, buf);
        Cputs(cd, buf, 32);

        Cputs(cd, mkisostring(buf, 32, info.volumename), 32);                   /* volume identifier */

        Crepeat(cd, 0, 8);                              /* unused */
        Cputn(cd, 0, 4);                                /* volume space size */
        Crepeat(cd, 0, 32);                             /* unused */
        Cputn(cd, 1, 2);                                /* volume set size */
        Cputn(cd, 1, 2);                                /* volume sequence number */
        Cputn(cd, Blocksize, 2);                        /* logical block size */
        Cputn(cd, 0, 4);                                /* path table size */
        Cputnl(cd, 0, 4);                               /* location of Lpath */
        Cputnl(cd, 0, 4);                               /* location of optional Lpath */
        Cputnm(cd, 0, 4);                               /* location of Mpath */
        Cputnm(cd, 0, 4);                               /* location of optional Mpath */
        Cputisodir(cd, nil, DTroot, 1, Cwoffset(cd));                   /* root directory */

        Cputs(cd, mkisostring(buf, 128, info.volumeset), 128);          /* volume set identifier */
        Cputs(cd, mkisostring(buf, 128, info.publisher), 128);                  /* publisher identifier */
        Cputs(cd, mkisostring(buf, 128, info.preparer), 128);                   /* data preparer identifier */
        Cputs(cd, mkisostring(buf, 128, info.application), 128);                /* application identifier */

        Cputs(cd, "", 37);                      /* copyright notice */
        Cputs(cd, "", 37);                      /* abstract */
        Cputs(cd, "", 37);                      /* bibliographic file */
        Cputdate1(cd, now);                             /* volume creation date */
        Cputdate1(cd, now);                             /* volume modification date */
        Cputdate1(cd, 0);                               /* volume expiration date */
        Cputdate1(cd, 0);                               /* volume effective date */
        Cputc(cd, 1);                           /* file structure version */
        Cpadblock(cd);
}