Imported Upstream version 1.1.11upstream/1.1.11upstream

1 files changed, 263 insertions, 0 deletions

diff --git a/wodim/sector.c b/wodim/sector.c
new file mode 100644
index 0000000..2c253d6
--- /dev/null
+++ b/wodim/sector.c
@@ -0,0 +1,263 @@
+/*
+ * This file has been modified for the cdrkit suite.
+ *
+ * The behaviour and appearence of the program code below can differ to a major
+ * extent from the version distributed by the original author(s).
+ *
+ * For details, see Changelog file distributed with the cdrkit package. If you
+ * received this file from another source then ask the distributing person for
+ * a log of modifications.
+ *
+ */
+
+/* @(#)sector.c	1.13 04/03/01 Copyright 2001-2004 J. Schilling */
+/*
+ *	Functions needed to use libedc_ecc from cdrecord
+ *
+ *	Copyright (c) 2001-2004 J. Schilling
+ */
+/*
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License version 2
+ * as published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along with
+ * this program; see the file COPYING.  If not, write to the Free Software
+ * Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ */
+
+#include <mconfig.h>
+#include <stdio.h>
+#include <standard.h>
+#include <utypes.h>
+#include <timedefs.h>
+#include <schily.h>
+
+#include "wodim.h"
+#include "movesect.h"
+
+#ifdef	HAVE_LIB_EDC_ECC
+
+
+#define	LAYER2
+#define	EDC_LAYER2
+#define	ENCODER
+#define	EDC_ENCODER
+#include <ecc.h>
+
+#ifdef	DO8
+#define	HAVE_NEW_LIB_EDC
+#endif
+
+int	encspeed(BOOL be_verbose);
+void	encsectors(track_t *trackp, Uchar *bp, int address, int nsecs);
+void	scrsectors(track_t *trackp, Uchar *bp, int address, int nsecs);
+void	encodesector(Uchar *sp, int sectype, int address);
+void	fillsector(Uchar *sp, int sectype, int address);
+
+/*
+ * Sector types known by lib libedc_ecc:
+ */
+#ifdef	__comment__
+				/*   MMC					*/
+#define	MODE_0		0	/* -> XX  12+4+2336	(12+4uuu von libedc)	*/
+#define	MODE_1		1	/* -> 8   12+4+2048+288 (124+4uuu+288 von libedc)*/
+#define	MODE_2		2	/* -> 9	  12+4+2336	(12+4uuu von libedc)	*/
+#define	MODE_2_FORM_1	3	/* -> 10/11 12+4+8+2048+280 (12+4hhhuuu+280 von libedc)*/
+#define	MODE_2_FORM_2	4	/* -> 12 (eher 13!) 12+4+8+2324+4 (12+4hhhuuu+4 von libedc)*/
+#define	AUDIO		5
+#define	UNKNOWN		6
+#endif
+
+/*
+ * known sector types
+ */
+#ifndef	EDC_MODE_0
+#define	EDC_MODE_0	MODE_0
+#endif
+#ifndef	EDC_MODE_1
+#define	EDC_MODE_1	MODE_1
+#endif
+#ifndef	EDC_MODE_2
+#define	EDC_MODE_2	MODE_2
+#endif
+#ifndef	EDC_MODE_2_FORM_1
+#define	EDC_MODE_2_FORM_1	MODE_2_FORM_1
+#endif
+#ifndef	EDC_MODE_2_FORM_2
+#define	EDC_MODE_2_FORM_2	MODE_2_FORM_2
+#endif
+#ifndef	EDC_AUDIO
+#define	EDC_AUDIO	AUDIO
+#endif
+#ifndef	EDC_UNKNOWN
+#define	EDC_UNKNOWN	UNKNOWN
+#endif
+
+/*
+ * Compute max sector encoding speed
+ */
+int
+encspeed(BOOL be_verbose)
+{
+	track_t	t[1];
+	Uchar	sect[2352];
+	int	i;
+	struct	timeval tv;
+	struct	timeval tv2;
+
+	t[0].sectype = ST_MODE_1;
+
+	/*
+	 * Encoding speed is content dependant.
+	 * Set up a known non-null pattern in the sector before; to make
+	 * the result of this test independant of the current stack content.
+	 */
+	for (i = 0; i < 2352; ) {
+		sect[i++] = 'J';
+		sect[i++] = 'S';
+	}
+	gettimeofday(&tv, (struct timezone *)0);
+	for (i = 0; i < 75000; i++) {		/* Goes up to 1000x */
+		encsectors(t, sect, 12345, 1);
+		gettimeofday(&tv2, (struct timezone *)0);
+		if (tv2.tv_sec >= (tv.tv_sec+1) &&
+		    tv2.tv_usec >= tv.tv_usec)
+			break;
+	}
+	if (be_verbose) {
+		printf("Encoding speed : %dx (%d sectors/s) for libedc from Heiko Eißfeldt\n",
+				(i+74)/75, i);
+	}
+	return ((i+74)/75);
+}
+
+/*
+ * Encode sectors according to trackp->sectype
+ */
+void
+encsectors(track_t *trackp, Uchar *bp, int address, int nsecs)
+{
+	int	sectype = trackp->sectype;
+
+	if ((sectype & ST_MODE_MASK) == ST_MODE_AUDIO)
+		return;
+
+	while (--nsecs >= 0) {
+		encodesector(bp, sectype, address);
+		address++;
+		bp += trackp->secsize;
+	}
+}
+
+
+#ifdef	CLONE_WRITE
+
+#define	IS_SECHDR(p)	((p)[0] == 0 &&				\
+			(p)[1] == 0xFF && (p)[2] == 0xFF &&	\
+			(p)[3] == 0xFF && (p)[4] == 0xFF &&	\
+			(p)[5] == 0xFF && (p)[6] == 0xFF &&	\
+			(p)[7] == 0xFF && (p)[8] == 0xFF &&	\
+			(p)[9] == 0xFF && (p)[10] == 0xFF &&	\
+			(p)[11] == 0)
+/*
+ * Scramble data sectors without coding (needed for clone writing)
+ */
+void
+scrsectors(track_t *trackp, Uchar *bp, int address, int nsecs)
+{
+	/*
+	 * In Clone write mode, we cannot expect that the sector type
+	 * of a "track" which really is a file holding the whole disk
+	 * is flagged with something that makes sense.
+	 *
+	 * For this reason, we check each sector if it's a data sector
+	 * and needs scrambling.
+	 */
+	while (--nsecs >= 0) {
+		if (IS_SECHDR(bp))
+			scramble_L2(bp);
+		bp += trackp->secsize;
+	}
+}
+#else
+void
+scrsectors(track_t *trackp, Uchar *bp, int address, int nsecs)
+{
+	comerrno(EX_BAD, "Cannot write in clone RAW mode.\n");
+}
+#endif
+
+/*
+ * Encode one sector according to trackp->sectype
+ */
+void
+encodesector(Uchar *sp, int sectype, int address)
+{
+	if (address < -150)
+		address += 450150;
+	else
+		address += 150;
+#define	_address address
+
+
+	switch (sectype & ST_MODE_MASK) {
+
+	case	ST_MODE_0:
+		do_encode_L2(sp, EDC_MODE_0, _address);
+		break;
+
+	case	ST_MODE_1:
+		do_encode_L2(sp, EDC_MODE_1, _address);
+		break;
+
+	case	ST_MODE_2:
+		do_encode_L2(sp, EDC_MODE_2, _address);
+		break;
+
+	case	ST_MODE_2_FORM_1:
+		sp[16+2]   &= ~0x20;	/* Form 1 sector */
+		sp[16+4+2] &= ~0x20;	/* Form 1 sector 2nd copy */
+		/* FALLTHROUGH */
+
+	case	ST_MODE_2_MIXED:
+		do_encode_L2(sp, EDC_MODE_2_FORM_1, _address);
+		break;
+
+	case	ST_MODE_2_FORM_2:
+		sp[16+2]   |= 0x20;	/* Form 2 sector */
+		sp[16+4+2] |= 0x20;	/* Form 2 sector 2nd copy */
+
+		do_encode_L2(sp, EDC_MODE_2_FORM_2, _address);
+		break;
+
+	case	ST_MODE_AUDIO:
+		return;
+	default:
+		fill2352(sp, '\0');
+		return;
+	}
+	if ((sectype & ST_NOSCRAMBLE) == 0) {
+		scramble_L2(sp);
+#ifndef	EDC_SCRAMBLE_NOSWAP
+		swabbytes(sp, 2352);
+#endif
+	}
+}
+
+/*
+ * Create one zero filles encoded sector (according to trackp->sectype)
+ */
+void
+fillsector(Uchar *sp, int sectype, int address)
+{
+	fill2352(sp, '\0');
+	encodesector(sp, sectype, address);
+}
+
+#endif	/* HAVE_LIB_EDC_ECC */