cvs.zerfleddert.de Git - proxmark3-svn/blob - client/proxmark3.c

   1 //-----------------------------------------------------------------------------
   2 // Copyright (C) 2009 Michael Gernoth <michael at gernoth.net>
   3 // Copyright (C) 2010 iZsh <izsh at fail0verflow.com>
   4 //
   5 // This code is licensed to you under the terms of the GNU GPL, version 2 or,
   6 // at your option, any later version. See the LICENSE.txt file for the text of
   7 // the license.
   8 //-----------------------------------------------------------------------------
   9 // Main binary
  10 //-----------------------------------------------------------------------------
  11
  12 #include <stdio.h>
  13 #include <stdlib.h>
  14 #include <string.h>
  15 #include <pthread.h>
  16 #include <unistd.h>
  17 #include <readline/readline.h>
  18 #include <readline/history.h>
  19
  20 #include "proxmark3.h"
  21 #include "proxgui.h"
  22 #include "cmdmain.h"
  23 #include "uart.h"
  24 #include "ui.h"
  25 #include "cmdparser.h"
  26 #include "cmdhw.h"
  27 #include "whereami.h"
  28
  29
  30 // a global mutex to prevent interlaced printing from different threads
  31 pthread_mutex_t print_lock;
  32
  33 static serial_port sp;
  34 static UsbCommand txcmd;
  35 volatile static bool txcmd_pending = false;
  36
  37 void SendCommand(UsbCommand *c) {
  38         #if 0
  39                 printf("Sending %d bytes\n", sizeof(UsbCommand));
  40         #endif
  41
  42         if (offline) {
  43       PrintAndLog("Sending bytes to proxmark failed - offline");
  44       return;
  45     }
  46   /**
  47         The while-loop below causes hangups at times, when the pm3 unit is unresponsive
  48         or disconnected. The main console thread is alive, but comm thread just spins here.
  49         Not good.../holiman
  50         **/
  51         while(txcmd_pending);
  52         txcmd = *c;
  53         txcmd_pending = true;
  54 }
  55
  56 struct receiver_arg {
  57         int run;
  58 };
  59
  60 struct main_loop_arg {
  61         int usb_present;
  62         char *script_cmds_file;
  63 };
  64
  65 byte_t rx[0x1000000];
  66 byte_t* prx = rx;
  67
  68 static void *uart_receiver(void *targ) {
  69         struct receiver_arg *arg = (struct receiver_arg*)targ;
  70         size_t rxlen;
  71         size_t cmd_count;
  72
  73         while (arg->run) {
  74                 rxlen = sizeof(UsbCommand);
  75                 if (uart_receive(sp, prx, &rxlen)) {
  76                         prx += rxlen;
  77                         if (((prx-rx) % sizeof(UsbCommand)) != 0) {
  78                                 continue;
  79                         }
  80                         cmd_count = (prx-rx) / sizeof(UsbCommand);
  81
  82                         for (size_t i = 0; i < cmd_count; i++) {
  83                                 UsbCommandReceived((UsbCommand*)(rx+(i*sizeof(UsbCommand))));
  84                         }
  85                 }
  86                 prx = rx;
  87
  88                 if(txcmd_pending) {
  89                         if (!uart_send(sp, (byte_t*) &txcmd, sizeof(UsbCommand))) {
  90                                 PrintAndLog("Sending bytes to proxmark failed");
  91                         }
  92                         txcmd_pending = false;
  93                 }
  94         }
  95
  96         pthread_exit(NULL);
  97         return NULL;
  98 }
  99
 100 static void *main_loop(void *targ) {
 101         struct main_loop_arg *arg = (struct main_loop_arg*)targ;
 102         struct receiver_arg rarg;
 103         char *cmd = NULL;
 104         pthread_t reader_thread;
 105
 106         if (arg->usb_present == 1) {
 107                 rarg.run = 1;
 108                 pthread_create(&reader_thread, NULL, &uart_receiver, &rarg);
 109                 // cache Version information now:
 110                 CmdVersion(NULL);
 111         }
 112
 113         FILE *script_file = NULL;
 114         char script_cmd_buf[256];  // iceman, needs lua script the same file_path_buffer as the rest
 115
 116         if (arg->script_cmds_file) {
 117                 script_file = fopen(arg->script_cmds_file, "r");
 118                 if (script_file) {
 119                         printf("using 'scripting' commands file %s\n", arg->script_cmds_file);
 120                 }
 121         }
 122
 123         read_history(".history");
 124
 125         while(1)  {
 126
 127                 // If there is a script file
 128                 if (script_file)
 129                 {
 130                         if (!fgets(script_cmd_buf, sizeof(script_cmd_buf), script_file)) {
 131                                 fclose(script_file);
 132                                 script_file = NULL;
 133                         } else {
 134                                 char *nl;
 135                                 nl = strrchr(script_cmd_buf, '\r');
 136                                 if (nl) *nl = '\0';
 137
 138                                 nl = strrchr(script_cmd_buf, '\n');
 139                                 if (nl) *nl = '\0';
 140
 141                                 if ((cmd = (char*) malloc(strlen(script_cmd_buf) + 1)) != NULL) {
 142                                         memset(cmd, 0, strlen(script_cmd_buf));
 143                                         strcpy(cmd, script_cmd_buf);
 144                                         printf("%s\n", cmd);
 145                                 }
 146                         }
 147                 }
 148
 149                 if (!script_file) {
 150                         cmd = readline(PROXPROMPT);
 151                 }
 152
 153                 if (cmd) {
 154
 155                         while(cmd[strlen(cmd) - 1] == ' ')
 156                                 cmd[strlen(cmd) - 1] = 0x00;
 157
 158                         if (cmd[0] != 0x00) {
 159                                 int ret = CommandReceived(cmd);
 160                                 add_history(cmd);
 161                                 if (ret == 99) {  // exit or quit
 162                                         break;
 163                                 }
 164                         }
 165                         free(cmd);
 166                 } else {
 167                         printf("\n");
 168                         break;
 169                 }
 170         }
 171
 172         write_history(".history");
 173
 174         if (arg->usb_present == 1) {
 175                 rarg.run = 0;
 176                 pthread_join(reader_thread, NULL);
 177         }
 178
 179         if (script_file) {
 180                 fclose(script_file);
 181                 script_file = NULL;
 182         }
 183
 184         ExitGraphics();
 185         pthread_exit(NULL);
 186         return NULL;
 187 }
 188
 189 static void dumpAllHelp(int markdown)
 190 {
 191   printf("\n%sProxmark3 command dump%s\n\n",markdown?"# ":"",markdown?"":"\n======================");
 192   printf("Some commands are available only if a Proxmark is actually connected.%s\n",markdown?"  ":"");
 193   printf("Check column \"offline\" for their availability.\n");
 194   printf("\n");
 195   command_t *cmds = getTopLevelCommandTable();
 196   dumpCommandsRecursive(cmds, markdown);
 197 }
 198
 199 static char *my_executable_path = NULL;
 200 static char *my_executable_directory = NULL;
 201
 202 const char const *get_my_executable_path(void)
 203 {
 204         return my_executable_path;
 205 }
 206
 207 const char const *get_my_executable_directory(void)
 208 {
 209         return my_executable_directory;
 210 }
 211
 212 static void set_my_executable_path(void)
 213 {
 214         int path_length = wai_getExecutablePath(NULL, 0, NULL);
 215         if (path_length != -1) {
 216                 my_executable_path = (char*)malloc(path_length + 1);
 217                 int dirname_length = 0;
 218                 if (wai_getExecutablePath(my_executable_path, path_length, &dirname_length) != -1) {
 219                         my_executable_path[path_length] = '\0';
 220                         my_executable_directory = (char *)malloc(dirname_length + 2);
 221                         strncpy(my_executable_directory, my_executable_path, dirname_length+1);
 222                 }
 223         }
 224 }
 225
 226 int main(int argc, char* argv[]) {
 227         srand(time(0));
 228
 229         if (argc < 2) {
 230                 printf("syntax: %s <port>\n\n",argv[0]);
 231                 printf("\tLinux example:'%s /dev/ttyACM0'\n\n", argv[0]);
 232                 printf("help:   %s -h\n\n", argv[0]);
 233                 printf("\tDump all interactive help at once\n");
 234                 printf("markdown:   %s -m\n\n", argv[0]);
 235                 printf("\tDump all interactive help at once in markdown syntax\n");
 236                 return 1;
 237         }
 238         if (strcmp(argv[1], "-h") == 0) {
 239                 printf("syntax: %s <port>\n\n",argv[0]);
 240                 printf("\tLinux example:'%s /dev/ttyACM0'\n\n", argv[0]);
 241                 dumpAllHelp(0);
 242                 return 0;
 243         }
 244         if (strcmp(argv[1], "-m") == 0) {
 245                 dumpAllHelp(1);
 246                 return 0;
 247         }
 248
 249         set_my_executable_path();
 250
 251         // Make sure to initialize
 252         struct main_loop_arg marg = {
 253                 .usb_present = 0,
 254                 .script_cmds_file = NULL
 255         };
 256         pthread_t main_loop_threat;
 257
 258
 259         sp = uart_open(argv[1]);
 260         if (sp == INVALID_SERIAL_PORT) {
 261                 printf("ERROR: invalid serial port\n");
 262                 marg.usb_present = 0;
 263                 offline = 1;
 264         } else if (sp == CLAIMED_SERIAL_PORT) {
 265                 printf("ERROR: serial port is claimed by another process\n");
 266                 marg.usb_present = 0;
 267                 offline = 1;
 268         } else {
 269                 marg.usb_present = 1;
 270                 offline = 0;
 271         }
 272
 273         // If the user passed the filename of the 'script' to execute, get it
 274         if (argc > 2 && argv[2]) {
 275                 if (argv[2][0] == 'f' &&  //buzzy, if a word 'flush' passed, flush the output after every log entry.
 276                         argv[2][1] == 'l' &&
 277                         argv[2][2] == 'u' &&
 278                         argv[2][3] == 's' &&
 279                         argv[2][4] == 'h')
 280                 {
 281                         printf("Output will be flushed after every print.\n");
 282                         flushAfterWrite = 1;
 283                 }
 284                 else
 285                 marg.script_cmds_file = argv[2];
 286         }
 287
 288         // create a mutex to avoid interlacing print commands from our different threads
 289         pthread_mutex_init(&print_lock, NULL);
 290
 291         pthread_create(&main_loop_threat, NULL, &main_loop, &marg);
 292         InitGraphics(argc, argv);
 293
 294         MainGraphics();
 295
 296         pthread_join(main_loop_threat, NULL);
 297
 298         // Clean up the port
 299         if (offline == 0) {
 300                 uart_close(sp);
 301         }
 302
 303         // clean up mutex
 304         pthread_mutex_destroy(&print_lock);
 305
 306         exit(0);
 307 }