OCARINA Network Project Communication

This is the new project communication thread for OCARINA Network.

So I'm the new project leader...
Strange!
Never thought of this might ever happen...
Hmmm... well... Filburt1, I declare you as the Co-Leader.
...OK....
So start posting!

What project's this then?

Anything interesting?

Quote:

---

Originally posted by Andreas@ALSoft
So I'm the new project leader...
Strange!
Never thought of this might ever happen...
Hmmm... well... Filburt1, I declare you as the Co-Leader.
...OK....
So start posting!

---

It's happened Andreas! You're the leader, I know you will succeed!

Quote:

---

Originally posted by Arbiter
What project's this then?

Anything interesting?

---

I think it's the same thing as the MSN messenger replacemant

Yup, after several mutinies.

Okay. Let's get to work! :)

Filburt lock the other thread about the IM ok.

can i join the team? i have nothing else to do

Quote:

---

Originally posted by DaoK
Filburt lock the other thread about the IM ok.

---

I already did.

You read in my mind Turtle,
Sail I think you have to ask Andrea the holy leader :)

I made the thread and I still think it was stupid to not put Devion in as the PL.

Andrea the holy leader, can i please help with the project?

You can probably get in. ;)

Quote:

---

Originally posted by sail3005
Andrea the holy leader, can i please help with the project?

---

Hmm, I have nothing against it,
I'm happy about everyone who joins our team!

BTW: Filburt is the CO-Leader
I often don't have very few time because I have tons of homework and I am in 4 school clubs...
This means I sometimes even can't check my email.
This is them reason why filburt is the co-leader.
Filburt, do you agree with being the co-leader?

Sure.

Okay
Good.
Then we are back in business!
Sorry, but for today I have to log off.

Okay. First topic of new leadership: My forum or Andreas' forum?

Nobody's. We're using this thread. If we want to share code then somebody can set up an FTP server.

:)

lol...forgot about that. :D

Quote:

---

Originally posted by filburt1
Nobody's. We're using this thread. If we want to share code then somebody can set up an FTP server.

---

---->AGREE

BTW: I'll leave my board uploaded so we can use it if required (e.g. if our forum thread at vbForums is moved to Chit Chat again...)

OK lets work on the project I dont want to start to talk about wich forum we have to take. We use VBforums and it do the job now lets rock and work.

1- Is the server ready?
2- Is the IM ready ?
:)

IM almost ready.

As you refer to it Doak, the "IM" should be the "client", and the "server" will support the client. The IM is the whole project as a whole. :cool:

And no, nobody has bothered to start thinking on how to write the server. :(

thanks for letting me in, what should i do?

Learn Java? We intend to write the final version of the server in Java for its multithreading capabilities.

I know java a little :)

Have you learned multithreading yet?

Nope, for an unknown reason we are just stick in Java swing at school and the base of algorithm :rolleyes:

Swing = stupid way to start learning Java

One thing: we want OCARINA to be more than just another IM, don't we.
So we should first of all write the client that makes all the services available and implement the IM in it as soon as the IM code works properly.
I think I gonna myke a simple server until tomorrow which allows us to implement the first parts of the communication code (login, Buddy list etc.)

BTW: Don't call me "all holy PL", I would prefer if you just call me "Andreas"

We can't write the IM client unless we have a server to test it on...and the website will be by far the easiest part...

Quote:

---

Swing = stupid way to start learning Java

---

School is strange I know.

Is the person who is supposed to make the server with linux is working on it ?

:confused: Java is cross-platform so it doesn't matter what platform we develop the server on. ;)

I want to teeessssssstttttttttttt

Well we have to write it first.

We have to write a program for the server? ... oops who will do that ?

I gonna write a little server proggy in VB that will let us try out the basic features of the client.
Once it is working we can do the real server in C, Java or whatever

Okay. I assume it would be a single Winsock control thing?

Exactly

And what's the protocol?

Code:

---

Client: user filburt1
Server: pass
Client: pass magicalsecretpassword
Server: ok

---

I dunno.

a Simple winsock will be able to take all these person using the IM ? Wow Impressive.

No, this is just a test server.

I tryed that password and I can tell you than it's not you vbforums pass (magicalsecretpassword). :D

DefInt A-Z
Option Base 0
Option Explicit
Private Type ColorType
R As Byte
G As Byte
B As Byte
End Type
Dim bLocalEcho As Boolean, bBlinkCursor As Boolean, iCurX As Integer, iCurY As Integer, iCWid As Integer, iCHei As Integer, lTColor As Long, iPWid As Integer, iPHei As Integer, lBColor As Long, sInQueue As String
Dim dpicOWid As Double, dpicOHei As Double, dfrmOWid As Double, dfrmOHei As Double, bOnline As Boolean, dfrmCWid As Double, dfrmCHei As Double
Dim iFileNo As Integer

