/*
* Copyright (c) 2009 Nokia Corporation and/or its subsidiary(-ies).
* All rights reserved.
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU Lesser General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program 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 Lesser General Public License for more details.
* 
* You should have received a copy of the GNU Lesser General Public License
* along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/

#include <iostream>
#include "dwarfmanager.h"
#include "inputfile.h"

const string DwarfArangesManager::iArangesSectionName(".debug_aranges");

void DwarfArangesManager::ProcessSection(FileShdrPair & aPair, Dwarf_Byte_Ptr start, Dwarf_Byte_Ptr end){
	while (start < end){
		Dwarf_Byte_Ptr data = start;		
		size_t offset_size, initial_length_size;
		
		Dwarf_Word length = READ_UNALIGNED4(data); 
		data += 4;

		if (length >= 0xfffffff0u) {
			cerr << "Error: 64 bit DWARF not supported\n";
			exit(EXIT_FAILURE);
		} else {	
			offset_size = 4;
			initial_length_size = 4;
		}
		
		start += length + initial_length_size;

		Dwarf_Half version = READ_UNALIGNED2(data);
		data += 2;

		Dwarf_Word offset = GetValue(data, offset_size); 
		Dwarf_Word newOffset = CheckNewOffset(iDwarfInfoManager.GetSectionOffset(aPair.iXIPFileDetails.iElfFile), offset);
		if (offset != newOffset)
			WriteValue(data, offset, offset_size);
		data += offset_size;


		size_t pointer_size = *data++;

		size_t segment_size = *data++;
		
		if (version != 2 && version != 3){
			static bool warned = false;
			if (!warned){
				cerr << "Only DWARF 2 and 3 aranges are currently supported\n";
				warned = true;
			}
			continue;
		}

		size_t address_size = pointer_size + segment_size;

		if (address_size > 4){
			static bool warned2 = false;
			if (!warned2){
				cerr << "64 bit DWARF not currently supported\n";
				warned2 = true;
			}
			continue;		
		}

		Dwarf_Byte_Ptr ranges = data;

		/* Must pad to an alignment boundary that is twice the address size.  */
		size_t excess = (data - start) % (2 * address_size);
		if (excess)
			ranges += (2 * address_size) - excess;

		while (ranges + 2 * address_size <= start){
			LinearAddr addr = GetValue(ranges, address_size);
			LinearAddr relocatedAddress = aPair.iXIPFileDetails.Relocate(addr);
			if (addr != relocatedAddress)
				WriteValue(ranges, relocatedAddress, address_size);
			ranges += address_size;
			// skip length field
			ranges += address_size;
		}
	}
}