/*
 * Copyright 2012, 2013 SAP AG. All rights reserved.
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
 *
 * This code is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License version 2 only, as
 * published by the Free Software Foundation.
 *
 * This code is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
 * version 2 for more details (a copy is included in the LICENSE file that
 * accompanied this code).
 *
 * You should have received a copy of the GNU General Public License version
 * 2 along with this work; if not, write to the Free Software Foundation,
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
 *
 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
 * or visit www.oracle.com if you need additional information or have any
 * questions.
 *
 */


// Loadlib_aix.cpp contains support code for analysing the memory
// layout of loaded binaries in ones own process space.
//
// It is needed, among other things, to provide a  dladdr() emulation, because
// that one is not provided by AIX

#ifndef OS_AIX_VM_LOADLIB_AIX_HPP
#define OS_AIX_VM_LOADLIB_AIX_HPP

class outputStream;

// This class holds information about a single loaded library module.
// Note that on AIX, a single library can be spread over multiple
// uintptr_t range on a module base, eg.
// libC.a(shr3_64.o) or libC.a(shrcore_64.o).
class LoadedLibraryModule {

    friend class LoadedLibraries;

    char fullpath[512];  // eg /usr/lib/libC.a
    char shortname[30];  // eg libC.a
    char membername[30]; // eg shrcore_64.o
    const unsigned char* text_from;
    const unsigned char* text_to;
    const unsigned char* data_from;
    const unsigned char* data_to;

  public:

    const char* get_fullpath() const {
      return fullpath;
    }
    const char* get_shortname() const {
      return shortname;
    }
    const char* get_membername() const {
      return membername;
    }

    // text_from, text_to: returns the range of the text (code)
    // segment for that module
    const unsigned char* get_text_from() const {
      return text_from;
    }
    const unsigned char* get_text_to() const {
      return text_to;
    }

    // data_from/data_to: returns the range of the data
    // segment for that module
    const unsigned char* get_data_from() const {
      return data_from;
    }
    const unsigned char* get_data_to() const {
      return data_to;
    }

    // returns true if the
    bool is_in_text(const unsigned char* p) const {
      return p >= text_from && p < text_to ? true : false;
    }

    bool is_in_data(const unsigned char* p) const {
      return p >= data_from && p < data_to ? true : false;
    }

    // output debug info
    void print(outputStream* os) const;

}; // end LoadedLibraryModule

// This class is a singleton holding a map of all loaded binaries
// in the AIX process space.
class LoadedLibraries
// : AllStatic (including allocation.hpp just for AllStatic is overkill.)
{

  private:

    enum {MAX_MODULES = 100};
    static LoadedLibraryModule tab[MAX_MODULES];
    static int num_loaded;

  public:

    // rebuild the internal table of LoadedLibraryModule objects
    static void reload();

    // checks whether the address p points to any of the loaded code segments.
    // If it does, returns the LoadedLibraryModule entry. If not, returns NULL.
    static const LoadedLibraryModule* find_for_text_address(const  unsigned char* p);

    // checks whether the address p points to any of the loaded data segments.
    // If it does, returns the LoadedLibraryModule entry. If not, returns NULL.
    static const LoadedLibraryModule* find_for_data_address(const  unsigned char* p);

    // output debug info
    static void print(outputStream* os);

}; // end LoadedLibraries


#endif // OS_AIX_VM_LOADLIB_AIX_HPP