149 lines
3.3 KiB
C
149 lines
3.3 KiB
C
/*
|
|
* linux/fs/hfs/trans.c
|
|
*
|
|
* Copyright (C) 1995-1997 Paul H. Hargrove
|
|
* This file may be distributed under the terms of the GNU General Public License.
|
|
*
|
|
* This file contains routines for converting between the Macintosh
|
|
* character set and various other encodings. This includes dealing
|
|
* with ':' vs. '/' as the path-element separator.
|
|
*/
|
|
|
|
#include <linux/types.h>
|
|
#include <linux/nls.h>
|
|
|
|
#include "hfs_fs.h"
|
|
|
|
/*================ Global functions ================*/
|
|
|
|
/*
|
|
* hfs_mac2asc()
|
|
*
|
|
* Given a 'Pascal String' (a string preceded by a length byte) in
|
|
* the Macintosh character set produce the corresponding filename using
|
|
* the 'trivial' name-mangling scheme, returning the length of the
|
|
* mangled filename. Note that the output string is not NULL
|
|
* terminated.
|
|
*
|
|
* The name-mangling works as follows:
|
|
* The character '/', which is illegal in Linux filenames is replaced
|
|
* by ':' which never appears in HFS filenames. All other characters
|
|
* are passed unchanged from input to output.
|
|
*/
|
|
int hfs_mac2asc(struct super_block *sb, char *out, const struct hfs_name *in)
|
|
{
|
|
struct nls_table *nls_disk = HFS_SB(sb)->nls_disk;
|
|
struct nls_table *nls_io = HFS_SB(sb)->nls_io;
|
|
const char *src;
|
|
char *dst;
|
|
int srclen, dstlen, size;
|
|
|
|
src = in->name;
|
|
srclen = in->len;
|
|
dst = out;
|
|
dstlen = HFS_MAX_NAMELEN;
|
|
if (nls_io) {
|
|
wchar_t ch;
|
|
|
|
while (srclen > 0) {
|
|
if (nls_disk) {
|
|
size = nls_disk->char2uni(src, srclen, &ch);
|
|
if (size <= 0) {
|
|
ch = '?';
|
|
size = 1;
|
|
}
|
|
src += size;
|
|
srclen -= size;
|
|
} else {
|
|
ch = *src++;
|
|
srclen--;
|
|
}
|
|
if (ch == '/')
|
|
ch = ':';
|
|
size = nls_io->uni2char(ch, dst, dstlen);
|
|
if (size < 0) {
|
|
if (size == -ENAMETOOLONG)
|
|
goto out;
|
|
*dst = '?';
|
|
size = 1;
|
|
}
|
|
dst += size;
|
|
dstlen -= size;
|
|
}
|
|
} else {
|
|
char ch;
|
|
|
|
while (--srclen >= 0)
|
|
*dst++ = (ch = *src++) == '/' ? ':' : ch;
|
|
}
|
|
out:
|
|
return dst - out;
|
|
}
|
|
|
|
/*
|
|
* hfs_asc2mac()
|
|
*
|
|
* Given an ASCII string (not null-terminated) and its length,
|
|
* generate the corresponding filename in the Macintosh character set
|
|
* using the 'trivial' name-mangling scheme, returning the length of
|
|
* the mangled filename. Note that the output string is not NULL
|
|
* terminated.
|
|
*
|
|
* This routine is a inverse to hfs_mac2triv().
|
|
* A ':' is replaced by a '/'.
|
|
*/
|
|
void hfs_asc2mac(struct super_block *sb, struct hfs_name *out, struct qstr *in)
|
|
{
|
|
struct nls_table *nls_disk = HFS_SB(sb)->nls_disk;
|
|
struct nls_table *nls_io = HFS_SB(sb)->nls_io;
|
|
const char *src;
|
|
char *dst;
|
|
int srclen, dstlen, size;
|
|
|
|
src = in->name;
|
|
srclen = in->len;
|
|
dst = out->name;
|
|
dstlen = HFS_NAMELEN;
|
|
if (nls_io) {
|
|
wchar_t ch;
|
|
|
|
while (srclen > 0) {
|
|
size = nls_io->char2uni(src, srclen, &ch);
|
|
if (size < 0) {
|
|
ch = '?';
|
|
size = 1;
|
|
}
|
|
src += size;
|
|
srclen -= size;
|
|
if (ch == ':')
|
|
ch = '/';
|
|
if (nls_disk) {
|
|
size = nls_disk->uni2char(ch, dst, dstlen);
|
|
if (size < 0) {
|
|
if (size == -ENAMETOOLONG)
|
|
goto out;
|
|
*dst = '?';
|
|
size = 1;
|
|
}
|
|
dst += size;
|
|
dstlen -= size;
|
|
} else {
|
|
*dst++ = ch > 0xff ? '?' : ch;
|
|
dstlen--;
|
|
}
|
|
}
|
|
} else {
|
|
char ch;
|
|
|
|
if (dstlen > srclen)
|
|
dstlen = srclen;
|
|
while (--dstlen >= 0)
|
|
*dst++ = (ch = *src++) == ':' ? '/' : ch;
|
|
}
|
|
out:
|
|
out->len = dst - (char *)out->name;
|
|
dstlen = HFS_NAMELEN - out->len;
|
|
while (--dstlen >= 0)
|
|
*dst++ = 0;
|
|
}
|