IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- Services Hazır Kodlar (https://www.ircforumlari.net/services-hazir-kodlar/)

- - ircservices çoklu root eklentisi (https://www.ircforumlari.net/services-hazir-kodlar/278159-ircservices-coklu-root-eklentisi.html)

ircservices çoklu root eklentisi

Bir zamanlar çok istenen bir özellik..
16.06.2007 tarihinde yapmıştım, ve yayınlamaya karar verdim.
kodlama : orta~zor
ekleme (edit) : kolay~orta

tek dosya içerisinde işlem yapıyoruz:

Aşama #0:
cd ircservices-xxx
cd modules
cd operserv
pico main.c

Aşama #1:

Kod:

char * ServicesRoot;

bu kodu bulup "hemen altına" şu kodları ekleyin:

Kod:

char **Sky_Roots_Char;

    static int Sky_Roots_Int;

    static int Sky_Realod=0;

Aşama #2:

Kod:

static int introduce_operserv(const char *nick)

bu kodu bulup "hemen üstüne" şu kodları ekleyin:

Kod:

void Root_Ayir(char *ServicesRoot_);

void Root_Ayir(char *ServicesRoot_) {

 char *Sky_Temp=NULL;

 Sky_Realod=1;

    if (ServicesRoot_) {

        Sky_Roots_Int = 0;

        Sky_Temp = strtok(ServicesRoot_, " ");

        do {

            if (Sky_Temp) {

                 Sky_Roots_Int++;

                Sky_Roots_Char = realloc(Sky_Roots_Char, sizeof(char *) * Sky_Roots_Int);

                Sky_Roots_Char[Sky_Roots_Int - 1] = sstrdup(Sky_Temp);

            }

        }

  while ((Sky_Temp = strtok(NULL, " ")));

    }

    if (!Sky_Roots_Int)

  config_error("operserv/main", 0, "No Root NickName(s) Defined");

}

Aşama #3:

Kod:

int is_services_root(User *u)

{

    NickInfo *ni;

    int rootid;

    static int warned_ni = 0, warned_id = 0;

    if (u->flags & UF_SERVROOT)

 return 1;

    if (!(ni = get_nickinfo(ServicesRoot))) {

 if (!warned_ni) {

     wallops(s_OperServ, "Warning: Services super-user nickname %s"

      " is not registered", ServicesRoot);

     warned_ni = 1;

 }

 module_log("warning: ServicesRoot nickname not registered");

 return 0;

    }

    warned_ni = 0;

    if (!(rootid = ni->nickgroup)) {

 if (!warned_id) {

     wallops(s_OperServ, "Warning: Services super-user nickname %s"

      " is forbidden or not properly registered", ServicesRoot);

     warned_id = 1;

 }

 module_log("warning: ServicesRoot nickname forbidden or registered"

     " data corrupt");

 return 0;

    }

    if (!is_oper(u) || !u->ni || u->ni->nickgroup != rootid)

 return 0;

    if (user_identified(u))

 return 1;

    return 0;

}

bu kodları silip yerine şu kodları ekleyin (7~8 yerde değişim olduğu için iş karışabilir, o yüzden eskiyi silip yeniyi ekleyin diyorum)

Kod:

int is_services_root(User *u)

{

 int i;

 int ret=0;

    NickInfo *ni;

    int rootid;

    static int warned_ni = 0, warned_id = 0;

    if (u->flags & UF_SERVROOT)

 return 1;

 for (i = 0; i < Sky_Roots_Int; i++) {

 

  if (!(ni = get_nickinfo(Sky_Roots_Char[i]))) {

//   if (!warned_ni) {

    wallops(s_OperServ, "Warning: Services super-user nickname %s"

     " is not registered", Sky_Roots_Char[i]);

    warned_ni = 1;

//   }

   module_log("warning: ServicesRoot nickname not registered");

   continue;

  }

//  warned_ni = 0;

  if (!(rootid = ni->nickgroup)) {

//   if (!warned_id) {

    wallops(s_OperServ, "Warning: Services super-user nickname %s"

    " is forbidden or not properly registered", Sky_Roots_Char[i]);

//   warned_id = 1;

//   }

   module_log("warning: ServicesRoot nickname forbidden or registered"

     " data corrupt");

  continue;

  }

 }

 for (i = 0; i < Sky_Roots_Int; i++) {

  if (!(ni = get_nickinfo(Sky_Roots_Char[i])))

   continue;

  if (!(rootid = ni->nickgroup))

   continue;

  if (!is_oper(u) || !u->ni || u->ni->nickgroup != rootid) {

   ret=0;

  }

  else {

   ret=1;

  break;

  }

 }

    if (ret && user_identified(u))

 return 1;

    return 0;

}

Aşama #4:

Kod:

int nick_is_services_admin(NickInfo *ni)

{

    NickGroupInfo *ngi;

    if (!ni || !(ngi = get_ngi(ni)))

 return 0;

    if (stricmp(ni->nick, ServicesRoot) == 0)

 return 1;

    return ngi->os_priv >= NP_SERVADMIN;

}

bu kodları silip, yerine şu kodları ekleyin;

Kod:

int nick_is_services_admin(NickInfo *ni)

{

 int i;

    NickGroupInfo *ngi;

    if (!ni || !(ngi = get_ngi(ni)))

 return 0;

 for (i = 0; i < Sky_Roots_Int; i++)

  if (stricmp(ni->nick, Sky_Roots_Char[i]) == 0)

   return 1;

    //if (stricmp(ni->nick, ServicesRoot) == 0)

 //return 1;

    return ngi->os_priv >= NP_SERVADMIN;

}

Aşama #5:

Kod:

old_clearchan_sender_set = 1;

yukarıdaki kodu bulup, hemen altına şu kodları ekleyin;

Kod:

if (Sky_Realod==0)

  Root_Ayir(ServicesRoot);

make & make install çekip, servislerinizi yeniden başlatınız..

kodlar biraz karışık. Bu yüzden anlayamayabilirsiniz nerde ne yapıldığını.. ama kısaca özetlemek gerekir ise;
Root satırından gelen nick verisini, aradaki boşluklara göre ayırıp, array'e aktarıp, is_service_root vs. kısmında bu arraydeki nicklerin varlığı||yokluğu şeklinde bakıyoruz.. Varsa root diyoruz. Yok ise root değil diyoruz :)

moduels.conf unuzdaki Root satırınıza bilgi girerken;
ServicesRoot Nick1 Nick2
yukarıdaki şekilde DEĞİL;
ServicesRoot "Nick1 Nick2"
şeklinde girmeniz gerekiyor..

Not : 1 defa test edip olumlu sonuç aldım..

Başka forumlarda paylaşırsanız; Kodun Kimin tarafından yapıldığını da söylemeniz dileğiyle ;)

iyi Çalışmalar..

Cevap: ircservices çoklu root eklentisi

Bu belirttiğiniz herhangi bir nick, kayıtlı değil ise, uyarı verecektir status de (normalde hani Servis Root nicki kayıtlı değil gibisinden bir hata verir, root nicki kayıtlı değil ise..)

yani kısacası kodun eksiksiz olması lazım (yanlış hatırlamıyor isem [e 2~2,5 sene geçmiş :) bayadır dokunmadığım bir editti.])

