Colony

    double* pts = (double*) malloc((argc) * sizeof(double) * 2);

    pts = va_arg(ap,double*);

	p->pts[i].x = pts[2*i];

	p->pts[i].y = pts[2*i+1];

int starts_with (const char* line, const char* word) {

  do {

    line++;

    word++;

  }while (*line == *word);

  if (*word == '\n' || *word == '\0') return 0;

  return 1;

}

int load_object (const char* line) {

  char buf[BUF_SIZE];

  int i = 0;

  int j;

  int id;

  if (starts_with(line,"POLYGON") == 0){

    int num;

    int type;

    double *pts;

    id = ID_POLY;

    i = strlen("POLYGON")+1;

    sscanf(line+i,"%s",buf);

    num = strtol(buf,NULL,0);

    i += strlen(buf) + 1;

    if (starts_with(line+i,"CONNECTED") == 0){

      i += strlen("CONNECTED") + 1;

      type = POLY_CONNECTED;

    }else if (starts_with(line+i,"DISCONNECTED") == 0){

      i += strlen("DISCONNECTED") + 1;

      type = POLY_DISCONNECTED;

    }else if (starts_with(line+i,"RECT") == 0){

      i += strlen("RECT") + 1;

      type = POLY_RECT;

    }else{

      // invalid input

	fprintf(stderr,"Invalid input for POLYGON\n");

      return -1;

    }

    char *c1,*c2;

    c1 = (char*)(line+i);

    c2 = (char*)(line+i);

    pts = (double*) malloc(sizeof(double)*num*2);

    for (j = 0;j < num;j++){

      pts[2*j] = strtod(c1,&c2);

      pts[2*j+1] = strtod(c2,&c1);

      printf("%lf %lf\n",pts[2*j],pts[2*j+1]);

    }

    create(id,num,type,pts);

    free(pts);

  }

  return 0;

}

int load_world (const char* filename) {

  FILE* fin;

  char buf[BUF_SIZE];

  bbox_t bbox = {0,0,0,0};

  if ((fin = fopen(filename,"r"))==NULL){

    // open file failed

	perror("Fail to open file");

    return -1;

  }

  if (fgets(buf,512,fin) != NULL){

    sscanf(buf,"WORLD %lf %lf %lf %lf",&bbox.p1.x,&bbox.p1.y,&bbox.p2.x,&bbox.p2.y);

    init_world(MAX_OBJS, bbox);

    while (fgets(buf,512,fin) != NULL){

      load_object(buf);

    }

  }

  fclose(fin);

  return 0;

}