Lösung: Inetadresse in IP umwandeln

    • Skript

    Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

    • Lösung: Inetadresse in IP umwandeln

      Hallo GM'ler,

      da der Game Maker keine Möglichkeit hat Adressen in IPs aufzulösen, habe ich hier eine Lösung dafür programmiert. Es kommt ohne eine DLL aus - ist daher direkt lauffähig.

      Einschränkungen:
      Vielleicht unter Windows Vista. Da ich das System nicht besitze kann ich es hierunter nicht testen.

      Hinweis:
      Zur Zeit gibt es leider eine Sicherheitslücke in nslookup - solange diese nicht gepacht ist, solltet ihr nur vertrauenswürdige Adressen auflösen.

      GML-Quellcode

      1. /**
      2. Function: net_address_to_ip
      3. @author Foo
      4. @param string Die Internetadresse
      5. @return string Die IP, oder leer wenn es nicht aufgelöst werden konnte
      6. **/
      7. var tmp, handle, str, domain, ip;
      8. domain = argument0;
      9. tmp = "out.tmp";
      10. ip = "";
      12. execute_program("cmd.exe /c nslookup.exe " + domain + " > " + tmp, 0, 1);
      14. if(!file_exists(tmp)) {
      15. return ip;
      16. }
      18. handle = file_text_open_read(tmp);
      19. while(!file_text_eof(handle)) {
      20. str = file_text_read_string(handle)
      21. if(string_pos(domain, str) != 0) {
      22. file_text_readln(handle);
      23. str = file_text_read_string(handle);
      24. //If there a are more than one ip addresses - drop the rest
      25. if(string_pos(",", str) != 0) {
      26. str = string_copy(str, 0, (string_pos(",", str) - 1));
      27. }
      29. // Search the ip address
      30. var i, size, char;
      31. size = string_length(str)
      32. for(i = 0; i < size; i += 1) {
      33. char = string_char_at(str, i);
      34. char = real(ord(char));
      35. if((char >= 48) && (char <= 57)) {
      36. ip = string_copy(str, i, size);
      37. break;
      38. }
      39. }
      40. }
      41. file_text_readln(handle);
      42. }
      43. file_text_close(handle);
      44. file_delete(tmp);
      45. return ip;
      Alles anzeigen
      On teh internet u pwn noobs - but in real life noobs own you.

      Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von Foo ()