Add a modrinth user command - tiny-potato-bot - A useful bot for all things modded Minecraft. And lots of silliness.

about summary refs log tree commit diff stats

diff options

author	redcreeper14385 <mounderfod@gmail.com>	2021-08-31 17:35:49 +0100
committer	redcreeper14385 <mounderfod@gmail.com>	2021-08-31 17:35:49 +0100
commit	182580c3429d93e0d421bcfe32bc391842c946d5 (patch)
tree	8c28f85e6687f9fa82018e804ffca70c0e94ad24 /cogs/fun.py
parent	215869f6d3c43ba7ebffb4735a9dfaaa69358adc (diff)
download	tiny-potato-bot-182580c3429d93e0d421bcfe32bc391842c946d5.tar.gz

Add a modrinth user command

Diffstat (limited to 'cogs/fun.py')

0 files changed, 0 insertions, 0 deletions

c1'>^

363be37f ^

36594a43 ^

e26495c5 ^

8c9e97ae ^

cc3b58b6 ^

363be37f ^

a5840f21 ^

363be37f ^

08cf048f ^

a316f1e4 ^

08cf048f ^

fe263c52 ^

66abe7c1 ^

fe263c52 ^

1ead3562 ^

1625e908 ^

14274372 ^

1ead3562 ^

a0b9fa55 ^

1625e908 ^

a0b9fa55 ^

ad8e984f ^

fe263c52 ^

ad8e984f ^

1b76245c ^

ad8e984f ^

fe263c52 ^

781f2462 ^

36594a43 ^

1625e908 ^

b24eb476 ^

df40cb6e ^

66abe7c1 ^

712b442f ^

3c93ddcb ^

50e0065e ^

df40cb6e ^

1b76245c ^

c442a5ad ^

c4e143d6 ^

2caaa7f1 ^

795f5244 ^

c442a5ad ^

a0b9fa55 ^

1b76245c ^

795f5244 ^

14274372 ^

70f70118 ^

50e0065e ^

8f0a9149 ^

795f5244 ^

14274372 ^

70f70118 ^

f5dfb7f7 ^

3c93ddcb ^

66b97b4d ^

9dcbec39 ^

3c93ddcb ^

36594a43 ^

8d72e565 ^

70f70118 ^

c442a5ad ^

8d72e565 ^

36594a43 ^

0a2026a6 ^

08cf048f ^

66abe7c1 ^

0a2026a6 ^

36594a43 ^

08cf048f ^

1f7e3c05 ^

08cf048f ^

66abe7c1 ^

0a2026a6 ^

0a2026a6 ^

66abe7c1 ^

36594a43 ^

1f7e3c05 ^

36594a43 ^

0a2026a6 ^

c4e143d6 ^

781f2462 ^

781f2462 ^

d3c120c1 ^

36594a43 ^

05d17773 ^

c442a5ad ^

08cf048f ^

66abe7c1 ^

0a2026a6 ^

36594a43 ^

6c96a437 ^

36594a43 ^

36594a43 ^

35064671 ^

1b76245c ^

35064671 ^

95f2fe96 ^

49620728 ^

36594a43 ^

6c96a437 ^

36594a43 ^

36594a43 ^

c442a5ad ^

6c96a437 ^

c442a5ad ^

6c96a437 ^

c442a5ad ^

08cf048f ^

1b76245c ^

0a2026a6 ^

95f2fe96 ^

0a2026a6 ^

36594a43 ^

7d07cd1d ^

36594a43 ^

3c93ddcb ^

8619c618 ^

36594a43 ^

1f7e3c05 ^

d7314554 ^

d3c120c1 ^

07c594eb ^

4b424bb2 ^

d3c120c1 ^

d7314554 ^

36594a43 ^

5f05e954 ^

536a22c1 ^

5f05e954 ^

536a22c1 ^

36594a43 ^

08cf048f ^

36594a43 ^

536a22c1 ^

36594a43 ^

a316f1e4 ^

08cf048f ^

a316f1e4 ^

1f7e3c05 ^

a316f1e4 ^

7232de70 ^

36594a43 ^

3c93ddcb ^

100157d1 ^

08cf048f ^

100157d1 ^

08cf048f ^

100157d1 ^

4a943d4e ^

076f39b8 ^

076f39b8 ^

14274372 ^

4a943d4e ^

faf521d9 ^

ee6a21ce ^

ec99eb7a ^

