Ruby 2.7.6p219 (2022-04-12 revision c9c2245c0a25176072e02db9254f0e0c84c805cd)
resolv.c
Go to the documentation of this file.
1#include <ruby.h>
2#include <ruby/encoding.h>
3#include <windows.h>
4#ifndef NTDDI_VERSION
5#define NTDDI_VERSION 0x06000000
6#endif
7#include <iphlpapi.h>
8
9static VALUE
10w32error_make_error(DWORD e)
11{
12 VALUE code = ULONG2NUM(e);
13 return rb_class_new_instance(1, &code, rb_path2class("Win32::Resolv::Error"));
14}
15
16static void
17w32error_raise(DWORD e)
18{
19 rb_exc_raise(w32error_make_error(e));
20}
21
22static VALUE
23get_dns_server_list(VALUE self)
24{
25 FIXED_INFO *fixedinfo = NULL;
26 ULONG buflen = 0;
27 DWORD ret;
28 VALUE buf, nameservers = Qnil;
29
30 ret = GetNetworkParams(NULL, &buflen);
31 if (ret != NO_ERROR && ret != ERROR_BUFFER_OVERFLOW) {
32 w32error_raise(ret);
33 }
34 fixedinfo = ALLOCV(buf, buflen);
35 ret = GetNetworkParams(fixedinfo, &buflen);
36 if (ret == NO_ERROR) {
37 const IP_ADDR_STRING *ipaddr = &fixedinfo->DnsServerList;
38 nameservers = rb_ary_new();
39 do {
40 const char *s = ipaddr->IpAddress.String;
41 if (!*s) continue;
42 if (strcmp(s, "0.0.0.0") == 0) continue;
43 rb_ary_push(nameservers, rb_str_new_cstr(s));
44 } while ((ipaddr = ipaddr->Next) != NULL);
45 }
47 if (ret != NO_ERROR) w32error_raise(ret);
48
49 return nameservers;
50}
51
52void
54{
55 VALUE mWin32 = rb_define_module("Win32");
56 VALUE resolv = rb_define_module_under(mWin32, "Resolv");
57 VALUE singl = rb_singleton_class(resolv);
58 rb_define_private_method(singl, "get_dns_server_list", get_dns_server_list, 0);
59}
60
61void
63{
64 InitVM(resolv);
65}
VALUE rb_singleton_class(VALUE)
Returns the singleton class of obj.
Definition: class.c:1743
VALUE rb_define_module(const char *)
Definition: class.c:785
VALUE rb_define_module_under(VALUE, const char *)
Definition: class.c:810
void rb_exc_raise(VALUE mesg)
Raises an exception in the current thread.
Definition: eval.c:668
VALUE rb_class_new_instance(int, const VALUE *, VALUE)
Allocates and initializes an instance of klass.
Definition: object.c:1955
#define NULL
#define ALLOCV_END(v)
int strcmp(const char *, const char *)
void rb_define_private_method(VALUE, const char *, VALUE(*)(), int)
VALUE rb_path2class(const char *)
Definition: variable.c:268
unsigned long VALUE
VALUE rb_ary_push(VALUE, VALUE)
Definition: array.c:1195
#define ALLOCV(v, n)
VALUE rb_ary_new(void)
Definition: array.c:723
struct rb_call_cache buf
#define Qnil
#define ULONG2NUM(x)
#define InitVM(ext)
#define rb_str_new_cstr(str)
void Init_resolv(void)
Definition: resolv.c:62
void InitVM_resolv(void)
Definition: resolv.c:53
IUnknown DWORD
Definition: win32ole.c:33