iyi Çalışmalar..

Cevap: ircservices çoklu root eklentisi

Tebrikler, Sky-Dancer ..

Cevap: ircservices çoklu root eklentisi

Mehmet kopardın yine ortalığı .. zaman makinesi ne zaman çıkıo :)

Cevap: ircservices çoklu root eklentisi

modules/operserv/main.c: In function âRoot_Ayirâ:
modules/operserv/main.c:203: error: âLeviS_Roots_Charâ undeclared (first use in this function)
modules/operserv/main.c:203: error: (Each undeclared identifier is reported only once
modules/operserv/main.c:203: error: for each function it appears in.)
modules/operserv/main.c: At top level:
modules/operserv/main.c:359: error: expected â;â, â,â or â)â before â*â token

Böyle bir hata veriyor hoca.

Cevap: ircservices çoklu root eklentisi

Üstad Sky ilede denedim yine aynı hataya vardım :) vallahi.

Cevap: ircservices çoklu root eklentisi

Kendi Nickini yazarsan doğal olarak verir sky sabitlenmiş durumda ve sabit olarak kaydetmiş sen ahmet_roots_char olarak değiştirirsen normal olarak hata verir. eğer ki değiştirceksen tüm editleri tekrar göze almalısın.

Kod:

char **Sky_Roots_Char;

    static int Sky_Roots_Int;

    static int Sky_Realod=0;

Bu Sekil değiştirmeden kullanırsan bir sorun olmaz.

Cevap: ircservices çoklu root eklentisi