ee6a21ce ^

4a943d4e ^

ee6a21ce ^

ee6a21ce ^

23
24

38
39

43
44

52
53

57
58

71
72
73

84
85

92
93

106
107

108
109

114
115

135
136
137

144
145
146

149
150

157
158

165
166

169
170

174
175

187
188

189
190
191

192
193

198
199

214
215

219
220

222
223

240
241
242

//: Phase 1 of running Mu code: load it from a textual representation.
//:
//: The process of running Mu code:
//:   load -> transform -> run

void test_first_recipe() {
  load(
      "def main [\n"
      "  1:number <- copy 23\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\"}\n"
      "parse:   product: {1: \"number\"}\n"
  );
}

vector<recipe_ordinal> load(string form) {
  istringstream in(form);
  in >> std::noskipws;
  return load(in);
}

vector<recipe_ordinal> load(istream& in) {
  in >> std::noskipws;
  vector<recipe_ordinal> result;
  while (has_data(in)) {
    skip_whitespace_and_comments(in);
    if (!has_data(in)) break;
    string command = next_word(in);
    if (command.empty()) {
      assert(!has_data(in));
      break;
    }
    // Command Handlers
    if (command == "recipe" || command == "def") {
      recipe_ordinal r = slurp_recipe(in);
      if (r > 0) result.push_back(r);
    }
    else if (command == "recipe!" || command == "def!") {
      Disable_redefine_checks = true;
      recipe_ordinal r = slurp_recipe(in);
      if (r > 0) result.push_back(r);
      Disable_redefine_checks = false;
    }
    // End Command Handlers
    else {
      raise << "unknown top-level command: " << command << '\n' << end();
    }
  }
  return result;
}

// return the recipe ordinal slurped, or -1 if it failed
int slurp_recipe(istream& in) {
  recipe result;
  result.name = next_word(in);
  if (result.name.empty()) {
    assert(!has_data(in));
    raise << "file ended with 'recipe'\n" << end();
    return -1;
  }
  // End Load Recipe Name
  skip_whitespace_but_not_newline(in);
  // End Recipe Refinements
  if (result.name.empty())
    raise << "empty result.name\n" << end();
  trace(101, "parse") << "--- defining " << result.name << end();
  if (!contains_key(Recipe_ordinal, result.name))
    put(Recipe_ordinal, result.name, Next_recipe_ordinal);
  result.ordinal = get(Recipe_ordinal, result.name);
  ++Next_recipe_ordinal;
  if (Recipe.find(get(Recipe_ordinal, result.name)) != Recipe.end()) {
    trace(101, "parse") << "already exists" << end();
    if (should_check_for_redefine(result.name))
      raise << "redefining recipe " << result.name << "\n" << end();
    Recipe.erase(get(Recipe_ordinal, result.name));
  }
  slurp_body(in, result);
  // End Recipe Body(result)
  put(Recipe, get(Recipe_ordinal, result.name), result);
  return get(Recipe_ordinal, result.name);
}

void slurp_body(istream& in, recipe& result) {
  in >> std::noskipws;
  skip_whitespace_but_not_newline(in);
  if (in.get() != '[')
    raise << result.name << ": recipe body must begin with '['\n" << end();
  skip_whitespace_and_comments(in);  // permit trailing comment after '['
  instruction curr;
  while (next_instruction(in, &curr)) {
    curr.original_string = to_original_string(curr);
    // End Rewrite Instruction(curr, recipe result)
    trace(102, "load") << "after rewriting: " << to_string(curr) << end();
    if (!curr.is_empty()) result.steps.push_back(curr);
  }
}

