Esempio n. 1
0
static void
emit_enum(definition * def)
{
    print_ifopen(1, "enum");
    print_ifarg("(enum_t *)objp");
    print_ifclose(1);
}
Esempio n. 2
0
static void
print_ifstat(int indent, const char *prefix, const char *type, relation rel,
    const char *amax, const char *objname, const char *name)
{
	const char *alt = NULL;
	int brace = 0;

	switch (rel) {
	case REL_POINTER:
		brace = 1;
		f_print(fout, "\t{\n");
		f_print(fout, "\t%s **pp = %s;\n", type, objname);
		print_ifopen(indent, "pointer");
		print_ifarg("(char **)");
		f_print(fout, "pp");
		print_ifsizeof(0, prefix, type);
		break;
	case REL_VECTOR:
		if (streq(type, "string"))
			alt = "string";
		else if (streq(type, "opaque"))
			alt = "opaque";

		if (alt) {
			print_ifopen(indent, alt);
			print_ifarg(objname);
		} else {
			print_ifopen(indent, "vector");
			print_ifarg("(char *)");
			f_print(fout, "%s", objname);
		}
		print_ifarg(amax);
		if (!alt)
			print_ifsizeof(indent + 1, prefix, type);
		break;
	case REL_ARRAY:
		if (streq(type, "string"))
			alt = "string";
		else if (streq(type, "opaque"))
			alt = "bytes";

		if (streq(type, "string")) {
			print_ifopen(indent, alt);
			print_ifarg(objname);
		} else {
			if (alt)
				print_ifopen(indent, alt);
			else
				print_ifopen(indent, "array");
			print_ifarg("(char **)");
			if (*objname == '&') {
				f_print(fout, "%s.%s_val, (u_int *) %s.%s_len",
					objname, name, objname, name);
			} else {
				f_print(fout,
					"&%s->%s_val, (u_int *) &%s->%s_len",
					objname, name, objname, name);
			}
		}
		print_ifarg(amax);
		if (!alt)
			print_ifsizeof(indent + 1, prefix, type);
		break;
	case REL_ALIAS:
		print_ifopen(indent, type);
		print_ifarg(objname);
		break;
	}
	print_ifclose(indent, brace);
}
Esempio n. 3
0
static void
print_ifstat(int indent, char *prefix, char *type, relation rel, char *amax,
	     char *objname, char *name)
{
    char *alt = NULL;
    char *altcast = NULL;

    switch (rel) {
    case REL_POINTER:
	print_ifopen(indent, "pointer");
	print_ifarg_with_cast(1, "char *", objname);
	print_ifsizeof(prefix, type);
	break;
    case REL_VECTOR:
	if (streq(type, "string")) {
	    alt = "string";
	} else if (streq(type, "opaque")) {
	    alt = "opaque";
            altcast = "caddr_t";
	}
	if (alt) {
	    print_ifopen(indent, alt);
            if (altcast) {
                print_ifarg_with_cast(0, altcast, objname);
            } else {
                print_ifarg(objname);
            }
	} else {
	    print_ifopen(indent, "vector");
	    print_ifarg_with_cast(1, "char", objname);
	}
	print_ifarg(amax);
	if (!alt) {
	    print_ifsizeof(prefix, type);
	}
	break;
    case REL_ARRAY:
	if (streq(type, "string")) {
	    alt = "string";
	} else if (streq(type, "opaque")) {
	    alt = "bytes";
	}
	if (streq(type, "string")) {
	    print_ifopen(indent, alt);
	    print_ifarg(objname);
	} else {
	    if (alt) {
		print_ifopen(indent, alt);
                print_ifarg("(char **)");
	    } else {
		print_ifopen(indent, "array");
                print_ifarg("(caddr_t *)");
	    }
	    if (*objname == '&') {
		f_print(fout, "%s.%s_val, (u_int *)%s.%s_len", objname, name,
			objname, name);
	    } else {
		f_print(fout, "&%s->%s_val, (u_int *)&%s->%s_len", objname,
			name, objname, name);
	    }
	}
	print_ifarg(amax);
	if (!alt) {
	    print_ifsizeof(prefix, type);
	}
	break;
    case REL_ALIAS:
	print_ifopen(indent, type);
        print_ifarg_with_cast(1, type, objname);
	break;
    }
    print_ifclose(indent);
}
static void
print_ifstat (int indent, char *prefix, char *type, relation rel, char *amax, char *objname, char *name)
{
  char *alt = NULL;

  switch (rel) {
  case REL_POINTER:
    print_ifopen (indent, "pointer");
    print_ifarg ("(char **)");
    f_print (fout, "%s", objname);
    print_ifsizeof (prefix, type);
    break;
  case REL_VECTOR:
    if (streq (type, "string")) {
      alt = "string";
    }
    else if (streq (type, "opaque")) {
      alt = "opaque";
    }
    if (alt) {
      print_ifopen (indent, alt);
      print_ifarg (objname);
    }
    else {
      print_ifopen (indent, "vector");
      print_ifarg ("(char *)");
      f_print (fout, "%s", objname);
    }
    print_ifarg (amax);
    if (!alt) {
      print_ifsizeof (prefix, type);
    }
    break;
  case REL_ARRAY:
    if (streq (type, "string")) {
      alt = "string";
    }
    else if (streq (type, "opaque")) {
      alt = "bytes";
    }
    if (streq (type, "string")) {
      print_ifopen (indent, alt);
      print_ifarg (objname);
    }
    else {
      if (alt) {
	print_ifopen (indent, alt);
      }
      else {
	print_ifopen (indent, "array");
      }
      print_ifarg ("(char **)");
#if 0
      if (*objname == '&') {
	f_print (fout, "%s.%s_val, (u_int *)%s.%s_len",
		 objname, name, objname, name);
      }
      else {
	f_print (fout, "&%s->%s_val, (u_int *)&%s->%s_len",
		 objname, name, objname, name);
      }
#else
      if (*objname == '&') {
	/* Don't know what this does but it seems broken */
	f_print (fout, "%s.val, (u_int *)%s.len",
		 objname, objname);
      }
      else {
	f_print (fout, "&%s->val, (u_int *)&%s->len",
		 objname, objname);
      }
#endif
    }
    print_ifarg (amax);
    if (!alt) {
      print_ifsizeof (prefix, type);
    }
    break;
  case REL_ALIAS:
    print_ifopen (indent, type);
    print_ifarg (objname);
    break;
  }
  print_ifclose (indent);
}