İşte budur sonunda yine herkesin istediği fakat başaramadığı düzenlemeyi yaptın ve kodu yazdın helal olsun be usta cidden. Eline koluna yüreğine sağlık :)

Cevap: ircservices çoklu root eklentisi

Alıntı:

CoboL Nickli Üyeden Alıntı (Mesaj 838437)

Sky yazan yerleri neden başka isim ile değiştirirsiniz anlamam. Sonradan telnete giriş yapacaklar için ise; yine bu, bir tür emek hırsızlığı sayılıyor.

LeviS_Roots_Char -> Sky_Roots_Char'ı bu halde değiştirmişsin fakat en üstteki tanımda değiştirmemişsin veya tanımlamayı unutmuşsun. Haliyle derleyici sana demiş ki: âLeviS_Roots_Charâ tanımlanmadı (bu fonksiyon içerisinde ilk kullanımı)

iyi Çalışmalar..

Cevap: ircservices çoklu root eklentisi

Bizim milletimiz nedense birşeylerle oynamayı çok seviyor orasını değiştirir burasını değiştirir. Bırakın bu işleri madem çok seviyorsunuz oturun kendiniz yazın sıfırdan ama yazılmışsa emeğe saygısızlık yapmayın kurcalamayın orasını burasını.

Cevap: ircservices çoklu root eklentisi

Alıntı:

RedLίne Nickli Üyeden Alıntı (Mesaj 838870)

"kurcalamayın orasını burasını." fjgfdkg :)

her neyse.. Hata alan arkadaşlar yazarlarsa.. Düzeltilecektir.
Ama önceden denenmiş kodlar (şahsen; servis halinde yedek almıştım.)
bu yüzden sorun olacağını pek zannetmiyorum..

iyi Çalışmalar..

Cevap: ircservices çoklu root eklentisi

Hocam Sky_ sizin nick'inizdir o yüzden örnek vermişsinizdir diye kendi nick'imle denedim. Ondan sonra girdim, değiştirdim Sky ile yaptım, yine hatayı aldım. Emek hırsızlığı ile alakası yok. O kadar düşmedik hocam..

Cevap: ircservices çoklu root eklentisi

Alıntı:

CoboL Nickli Üyeden Alıntı (Mesaj 839069)

Baska sky fonksiyonlarini değiştirdiysen yine hata verecektir Kodlarda bir değişim gereksiz sadece root belirlerken kendi nickini yazarsan bir sorun olmaz ki root'uda modules.c* 'dan belirliyorsun.

Cevap: ircservices çoklu root eklentisi

Alıntı:

CoboL Nickli Üyeden Alıntı (Mesaj 839069)

İşlem Yapan Bir Fonksiyon Ismini Değiştirmiş Olabilirsin Eski Haline Getirip Dene Isteren Düzenli Çalışmakta :)

Cevap: ircservices çoklu root eklentisi

Selam arkadaşlar bu ircservices root işini yapan varmı yada varsa burada main.c ile download linki koyarsa eminimki herkes daha iyi faydalanacaktır...

iyi forumlar..

Cevap: ircservices çoklu root eklentisi

Her main.c birbiriyle uyusmaz ( eğer sade değilse + versiyon farki olabilir ) Bir takım editler olabilir zaten kodların eklentisi kolay silmeye eriniyorum diyorsan /* */ koy baslarina Bence..

Cevap: ircservices çoklu root eklentisi

Denedigim Ve Çalışan Main.C
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: ircservices çoklu root eklentisi

Kenzy, verilen kodları nickserv/main.c ye ekleyerek nasıl çalıştırmayı başardın merak ettim doğrusu:)

Sağol paylaşım için Sky-dancer.

Cevap: ircservices çoklu root eklentisi

modules/operserv/main.c: In function âRoot_Ayirâ:
modules/operserv/main.c:203: error: âSky_Roots_Charâ undeclared (first use in this function)
modules/operserv/main.c:203: error: (Each undeclared identifier is reported only once
modules/operserv/main.c:203: error: for each function it appears in.)
modules/operserv/main.c: At top level:
modules/operserv/main.c:360: error: expected â;â, â,â or â)â before â*â token

Simdide böyle bir hata ile karsılasıyorum.

Cevap: ircservices çoklu root eklentisi

Alıntı:

CoboL Nickli Üyeden Alıntı (Mesaj 839636)

eğer olmadı da Sky kısmını değiştirdiyseniz, özür diliyorum yanlış anladık demektir :)

