cd9660_archimedes.c revision 332980
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: stable/11/usr.sbin/makefs/cd9660/cd9660_archimedes.c 332980 2018-04-25 01:35:06Z benno $"); 44 45#include <sys/types.h> 46#include <assert.h> 47#include <stdint.h> 48#include <stdio.h> 49#include <stdlib.h> 50#include <string.h> 51 52#include "makefs.h" 53#include "cd9660.h" 54#include "cd9660_archimedes.h" 55 56/* 57 * Convert a Unix time_t (non-leap seconds since 1970-01-01) to a RISC 58 * OS time (non-leap(?) centiseconds since 1900-01-01(?)). 59 */ 60 61static u_int64_t 62riscos_date(time_t unixtime) 63{ 64 u_int64_t base; 65 66 base = 31536000ULL * 70 + 86400 * 17; 67 return (((u_int64_t)unixtime) + base)*100; 68} 69 70/* 71 * Add "ARCHIMEDES" metadata to a node if that seems appropriate. 72 * 73 * We touch regular files with names matching /,[0-9a-f]{3}$/ and 74 * directories matching /^!/. 75 */ 76static void 77archimedes_convert_node(cd9660node *node) 78{ 79 struct ISO_ARCHIMEDES *arc; 80 size_t len; 81 int type = -1; 82 uint64_t stamp; 83 84 if (node->su_tail_data != NULL) 85 /* Something else already has the tail. */ 86 return; 87 88 len = strlen(node->node->name); 89 if (len < 1) return; 90 91 if (len >= 4 && node->node->name[len-4] == ',') 92 /* XXX should support ,xxx and ,lxa */ 93 type = strtoul(node->node->name + len - 3, NULL, 16); 94 if (type == -1 && node->node->name[0] != '!') 95 return; 96 if (type == -1) type = 0; 97 98 assert(sizeof(struct ISO_ARCHIMEDES) == 32); 99 if ((arc = calloc(1, sizeof(struct ISO_ARCHIMEDES))) == NULL) { 100 CD9660_MEM_ALLOC_ERROR("archimedes_convert_node"); 101 exit(1); 102 } 103 104 stamp = riscos_date(node->node->inode->st.st_mtime); 105 106 memcpy(arc->magic, "ARCHIMEDES", 10); 107 cd9660_731(0xfff00000 | (type << 8) | (stamp >> 32), arc->loadaddr); 108 cd9660_731(stamp & 0x00ffffffffULL, arc->execaddr); 109 arc->ro_attr = RO_ACCESS_UR | RO_ACCESS_OR; 110 arc->cdfs_attr = node->node->name[0] == '!' ? CDFS_PLING : 0; 111 node->su_tail_data = (void *)arc; 112 node->su_tail_size = sizeof(*arc); 113} 114 115/* 116 * Add "ARCHIMEDES" metadata to an entire tree recursively. 117 */ 118void 119archimedes_convert_tree(cd9660node *node) 120{ 121 cd9660node *cn; 122 123 assert(node != NULL); 124 125 archimedes_convert_node(node); 126 127 /* Recurse on children. */ 128 TAILQ_FOREACH(cn, &node->cn_children, cn_next_child) 129 archimedes_convert_tree(cn); 130} 131