Ich versuch mal ganz vorsichtig zu fragen:

Ich kann bereits eigene Programm über das locale Netzwerk indirekt verbinden, indem ich einfach auf eine zentrale Datei im Netzwerk zugreifen lasse. Aber das wahre ist das natürlich nicht.

Wenn ich aber jetzt das ganze aber über TCPIP machen möchte, wie kann ich da vorgehn? Gibt es da eine Lib oder dergleichen mit dem das einfach(!) und für normalsterbliche(!) machbar ist?

Also so auf die Art: geb mir IP und ich verbind dich (mit einem internen Port auf der IP). Also sowas wie Client/Server.

Ich hoffe ich habe mich irgendwie verständlich ausgedrückt.
--
http://www.alternativercomputerclub.de.vu

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Gerry:
entweder über die socket-libraries, aber auch die AMarquee.library (Aminet) ist eine sehr einfache Library, mit der man Online-Programme(Client, Server, somit z.B. Internetspiele usw.) Programmieren kann, ohne großen Aufwand.

---

Danke, das ist mal ein Wort. Ich schau mir die Lib gleich mal an.
--
http://www.alternativercomputerclub.de.vu

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Gerry:
Es sieht am Anfang komplex aus. Aber wenn man mal sein Grundgerüst hat, dann ists einfach.

---

Hab es eben etwas überflogen. Aber ich hab leider wie immer die folgenden Probleme:

* kann kein Englisch (ok, inzwischen doch ein wenig... )
* nur Basic (ok, ich versteh inzwischen C besser als blitz ... )
* haben sich gerade einige Gehirnzellen etwas verwirrt bei der Lib, obwohl sie auf dem ersten Blick verständlich zu sein scheint, sind es doch recht viele Befehle/Möglichkeiten.

Ich gehe einfach mal davon aus das es keine deutschen Infos zur Programmierung dieser lib in Basic gibt...

Vermutlich bekomme ich das hier und da durch etwas Trail&Error hin, bzw. werd ich da vermutlich auch recht viel Hilfe hier aus dem Forum benötigen, so wie es auch bei den Datatypes war, die für mich ähnlich verwirrend waren bzw. teilweise als noch sind...
--
http://www.alternativercomputerclub.de.vu

[ - Antworten - Zitieren - Direktlink - ]

code:

---

/* rexx */

say "Öffne Verbindung"
if Open(tcp,"tcp:9999",read) then do
 say "Verbindung geöffnet."
 say "Warte auf Daten."
 zeile = ReadLn(tcp)
 say "Empfangen:" zeile
 say "Schließe Verbindung."
 call Close(tcp)
 say "Verbindung beendet."
end
else
 say "Verbindung fehlgeschlagen."

---

code:

---

/* rexx */

say "Öffne Verbindung"
if Open(tcp,"tcp:localhost/9999",write) then do
 say "Verbindung geöffnet."
 say "Sende Daten."
 call WriteLn tcp,"Hello World !"
 say "Schließe Verbindung."
 call Close(tcp)
 say "Verbindung beendet."
end
else
 say "Verbindung fehlgeschlagen."

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von thomas:

Du kannst auch mit dem TCP-Handler eine einfache Verbindung herstellen. Voraussetzung ist nur, daß TCP: angemeldet ist.

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Hm, da ein Fehler beim öffnen auftrit hab ich wohl was falsch gemacht. Also, TCP: gibt es, mit Assign kann ich dieses sehn und bei mir läuft Genesis. Muß ich auch wenn ich diesen Test auf dem gleichen Rechner mach eventuell Ports freischalten?
Ich steh da eh etwas auf dem Kriegsfuß mit TCPIP...

Fragt sich nur wie eintragen: Also bei "Dienste" und "Zugriff".

Dienste:
Testport, 9999,

Zugriff:
Äh, gute Frage, wie genau? Alle Rechner laufen hier mit 192.168.123.*, also:

TestPort, 192,168,123,*, erlauben, log

?

Und wenn das über das ganze netz gehen soll dann mit *.*.*.* ?


Das ganze hab ich mir eben gerade "theoretisch zusammenüberlegt", bin mir aber ehrlich nicht sicher ob das so hinkommt.

Und wegen denn Programmen:
Einfaches open() mit der Dos-Funktion reicht? Unheimlich einfach, jetzt muß es nur noch laufen! Was geb ich denn als modus an? Gibt es da ne vorgabe? Und, muß dann wirklich der ganze Prozess warten bis da Daten bereit liegen?
--
http://www.alternativercomputerclub.de.vu

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Einfaches open() mit der Dos-Funktion reicht?

---

Zitat:

---

Was geb ich denn als modus an? Gibt es da ne vorgabe?

---

Zitat:

---

Und, muß dann wirklich der ganze Prozess warten bis da Daten bereit liegen?

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von thomas:

Du brauchst keinen neuen Dienst zu definieren. Trag einfach die Zeile

9999 *.*.*.* allow

