Class Library

src/system/windows.cpp:600–656

  };

  class Library : public System::Library {
   public:
    Library(System* s, HMODULE handle, const char* name)
        : s(s), handle(handle), name_(name), next_(0)
    {
    }

    virtual void* resolve(const char* function)
    {
      void* address;
      FARPROC p = GetProcAddress(handle, function);
      memcpy(&address, &p, BytesPerWord);
      return address;
    }

    virtual const char* name()
    {
      return name_;
    }

    virtual System::Library* next()
    {
      return next_;
    }

    virtual void setNext(System::Library* lib)
    {
      next_ = lib;
    }

    virtual void disposeAll()
    {
      if (Verbose) {
        fprintf(stderr, "close %p\n", handle);
        fflush(stderr);
      }

      if (name_) {
        FreeLibrary(handle);
      }

      if (next_) {
        next_->disposeAll();
      }

      if (name_) {
        ::free(const_cast<char*>(name_));
      }

      ::free(this);
    }

    System* s;
    HMODULE handle;
    const char* name_;
    System::Library* next_;
  };