Exemple #1
0
/*--------------------------------------------------------------------
 * remove_annote
 *
 */
static void
do_remove_annote(const event &, void *)
{
  vnode *vn = vman->get_selection();

  if (vn &&
     ((SuifObject*)vn->get_object())->isKindOf(Annote::get_class_name())) {
    Annote *ann = (Annote *) vn->get_object();
    AnnotableObject *parent = (AnnotableObject*) ann->get_parent();
    ProcedureDefinition *proc = get_procedure_definition( ann );
    parent->remove_annote(ann);


    delete vn;
    delete ann;

    /* post event, notifying that the object has been modified */

    if ( proc ) {
      vnode *p = create_vnode(proc);
      post_event(event(p, PROC_MODIFIED, 0));
    } else {
      FileBlock *fb = get_file_block( parent );
      if (fb) {
        post_event(event(  create_vnode(fb), FSE_MODIFIED, 0));
      } else {
        assert(false);		// this should not happen..
      }
    }
  } else {
    display_message(0, "No annote selected. Please select an annote first.");
    return;
  }
}
Exemple #2
0
/*--------------------------------------------------------------------
 * output_viewer::view
 *
 * view a SuifObject
 */
void
output_viewer::view( SuifObject* tn, bool select)
{
  if (!tn) return;

  if (tn->isKindOf(ProcedureSymbol::get_class_name()))
      tn = get_procedure_definition( tn );

  if (!tn) return;

  FileBlock *fb = get_file_block( tn );
  if ( fb ) view( fb );

  if ( !outtree ) return;

  code_fragment* f = outtree->lookup(tn);

  if ( f ) {
    text->view(f->first_line(), 0);
    text->select_clear();

    if ( select ) {
      f->select_code_fragments( text, true );
    }
#ifdef AG

    if (select) {
      vnode *vn = vman->find_vnode(f);
      text->select(vn);
    }
#endif
  }

}
Exemple #3
0
static int addlink(struct filesys *fs, struct inode *target, struct inode *node, const char *name)
{
	struct dir_entry ent, *data;
	int i, boffs, bidx, len;

	if(!(target->mode & S_IFDIR)) {
		return -ENOTDIR;
	}
	if(node->mode & S_IFDIR) {
		return -EPERM;
	}
	/* TODO check that the link does not already exist (EEXIST) */

	if((len = strlen(name)) > NAME_MAX) {
		return -ENAMETOOLONG;
	}
	ent.ino = node->ino;
	memcpy(ent.name, name, len + 1);

	/* find a place to put it */
	if(!(data = malloc(BLKSZ))) {
		return -ENOMEM;
	}

	boffs = 0;
	while((bidx = get_file_block(fs, target, boffs)) > 0) {
		/* read the block, and search for an empty entry */
		blk_read(fs->bdev, bidx, 1, data);

		/* for all directory entries in this block... */
		for(i=0; i<BLK_DIRENT; i++) {
			if(data[i].ino == 0) {
				/* found empty */
				memcpy(data + i, &ent, sizeof ent);
				goto success;
			}
		}
		boffs++;
	}

	/* didn't find any free entries amongst our blocks, allocate a new one */
	if(!(bidx = alloc_file_block(fs, target, boffs))) {
		free(data);
		return -ENOSPC;
	}
	/* zero-fill the new block and add the first entry */
	memset(data, 0, BLKSZ);
	*data = ent;

success:
	/* write to disk */
	blk_write(fs->bdev, bidx, 1, data);
	node->nlink++;	/* increase reference count */

	free(data);
	return 0;
}
Exemple #4
0
void read_file_block(diskfs_sb_t *sb,
                     diskfs_inode_t *inode,
                     diskfs_blk_t blk_off,
                     void *buf) {

    diskfs_blk_t blk = get_file_block(sb, inode, blk_off);
    if (!blk) {
        int32_t i;
        for(i = 0; i < sb->block_size; i++)
            ((uint8_t *) buf)[i] = 0;
    } else {
        read_cluster(sb, blk, buf);
    }
}
Exemple #5
0
/*--------------------------------------------------------------------
 * src_viewer::view
 *
 * view a tree node
 */
void src_viewer::view( SuifObject* tn, bool select ) {
  if ( !tn ) return;

  ProcedureDefinition* pdef = get_procedure_definition( tn );

  if ( !pdef ) return; 

  String file;
  int line = find_source_line( tn, file ).c_int();
  (void) line;
  
  FileBlock* fb = get_file_block( pdef );
  
  view( fb, file );
  
  /* is there a source file ? */
  if ( !stree ) return;

  /* look up tree node */
  code_fragment* f = stree->lookup( tn );
  if ( f ) {
    vnode* vn = vman->find_vnode( f );
    text->view( f->first_line(), 0 );
    if ( select ) {
      text->select( vn );
    }
  } else {
    String file;
    int line = find_source_line( tn, file ).c_int();
    if ( line ) {
      text->view( line, 0);
      if ( select ) {
	      text->select_line( line );
      }
    }
  }
}