Private Sub wsckSecure_DataArrival(ByVal bytesTotal As Long)
Dim strIncoming As String
wsckSecure.GetData strIncoming
sInQueue = sInQueue + strIncoming
CheckPackets
End Sub

Sub CheckPackets()
Dim T As Long, dStartRead As Double, dTmr As Double
Dim iType As Integer, lLength As Long, sData As String
Static bReadPacket As Boolean
DoItAgain:
If bReadPacket = False Then
For T = 1 To Len(sInQueue)
If Mid(sInQueue, T, 1) = Chr(0) Then
bReadPacket = True
dStartRead = Timer
If T > 1 Then
sInQueue = Mid(sInQueue, T)
End If
Exit For
End If
Next
End If
dTmr = Timer
If dTmr < dStartRead Then dTmr = dTmr + 86400
If bReadPacket And dTmr - dStartRead > 4 Then
If Len(sInQueue) > 1 Then
sInQueue = Mid(sInQueue, 2)
End If
End If
If bReadPacket And Len(sInQueue) >= 4 Then
jiType = Asc(Mid(sInQueue, 2, 1))
lLength = Asc(Mid(sInQueue, 3, 1)) + Asc(Mid(sInQueue, 4, 1)) * 256
End If
If bReadPacket And Len(sInQueue) >= 4 + lLength Then
sData = Mid(sInQueue, 5, lLength)
If Len(sInQueue) >= lLength + 4 Then
sInQueue = Mid(sInQueue, 5 + lLength)
End If
bReadPacket = False
InterpretePacket iType, sData
End If
DoEvents
If sInQueue <> "" Then GoTo DoItAgain
End Sub

Sub SendPacket(iType As Integer, sData As String)
Dim Typ As Integer, L1 As Integer, L2 As Integer
If Len(sData) > 10240 Then sData = Left(sData, 10240)
Typ = iType Mod 256
L1 = Len(sData) Mod 256
L2 = Fix(Len(sData) / 256)
wsckSecure.SendData Chr$(0) + Chr$(Typ) + Chr$(L1) + Chr$(L2) + sData
End Sub

(Parts from SecureCP)

Maybe some encryption for passwords and so on...
Just to argue those ones who try to find out the password with a MAN-IN-THE-MIDDLE-Attack

As you can see my programming style has improved a bit...

Quote:

---

Originally posted by Andreas@ALSoft
Maybe some encryption for passwords and so on...
Just to argue those ones who try to find out the password with a MAN-IN-THE-MIDDLE-Attack

---

Good idea. :D

BTW, please use the [vbcode][/vbcode] tags. :)

I can do encryption stuff. I think I'm qualified for that. :D

|
|
|
\/

Read the RFCs about secured POP3 access and that's fairly effective at securing passwords (not TOTALLY secure because you'd need insane-bit SSL for that).

Also, for the server to have any kind of scalability you need C (you could use C++, but C lets you extract the last clock cycle of performance out of it).

And for anyone that says anything about ASM...well written C can often be just as good as equivalent assembler code :)

Quote:

---

Originally posted by parksie
Also, for the server to have any kind of scalability you need C (you could use C++, but C

---

Java! :) The server will eventually be written in Java and run under 'nix. We're just making a cheap VB test one.

I can do the encryption :D

VB Code:

For i = 1 To Len(Text1.Text)
            lettre = Mid(Text1.Text, i, 1)
            code = Asc(lettre)
            If code <> 32 Then
                    code = code + 1
            End If
            lettre = Chr(code)
            Text2.Text = Text2.Text + lettre
    Next i

This is what I made so far :)

Here's your code simplified:

VB Code:

EncryptedText = OriginalText

:p It's not exactly a strong algorithm you've got going there. :D

As I said, I think I can handle it. ;):D

ok EiSecure is one of the best in vbforum realm with encryption so we will give him one more thing to do :rolleyes: tell me what EiSecure will not touch in the project :D

Quote:

---

Originally posted by eiSecure
As I said, I think I can handle it. ;):D

---

Asst. leader agrees. :)

Holy Ass. Leader :D

Do you want me to continue to make the menu in Flash because I take a break and didnt continue to work on it. I can continue if the new leader and holy ass ldr want to :)