some uses of whatitem().
/* procedures using/returning this struct */
-extern struct ichrstr *whatitem(s_char *ptr, s_char *prompt);
+extern struct ichrstr *whatitem(char *, char *);
+extern struct ichrstr *item_by_name(char *);
#endif /* _ITEM_H_ */
type = EF_PLANE;
else if (!strncmp(p, "land", 4))
type = EF_LAND;
- else if (NULL != (ich = whatitem(p, (s_char *)0)))
+ else if (NULL != (ich = item_by_name(p)))
type = EF_SECTOR;
else {
- pr("Bad commodity.\n");
+ pr("Can't load '%s'\n", p);
return RET_SYN;
}
type = EF_PLANE;
else if (!strncmp(p, "land", 4))
type = EF_LAND;
- else if (NULL != (ich = whatitem(p, (s_char *)0)))
+ else if (NULL != (ich = item_by_name(p)))
type = EF_SECTOR;
else {
- pr("Bad commodity.\n");
+ pr("Can't load '%s'\n", p);
return RET_SYN;
}
if (!strncmp(p, "land", 4))
type = EF_LAND;
- else if (NULL != (ip = whatitem(p, (s_char *)0)))
+ else if (NULL != (ip = item_by_name(p)))
type = EF_SECTOR;
else {
- pr("Bad commodity.\n");
+ pr("Can't tend '%s'\n", p);
return RET_SYN;
}
#include "item.h"
#include "prototypes.h"
+/*
+ * Get item type argument.
+ * If INPUT is not empty, use it, else prompt for more input using PROMPT.
+ * Return item characteristics on success, else NULL.
+ */
struct ichrstr *
-whatitem(s_char *ptr, s_char *prompt)
+whatitem(char *input, char *prompt)
{
- register s_char *p;
- register struct ichrstr *ip;
- s_char buf[1024];
+ char *p;
+ struct ichrstr *ip;
+ char buf[1024];
- p = getstarg(ptr, prompt, buf);
+ p = getstarg(input, prompt, buf);
if (p == 0 || *p == 0)
return 0;
+ ip = item_by_name(p);
+ if (!ip)
+ pr("Unrecognized item \"%c\"\n", *p);
+ return ip;
+}
+
+/*
+ * Map item type name STR to item characteristics, NULL if not found.
+ */
+struct ichrstr *
+item_by_name(char *str)
+{
+ struct ichrstr *ip;
+
for (ip = &ichr[1]; ip->i_mnem != 0; ip++) {
- if (*p == ip->i_mnem)
+ /* FIXME check i_name if str[2]? */
+ if (*str == ip->i_mnem)
return ip;
}
- pr("Unrecognized item \"%c\"\n", *p);
return 0;
}