an den Anfang der Datei amitcp:db/inet.access ein. Wichtig ist, daß sie vor der Zeile mit "deny" steht, weil sie sonst nicht funktioniert.

Zitat:

---

Zur Zeit sieht meine so aus:

code:

---

## This file was generated by GENESiSPrefs GenesisPrefsRA 45.6
##
netbios-dgm     127.0.0.1            allow LOG
netbios-dgm     192.168.123.*        allow LOG
swat            127.0.0.1            allow LOG
swat            192.168.123.*        allow LOG
netbios-ssn     127.0.0.1            allow LOG
netbios-ssn     192.168.123.*        allow LOG
finger          127.0.0.1            allow LOG
ident           *.*.*.*              allow LOG
$               *.*.*.*              allow LOG
*               $                    allow LOG
http            192.168.123.*        allow LOG
http            127.0.0.1            allow LOG
9999            *.*.*.*              allow LOG

---

Ich hab also kein Deny. Es müßte also so laufen?

---

Natürlich funktioniert es einfach mit DOS-Funktionen, das ist der Sinn eines Handlers.

---

code:

---

tcp&=xOpen&(SADD("TCP:9999"+CHR$(0)),MODE_NEWFILE&)
IF tcp& THEN
 junk&=xWrite&(tcp&,SADD("TEST"),4)
 junk&=xClose&(tcp&)
ELSE
 PRINT"Fehler"
END IF

---

code:

---

tcp&=xOpen&(SADD("TCP:9999"+CHR$(0)),MODE_OLDFILE&)
a$="1234"
IF tcp& THEN
 junk&=xRead&(tcp&,SADD(a$),4)
 PRINT a$
 junk&=xClose!(tcp&)
ELSE
 PRINT"Fehler"
END IF

---

(Bitte gerade in der Hinsicht der Speicheranforderung etwas nachsicht walten lassen. )
Ich hab mal die Includes herraus gelassen.

Achja, es läuft leider auch nicht mit TCP:localhost/9999

Aber vermutlich hab ich irgendwo wieder einen dummen kleinen Fehler drin.
--
http://www.alternativercomputerclub.de.vu

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Ich hab also kein Deny. Es müßte also so laufen?

---

Zitat:

---

Ich hab mal die beiden folgenden Programme in Basic geschrieben. Der Sender hängt sich auf und der Empfänger meldet einen Fehler.

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von thomas:
Du hast eh alle Ports freigegeben, da brauchst du den Eintrag gar nicht. Allerdings habe ich starke Zweifel, ob du der deutschen Sprache mächtig bist. Wenn ich Anfang schreibe, dann meine ich auch Anfang und nicht Ende.

---

Zitat:

---

Du solltest dir mal ein paar Gedanken über Netzwerktechnik machen...

Was glaubst du, woran der Handler einen Sender von einem Empfänger unterscheiden kann, wenn er nur den Dateinamen zur Verfügung hat ?

Du hast zwei Empfänger programmiert. Der erste öffnet den Port und wartet, bis jemand sich meldet. Der hat sich nicht aufgehängt.

Der zweite geht dann kaputt, weil auf einem Port immer nur ein Programm lauschen kann.

Ist das denn wirklich so schwer ? Mach einfach zwei Shell-Fenster auf. In dem einen gibst du ein:

type tcp:9999

und in dem anderen

copy s:startup-sequence tcp:localhost/9999

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Danke, jetzt bin ich da fast wunschlos Glücklich bis auf eine Kleinigkeit, das Open() beim Empfangen so lange wartet bis was ankommt, bzw. das das ganze Programm einfach steht. Hab da eben ein paar experimente gemacht, aber leider...

Mir ist schon klar was du weiter oben getippt hast, das es bei dem tcp-handler nunmal leider so ist. Bzw. das ich weiter einsteigen müßte... Ohoh
--
http://www.alternativercomputerclub.de.vu

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:
Hm, hab da ne Idee wie ich dieses Problem auch "lösen" könnte, allerdings nicht so ganz auf die elegante Weise. Bzw. wären dann neue Möglichkeiten offen, allerdings auch etwas mehr Traffic als unbedingt notwenig...

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Den TCP: assign gibt es z.b. unter WinUAE nicht, d.h. wenns nicht nur mit Genesis laufen soll, musst du schon fast bsdscocket.lib nehmen.

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Reth:

Zitat:

---

Original von Ralf27:
Hm, hab da ne Idee wie ich dieses Problem auch "lösen" könnte, allerdings nicht so ganz auf die elegante Weise. Bzw. wären dann neue Möglichkeiten offen, allerdings auch etwas mehr Traffic als unbedingt notwenig...

---

Lass mal hören!

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von thomas:
Das ist nicht dein Ernst !

---

Zitat:

---

Oben hast du geschrieben, daß du nur zwei Programme im Netzwerk miteinander verbinden möchstest, das kannst du einfach mit TCP: machen.

---

Hab ich nie oben geschrieben. Ich will nur mal die Möglichkeiten ausloten oder muß ich mich jetzt bei dir dafür entschuldigen?

