Imported Upstream version 1.1.11upstream/1.1.11upstream

1 files changed, 270 insertions, 0 deletions

diff --git a/wodim/clone.c b/wodim/clone.c
new file mode 100644
index 0000000..da8fb91
--- /dev/null
+++ b/wodim/clone.c
@@ -0,0 +1,270 @@
+/*
+ * 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.
+ *
+ */
+
+/* @(#)clone.c	1.7 04/03/02 Copyright 2001-2004 J. Schilling */
+/*
+ *	Clone Subchannel processing
+ *
+ *	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 <fctldefs.h>
+#include <strdefs.h>
+#include <unixstd.h>
+#include <standard.h>
+#include <btorder.h>
+#include <utypes.h>
+#include <schily.h>
+
+#include <usal/usalcmd.h>
+#include <usal/scsitransp.h>
+
+#include "wodim.h"
+#include "crc16.h"
+
+#include <usal/scsireg.h>
+#include "scsimmc.h"
+
+/*#define	SAO_RAW*/
+
+void	clone_toc(track_t *trackp);
+void	clone_tracktype(track_t *trackp);
+
+extern	int	lverbose;
+extern	int	xdebug;
+
+extern	Uchar	_subq[110][12];
+extern	int	_nsubh;
+
+
+static	int	ctrl_first;
+static	int	ctrl_last;
+static	int	sectype_first;
+static	int	sectype_last;
+static	int	disktype;
+static	long	loutstart;
+
+/*
+ * Read Clone TOC description from full toc file.
+ */
+void clone_toc(track_t *trackp)
+{
+	char	filename[1024];
+	msf_t	m;
+	msf_t	mr;
+	struct	tocheader *tp;
+	struct	ftrackdesc *fp;
+	int	f;
+	char	buf[2048];
+	int	amt;
+	int	len;
+	int	i;
+	int	j;
+	int	ctrladr;
+	Uint	first = 100;
+	Uint	last = 0;
+
+	len = strlen(trackp[1].filename);
+	if (len > (sizeof (filename)-5)) {
+		len = sizeof (filename)-5;
+	}
+	snprintf(filename, sizeof (filename), "%.*s.toc", len, trackp[1].filename);
+
+	f = open(filename, O_RDONLY|O_BINARY);
+	if (f < 0)
+		comerr("Cannot open '%s'.\n", filename);
+	amt = read(f, buf, sizeof (buf));
+
+	if (amt == sizeof (buf))
+		comerrno(EX_BAD, "TOC too large.\n");
+	close(f);
+	tp = (struct tocheader *)buf;
+	len = a_to_u_2_byte(tp->len) + sizeof (struct tocheader)-2;
+
+	if (xdebug) {
+		printf("Read %d bytes TOC len: %d first session: %d last session: %d\n",
+			amt, len, tp->first, tp->last);
+	}
+
+	fp = (struct ftrackdesc *)&buf[4];
+
+	for (i = 4, j = 0; i < len; i += 11) {
+		fp = (struct ftrackdesc *)&buf[i];
+		if (xdebug)
+			usal_prbytes("FT", (Uchar *)&buf[i], 11);
+		if (fp->sess_number != 1)
+			comerrno(EX_BAD, "Can only copy session # 1.\n");
+
+		if (fp->adr == 1) {
+			if (fp->point < first) {
+				first = fp->point;
+				ctrl_first = fp->control;
+			}
+			if (fp->point <= 99 && fp->point > last) {
+				last = fp->point;
+				ctrl_last = fp->control;
+			}
+		}
+		if (fp->adr != 1) {
+			switch (fp->point) {
+
+			case 0xB0:
+			case 0xC0:
+			case 0xC1:
+				break;
+			default:
+				continue;
+			}
+		}
+		m.msf_min    = fp->amin;
+		m.msf_sec    = fp->asec;
+		m.msf_frame  = fp->aframe;
+
+		mr.msf_min   = fp->pmin;
+		mr.msf_sec   = fp->psec;
+		mr.msf_frame = fp->pframe;
+
+		if (fp->point == 0xA0) {
+			disktype = mr.msf_sec;
+			mr.msf_sec = from_bcd(mr.msf_sec);		/* convert to BCD */
+		}
+
+		if (fp->point == 0xA2)
+			loutstart = msf_to_lba(fp->pmin, fp->psec, fp->pframe, TRUE);
+		ctrladr = fp->control << 4;
+		ctrladr |= fp->adr;
+
+		filltpoint(_subq[j], ctrladr, fp->point, &mr);
+		fillttime(_subq[j], &m);
+		_subq[j][6] = fp->res7;
+		if (fp->point == 0xC0 || fp->point == 0xC1) {
+			_subq[j][3] = m.msf_min;
+			_subq[j][4] = m.msf_sec;
+			_subq[j][5] = m.msf_frame;
+		}
+		if (fp->point == 0xC1) {
+			_subq[j][7] = mr.msf_min;
+			_subq[j][8] = mr.msf_sec;
+			_subq[j][9] = mr.msf_frame;
+		}
+		if (xdebug)
+			usal_prbytes("TOC  ", _subq[j], 12);
+		j++;
+	}
+	_nsubh = j;
+	if (xdebug) {
+		printf("nsubheader %d lout: %ld track 1 secs: %ld\n", j, loutstart, trackp[1].tracksecs);
+		printf("first %u last %u ctrl first: %X ctrl last %X\n", first, last, ctrl_first, ctrl_last);
+	}
+	if (trackp->tracks != 1)
+		comerrno(EX_BAD, "Clone writing currently supports only one file argument.\n");
+	if (loutstart > trackp[1].tracksecs)
+		comerrno(EX_BAD, "Clone writing TOC length %ld does not match track length %ld\n",
+			loutstart, trackp[1].tracksecs);
+
+	if (amt > len) {
+		sectype_first = buf[len];
+		sectype_last = buf[len+1];
+		if (xdebug) {
+			printf("sectype first: %X sectype last %X\n",
+				sectype_first, sectype_last);
+		}
+	}
+}
+
+
+/*
+ * Set tracktypes for track 0 (lead-in) & track AA (lead-out)
+ *
+ * Control 0 = audio
+ * Control 1 = audio preemp
+ * Control 2 = audio copy
+ * Control 3 = audio copy preemp
+ * Control 4 = data
+ * Control 5 = packet data
+ */
+void clone_tracktype(track_t *trackp)
+{
+	int	tracks = trackp->tracks;
+	int	sectype;
+
+	sectype = SECT_ROM;
+	if ((ctrl_first & TM_DATA) == 0) {
+		sectype = SECT_AUDIO;
+
+		if ((ctrl_first & TM_PREEM) != 0) {
+			trackp[0].flags |= TI_PREEMP;
+		} else {
+			trackp[0].flags &= ~TI_PREEMP;
+			sectype |= ST_PREEMPMASK;
+		}
+		if ((ctrl_first & TM_ALLOW_COPY) != 0) {
+			trackp[0].flags |= TI_COPY;
+		} else {
+			trackp[0].flags &= ~TI_COPY;
+		}
+/* XXX ???	flags |= TI_SCMS; */
+	} else {
+		if ((ctrl_first & TM_INCREMENTAL) != 0) {
+			trackp[0].flags |= TI_PACKET;
+		} else {
+			trackp[0].flags &= ~TI_PACKET;
+		}
+		if (sectype_first != 0)
+			sectype = sectype_first;
+	}
+	trackp[0].sectype = sectype;
+
+	sectype = SECT_ROM;
+
+	if ((ctrl_last & TM_DATA) == 0) {
+		sectype = SECT_AUDIO;
+
+		if ((ctrl_last & TM_PREEM) != 0) {
+			trackp[tracks+1].flags |= TI_PREEMP;
+		} else {
+			trackp[tracks+1].flags &= ~TI_PREEMP;
+			sectype |= ST_PREEMPMASK;
+		}
+		if ((ctrl_last & TM_ALLOW_COPY) != 0) {
+			trackp[tracks+1].flags |= TI_COPY;
+		} else {
+			trackp[tracks+1].flags &= ~TI_COPY;
+		}
+/* XXX ???	flags |= TI_SCMS; */
+	} else {
+		if ((ctrl_first & TM_INCREMENTAL) != 0) {
+			trackp[0].flags |= TI_PACKET;
+		} else {
+			trackp[0].flags &= ~TI_PACKET;
+			if (sectype_last != 0)
+				sectype = sectype_last;
+		}
+	}
+	trackp[tracks+1].sectype = sectype;
+}