1/* $NetBSD: cd9660_archimedes.c,v 1.1 2009/01/10 22:06:29 bjh21 Exp $ */ 2 3/*- 4 * SPDX-License-Identifier: BSD-3-Clause 5 * 6 * Copyright (c) 1998, 2009 Ben Harris 7 * All rights reserved. 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 2. Redistributions in binary form must reproduce the above copyright 15 * notice, this list of conditions and the following disclaimer in the 16 * documentation and/or other materials provided with the distribution. 17 * 3. The name of the author may not be used to endorse or promote products 18 * derived from this software without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 30 */ 31/* 32 * cd9660_archimedes.c - support for RISC OS "ARCHIMEDES" extension 33 * 34 * RISC OS CDFS looks for a special block at the end of the System Use 35 * Field for each file. If present, this contains the RISC OS load 36 * and exec address (used to hold the file timestamp and type), the 37 * file attributes, and a flag indicating whether the first character 38 * of the filename should be replaced with '!' (since many special 39 * RISC OS filenames do). 40 */ 41 42#include <sys/cdefs.h> 43__FBSDID("$FreeBSD$"); 44 45#include <assert.h> 46#include <stdint.h> 47#include <stdio.h> 48#include <string.h> 49#include <util.h> 50 51#include "makefs.h" 52#include "cd9660.h" 53#include "cd9660_archimedes.h" 54 55/* 56 * Convert a Unix time_t (non-leap seconds since 1970-01-01) to a RISC 57 * OS time (non-leap(?) centiseconds since 1900-01-01(?)). 58 */ 59 60static u_int64_t 61riscos_date(time_t unixtime) 62{ 63 u_int64_t base; 64 65 base = 31536000ULL * 70 + 86400 * 17; 66 return (((u_int64_t)unixtime) + base)*100; 67} 68 69/* 70 * Add "ARCHIMEDES" metadata to a node if that seems appropriate. 71 * 72 * We touch regular files with names matching /,[0-9a-f]{3}$/ and 73 * directories matching /^!/. 74 */ 75static void 76archimedes_convert_node(cd9660node *node) 77{ 78 struct ISO_ARCHIMEDES *arc; 79 size_t len; 80 int type = -1; 81 uint64_t stamp; 82 83 if (node->su_tail_data != NULL) 84 /* Something else already has the tail. */ 85 return; 86 87 len = strlen(node->node->name); 88 if (len < 1) return; 89 90 if (len >= 4 && node->node->name[len-4] == ',') 91 /* XXX should support ,xxx and ,lxa */ 92 type = strtoul(node->node->name + len - 3, NULL, 16); 93 if (type == -1 && node->node->name[0] != '!') 94 return; 95 if (type == -1) type = 0; 96 97 assert(sizeof(*arc) == 32); 98 arc = ecalloc(1, sizeof(*arc)); 99 100 stamp = riscos_date(node->node->inode->st.st_mtime); 101 102 memcpy(arc->magic, "ARCHIMEDES", 10); 103 cd9660_731(0xfff00000 | (type << 8) | (stamp >> 32), arc->loadaddr); 104 cd9660_731(stamp & 0x00ffffffffULL, arc->execaddr); 105 arc->ro_attr = RO_ACCESS_UR | RO_ACCESS_OR; 106 arc->cdfs_attr = node->node->name[0] == '!' ? CDFS_PLING : 0; 107 node->su_tail_data = (void *)arc; 108 node->su_tail_size = sizeof(*arc); 109} 110 111/* 112 * Add "ARCHIMEDES" metadata to an entire tree recursively. 113 */ 114void 115archimedes_convert_tree(cd9660node *node) 116{ 117 cd9660node *cn; 118 119 assert(node != NULL); 120 121 archimedes_convert_node(node); 122 123 /* Recurse on children. */ 124 TAILQ_FOREACH(cn, &node->cn_children, cn_next_child) 125 archimedes_convert_tree(cn); 126} 127