/* * CDDL HEADER START * * The contents of this file are subject to the terms of the * Common Development and Distribution License, Version 1.0 only * (the "License"). You may not use this file except in compliance * with the License. * * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE * or http://www.opensolaris.org/os/licensing. * See the License for the specific language governing permissions * and limitations under the License. * * When distributing Covered Code, include this CDDL HEADER in each * file and include the License file at usr/src/OPENSOLARIS.LICENSE. * If applicable, add the following below this CDDL HEADER, with the * fields enclosed by brackets "[]" replaced with your own identifying * information: Portions Copyright [yyyy] [name of copyright owner] * * CDDL HEADER END */ /* * Copyright (c) 1999 by Sun Microsystems, Inc. * All rights reserved. */ #pragma ident "%Z%%M% %I% %E% SMI" /* * Library of support routines for UDFS data structures and conversions. */ #include #include #include #include #include #include #include #include "udfs.h" char *tagerrs[] = { "no error", "invalid checksum", /* TAGERR_CKSUM */ "unknown tag id", /* TAGERR_ID */ "invalid version", /* TAGERR_VERSION */ "CRC length too large", /* TAGERR_TOOBIG */ "invalid CRC", /* TAGERR_CRC */ "location mismatch" /* TAGERR_LOC */ }; #ifdef sparc #define SWAP16(x) (((x) & 0xff) << 8 | ((x) >> 8) & 0xff) #define SWAP32(x) (((x) & 0xff) << 24 | ((x) & 0xff00) << 8 | \ ((x) & 0xff0000) >> 8 | ((x) >> 24) & 0xff) #define SWAP64(x) (SWAP32((x) >> 32) & 0xffffffff | SWAP32(x) << 32) #else #define SWAP16(x) (x) #define SWAP32(x) (x) #define SWAP64(x) (x) #endif static void ud_swap_ext_ad(struct extent_ad *); static void ud_swap_tstamp(struct tstamp *); static void ud_swap_icb_tag(struct icb_tag *); void ud_swap_short_ad(struct short_ad *); void ud_swap_long_ad(struct long_ad *); static void ud_swap_pri_vol_desc(struct pri_vol_desc *); static void ud_swap_vdp(struct vol_desc_ptr *); static void ud_swap_iuvd(struct iuvd_desc *); static void ud_swap_avdp(struct anch_vol_desc_ptr *); static void ud_swap_part_desc(struct part_desc *); static void ud_swap_log_desc(struct log_vol_desc *); static void ud_swap_unall_desc(struct unall_spc_desc *); static void ud_swap_lvint(struct log_vol_int_desc *); static void ud_swap_fileset_desc(struct file_set_desc *); static void ud_swap_term_desc(struct term_desc *); static void ud_swap_file_id(struct file_id *); static void ud_swap_file_entry(struct file_entry *, int); static void ud_swap_alloc_ext(struct alloc_ext_desc *); static void ud_swap_tstamp(tstamp_t *); static void ud_swap_space_bitmap(struct space_bmap_desc *); static uint16_t crc16(uint8_t *, int32_t, int32_t); extern uint32_t ecma_version; void maketag(struct tag *itp, struct tag *otp) { int32_t sum, i; uint8_t *cp; if (itp != otp) { bcopy((unsigned char *)(itp + 1), (unsigned char *)(otp + 1), itp->tag_crc_len); } /* Swap fields */ switch (itp->tag_id) { case UD_PRI_VOL_DESC: ud_swap_pri_vol_desc((struct pri_vol_desc *)otp); break; case UD_ANCH_VOL_DESC: ud_swap_avdp((struct anch_vol_desc_ptr *)otp); break; case UD_VOL_DESC_PTR: ud_swap_vdp((struct vol_desc_ptr *)otp); break; case UD_IMPL_USE_DESC: ud_swap_iuvd((struct iuvd_desc *)otp); break; case UD_PART_DESC: ud_swap_part_desc((struct part_desc *)otp); break; case UD_LOG_VOL_DESC: ud_swap_log_desc((struct log_vol_desc *)otp); break; case UD_UNALL_SPA_DESC: ud_swap_unall_desc((struct unall_spc_desc *)otp); break; case UD_TERM_DESC: ud_swap_term_desc((struct term_desc *)otp); break; case UD_LOG_VOL_INT: /* LINTED */ ud_swap_lvint((struct log_vol_int_desc *)otp); break; case UD_FILE_SET_DESC: ud_swap_fileset_desc((struct file_set_desc *)otp); break; case UD_FILE_ID_DESC: ud_swap_file_id((struct file_id *)otp); break; case UD_ALLOC_EXT_DESC: break; case UD_INDIRECT_ENT: break; case UD_TERMINAL_ENT: break; case UD_FILE_ENTRY: /* LINTED */ ud_swap_file_entry((struct file_entry *)otp, 0); break; case UD_EXT_ATTR_HDR: break; case UD_UNALL_SPA_ENT: break; case UD_SPA_BMAP_DESC: ud_swap_space_bitmap((struct space_bmap_desc *)otp); break; case UD_PART_INT_DESC: break; } otp->tag_id = SWAP16(itp->tag_id); otp->tag_desc_ver = SWAP16(itp->tag_desc_ver); otp->tag_cksum = otp->tag_res = 0; otp->tag_sno = SWAP16(itp->tag_sno); otp->tag_crc = SWAP16(crc16((unsigned char *)(otp+1), itp->tag_crc_len, 0)); otp->tag_crc_len = SWAP16(itp->tag_crc_len); otp->tag_loc = SWAP32(itp->tag_loc); /* * Now do checksum on tag itself */ cp = (unsigned char *)otp; sum = 0; for (i = 0; i < sizeof (*otp); i++) sum += *cp++; otp->tag_cksum = sum; } int32_t verifytag(struct tag *tp, uint32_t loc, struct tag *otp, int expect) { uint8_t *cp; uint32_t id, vers, length, tloc; int sum, i; sum = -tp->tag_cksum; cp = (unsigned char *)tp; for (i = 0; i < sizeof (*tp); i++) sum += *cp++; if ((sum & 0xff) != tp->tag_cksum) return (TAGERR_CKSUM); id = SWAP16(tp->tag_id); if (id > 9 && id < 256 || id > 266 || (expect > 0 && id != expect)) return (TAGERR_ID); vers = SWAP16(tp->tag_desc_ver); if (vers > ecma_version) return (TAGERR_VERSION); length = SWAP16(tp->tag_crc_len); if (length > MAXBSIZE) return (TAGERR_TOOBIG); if (crc16((unsigned char *)(tp+1), length, SWAP16(tp->tag_crc)) != 0) return (TAGERR_CRC); tloc = SWAP32(tp->tag_loc); if ((int)loc != -1 && tloc != loc) return (TAGERR_LOC); if (!otp) return (0); otp->tag_id = id; otp->tag_desc_ver = vers; otp->tag_cksum = tp->tag_cksum; otp->tag_res = 0; otp->tag_sno = SWAP16(tp->tag_sno); otp->tag_crc = SWAP16(tp->tag_crc); otp->tag_crc_len = length; otp->tag_loc = tloc; if (tp != otp) bcopy((unsigned char *)(tp + 1), (unsigned char *)(otp + 1), otp->tag_crc_len); /* Swap fields */ switch (otp->tag_id) { case UD_PRI_VOL_DESC: ud_swap_pri_vol_desc((struct pri_vol_desc *)otp); break; case UD_ANCH_VOL_DESC: ud_swap_avdp((struct anch_vol_desc_ptr *)otp); break; case UD_VOL_DESC_PTR: ud_swap_vdp((struct vol_desc_ptr *)otp); break; case UD_IMPL_USE_DESC: ud_swap_iuvd((struct iuvd_desc *)otp); break; case UD_PART_DESC: ud_swap_part_desc((struct part_desc *)otp); break; case UD_LOG_VOL_DESC: ud_swap_log_desc((struct log_vol_desc *)otp); break; case UD_UNALL_SPA_DESC: ud_swap_unall_desc((struct unall_spc_desc *)otp); break; case UD_TERM_DESC: ud_swap_term_desc((struct term_desc *)otp); break; case UD_LOG_VOL_INT: /* LINTED */ ud_swap_lvint((struct log_vol_int_desc *)otp); break; case UD_FILE_SET_DESC: ud_swap_fileset_desc((struct file_set_desc *)otp); break; case UD_FILE_ID_DESC: ud_swap_file_id((struct file_id *)otp); break; case UD_ALLOC_EXT_DESC: ud_swap_alloc_ext((struct alloc_ext_desc *)otp); break; case UD_INDIRECT_ENT: break; case UD_TERMINAL_ENT: break; case UD_FILE_ENTRY: /* LINTED */ ud_swap_file_entry((struct file_entry *)otp, 1); break; case UD_EXT_ATTR_HDR: break; case UD_UNALL_SPA_ENT: break; case UD_SPA_BMAP_DESC: ud_swap_space_bitmap((struct space_bmap_desc *)otp); break; case UD_PART_INT_DESC: break; } return (0); } static void ud_swap_ext_ad(struct extent_ad *p) { p->ext_len = SWAP32(p->ext_len); p->ext_loc = SWAP32(p->ext_loc); } /* ARGSUSED */ static void ud_swap_regid(struct regid *p) { } static void ud_swap_icb_tag(struct icb_tag *p) { p->itag_prnde = SWAP32(p->itag_prnde); p->itag_strategy = SWAP16(p->itag_strategy); p->itag_param = SWAP16(p->itag_param); p->itag_max_ent = SWAP16(p->itag_max_ent); p->itag_lb_loc = SWAP32(p->itag_lb_loc); p->itag_lb_prn = SWAP16(p->itag_lb_prn); p->itag_flags = SWAP16(p->itag_flags); } void ud_swap_short_ad(struct short_ad *p) { p->sad_ext_len = SWAP32(p->sad_ext_len); p->sad_ext_loc = SWAP32(p->sad_ext_loc); } void ud_swap_long_ad(struct long_ad *p) { p->lad_ext_len = SWAP32(p->lad_ext_len); p->lad_ext_loc = SWAP32(p->lad_ext_loc); p->lad_ext_prn = SWAP16(p->lad_ext_prn); } static void ud_swap_pri_vol_desc(struct pri_vol_desc *p) { p->pvd_vdsn = SWAP32(p->pvd_vdsn); p->pvd_pvdn = SWAP32(p->pvd_pvdn); p->pvd_vsn = SWAP16(p->pvd_vsn); p->pvd_mvsn = SWAP16(p->pvd_mvsn); p->pvd_il = SWAP16(p->pvd_il); p->pvd_mil = SWAP16(p->pvd_mil); p->pvd_csl = SWAP32(p->pvd_csl); p->pvd_mcsl = SWAP32(p->pvd_mcsl); ud_swap_ext_ad(&p->pvd_vol_abs); ud_swap_ext_ad(&p->pvd_vcn); ud_swap_regid(&p->pvd_appl_id); ud_swap_tstamp(&p->pvd_time); ud_swap_regid(&p->pvd_ii); p->pvd_pvdsl = SWAP32(p->pvd_pvdsl); p->pvd_flags = SWAP16(p->pvd_flags); } static void ud_swap_iuvd(struct iuvd_desc *p) { p->iuvd_vdsn = SWAP32(p->iuvd_vdsn); ud_swap_regid(&p->iuvd_ii); ud_swap_regid(&p->iuvd_iid); } static void ud_swap_vdp(struct vol_desc_ptr *p) { p->vdp_vdsn = SWAP32(p->vdp_vdsn); ud_swap_ext_ad(&p->vdp_nvdse); } static void ud_swap_avdp(struct anch_vol_desc_ptr *p) { ud_swap_ext_ad(&p->avd_main_vdse); ud_swap_ext_ad(&p->avd_res_vdse); } static void ud_swap_part_desc(struct part_desc *p) { struct phdr_desc *php; p->pd_vdsn = SWAP32(p->pd_vdsn); p->pd_pflags = SWAP16(p->pd_pflags); p->pd_pnum = SWAP16(p->pd_pnum); ud_swap_regid(&p->pd_pcontents); p->pd_acc_type = SWAP32(p->pd_acc_type); p->pd_part_start = SWAP32(p->pd_part_start); p->pd_part_length = SWAP32(p->pd_part_length); ud_swap_regid(&p->pd_ii); if (strncmp(p->pd_pcontents.reg_id, "+NSR", 4) == 0) { /* LINTED */ php = (struct phdr_desc *)p->pd_pc_use; ud_swap_short_ad(&php->phdr_ust); ud_swap_short_ad(&php->phdr_usb); ud_swap_short_ad(&php->phdr_it); ud_swap_short_ad(&php->phdr_fst); ud_swap_short_ad(&php->phdr_fsb); } } static void ud_swap_log_desc(struct log_vol_desc *p) { p->lvd_vdsn = SWAP32(p->lvd_vdsn); p->lvd_log_bsize = SWAP32(p->lvd_log_bsize); ud_swap_regid(&p->lvd_dom_id); ud_swap_long_ad(&p->lvd_lvcu); p->lvd_mtbl_len = SWAP32(p->lvd_mtbl_len); p->lvd_num_pmaps = SWAP32(p->lvd_num_pmaps); ud_swap_regid(&p->lvd_ii); ud_swap_ext_ad(&p->lvd_int_seq_ext); } static void ud_swap_unall_desc(struct unall_spc_desc *p) { p->ua_vdsn = SWAP32(p->ua_vdsn); p->ua_nad = SWAP32(p->ua_nad); } static void ud_swap_lvint(struct log_vol_int_desc *p) { struct lvid_iu *lvup; ud_swap_tstamp(&p->lvid_tstamp); p->lvid_int_type = SWAP32(p->lvid_int_type); ud_swap_ext_ad(&p->lvid_nie); p->lvid_npart = SWAP32(p->lvid_npart); p->lvid_liu = SWAP32(p->lvid_liu); p->lvid_uniqid = SWAP64(p->lvid_uniqid); p->lvid_fst[0] = SWAP32(p->lvid_fst[0]); p->lvid_fst[1] = SWAP32(p->lvid_fst[1]); lvup = (struct lvid_iu *)&p->lvid_fst[2]; ud_swap_regid(&lvup->lvidiu_regid); lvup->lvidiu_nfiles = SWAP32(lvup->lvidiu_nfiles); lvup->lvidiu_ndirs = SWAP32(lvup->lvidiu_ndirs); lvup->lvidiu_mread = SWAP16(lvup->lvidiu_mread); lvup->lvidiu_mwrite = SWAP16(lvup->lvidiu_mwrite); lvup->lvidiu_maxwr = SWAP16(lvup->lvidiu_maxwr); } static void ud_swap_fileset_desc(struct file_set_desc *p) { ud_swap_tstamp(&p->fsd_time); p->fsd_ilevel = SWAP16(p->fsd_ilevel); p->fsd_mi_level = SWAP16(p->fsd_mi_level); p->fsd_cs_list = SWAP32(p->fsd_cs_list); p->fsd_mcs_list = SWAP32(p->fsd_mcs_list); p->fsd_fs_no = SWAP32(p->fsd_fs_no); p->fsd_fsd_no = SWAP32(p->fsd_fsd_no); ud_swap_long_ad(&p->fsd_root_icb); ud_swap_regid(&p->fsd_did); ud_swap_long_ad(&p->fsd_next); } /* ARGSUSED */ static void ud_swap_term_desc(struct term_desc *p) { } static void ud_swap_file_id(struct file_id *p) { p->fid_ver = SWAP16(p->fid_ver); ud_swap_long_ad(&p->fid_icb); p->fid_iulen = SWAP16(p->fid_iulen); } static void ud_swap_alloc_ext(struct alloc_ext_desc *p) { p->aed_rev_ael = SWAP32(p->aed_rev_ael); p->aed_len_aed = SWAP32(p->aed_len_aed); } static void ud_swap_space_bitmap(struct space_bmap_desc *p) { p->sbd_nbits = SWAP32(p->sbd_nbits); p->sbd_nbytes = SWAP32(p->sbd_nbytes); } static void ud_swap_file_entry(struct file_entry *p, int32_t rdflag) { int32_t i; short_ad_t *sap; long_ad_t *lap; /* Do Extended Attributes and Allocation Descriptors */ if (rdflag) { p->fe_len_adesc = SWAP32(p->fe_len_adesc); p->fe_len_ear = SWAP32(p->fe_len_ear); ud_swap_icb_tag(&p->fe_icb_tag); } switch (p->fe_icb_tag.itag_flags & 0x3) { case ICB_FLAG_SHORT_AD: /* LINTED */ sap = (short_ad_t *)(p->fe_spec + p->fe_len_ear); for (i = 0; i < p->fe_len_adesc / sizeof (short_ad_t); i++, sap++) ud_swap_short_ad(sap); break; case ICB_FLAG_LONG_AD: /* LINTED */ lap = (long_ad_t *)(p->fe_spec + p->fe_len_ear); for (i = 0; i < p->fe_len_adesc / sizeof (long_ad_t); i++, lap++) ud_swap_long_ad(lap); break; case ICB_FLAG_EXT_AD: break; case ICB_FLAG_ONE_AD: break; } p->fe_uid = SWAP32(p->fe_uid); p->fe_gid = SWAP32(p->fe_gid); p->fe_perms = SWAP32(p->fe_perms); p->fe_lcount = SWAP16(p->fe_lcount); p->fe_rec_len = SWAP32(p->fe_rec_len); p->fe_info_len = SWAP64(p->fe_info_len); p->fe_lbr = SWAP64(p->fe_lbr); ud_swap_tstamp(&p->fe_acc_time); ud_swap_tstamp(&p->fe_mod_time); ud_swap_tstamp(&p->fe_attr_time); p->fe_ckpoint = SWAP32(p->fe_ckpoint); ud_swap_long_ad(&p->fe_ea_icb); ud_swap_regid(&p->fe_impl_id); p->fe_uniq_id = SWAP64(p->fe_uniq_id); if (!rdflag) { p->fe_len_adesc = SWAP32(p->fe_len_adesc); p->fe_len_ear = SWAP32(p->fe_len_ear); ud_swap_icb_tag(&p->fe_icb_tag); } } static void ud_swap_tstamp(tstamp_t *tp) { tp->ts_tzone = SWAP16(tp->ts_tzone); tp->ts_year = SWAP16(tp->ts_year); } void setcharspec(struct charspec *cp, int32_t type, uint8_t *info) { cp->cs_type = type; bzero(cp->cs_info, sizeof (cp->cs_info)); (void) strncpy(cp->cs_info, (int8_t *)info, sizeof (cp->cs_info)); } static unsigned short crctab[] = { 0x0000, 0x1021, 0x2042, 0x3063, 0x4084, 0x50a5, 0x60c6, 0x70e7, 0x8108, 0x9129, 0xa14a, 0xb16b, 0xc18c, 0xd1ad, 0xe1ce, 0xf1ef, 0x1231, 0x0210, 0x3273, 0x2252, 0x52b5, 0x4294, 0x72f7, 0x62d6, 0x9339, 0x8318, 0xb37b, 0xa35a, 0xd3bd, 0xc39c, 0xf3ff, 0xe3de, 0x2462, 0x3443, 0x0420, 0x1401, 0x64e6, 0x74c7, 0x44a4, 0x5485, 0xa56a, 0xb54b, 0x8528, 0x9509, 0xe5ee, 0xf5cf, 0xc5ac, 0xd58d, 0x3653, 0x2672, 0x1611, 0x0630, 0x76d7, 0x66f6, 0x5695, 0x46b4, 0xb75b, 0xa77a, 0x9719, 0x8738, 0xf7df, 0xe7fe, 0xd79d, 0xc7bc, 0x48c4, 0x58e5, 0x6886, 0x78a7, 0x0840, 0x1861, 0x2802, 0x3823, 0xc9cc, 0xd9ed, 0xe98e, 0xf9af, 0x8948, 0x9969, 0xa90a, 0xb92b, 0x5af5, 0x4ad4, 0x7ab7, 0x6a96, 0x1a71, 0x0a50, 0x3a33, 0x2a12, 0xdbfd, 0xcbdc, 0xfbbf, 0xeb9e, 0x9b79, 0x8b58, 0xbb3b, 0xab1a, 0x6ca6, 0x7c87, 0x4ce4, 0x5cc5, 0x2c22, 0x3c03, 0x0c60, 0x1c41, 0xedae, 0xfd8f, 0xcdec, 0xddcd, 0xad2a, 0xbd0b, 0x8d68, 0x9d49, 0x7e97, 0x6eb6, 0x5ed5, 0x4ef4, 0x3e13, 0x2e32, 0x1e51, 0x0e70, 0xff9f, 0xefbe, 0xdfdd, 0xcffc, 0xbf1b, 0xaf3a, 0x9f59, 0x8f78, 0x9188, 0x81a9, 0xb1ca, 0xa1eb, 0xd10c, 0xc12d, 0xf14e, 0xe16f, 0x1080, 0x00a1, 0x30c2, 0x20e3, 0x5004, 0x4025, 0x7046, 0x6067, 0x83b9, 0x9398, 0xa3fb, 0xb3da, 0xc33d, 0xd31c, 0xe37f, 0xf35e, 0x02b1, 0x1290, 0x22f3, 0x32d2, 0x4235, 0x5214, 0x6277, 0x7256, 0xb5ea, 0xa5cb, 0x95a8, 0x8589, 0xf56e, 0xe54f, 0xd52c, 0xc50d, 0x34e2, 0x24c3, 0x14a0, 0x0481, 0x7466, 0x6447, 0x5424, 0x4405, 0xa7db, 0xb7fa, 0x8799, 0x97b8, 0xe75f, 0xf77e, 0xc71d, 0xd73c, 0x26d3, 0x36f2, 0x0691, 0x16b0, 0x6657, 0x7676, 0x4615, 0x5634, 0xd94c, 0xc96d, 0xf90e, 0xe92f, 0x99c8, 0x89e9, 0xb98a, 0xa9ab, 0x5844, 0x4865, 0x7806, 0x6827, 0x18c0, 0x08e1, 0x3882, 0x28a3, 0xcb7d, 0xdb5c, 0xeb3f, 0xfb1e, 0x8bf9, 0x9bd8, 0xabbb, 0xbb9a, 0x4a75, 0x5a54, 0x6a37, 0x7a16, 0x0af1, 0x1ad0, 0x2ab3, 0x3a92, 0xfd2e, 0xed0f, 0xdd6c, 0xcd4d, 0xbdaa, 0xad8b, 0x9de8, 0x8dc9, 0x7c26, 0x6c07, 0x5c64, 0x4c45, 0x3ca2, 0x2c83, 0x1ce0, 0x0cc1, 0xef1f, 0xff3e, 0xcf5d, 0xdf7c, 0xaf9b, 0xbfba, 0x8fd9, 0x9ff8, 0x6e17, 0x7e36, 0x4e55, 0x5e74, 0x2e93, 0x3eb2, 0x0ed1, 0x1ef0 }; static uint16_t crc16(uint8_t *buf, int32_t size, int32_t rem) { uint16_t crc = 0; while (size-- > 0) crc = (crc << 8) ^ crctab[((crc >> 8) ^ *buf++) & 0xff]; return ((crc ^ rem) & 0xffff); }