static int cmd_hash(void *data, const char *input) { char algo[32]; RCore *core = (RCore *)data; ut32 osize = 0, len = core->blocksize; const char *ptr; int pos = 0, handled_cmd = R_FALSE; switch (*input) { case '\t': case ' ': return 0; case '#': if (!input[1]) { algolist (1); return R_TRUE; } case '!': return cmd_hash_bang (core, input); } ptr = strchr (input, ' '); sscanf (input, "%31s", algo); if (ptr && *(ptr+1) && r_num_is_valid_input (core->num, ptr+1)) { int nlen = r_num_math (core->num, ptr+1); if (nlen>0) len = nlen; osize = core->blocksize; if (nlen>core->blocksize) { r_core_block_size (core, nlen); if (nlen != core->blocksize) { eprintf ("Invalid block size\n"); r_core_block_size (core, osize); return R_TRUE; } } } else if (!ptr || !*(ptr+1)) osize = len; /* TODO: Simplify this spaguetti monster */ while (osize > 0 && HASH_HANDLERS[pos].name != NULL) { if (!r_str_ccmp (input, HASH_HANDLERS[pos].name, ' ')) { HASH_HANDLERS[pos].handler (core->block, len); handled_cmd = R_TRUE; break; } pos++; } if (!osize) { eprintf ("Error: provided size must be size > 0\n"); } if (*input == '?') { const char *helpmsg[] = { "Usage: #algo <size> @ addr", "", "", " #"," comment","note the space after the sharp sign", " ##","","List hash/checksum algorithms.", " #sha256", " 10K @ 33","calculate sha256 of 10K at 33", NULL }; const char *helpmsg2[] = { "Hashes:","","", NULL }; const char *helpmsg3[] = { "Usage #!interpreter [<args>] [<file] [<<eof]","","", " #!","","list all available interpreters", " #!python","","run python commandline", " #!python"," foo.py","run foo.py python script (same as '. foo.py')", //" #!python <<EOF get python code until 'EOF' mark\n" " #!python"," arg0 a1 <<q","set arg0 and arg1 and read until 'q'", NULL}; r_core_cmd_help (core, helpmsg); r_core_cmd_help (core, helpmsg2); algolist (0); r_core_cmd_help (core, helpmsg3); } if (osize) r_core_block_size (core, osize); return handled_cmd; }
static int cmd_hash(void *data, const char *input) { char *p, algo[32]; RCore *core = (RCore *)data; ut32 i, osize, len = core->blocksize; const char *ptr; if (input[0]==' ') return 0; if (input[0]=='#' && !input[1]) { algolist (1); return R_TRUE; } if (input[0]=='!') { const char *lang = input+1; if (*lang==' ') { RLangPlugin *p = r_lang_get_by_extension (core->lang, input+2); if (p && p->name) lang = p->name; } else if (input[1]=='?' || input[1]=='*' || input[1]=='\0') { r_lang_list (core->lang); return R_TRUE; } p = strchr (input, ' '); if (p) *p=0; // TODO: set argv here if (r_lang_use (core->lang, lang)) { r_lang_setup (core->lang); if (p) r_lang_run_file (core->lang, p+1); else r_lang_prompt (core->lang); } else eprintf ("Invalid hashbang. See '#!' for help.\n"); return R_TRUE; } ptr = strchr (input, ' '); sscanf (input, "%31s", algo); if (ptr != NULL) { int nlen = r_num_math (core->num, ptr+1); if (nlen>0) len = nlen; osize = core->blocksize; if (nlen>core->blocksize) { r_core_block_size (core, nlen); } } else osize =0; /* TODO: Simplify this spaguetti monster */ if (!r_str_ccmp (input, "md4", ' ')) { RHash *ctx = r_hash_new (R_TRUE, R_HASH_MD4); const ut8 *c = r_hash_do_md4 (ctx, core->block, len); for (i=0; i<R_HASH_SIZE_MD4; i++) r_cons_printf ("%02x", c[i]); r_cons_newline (); r_hash_free (ctx); } else if (!r_str_ccmp (input, "adler32", ' ')) { ut32 hn = r_hash_adler32 (core->block, len); ut8 *b = (ut8*)&hn; r_cons_printf ("%02x%02x%02x%02x\n", b[0], b[1], b[2], b[3]); } else if (!r_str_ccmp (input, "md5", ' ')) { RHash *ctx = r_hash_new (R_TRUE, R_HASH_MD5); const ut8 *c = r_hash_do_md5 (ctx, core->block, len); for (i=0; i<R_HASH_SIZE_MD5; i++) r_cons_printf ("%02x", c[i]); r_cons_newline (); r_hash_free (ctx); } else if (!r_str_ccmp (input, "sha1", ' ')) { RHash *ctx = r_hash_new (R_TRUE, R_HASH_SHA1); const ut8 *c = r_hash_do_sha1 (ctx, core->block, len); for (i=0; i<R_HASH_SIZE_SHA1; i++) r_cons_printf ("%02x", c[i]); r_cons_newline (); r_hash_free (ctx); } else if (!r_str_ccmp (input, "sha256", ' ')) { RHash *ctx = r_hash_new (R_TRUE, R_HASH_SHA256); const ut8 *c = r_hash_do_sha256 (ctx, core->block, len); for (i=0; i<R_HASH_SIZE_SHA256; i++) r_cons_printf ("%02x", c[i]); r_cons_newline (); r_hash_free (ctx); } else if (!r_str_ccmp (input, "sha512", ' ')) { RHash *ctx = r_hash_new (R_TRUE, R_HASH_SHA512); const ut8 *c = r_hash_do_sha512 (ctx, core->block, len); for (i=0; i<R_HASH_SIZE_SHA512; i++) r_cons_printf ("%02x", c[i]); r_cons_newline (); r_hash_free (ctx); } else if (!r_str_ccmp (input, "entropy", ' ')) { r_cons_printf ("%lf\n", r_hash_entropy (core->block, len)); } else if (!r_str_ccmp (input, "hamdist", ' ')) { r_cons_printf ("%d\n", r_hash_hamdist (core->block, len)); } else if (!r_str_ccmp (input, "pcprint", ' ')) { r_cons_printf ("%d\n", r_hash_pcprint (core->block, len)); } else if (!r_str_ccmp (input, "crc32", ' ')) { r_cons_printf ("%04x\n", r_hash_crc32 (core->block, len)); } else if (!r_str_ccmp (input, "xor", ' ')) { r_cons_printf ("%02x\n", r_hash_xor (core->block, len)); } else if (!r_str_ccmp (input, "crc16", ' ')) { r_cons_printf ("%02x\n", r_hash_crc16 (0, core->block, len)); } else if (input[0]=='?') { r_cons_printf ( "Usage: #algo <size> @ addr\n" " # this is a comment note the space after the sharp sign\n" " ## List hash/checksum algorithms.\n" " #sha256 10K @ 33 calculate sha256 of 10K at 33\n" "Hashes:\n"); algolist (0); r_cons_printf ( "Usage #!interpreter [<args>] [<file] [<<eof]\n" " #! list all available interpreters\n" " #!python run python commandline\n" " #!python foo.py run foo.py python script (same as '. foo.py')\n" //" #!python <<EOF get python code until 'EOF' mark\n" " #!python arg0 a1 <<q set arg0 and arg1 and read until 'q'\n"); } if (osize) r_core_block_size (core, osize); return 0; }