bool next_instruction(istream& in, instruction* curr) {
  curr->clear();
  skip_whitespace_and_comments(in);
  if (!has_data(in)) {
    raise << "incomplete recipe at end of file (0)\n" << end();
    return false;
  }

  vector<string> words;
  while (has_data(in) && in.peek() != '\n') {
    skip_whitespace_but_not_newline(in);
    if (!has_data(in)) {
      raise << "incomplete recipe at end of file (1)\n" << end();
      return false;
    }
    string word = next_word(in);
    if (word.empty()) {
      assert(!has_data(in));
      raise << "incomplete recipe at end of file (2)\n" << end();
      return false;
    }
    words.push_back(word);
    skip_whitespace_but_not_newline(in);
  }
  skip_whitespace_and_comments(in);
  if (SIZE(words) == 1 && words.at(0) == "]")
    return false;  // end of recipe

  if (SIZE(words) == 1 && is_label_word(words.at(0))) {
    curr->is_label = true;
    curr->label = words.at(0);
    trace(103, "parse") << "label: " << curr->label << end();
    if (!has_data(in)) {
      raise << "incomplete recipe at end of file (3)\n" << end();
      return false;
    }
    return true;
  }

  vector<string>::iterator p = words.begin();
  if (find(words.begin(), words.end(), "<-") != words.end()) {
    for (;  *p != "<-";  ++p)
      curr->products.push_back(reagent(*p));
    ++p;  // skip <-
  }

  if (p == words.end()) {
    raise << "instruction prematurely ended with '<-'\n" << end();
    return false;
  }
  curr->name = *p;  ++p;
  // curr->operation will be set at transform time

  for (;  p != words.end();  ++p)
    curr->ingredients.push_back(reagent(*p));

  trace(103, "parse") << "instruction: " << curr->name << end();
  trace(103, "parse") << "  number of ingredients: " << SIZE(curr->ingredients) << end();
  for (vector<reagent>::iterator p = curr->ingredients.begin();  p != curr->ingredients.end();  ++p)
    trace(103, "parse") << "  ingredient: " << to_string(*p) << end();
  for (vector<reagent>::iterator p = curr->products.begin();  p != curr->products.end();  ++p)
    trace(103, "parse") << "  product: " << to_string(*p) << end();
  if (!has_data(in)) {
    raise << "9: unbalanced '[' for recipe\n" << end();
    return false;
  }
  // End next_instruction(curr)
  return true;
}

// can return empty string -- only if 'in' has no more data
string next_word(istream& in) {
  skip_whitespace_but_not_newline(in);
  // End next_word Special-cases
  ostringstream out;
  slurp_word(in, out);
  skip_whitespace_and_comments_but_not_newline(in);
  string result = out.str();
  if (result != "[" && ends_with(result, '['))
    raise << "insert a space before '[' in '" << result << "'\n" << end();
  return result;
}

bool is_label_word(const string& word) {
  if (word.empty()) return false;  // error raised elsewhere
  return !isalnum(word.at(0)) && string("$_*@&,=-[]()").find(word.at(0)) == string::npos;
}

bool ends_with(const string& s, const char c) {
  if (s.empty()) return false;
  return *s.rbegin() == c;
}

:(before "End Globals")
// word boundaries
extern const string Terminators("(){}");
:(code)
void slurp_word(istream& in, ostream& out) {
  char c;
  if (has_data(in) && Terminators.find(in.peek()) != string::npos) {
    in >> c;
    out << c;
    return;
  }
  while (in >> c) {
    if (isspace(c) || Terminators.find(c) != string::npos || Ignore.find(c) != string::npos) {
      in.putback(c);
      break;
    }
    out << c;
  }
}

void skip_whitespace_and_comments(istream& in) {
  while (true) {
    if (!has_data(in)) break;
    if (isspace(in.peek())) in.get();
    else if (Ignore.find(in.peek()) != string::npos) in.get();
    else if (in.peek() == '#') skip_comment(in);
    else break;
  }
}

// confusing; move to the next line only to skip a comment, but never otherwise
void skip_whitespace_and_comments_but_not_newline(istream& in) {
  while (true) {
    if (!has_data(in)) break;
    if (in.peek() == '\n') break;
    if (isspace(in.peek())) in.get();
    else if (Ignore.find(in.peek()) != string::npos) in.get();
    else if (in.peek() == '#') skip_comment(in);
    else break;
  }
}

void skip_comment(istream& in) {
  if (has_data(in) && in.peek() == '#') {
    in.get();
    while (has_data(in) && in.peek() != '\n') in.get();
  }
}

void test_recipe_instead_of_def() {
  load(
      "recipe main [\n"
      "  1:number <- copy 23\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\"}\n"
      "parse:   product: {1: \"number\"}\n"
  );
}

void test_parse_comment_outside_recipe() {
  load(
      "# comment\n"
      "def main [\n"
      "  1:number <- copy 23\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\"}\n"
      "parse:   product: {1: \"number\"}\n"
  );
}

void test_parse_comment_amongst_instruction() {
  load(
      "def main [\n"
      "  # comment\n"
      "  1:number <- copy 23\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\"}\n"
      "parse:   product: {1: \"number\"}\n"
  );
}

