mIRC ile basit bir Web Server denemesi. (Socklisten kullanımı.) - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

SuLh · 21 Mart 2021, 00:37

Merhaba, fantezi fikirlere devam olarak çok ufak ve basit bir şekilde web server denemesi yaptım. Uzun süredir socklisten bir web sayfasından php socketlerle mIRC'e data gönderilip bunu işleyip cevap göndermesi şeklinde kullanılıyordu. Diğer programlama dillerinde bir web socket server oluşturulması dikkatimi çekti ve mIRC'te böyle bir şey deneyeyim dedim. Mantık basit olarak, mIRC'te istediğimiz bir portu dinleyip, HTTP 1.1 protokolü üzerinden geri cevap gönderimine dayanıyor. İlerde belki birileri bundan esinlenerek farklı şeyler yapabilir.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias sckdeneme { socklisten $+(r,$r(1,9999)) 2025 }
on *:socklisteN:r*: sockaccept $+(q,$r(1,999)) 
on *:sockread:q*: {
  sockread %s | tokenize 32 %s
  echo -a %s
  if $regex($1-,/Get.+HTTP\/1\.1/i) { 
    datagonder $sockname 
    if $len($2) = 1 { anasayfa $sockname }
  }
}
alias datagonder {
  sockwrite -n $1 HTTP/1.0 200 Ok \n\r
  sockwrite -n $1 Connection: Keep-Alive
  sockwrite -n $1  Content-Type: text/html; charset=UTF-8
  sockwrite -n $1 Vary: Accept-Encoding
  sockwrite -n $1 Date: Sat, 20 Mar 2021 21:18:26 GMT
  sockwrite -n $1 $crlf $crlf
}
alias anasayfa {
  var %k $lines(index.sulh),%l 1
  while %l <= %k {
    sockwrite -n $1 $read(index.sulh,%l)
    inc %l
  }
  sockwrite -n $1 $crlf
  sockclose $1
}

Dizinde bulunan index.sulh içeriği:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

<!DOCTYPE html>
<html>
<head><title>Basit Web Server Denemesi</title></head>
<body bgcolor="black">
<center><font size="15px" color="white">Bu bir denemedir.</font></center>
</body>
</html>

Görüntü:

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Daemon · 22 Mart 2021, 16:20

Eline saglik kanka

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
sql server mssql case kullanımı	Kaf_Dağı	Delphi	0	16 Mart 2015 12:09
mIRC Orjinal Toolbarını Düzenleme (mIRC Toolbar Komutunun Kullanımı)	McKruGer	mIRC Scripting Dersleri	22	17 Kasım 2011 20:21
mIRC Script Basit Bir Code Ekliyicem	g0kalp	mIRC Scripting Sorunları	1	18 Aralık 2009 01:17
Mirc Kullanımı	StanteaR	mIRC Scripting Sorunları	2	30 Temmuz 2008 17:35
Mirc'de dll kullanımı	davutkerim	mIRC Scripting Sorunları	4	16 Ocak 2006 11:02

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.