code:

---

recursive_copy	; (we are in source dir)

		; d1 object name, may be dir or file
		; d2 destpathbuffer (with path in it)

	STRUCTURE	d,0
		APTR	d_objectname
		APTR	d_objectlock
		APTR	d_destpathbuffer
		APTR	d_fib
		APTR	d_newdirlock
		APTR	d_olddir
		LABEL	d_SIZEOF

		lea	-d_SIZEOF(a7),a7

		move.l	d1,d_objectname(a7)
		move.l	d2,d_destpathbuffer(a7)

		move.l	dosbase(pc),a6

		moveq	#DOS_FIB,d1
		moveq	#0,d2
		jsr	_LVOAllocDosObject(a6)
		move.l	d0,d_fib(a7)
		beq	.free_locals

		move.l	d_objectname(a7),d1
		moveq	#ACCESS_READ,d2
		jsr	_LVOLock(a6)
		move.l	d0,d_objectlock(a7)
		beq	.free_fib

		move.l	d0,d1
		move.l	d_fib(a7),d2
		jsr	_LVOExamine(a6)
		tst.l	d0
		beq	.unlock

		; add name part to destpath/

		move.l	d_destpathbuffer(a7),d1
		move.l	d_fib(a7),a0
		lea	fib_FileName(a0),a0
		move.l	a0,d2
		move.l	#PATHBUFFER_SIZE,d3
		jsr	_LVOAddPart(a6)

		move.l	d_fib(a7),a0
		tst.l	fib_DirEntryType(a0)
		bge	.dir

		; file

		move.l	d_fib(a7),a0
		move.l	fib_Size(a0),d3
		lea	fib_FileName(a0),a0
		move.l	a0,d1
		move.l	d_destpathbuffer(a7),d2

		bsr	copy_file
		bra	.rempart

.dir		; makedir in dest dir

		move.l	d_destpathbuffer(a7),d1
		jsr	_LVOCreateDir(a6)
		move.l	d0,d_newdirlock(a7)
		beq	.rempart

		; change into source dir

		move.l	d_objectlock(a7),d1
		jsr	_LVOCurrentDir(a6)
		move.l	d0,d_olddir(a7)

		; loop through dir entries

.dir_loop	move.l	d_objectlock(a7),d1
		move.l	d_fib(a7),d2
		jsr	_LVOExNext(a6)
		tst.l	d0
		beq	.if_end

		move.l	d_fib(a7),a0
		lea	fib_FileName(a0),a0
		move.l	a0,d1
		move.l	d_destpathbuffer(a7),d2

		bsr	recursive_copy

		bra	.dir_loop

.if_end

		; change into old dir

		move.l	d_olddir(a7),d1
		jsr	_LVOCurrentDir(a6)

		; unlock new dir

		move.l	d_newdirlock(a7),d1
		jsr	_LVOUnLock(a6)

.rempart	move.l	d_destpathbuffer(a7),d1
		jsr	_LVOFilePart(a6)
		move.l	d0,a0
		clr.b	(a0)

.unlock		move.l	d_objectlock(a7),d1
		jsr	_LVOUnLock(a6)

.free_fib	moveq	#DOS_FIB,d1
		move.l	d_fib(a7),d2
		jsr	_LVOFreeDosObject(a6)

.free_locals	lea	d_SIZEOF(a7),a7
		rts

---

[ - Antworten - Zitieren - Direktlink - ]

code:

---

function RecCopy(MyPath, DestPath);
begin
  while MyFile=GetNextFile do begin
    if (MyFile is File) then Copy(MyFile, DestPath+MyFile)
    else RecCopy(MyFile, DestPath);
  end;
end;

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

code:

---

move.l	d_destpathbuffer(a7),d2
		; store current end of path

		move.l	d2,a0
.find_loop	tst.b	(a0)+
		bne	.find_loop

		push	a0

		bsr	recursive_copy

		; restore end of path

		pop	a0
		clr.b	-(a0)

		bra	.dir_loop

---

Auf zum nächstens Schritt.

--
Author of Open eXternal User Interfaces, eXternal Format Rippers and the Book "Torakosmos". Developing with E-UAE on an Ubuntu dualcore system.

[ Dieser Beitrag wurde von AGSzabo am 12.02.2012 um 17:38 Uhr geändert. ]

[ - Antworten - Zitieren - Direktlink - ]

@AGSzabo:

Entschuldige, daß ich das so direkt mitteilen muß:

Das wurde auch Zeit. Ich weiß nicht, warum du IMMER als erste aller Optionen statt selbst zu denken (und zwar länger als nur 2 Minuten) direkt und unmittelbar das Forum befragst.

Du bist ein talentierter, fähiger Programmierer. Es ist nicht nötig, dir für jeden deiner Schritte irgendwelche Zweitmeinungen einzuholen (ich glaube, ich habe das schonmal vor zwei Jahren oder so geschrieben).
Du bist offenbar in der Lage, Probleme (auch solch einfache wie dieses hier) SELBST zu lösen.
DARUM programmierst du doch (auch), oder?

Ich will NICHT, daß du dem Forum fernbleibst.
Ich würde es aber begrüßen, wenn du vermeiden könntest, die "Community" etwas weniger in alltägliche Programmiererfahrung (die du NICHT brauchst und also nur vorgibst) einzuflechten. Nur, um das Forum zu aktualisieren und die Höflichkeit und Toleranzgrenzen der Teilnehmer zu testen - no, thanx.