void test_parse_comment_amongst_instruction_2() {
  load(
      "def main [\n"
      "  # comment\n"
      "  1:number <- copy 23\n"
      "  # comment\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\"}\n"
      "parse:   product: {1: \"number\"}\n"
  );
}

void test_parse_comment_amongst_instruction_3() {
  load(
      "def main [\n"
      "  1:number <- copy 23\n"
      "  # comment\n"
      "  2:number <- copy 23\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\"}\n"
      "parse:   product: {1: \"number\"}\n"
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\"}\n"
      "parse:   product: {2: \"number\"}\n"
  );
}

void test_parse_comment_after_instruction() {
  load(
      "def main [\n"
      "  1:number <- copy 23  # comment\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\"}\n"
      "parse:   product: {1: \"number\"}\n"
  );
}

void test_parse_label() {
  load(
      "def main [\n"
      "  +foo\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: label: +foo\n"
  );
}

void test_parse_dollar_as_recipe_name() {
  load(
      "def main [\n"
      "  $foo\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: $foo\n"
  );
}

void test_parse_multiple_properties() {
  load(
      "def main [\n"
      "  1:number <- copy 23/foo:bar:baz\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\", \"foo\": (\"bar\" \"baz\")}\n"
      "parse:   product: {1: \"number\"}\n"
  );
}

void test_parse_multiple_products() {
  load(
      "def main [\n"
      "  1:number, 2:number <- copy 23\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\"}\n"
      "parse:   product: {1: \"number\"}\n"
      "parse:   product: {2: \"number\"}\n"
  );
}

void test_parse_multiple_ingredients() {
  load(
      "def main [\n"
      "  1:number, 2:number <- copy 23, 4:number\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\"}\n"
      "parse:   ingredient: {4: \"number\"}\n"
      "parse:   product: {1: \"number\"}\n"
      "parse:   product: {2: \"number\"}\n"
  );
}

void test_parse_multiple_types() {
  load(
      "def main [\n"
      "  1:number, 2:address:number <- copy 23, 4:number\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse: instruction: copy\n"
      "parse:   ingredient: {23: \"literal\"}\n"
      "parse:   ingredient: {4: \"number\"}\n"
      "parse:   product: {1: \"number\"}\n"
      "parse:   product: {2: (\"address\" \"number\")}\n"
  );
}

void test_parse_properties() {
  load(
      "def main [\n"
      "  1:address:number/lookup <- copy 23\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "parse:   product: {1: (\"address\" \"number\"), \"lookup\": ()}\n"
  );
}

void test_parse_comment_terminated_by_eof() {
  load("recipe main [\n"
       "  a:number <- copy 34\n"
       "]\n"
       "# abc");  // no newline after comment
  cerr << ".";  // termination = success
}

void test_warn_on_missing_space_before_bracket() {
  Hide_errors = true;
  load(
      "def main[\n"
      "  1:number <- copy 23\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "error: insert a space before '[' in 'main['\n"
  );
}

//: Warn if a recipe gets redefined, because large codebases can accidentally
//: step on their own toes. But there'll be many occasions later where
//: we'll want to disable the errors.
:(before "End Globals")
bool Disable_redefine_checks = false;
:(before "End Reset")
Disable_redefine_checks = false;
:(code)
bool should_check_for_redefine(const string& recipe_name) {
  if (Disable_redefine_checks) return false;
  return true;
}

void test_forbid_redefining_recipes() {
  Hide_errors = true;
  load(
      "def main [\n"
      "  1:number <- copy 23\n"
      "]\n"
      "def main [\n"
      "  1:number <- copy 24\n"
      "]\n"
  );
  CHECK_TRACE_CONTENTS(
      "error: redefining recipe main\n"
  );
}

void test_permit_forcibly_redefining_recipes() {
  load(
      "def main [\n"
      "  1:number <- copy 23\n"
      "]\n"
      "def! main [\n"
      "  1:number <- copy 24\n"
      "]\n"
  );
  CHECK_TRACE_DOESNT_CONTAIN("error: redefining recipe main");
  CHECK_TRACE_COUNT("error", 0);
}

// for debugging
void show_rest_of_stream(istream& in) {
  cerr << '^';
  char c;
  while (in >> c)
    cerr << c;
  cerr << "$\n";
  exit(0);
}


context:
space:
mode: