*** empty log message ***

[h316.git] / pc-tools / ldc2 / src / data_block.cpp

#include <stdlib.h>
#include <string.h>

#include "data_block.hh"
#include "data_block_0.hh"

#include <stdio.h>

using namespace std;

/*!
 *\brief Specialisation constructor.
 */
data_block::data_block(tape_block& org)
  :tape_block(org)
{}

/*!
 *\brief Determine block type.
 *\return the block type extracted from the block's data.
 */
int data_block::get_type(){
  if ((init_state==TBS_OK)&&word_data)
    return (word_data[0]&0xf000)>>12;
  else
 return block_type;
}

/*!
 *\brief Get the block's size in 16 bit words.
 *\return The block's 16-bit data buffer's size including
 *         header and checksum.
 */
int data_block::get_word_size(){
  return word_size;
}

/*!
 *\brief Describe the block.
 *\return A vector of text lines describing this block.
 */
vector<string> data_block::get_description(){
  vector<string> result;
  string r_string="*****      "+get_typestring()+"Untyped data block, this \
 is an illegal condition!";
  result.insert(result.end(),r_string);
  return result;
}

/*!
 *\brief Determine if the block marks the end of an object
 *\retval true The block marks the end of an object.
 *\retval false The block does not mark the end of an object.
 */
bool data_block::get_obj_end(){
  return false;
}

/*!
 *\brief Extract 6 byte symbol name from word memory.
 *
 *\param  firstbyte the first byte of the desired symbol name
 *\return a string containing the symbol name. 
 *        Trailing spaces are included.
 *\note The word_data is handled system-intependently big endian!
 */
string data_block::extract_label(int firstbyte){
  string result="";  // Start with empty string
  
  // We don't accept negative arguments!
  if (firstbyte<0) return result; 
  
  // We also don't want segmentation faults!
  if (word_size<(firstbyte/2+1)) return result; 
 
  // Here we pick out the characters.
  for (int posi=firstbyte;posi<firstbyte+6;posi++)
    result+=(word_data[posi/2]>>(8*(1-posi%2)))&0x7f;
  return result;
}