Vielleicht hat auch der ein oder andere hier ein erweitertes Geltungsbedürfnis, das es außerhalb der Knigge-Formeln zu befriedigen gilt---letzten Endes mußt du eine Menge Credits in "deinen" Code schreiben, nur weil du nicht die Ausdauer eines Non-TV-Junkies besitzt .

inq

[ - Antworten - Zitieren - Direktlink - ]

@inq:

Ach es wird doch überall so viel geredet über alles Mögliche. Warum nicht auch hier? Ich würde mir mehr Fragen auch von anderen Leuten wünschen, dann könnte ich mein Wissen weiter geben. Es ist auffällig wenn immer wieder bloß ich hier als Fragender auftrete. Andernfalls würdest Du es garnicht bemerken. Ich will kein Eigenbrötler sein und kein einsamer Spitzenreiter, sondern mich über meine Interessen und Fortschritte ganz normal und offen mitteilen wie bei jedem anderen Hobby auch. Ich glaube wir arbeiten zusammen: my code is your code. Und wenn einer etwas - wenn auch nur moralische - Unterstützung braucht, dann bin ich gerne bereit es zu geben. Bei mir ist das so, dass ich oftmals erst dann das Problem sehe, wenn ich darüber spreche, bzw schreibe. Und warum sollte das ein Selbstgespräch sein. Was ist das für eine Austausch-Plattform, wenn man bloß gesagt bekommt: mach es selbst. Ich, es fällt mir echt auf, bin hier fast der Einzige, der Programmierfragen stellt. Wäre das nicht so, gäbe es keine Verwunderung darüber, das glaube ich. Man sieht im AmiNet und auf Amiga-News bloß immer, wer wann welches tolles Programm geschrieben hat, aber davon abgesehen scheint das eigentliche Programmieren davon jedem seine Privatsache und "geheime Kunst" zu sein, das gefällt mir nicht ...

ags

ps: wenn Du wüsstest, was ich alles hier NICHT frage. Was ich hier Frage ist alles andere als "jeder Schritt". Du siehst nur die Spitze des Eisbergs!
--
Author of Open eXternal User Interfaces, eXternal Format Rippers and the Book "Torakosmos". Developing with E-UAE on an Ubuntu dualcore system.

[ Dieser Beitrag wurde von AGSzabo am 12.02.2012 um 22:10 Uhr geändert. ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von AGSzabo:
@inq:
.... Man sieht im AmiNet und auf Amiga-News bloß immer, wer wann welches tolles Programm geschrieben hat, aber davon abgesehen scheint das eigentliche Programmieren davon jedem seine Privatsache und "geheime Kunst" zu sein, das gefällt mir nicht ...
...
ps: wenn Du wüsstest, was ich alles hier NICHT frage. Was ich hier Frage ist alles andere als "jeder Schritt". Du siehst nur die Spitze des Eisbergs!

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von AGSzabo:
@inq:
Der Jemand im bösen Indien kann doch auch kein Patent auf allgemein bekanntes Wissen machen, oder hab ich dich mißverstanden? Ich meine, was ich nicht kann, kann/darf er auch nicht. ...

---

Zitat:

---

- meine Hitomi-Methode ist spätestens seit dem Erscheinen meines Buches als mein geistiges Eigentum gesichert.

---

Zitat:

---

- was ich an sonstens programmiere gibts sowieso schon alles irgendwie

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von inq:
Es ist, genau genommen, anders herum: Es wird eine Software veröffentlicht (verkauft!!), gegen die DU nicht vorgehen kannst, weil es nicht patentierbar ist…

---

Zitat:

---

Zitat:

---

- meine Hitomi-Methode ist spätestens seit dem Erscheinen meines Buches als mein geistiges Eigentum gesichert.

---

Bis jemand mit mehr Geld etwas anderes "beweisen kann".

---

Zitat:

---

Es gibt keinen Grund, eine Variante davon IN SRC zu kopieren. DAS kann man auch selbst schreiben; vielleicht machen ein paar Bytes später mal ein paar MIO ChinaEuros aus...

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Holger:

Zitat:

---

Zitat:

---

- meine Hitomi-Methode ist spätestens seit dem Erscheinen meines Buches als mein geistiges Eigentum gesichert.

---

Bis jemand mit mehr Geld etwas anderes "beweisen kann".

---

Ja ja, sicher.
Das heißt, die einzige Schutzmaßnahme, die ein Autor noch hätte, wäre, gar nichts zu veröffentlichen. Sehr sinnvoll.

---

Zitat:

---

Im übrigen spielt es bei Patenten ohnehin überhaupt keine Rolle, ob Du den Source kopiert oder dieselbe Idee mit eigenhändig geschriebenen Code re-implementiert hast.

---

Falsch.
Nur, wenn das Patent auf die Idee gilt, wäre das so. Bei der Verwirklichung einer (banalen, bekannten) Idee spielt sehrwohl der Source eine Rolle.
Ich habe nicht umsonst auf das Rechteckzeichnen verwiesen.

Übrigens,
ich hab' diesem Thread nur beigesenft, weil das eigentlich angesprochene "Problem" nur eine Denkblockade beschreibt, zu deren Lösung normalerweise kein Sourcecode nötig wäre. Immer dieses "teilhaben", "sharing" usw. wirkt auf mich immer etwas übertrieben.
Ich werde wohl alt!

inq

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]