yukarıdaki hata aşama #1 de hata yaptığınızı gösteriyor:

Aşama #1:

Kod:

char * ServicesRoot;

bu kodu bulup "hemen altına" şu kodları ekleyin:

Kod:

char **Sky_Roots_Char;

    static int Sky_Roots_Int;

    static int Sky_Realod=0;

eğer bu tanımı dediğim yere yaparsanız emin olun böyle bir hata almamanız gerekir :) (main.c'de daha büyük bir hata yapmadığınız sürece..)

iyi Çalışmalar..

Cevap: ircservices çoklu root eklentisi

char * ServicesRoot;
char **Sky_Root_Chat;
static int Sky_Roots_Int;
static int Sky_Realod=0;
static int WallOper;
static int WallBadOS;
static int WallOSChannel;
static int WallSU;
static int KillClonesAutokill;
static time_t KillClonesAutokillExpire;
static int AllowRaw;
EXPORT_VAR(char *,ServicesRoot)

Aynen bu şekil zaten main.c :) demekki farklı bir sorun var. Sizce ne olabilir hocam ?

Cevap: ircservices çoklu root eklentisi

Kodları editplus ile dediğiniz gibi yerleştirdim . make ve make install da hata almadım . Servisleri soktum fakat ortalama 1 dk sonra servisler şu hatayı vererek düşüyor ;

Kod:

-irc.xxx.net- *** Global -- from services.xxx.net: PANIC! signal 11 (no buffer)

-irc.xxx.net- *** LocOps -- Received SQUIT services.xxx.net from services.xxxx.net[**.***.***.***] (Services terminating: Segmentation fault)

ve servisler gidiyor. Bir hata alırım diye main.c dosyasının yedeğini almıştım. Sorun verdiği içinde yedeği tekrar attım. make ve make install çektim yine bir hata yok. Fakat yine servisleri soktuktan sonra ortalama 1 dk içerisinde servisler yukarıdaki hatayı vererek düşüyor.

Yardımcı olursanız sevinirim.

Cevap: ircservices çoklu root eklentisi

Alıntı:

KarsiyakaLee Nickli Üyeden Alıntı (Mesaj 839754)

Kodları editplus ile dediğiniz gibi yerleştirdim . make ve make install da hata almadım . Servisleri soktum fakat ortalama 1 dk sonra servisler şu hatayı vererek düşüyor ;

Kod:

-irc.xxx.net- *** Global -- from services.xxx.net: PANIC! signal 11 (no buffer)

-irc.xxx.net- *** LocOps -- Received SQUIT services.xxx.net from services.xxxx.net[**.***.***.***] (Services terminating: Segmentation fault)

Kodları tam olarak yerleştirdin sanirim ama belki versiyondan dolayı olabilir ( bir baska editten olabilir diycem ama sanırım daha önce segmantation vermedi )

Cevap: ircservices çoklu root eklentisi

Yok hayır daha önceki editlerden kaynaklanan bir sorun değil. Servislerin daha önceki yedekleri vardı elimde . 20 gün önceye aldım servisleri sorunu ancak bu şekilde çözebildim. Yinede yardımın için teşekkür ederim toXic.

Cevap: ircservices çoklu root eklentisi

Alıntı:

KarsiyakaLee Nickli Üyeden Alıntı (Mesaj 841308)

valla 2 sene önce, 1 2 saatte tasarladığım bir kod. Müsait zamanda tekrar bakarım.

fakat sorun olduğunu düşünmüyorum. Olmadı, bu tip hatayı alan başka arkadaşlar da olur ise yeniden yazarız ;)

iyi Çalışmalar..

Cevap: ircservices çoklu root eklentisi

Sky eline sağlık kodu denedim çalışıyor ircservices-5.0.58 version'da sorun yok öteki versiyonlarda da çalışacaktır.

Cevap: ircservices çoklu root eklentisi

Ustad dokturmussun yine. Birazda Unreal icin ugrasalim. :D
Su senden istedigim modulu yaz artik. ;blush

/yasakla nick ekle NICK Sebep.
/yasakla nick sil NICK
/yasakla nick listele

/yasakla ip ekle IP Sebep.
/yasakla ip sil IP
/yasakla ip listele

ban nick { mask "NICK"; reason "SEBEP"; };

ban user { mask "*@IP*"; reason "SEBEP"; };

yasakla.conf :D

Cevap: ircservices çoklu root eklentisi

Alıntı:

/yasakla nick listele

/stats q

