URL
https://opencores.org/ocsvn/xulalx25soc/xulalx25soc/trunk
Subversion Repositories xulalx25soc
[/] [xulalx25soc/] [trunk/] [sw/] [usbtst.cpp] - Rev 118
Go to most recent revision | Compare with Previous | Blame | View Log
#include <stdio.h> #include <stdlib.h> #include <unistd.h> #include <string.h> #include <ctype.h> // #include <usb.h> #include <libusb.h> // /sys/bus/usb/devices/1-4/ is our device, as currently plugged in // // It supports // 1 configuration // 1 interface // and has a product string of... // "XuLA - XESS Micro Logic Array" // #define VENDOR_ID 0x04d8 #define PRODUCT_ID 0x0ff8c #define XESS_ENDPOINT_OUT 0x01 #define XESS_ENDPOINT_IN 0x81 // #define JTAG_CMD 0x4f #define GET_TDO_MASK 0x01 #define PUT_TMS_MASK 0x02 #define TMS_VAL_MASK 0x04 #define PUT_TDI_MASK 0x08 #define TDI_VAL_MASK 0x10 // #define USER1_INSTR 0x02 // a SIX bit two bool gbl_transfer_received = false; // libusbtransfer_cb_fn callback; extern "C" { void my_callback(libusb_transfer *tfr) { gbl_transfer_received = true; printf("Callback received!\n"); } } // All messages must be 32 bytes or less // // Walk us through the JTAG Chain: // 5-1's to go to test/reset // 0 to go to Run-Test/Idle // 1 to go to select-dr-scan // 1 to go to select-ir-scan // 0 to go to capture-ir // 0 to go to shift-ir // (6-bit code 0x02 through TDI to IR, while sending 0-bits to TMS) // 1 to leave shift IR and go to exit1-ir // 1 to go to update-ir // 1 to go to select-dr-scan // 0 to go to capture-dr // 0 to go to shift-dr #define RESET_JTAG_LEN 12 const char RESET_TO_USER_DR[RESET_JTAG_LEN] = { JTAG_CMD, 21, // clocks 0,0,0, // Also clocks, higher order bits PUT_TMS_MASK | PUT_TDI_MASK, // flags (char)(0x0df), // TMS: Five ones, then one zero, and two ones -- low bits first 0x00, // TDI: irrelevant here (char)(0x80), // TMS: two zeros, then six zeros 0x08, // TDI: user command #1, bit reversed 0x03, // TMS: three ones, then two zeros 0x00 // TDI byte -- irrelevant here // // 0xc0, // TDI byte -- user command #2 // 0x40, // TDI: user command #1 // 0x0c, // TDI byte -- user command #2, bit reversed }; // // TMS: /* #define TX_DR_LEN 12 const char TX_DR_BITS[TX_DR_LEN] = { JTAG_CMD, 48, // clocks 0,0,0, // Also clocks, higher order bits PUT_TDI_MASK, // flags (char)0x0ff, 0, 0, 0, 0, 0 // Six data bytes // module_id = 255 // 32'h(payload.length) // payload // module_id + payload.len + num_result_bits, length=32 + payload ??? }; */ // // TMS: // #define REQ_RX_LEN 6 const char REQ_RX_BITS[REQ_RX_LEN] = { JTAG_CMD, (char)((32-6)*8), // bits-requested 0,0,0, // Also clocks, higher order bits GET_TDO_MASK|TDI_VAL_MASK, // flags:TDI is kept low here, so no TDI flag // No data given, since there's no info to send or receive // Leave the result in shift-DR mode }; #define RETURN_TO_RESET_LEN 7 const char RETURN_TO_RESET[RETURN_TO_RESET_LEN] = { JTAG_CMD, 5, // clocks 0,0,0, // Also clocks, higher order bits PUT_TMS_MASK, // flags (char)(0x0ff), // Five ones }; int dec(int v) { int br = 0; /* br = (br<<1)|(v&1); v>>=1; br = (br<<1)|(v&1); v>>=1; br = (br<<1)|(v&1); v>>=1; br = (br<<1)|(v&1); v>>=1; br = (br<<1)|(v&1); v>>=1; br = (br<<1)|(v&1); v>>=1; br = (br<<1)|(v&1); v>>=1; br = (br<<1)|(v&1); v>>=1; */ br = v&0x07f; if (br == ' ') return br; else if (isgraph(br)) return br; else return '.'; } // // If max packet length is 32, why do you waste 4 bytes on num_clocks? // Why is the bit counter always from 8 to zero? // int main(int argc, char **argv) { libusb_context *usb_context; libusb_device_handle *xula_usb_device; int config; if (0 != libusb_init(&usb_context)) { fprintf(stderr, "Error initializing the USB library\n"); perror("O/S Err:"); exit(-1); } xula_usb_device = libusb_open_device_with_vid_pid(usb_context, VENDOR_ID, PRODUCT_ID); if (!xula_usb_device) { fprintf(stderr, "Could not open XuLA device\n"); perror("O/S Err:"); libusb_exit(usb_context); exit(-1); } if (0 != libusb_get_configuration(xula_usb_device, &config)) { fprintf(stderr, "Could not get configuration\n"); perror("O/S Err:"); libusb_close(xula_usb_device); libusb_exit(usb_context); exit(-1); } printf("Current configuration is %d\n", config); int interface = 0; if (0 != libusb_claim_interface(xula_usb_device, interface)) { fprintf(stderr, "Could not claim interface\n"); perror("O/S Err:"); libusb_close(xula_usb_device); libusb_exit(usb_context); exit(-1); } unsigned char *abuf = new unsigned char[32]; int actual_length = 32; memcpy(abuf, RESET_TO_USER_DR, RESET_JTAG_LEN); int r = libusb_bulk_transfer(xula_usb_device, XESS_ENDPOINT_OUT, abuf, RESET_JTAG_LEN, &actual_length, 20); if ((r==0)&&(actual_length == RESET_JTAG_LEN)) { printf("Successfully sent RESET_TO_USER_DR!\n"); } else { printf("Some error took place requesting RESET_TO_USER_DR\n"); perror("O/S Err"); } memset(abuf, 0, 32); memcpy(abuf, REQ_RX_BITS, REQ_RX_LEN); r = libusb_bulk_transfer(xula_usb_device, XESS_ENDPOINT_OUT, abuf, REQ_RX_LEN, &actual_length, 20); if ((r==0)&&(actual_length == REQ_RX_LEN)) { printf("Successfully sent request for TDO bits!\n"); } else { printf("Some error took place in requesting TDO bits\n"); printf("r = %d, actual_length = %d (!= %d)\n", r, actual_length, REQ_RX_LEN); perror("O/S Err"); } r = libusb_bulk_transfer(xula_usb_device, XESS_ENDPOINT_IN, abuf, 32, &actual_length, 20); if ((r==0)&&(actual_length > 0)) { printf("Successfully read %d bytes from port!\n", actual_length); for(int i=0; i<(actual_length); i+=4) printf("%2d: %02x %02x %02x %02x -- %c%c%c%c\n", i, abuf[i+0], abuf[i+1], abuf[i+2], abuf[i+3], dec(abuf[i+0]),dec(abuf[i+1]), dec(abuf[i+2]), dec(abuf[i+3])); } else { printf("Some error took place in receiving\n"); perror("O/S Err"); } // Release our interface if (0 != libusb_release_interface(xula_usb_device, interface)) { fprintf(stderr, "Could not release interface\n"); perror("O/S Err:"); libusb_close(xula_usb_device); libusb_exit(usb_context); exit(-1); } // And then close our device with libusb_close(xula_usb_device); // And just before exiting, we free our USB context libusb_exit(usb_context); }
Go to most recent revision | Compare with Previous | Blame | View Log