开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 编译器/解释器 > 查看源码
sync.c
资源名称：nasm-0.98.zip　[点击查看]
上传用户：yuppie_zhu
上传日期：2007-01-08
资源大小：535k
文件大小：3k
源码类别：

编译器/解释器

开发平台：

C/C++

sync.c：源码内容
  1. /* sync.c   the Netwide Disassembler synchronisation processing module
  2.  *
  3.  * The Netwide Assembler is copyright (C) 1996 Simon Tatham and
  4.  * Julian Hall. All rights reserved. The software is
  5.  * redistributable under the licence given in the file "Licence"
  6.  * distributed in the NASM archive.
  7.  */
  9. #include <stdio.h>
  10. #include <stdlib.h>
  11. #include <limits.h>
  13. #include "sync.h"
  15. #define SYNC_MAX 4096        /* max # of sync points */
  17. /*
  18.  * This lot manages the current set of sync points by means of a
  19.  * heap (priority queue) structure.
  20.  */
  22. static struct Sync {
  23.     unsigned long pos;
  24.     unsigned long length;
  25. } *synx;
  26. static int nsynx;
  28. void init_sync(void) 
  29. {
  30.     /*
  31.      * I'd like to allocate an array of size SYNC_MAX, then write
  32.      * `synx--' which would allow numbering the array from one
  33.      * instead of zero without wasting memory. Sadly I don't trust
  34.      * this to work in 16-bit Large model, so it's staying the way
  35.      * it is. Btw, we don't care about freeing this array, since it
  36.      * has to last for the duration of the program and will then be
  37.      * auto-freed on exit. And I'm lazy ;-)
  38.      * 
  39.      * Speaking of 16-bit Large model, that's also the reason I'm
  40.      * not declaring this array statically - by doing it
  41.      * dynamically I avoid problems with the total size of DGROUP
  42.      * in Borland C.
  43.      */
  44.     synx = malloc((SYNC_MAX+1) * sizeof(*synx));
  45.     if (!synx) {
  46. fprintf(stderr, "ndisasm: not enough memory for sync arrayn");
  47. exit(1);
  48.     }
  49.     nsynx = 0;
  50. }
  52. void add_sync(unsigned long pos, unsigned long length) 
  53. {
  54.     int i;
  56.     if (nsynx == SYNC_MAX)
  57. return;        /* can't do anything - overflow */
  59.     nsynx++;
  60.     synx[nsynx].pos = pos;
  61.     synx[nsynx].length = length;
  63.     for (i = nsynx; i > 1; i /= 2) {
  64. if (synx[i/2].pos > synx[i].pos) {
  65.     struct Sync t;
  66.     t = synx[i/2];        /* structure copy */
  67.     synx[i/2] = synx[i];       /* structure copy again */
  68.     synx[i] = t;        /* another structure copy */
  69. }
  70.     }
  71. }
  73. unsigned long next_sync(unsigned long position, unsigned long *length) 
  74. {
  75.     while (nsynx > 0 && synx[1].pos + synx[1].length <= position) {
  76. int i, j;
  77. struct Sync t;
  78. t = synx[nsynx];        /* structure copy */
  79. synx[nsynx] = synx[1];        /* structure copy */
  80. synx[1] = t;        /* ditto */
  82. nsynx--;
  84.         i = 1;
  85. while (i*2 <= nsynx) {
  86.     j = i*2;
  87.     if (synx[j].pos < synx[i].pos &&
  88. (j+1 > nsynx || synx[j+1].pos > synx[j].pos)) {
  89. t = synx[j];        /* structure copy */
  90. synx[j] = synx[i];     /* lots of these... */
  91. synx[i] = t;        /* ...aren't there? */
  92. i = j;
  93.     } else if (j+1 <= nsynx && synx[j+1].pos < synx[i].pos) {
  94. t = synx[j+1];        /* structure copy */
  95. synx[j+1] = synx[i];   /* structure <yawn> copy */
  96. synx[i] = t;        /* structure copy <zzzz....> */
  97. i = j+1;
  98.     } else
  99. break;
  100. }
  101.     }
  103.     if (nsynx > 0) {
  104. if (length)
  105.     *length = synx[1].length;
  106. return synx[1].pos;
  107.     } else {
  108. if (length)
  109.     *length = 0L;
  110. return ULONG_MAX;
  111.     }
  112. }