Locker bleiben!

Zitat:

---

Aber was du jetzt beschreibst, ist ein ausgewachsener Web-Server. Da solltest du schon die richtigen Mittel benutzen (bsdsocket.library) und nicht so eine Krücke verbocken.

---

Zitat:

---

Such mal bei Google nach Netzwerkprogrammierung. Es gibt tausende Beispiele und Erklärungen, auch in deutsch.

Ansonsten bliebe noch der Umweg über den inetd. Wenn du einen Eintrag im inetd für deinen Port machst, wird jedesmal, wenn ein Client eine Verbindung aufbauen möchte, das im Eintrag angegebene Programm aufgerufen. Dabei stehen die Daten vom Client in stdin und die Ausgabe wird einfach nach stdout geschrieben. Da für jede ankommende Verbindung eine neue Task aufgemacht wird, können beliebig viele Verbindungen parallel verarbeitet werden.

---

Es ging mir eigentlich mehr um die Struktur, um es mal einfach auszudrücken:
Rechner A <9999> Rechner B

wenn jetzt noch Rechner C und D dazu will, dann

Rechner A <9999> Rechner B <9998> Rechner C <9999> Rechner D

oder

Rechner A <9999> Rechner B
<9998> Rechner C
<9997> Rechner D

oder

ganz wild durcheinander

der Knackpunkt:
es soll ein Datenpool aktuell gehalten werden. Im ersten Fall würde ich dann zwei Ports brauchen, im zweiten so viele wie Rechner rein wollen und Rechner A geht langsam in die Knie(theoretisch).

Zwischen zwei Rechnern wäre ich schon Happy und das geht ja jetzt auch. Die Krönung wäre halt, wenn man halt auch noch mehr Rechner daran Teil haben lassen könnte, *ohne* denn Aufwand zu erhöhen. Wenn es nicht geht, dann ist es auch ok.


Ich will hier kein Webserver, ein Browser oder sonst was programmieren!

So, und jetzt kannst du mich wieder in der Luft zerreisen.
--
http://www.alternativercomputerclub.de.vu

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von thomas:
Also ich wollte dich weder angreifen, noch zerreißen. Ich möchte nur, daß du keine Krücke programmierst, nur weil du glaubst, der "richtig" Weg wäre zu kompliziert. Das ist er nicht.

---

Zitat:

---

Ich habe noch nicht verstanden, was du tun möchtest. Du schreibst weiter oben, daß du bisher mit einer Datei auf einer freigegebenen Festplatte arbeitest, die von allen Rechnern aktualisiert wird.

---

Zitat:

---

Wie möchtest du das jetzt ändern, möchtest du einen Server einrichten, der die Datei besitzt und von den anderen Rechnern Aktualisierungen zugeschickt bekommt ? Oder möchtest du die Datei auf allen Rechnern speichern und jeder, der eine Änderung vornimmt, schickt diese an alle anderen Rechner ?

---

Zitat:

---

Sollen alle Rechner gleichzeitig arbeiten (also mit mehreren Leuten), oder möchtest du nur quasi-gleichzeitig jeweils an einem Rechner arbeiten ? In letzterem Fall wäre TCP: durchaus zu gebrauchen, auch ohne unnötige Netzlast zu erzeugen.

---

code:

---

a$=SPACE$(256)

tcp&=xOpen&(SADD("TCP:home.pages.at/80"+CHR$(0)),MODE_NEWFILE&)
IF tcp& THEN 
 b$="GET /a1260/EigenePage/Index2.htm HTTP/1.0"+CHR$(10)+CHR$(10)
 junk&=xWrite&(tcp&,SADD(b$),LEN(b$))
 junk&=xRead&(tcp&,SADD(a$),256)
 junk&=xClose&(tcp&)
 print a$
 print"end"
ELSE
 PRINT"Fehler"
END IF

---

Also, mir ist klar da ich so den Request vom Server nicht komplett auslesen kann, aber das was ich bis jetzt immer lese ist ein "Bad Request".
Also scheint die Anforderung falsch zu sein". Ich vermute einfach mal nur, das ich das "/n" falsch eingebaut habe. Hab auch schon einige Kombinationen mit ASCCI 13 und 10 versucht, was leider auch ins Nirvana verlaufen.
Aber vermutlich steh ich da jetzt auch mal wieder wie ein Ochs vom Berg und seh die Lösung einfach vor lauter Buchstaben nicht.

EDIT: Im obrigen Beispiel bekomme ich eine 301-Fehlermeldung zurück. Ich hab halt schon einige Server schon versucht, auch amiga-news. Aber meistens war es "Bad Request 4xx"

--
http://www.alternativercomputerclub.de.vu

[ Dieser Beitrag wurde von Ralf27 am 13.08.2006 um 13:32 Uhr geändert. ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von thomas:
Wenn du die komplette URL in den GET-Befehl schreibst, funktioniert es. Einige Server möchten das offenbar, z.B. auch Google.

---

[ - Antworten - Zitieren - Direktlink - ]