Alıntı:

/yasakla ip listele

/zline

komutlarında listeleri görebilirsiniz :) Dinçer :):):)

Cevap: ircservices çoklu root eklentisi

Hayir onu kastetmedim. O anladi. :D
Telnet'e girmeden; yasakla.conf dosyasina veri ekleme, silme ve listeleme icin modul. :)

Cevap: ircservices çoklu root eklentisi

Alıntı:

Namesis Nickli Üyeden Alıntı (Mesaj 844445)

Hayir onu kastetmedim. O anladi. :D
Telnet'e girmeden; yasakla.conf dosyasina veri ekleme, silme ve listeleme icin modul. :)

uygun zamanda halletmeyi deneriz :) ama işte ekleme kolay da silmek ve listelemek için ordaki verileri ayırmam gerekiyor :)

Cevap: ircservices çoklu root eklentisi

Ustad yapacagindan eminim. :)
Uygun zamani ayarlayalim birgun. :D

Cevap: ircservices çoklu root eklentisi

Alıntı:

Namesis Nickli Üyeden Alıntı (Mesaj 844445)

Hayir onu kastetmedim. O anladi. :D
Telnet'e girmeden; yasakla.conf dosyasina veri ekleme, silme ve listeleme icin modul. :)

biliyoruz ;d yuh bizde makara yapıoruz da ;d

Cevap: ircservices çoklu root eklentisi

Alıntı:

Namesis Nickli Üyeden Alıntı (Mesaj 844445)

Hayir onu kastetmedim. O anladi. :D
Telnet'e girmeden; yasakla.conf dosyasina veri ekleme, silme ve listeleme icin modul. :)

/addline komutu var bu eğer yetkin var ise yasakla.conf a eklemes ama unrealircd.conf a ekler satırı telnete girmeden rehash çekersin istediğin işlem olmuş olur

Cevap: ircservices çoklu root eklentisi

Alıntı:

GemLik Nickli Üyeden Alıntı (Mesaj 845992)

/addline komutu var bu eğer yetkin var ise yasakla.conf a eklemes ama unrealircd.conf a ekler satırı telnete girmeden rehash çekersin istediğin işlem olmuş olur

sorun olan listeleme ve silme olayı :)
onlar için de, ya unreal verilerine doğrudan ekleme yapılması lazım.. ya da conf u el ile okutturup ( tek düzen ) ekleme silme olayı vs.vs. :)

Cevap: ircservices çoklu root eklentisi

Sky-DanCer Sana GerçeKten HayRaNım..KodLarı normaL bir Yazı yazar gibi YazıyorSun heLaL oLsun..YanLız akLıma uzun Zamandır takıLan biR Soru Var.Bir ZamanLar röportaj yapmıŞtın Ve orDa öSs Ye hazırLandığını SöyLemiŞtin..KaZanDın mı Çok merak Ediyorum:))

Cevap: ircservices çoklu root eklentisi

Adam yakında evlencek bile :D

Cevap: ircservices çoklu root eklentisi

Alıntı:

toXic Nickli Üyeden Alıntı (Mesaj 871986)

Adam yakında evlencek bile :D

Kirvede sen olursun artık ibo :-)

Cevap: ircservices çoklu root eklentisi

Alıntı:

DariuS Nickli Üyeden Alıntı (Mesaj 871981)

2 senelik prog. kazandım.
Sonrasında bulunduğum meslek yüksekokul'unu birincilik ile bitirdim, yata yata :D:D

Dikey geçiş sınavı ( Naam'ı değer DGS )'na girdim, puan yetmedi bilg. müh. için ( biliyorsunuzdur ki, şu an en yüksek puan Bilg. Müh. ve 100 bin kişi arasından ilk 100 e girmem lazım )
neyse.. DGS ye çalışıyorum.. Bakalım kazanırsam lisans (4 senelik) programa yerleşeceğim inş.

iyi Çalışmalar..

Cevap: ircservices çoklu root eklentisi

ders çalış ders.. hasbinallah ya.. behrooz,toxic.. şu adamı gaza getirmeyin gitsin dersini çalışsın ;)

Cevap: ircservices çoklu root eklentisi

Hacı ben diyom birak su kodlari cs oynayalım stres atarsin mesela ben gecen yıl derslerim kötü durumdaydı cs oynarken öyle bi rahatlıyomki bu yıl derslerim cok iyi :P

Stres atarsin sky dicem ama benle oynarken daha cok stres olur sende :D