source: bootcd/isolinux/syslinux-6.03/com32/hdt/hdt-dump-memory.c

/* ----------------------------------------------------------------------- *
 *
 *   Copyright 2011 Erwan Velu - All Rights Reserved
 *
 *   Permission is hereby granted, free of charge, to any person
 *   obtaining a copy of this software and associated documentation
 *   files (the "Software"), to deal in the Software without
 *   restriction, including without limitation the rights to use,
 *   copy, modify, merge, publish, distribute, sublicense, and/or
 *   sell copies of the Software, and to permit persons to whom
 *   the Software is furnished to do so, subject to the following
 *   conditions:
 *
 *   The above copyright notice and this permission notice shall
 *   be included in all copies or substantial portions of the Software.
 *
 *   THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
 *   EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
 *   OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 *   NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
 *   HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
 *   WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
 *   FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 *   OTHER DEALINGS IN THE SOFTWARE.
 *
 * -----------------------------------------------------------------------
 */

#include <memory.h>
#include "hdt-common.h"
#include "hdt-dump.h"

void dump_88(struct s_hardware *hardware, ZZJSON_CONFIG *config, ZZJSON **item) {

        (void) hardware;
        int mem_size = 0;
        CREATE_NEW_OBJECT;
        if (detect_memory_88(&mem_size)) {
                add_s("memory.error","8800h memory configuration is invalid");
                FLUSH_OBJECT
                return;
        }

        add_s("dmi.item","memory via 88");
        add_i("memory.size (KiB)", mem_size);
        add_i("memory.size (MiB)", mem_size >> 10);
        FLUSH_OBJECT;
}

void dump_e801(struct s_hardware *hardware, ZZJSON_CONFIG *config, ZZJSON **item) {

        (void) hardware;
        int mem_low, mem_high = 0;
        CREATE_NEW_OBJECT;
        if (detect_memory_e801(&mem_low,&mem_high)) {
                add_s("memory.error","e801 memory configuration is invalid");
                FLUSH_OBJECT;
                return;
        }

        add_s("dmi.item","memory via e801");
        add_i("memory.total.size (KiB)", mem_low + (mem_high << 6));
        add_i("memory.total.size (MiB)", (mem_low >> 10) + (mem_high >> 4));
        add_i("memory.low.size (KiB)", mem_low );
        add_i("memory.low.size (MiB)", mem_low >> 10);
        add_i("memory.high.size (KiB)", mem_high << 6);
        add_i("memory.high.size (MiB)", mem_high >> 4);
        FLUSH_OBJECT;

}
void dump_e820(struct s_hardware *hardware, ZZJSON_CONFIG *config, ZZJSON **item) {
    
        (void) hardware;
        struct e820entry map[E820MAX];
        struct e820entry nm[E820MAX];
        unsigned long memsize = 0;
        int count = 0;
        char type[14] = {0};
        
        detect_memory_e820(map, E820MAX, &count);
        memsize = memsize_e820(map, count);
        
        CREATE_NEW_OBJECT;
                add_s("dmi.item","memory via e820");
                add_i("memory.total.size (KiB)", memsize);
                add_i("memory.total.size (MiB)", (memsize + (1 << 9)) >> 10);
        FLUSH_OBJECT;

        for (int i = 0; i < count; i++) {
                get_type(map[i].type, type, sizeof(type));
                char begin[24]={0};
                char size[24]={0};
                char end[24]={0};
                snprintf(begin,sizeof(begin),"0x%016llx",map[i].addr);
                snprintf(size,sizeof(size),"0x%016llx",map[i].size);
                snprintf(end,sizeof(end),"0x%016llx",map[i].addr+map[i].size);
                CREATE_NEW_OBJECT;
                        add_s("memory.segment.start",begin);
                        add_s("memory.segment.size ",size);
                        add_s("memory.segment.end  ",end);
                        add_s("memory.segment.type ",remove_spaces(type));
                FLUSH_OBJECT;
        }

        int nr = sanitize_e820_map(map, nm, count);
        for (int i = 0; i < nr; i++) {
                get_type(nm[i].type, type, sizeof(type));
                char begin[24]={0};
                char size[24]={0};
                char end[24]={0};
                snprintf(begin,sizeof(begin),"0x%016llx",nm[i].addr);
                snprintf(size,sizeof(size),"0x%016llx",nm[i].size);
                snprintf(end,sizeof(end),"0x%016llx",nm[i].addr+nm[i].size);
                CREATE_NEW_OBJECT;
                        add_s("sanitized_memory.segment.start",begin);
                        add_s("sanitized_memory.segment.size ",size);
                        add_s("sanitized_memory.segment.end  ",end);
                        add_s("sanitized_memory.segment.type ",remove_spaces(type));
                FLUSH_OBJECT;
        }
}

void dump_memory(struct s_hardware *hardware, ZZJSON_CONFIG *config, ZZJSON **item) {

        CREATE_NEW_OBJECT;
                add_s("Memory configuration","true");
        FLUSH_OBJECT;

        dump_88(hardware,config,item);
        dump_e801(hardware,config,item);
        dump_e820(hardware,config,item);
        to_cpio("memory");
}