#include "bm1370.h" #include "crc.h" #include "global_state.h" #include "serial.h" #include "utils.h" #include "esp_log.h" #include "freertos/FreeRTOS.h" #include "freertos/task.h" #include #include #include #include #include #define GPIO_ASIC_RESET CONFIG_GPIO_ASIC_RESET #define TYPE_JOB 0x20 #define TYPE_CMD 0x40 #define GROUP_SINGLE 0x00 #define GROUP_ALL 0x10 #define CMD_JOB 0x01 #define CMD_SETADDRESS 0x00 #define CMD_WRITE 0x01 #define CMD_READ 0x02 #define CMD_INACTIVE 0x03 #define RESPONSE_CMD 0x00 #define RESPONSE_JOB 0x80 #define SLEEP_TIME 20 #define FREQ_MULT 25.0 #define CLOCK_ORDER_CONTROL_0 0x80 #define CLOCK_ORDER_CONTROL_1 0x84 #define ORDERED_CLOCK_ENABLE 0x20 #define CORE_REGISTER_CONTROL 0x3C #define PLL3_PARAMETER 0x68 #define FAST_UART_CONFIGURATION 0x28 #define TICKET_MASK 0x14 #define MISC_CONTROL 0x18 #define BM1370_TIMEOUT_MS 10000 #define BM1370_TIMEOUT_THRESHOLD 2 typedef struct __attribute__((__packed__)) { uint8_t preamble[2]; uint32_t nonce; uint8_t midstate_num; uint8_t job_id; uint16_t version; uint8_t crc; } asic_result; static const char * TAG = "bm1370Module"; static uint8_t asic_response_buffer[SERIAL_BUF_SIZE]; static task_result result; /// @brief /// @param ftdi /// @param header /// @param data /// @param len static void _send_BM1370(uint8_t header, uint8_t * data, uint8_t data_len, bool debug) { packet_type_t packet_type = (header & TYPE_JOB) ? JOB_PACKET : CMD_PACKET; uint8_t total_length = (packet_type == JOB_PACKET) ? (data_len + 6) : (data_len + 5); // allocate memory for buffer unsigned char * buf = malloc(total_length); // add the preamble buf[0] = 0x55; buf[1] = 0xAA; // add the header field buf[2] = header; // add the length field buf[3] = (packet_type == JOB_PACKET) ? (data_len + 4) : (data_len + 3); // add the data memcpy(buf + 4, data, data_len); // add the correct crc type if (packet_type == JOB_PACKET) { uint16_t crc16_total = crc16_false(buf + 2, data_len + 2); buf[4 + data_len] = (crc16_total >> 8) & 0xFF; buf[5 + data_len] = crc16_total & 0xFF; } else { buf[4 + data_len] = crc5(buf + 2, data_len + 2); } // send serial data if (SERIAL_send(buf, total_length, debug) == 0) { ESP_LOGE(TAG, "Failed to send data to BM1370"); } free(buf); } static void _send_simple(uint8_t * data, uint8_t total_length) { unsigned char * buf = malloc(total_length); memcpy(buf, data, total_length); SERIAL_send(buf, total_length, BM1370_SERIALTX_DEBUG); free(buf); } static void _send_chain_inactive(void) { unsigned char read_address[2] = {0x00, 0x00}; // send serial data _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_INACTIVE), read_address, 2, BM1370_SERIALTX_DEBUG); } static void _set_chip_address(uint8_t chipAddr) { unsigned char read_address[2] = {chipAddr, 0x00}; // send serial data _send_BM1370((TYPE_CMD | GROUP_SINGLE | CMD_SETADDRESS), read_address, 2, BM1370_SERIALTX_DEBUG); } void BM1370_set_version_mask(uint32_t version_mask) { int versions_to_roll = version_mask >> 13; uint8_t version_byte0 = (versions_to_roll >> 8); uint8_t version_byte1 = (versions_to_roll & 0xFF); uint8_t version_cmd[] = {0x00, 0xA4, 0x90, 0x00, version_byte0, version_byte1}; _send_BM1370(TYPE_CMD | GROUP_ALL | CMD_WRITE, version_cmd, 6, BM1370_SERIALTX_DEBUG); } void BM1370_send_hash_frequency(int id, float target_freq, float max_diff) { uint8_t freqbuf[6] = {0x00, 0x08, 0x40, 0xA0, 0x02, 0x41}; uint8_t postdiv_min = 255; uint8_t postdiv2_min = 255; float best_freq = 0; uint8_t best_refdiv = 0, best_fbdiv = 0, best_postdiv1 = 0, best_postdiv2 = 0; for (uint8_t refdiv = 2; refdiv > 0; refdiv--) { for (uint8_t postdiv1 = 7; postdiv1 > 0; postdiv1--) { for (uint8_t postdiv2 = 7; postdiv2 > 0; postdiv2--) { uint16_t fb_divider = round(target_freq / 25.0 * (refdiv * postdiv2 * postdiv1)); float newf = 25.0 * fb_divider / (refdiv * postdiv2 * postdiv1); if (fb_divider >= 0xa0 && fb_divider <= 0xef && fabs(target_freq - newf) < max_diff && postdiv1 >= postdiv2 && postdiv1 * postdiv2 < postdiv_min && postdiv2 <= postdiv2_min) { postdiv2_min = postdiv2; postdiv_min = postdiv1 * postdiv2; best_freq = newf; best_refdiv = refdiv; best_fbdiv = fb_divider; best_postdiv1 = postdiv1; best_postdiv2 = postdiv2; } } } } if (best_fbdiv == 0) { ESP_LOGE(TAG, "Failed to find PLL settings for target frequency %.2f", target_freq); return; } freqbuf[2] = (best_fbdiv * 25 / best_refdiv >= 2400) ? 0x50 : 0x40; freqbuf[3] = best_fbdiv; freqbuf[4] = best_refdiv; freqbuf[5] = (((best_postdiv1 - 1) & 0xf) << 4) | ((best_postdiv2 - 1) & 0xf); if (id != -1) { freqbuf[0] = id * 2; _send_BM1370(TYPE_CMD | GROUP_SINGLE | CMD_WRITE, freqbuf, 6, BM1370_SERIALTX_DEBUG); } else { _send_BM1370(TYPE_CMD | GROUP_ALL | CMD_WRITE, freqbuf, 6, BM1370_SERIALTX_DEBUG); } ESP_LOGI(TAG, "Setting Frequency to %.2fMHz (%.2f)", target_freq, best_freq); } static void do_frequency_ramp_up(float target_frequency) { float current = 56.25; float step = 6.25; if (target_frequency == 0) { ESP_LOGI(TAG, "Skipping frequency ramp"); return; } ESP_LOGI(TAG, "Ramping up frequency from %.2f MHz to %.2f MHz with step %.2f MHz", current, target_frequency, step); BM1370_send_hash_frequency(-1, current, 0.001); while (current < target_frequency) { float next_step = fminf(step, target_frequency - current); current += next_step; BM1370_send_hash_frequency(-1, current, 0.001); vTaskDelay(pdMS_TO_TICKS(100)); } } static uint8_t _send_init(uint64_t frequency, uint16_t asic_count) { // set version mask for (int i = 0; i < 3; i++) { BM1370_set_version_mask(STRATUM_DEFAULT_VERSION_MASK); } //read register 00 on all chips (should respond AA 55 13 68 00 00 00 00 00 00 0F) unsigned char init3[7] = {0x55, 0xAA, 0x52, 0x05, 0x00, 0x00, 0x0A}; _send_simple(init3, 7); int chip_counter = 0; while (true) { if (SERIAL_rx(asic_response_buffer, 11, 1000) > 0) { chip_counter++; } else { break; } } ESP_LOGI(TAG, "%i chip(s) detected on the chain, expected %i", chip_counter, asic_count); // set version mask BM1370_set_version_mask(STRATUM_DEFAULT_VERSION_MASK); //Reg_A8 //unsigned char init5[11] = {0x55, 0xAA, 0x51, 0x09, 0x00, 0xA8, 0x00, 0x07, 0x00, 0x00, 0x03}; _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0xA8, 0x00, 0x07, 0x00, 0x00}, 6, BM1370_SERIALTX_DEBUG); //Misc Control //TX: 55 AA 51 09 [00 18 F0 00 C1 00] 04 //command all chips, write chip address 00, register 18, data F0 00 C1 00 - Misc Control _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0x18, 0xF0, 0x00, 0xC1, 0x00}, 6, BM1370_SERIALTX_DEBUG); //from S21Pro dump //_send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0x18, 0xFF, 0x0F, 0xC1, 0x00}, 6, BM1370_SERIALTX_DEBUG); //from S21 dump //chain inactive _send_chain_inactive(); // unsigned char init7[7] = {0x55, 0xAA, 0x53, 0x05, 0x00, 0x00, 0x03}; // _send_simple(init7, 7); // split the chip address space evenly uint8_t address_interval = (uint8_t) (256 / chip_counter); for (uint8_t i = 0; i < chip_counter; i++) { _set_chip_address(i * address_interval); // unsigned char init8[7] = {0x55, 0xAA, 0x40, 0x05, 0x00, 0x00, 0x1C}; // _send_simple(init8, 7); } //Core Register Control //unsigned char init9[11] = {0x55, 0xAA, 0x51, 0x09, 0x00, 0x3C, 0x80, 0x00, 0x8B, 0x00, 0x12}; _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0x3C, 0x80, 0x00, 0x8B, 0x00}, 6, BM1370_SERIALTX_DEBUG); //Core Register Control //TX: 55 AA 51 09 [00 3C 80 00 80 0C] 11 //command all chips, write chip address 00, register 3C, data 80 00 80 0C - Core Register Control _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0x3C, 0x80, 0x00, 0x80, 0x0C}, 6, BM1370_SERIALTX_DEBUG); //from S21Pro dump //_send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0x3C, 0x80, 0x00, 0x80, 0x18}, 6, BM1370_SERIALTX_DEBUG); //from S21 dump //set ticket mask // unsigned char init11[11] = {0x55, 0xAA, 0x51, 0x09, 0x00, 0x14, 0x00, 0x00, 0x00, 0xFF, 0x08}; BM1370_set_job_difficulty_mask(BM1370_ASIC_DIFFICULTY); //Analog Mux Control -- not sent on S21 Pro? // unsigned char init12[11] = {0x55, 0xAA, 0x51, 0x09, 0x00, 0x54, 0x00, 0x00, 0x00, 0x03, 0x1D}; // _send_simple(init12, 11); //Set the IO Driver Strength on chip 00 //TX: 55 AA 51 09 [00 58 00 01 11 11] 0D //command all chips, write chip address 00, register 58, data 01 11 11 11 - Set the IO Driver Strength on chip 00 _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0x58, 0x00, 0x01, 0x11, 0x11}, 6, BM1370_SERIALTX_DEBUG); //from S21Pro dump //_send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0x58, 0x02, 0x11, 0x11, 0x11}, 6, BM1370_SERIALTX_DEBUG); //from S21Pro dump for (uint8_t i = 0; i < chip_counter; i++) { //TX: 55 AA 41 09 00 [A8 00 07 01 F0] 15 // Reg_A8 unsigned char set_a8_register[6] = {i * address_interval, 0xA8, 0x00, 0x07, 0x01, 0xF0}; _send_BM1370((TYPE_CMD | GROUP_SINGLE | CMD_WRITE), set_a8_register, 6, BM1370_SERIALTX_DEBUG); //TX: 55 AA 41 09 00 [18 F0 00 C1 00] 0C // Misc Control unsigned char set_18_register[6] = {i * address_interval, 0x18, 0xF0, 0x00, 0xC1, 0x00}; _send_BM1370((TYPE_CMD | GROUP_SINGLE | CMD_WRITE), set_18_register, 6, BM1370_SERIALTX_DEBUG); //TX: 55 AA 41 09 00 [3C 80 00 8B 00] 1A // Core Register Control unsigned char set_3c_register_first[6] = {i * address_interval, 0x3C, 0x80, 0x00, 0x8B, 0x00}; _send_BM1370((TYPE_CMD | GROUP_SINGLE | CMD_WRITE), set_3c_register_first, 6, BM1370_SERIALTX_DEBUG); //TX: 55 AA 41 09 00 [3C 80 00 80 0C] 19 // Core Register Control unsigned char set_3c_register_second[6] = {i * address_interval, 0x3C, 0x80, 0x00, 0x80, 0x0C}; _send_BM1370((TYPE_CMD | GROUP_SINGLE | CMD_WRITE), set_3c_register_second, 6, BM1370_SERIALTX_DEBUG); //TX: 55 AA 41 09 00 [3C 80 00 82 AA] 05 // Core Register Control unsigned char set_3c_register_third[6] = {i * address_interval, 0x3C, 0x80, 0x00, 0x82, 0xAA}; _send_BM1370((TYPE_CMD | GROUP_SINGLE | CMD_WRITE), set_3c_register_third, 6, BM1370_SERIALTX_DEBUG); } //Some misc settings? // TX: 55 AA 51 09 [00 B9 00 00 44 80] 0D //command all chips, write chip address 00, register B9, data 00 00 44 80 _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0xB9, 0x00, 0x00, 0x44, 0x80}, 6, BM1370_SERIALTX_DEBUG); // TX: 55 AA 51 09 [00 54 00 00 00 02] 18 //command all chips, write chip address 00, register 54, data 00 00 00 02 - Analog Mux Control - rumored to control the temp diode _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0x54, 0x00, 0x00, 0x00, 0x02}, 6, BM1370_SERIALTX_DEBUG); // TX: 55 AA 51 09 [00 B9 00 00 44 80] 0D //command all chips, write chip address 00, register B9, data 00 00 44 80 -- duplicate of first command in series _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0xB9, 0x00, 0x00, 0x44, 0x80}, 6, BM1370_SERIALTX_DEBUG); // TX: 55 AA 51 09 [00 3C 80 00 8D EE] 1B //command all chips, write chip address 00, register 3C, data 80 00 8D EE _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), (uint8_t[]){0x00, 0x3C, 0x80, 0x00, 0x8D, 0xEE}, 6, BM1370_SERIALTX_DEBUG); //ramp up the hash frequency do_frequency_ramp_up(frequency); //register 10 is still a bit of a mystery. discussion: https://github.com/skot/ESP-Miner/pull/167 // unsigned char set_10_hash_counting[6] = {0x00, 0x10, 0x00, 0x00, 0x11, 0x5A}; //S19k Pro Default // unsigned char set_10_hash_counting[6] = {0x00, 0x10, 0x00, 0x00, 0x14, 0x46}; //S19XP-Luxos Default // unsigned char set_10_hash_counting[6] = {0x00, 0x10, 0x00, 0x00, 0x15, 0x1C}; //S19XP-Stock Default //unsigned char set_10_hash_counting[6] = {0x00, 0x10, 0x00, 0x00, 0x15, 0xA4}; //S21-Stock Default unsigned char set_10_hash_counting[6] = {0x00, 0x10, 0x00, 0x00, 0x1E, 0xB5}; //S21 Pro-Stock Default // unsigned char set_10_hash_counting[6] = {0x00, 0x10, 0x00, 0x0F, 0x00, 0x00}; //supposedly the "full" 32bit nonce range _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), set_10_hash_counting, 6, BM1370_SERIALTX_DEBUG); return chip_counter; } // reset the BM1370 via the RTS line static void _reset(void) { gpio_set_level(GPIO_ASIC_RESET, 0); // delay for 100ms vTaskDelay(100 / portTICK_PERIOD_MS); // set the gpio pin high gpio_set_level(GPIO_ASIC_RESET, 1); // delay for 100ms vTaskDelay(100 / portTICK_PERIOD_MS); } // static void _send_read_address(void) // { // unsigned char read_address[2] = {0x00, 0x00}; // // send serial data // _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_READ), read_address, 2, BM1370_SERIALTX_DEBUG); // } uint8_t BM1370_init(uint64_t frequency, uint16_t asic_count) { ESP_LOGI(TAG, "Initializing BM1370"); memset(asic_response_buffer, 0, SERIAL_BUF_SIZE); esp_rom_gpio_pad_select_gpio(GPIO_ASIC_RESET); gpio_set_direction(GPIO_ASIC_RESET, GPIO_MODE_OUTPUT); // reset the bm1370 _reset(); return _send_init(frequency, asic_count); } // Baud formula = 25M/((denominator+1)*8) // The denominator is 5 bits found in the misc_control (bits 9-13) int BM1370_set_default_baud(void) { // default divider of 26 (11010) for 115,749 unsigned char baudrate[9] = {0x00, MISC_CONTROL, 0x00, 0x00, 0b01111010, 0b00110001}; // baudrate - misc_control _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), baudrate, 6, BM1370_SERIALTX_DEBUG); return 115749; } int BM1370_set_max_baud(void) { // divider of 0 for 3,125,000 ESP_LOGI(TAG, "Setting max baud of 1000000 "); unsigned char init8[11] = {0x55, 0xAA, 0x51, 0x09, 0x00, 0x28, 0x11, 0x30, 0x02, 0x00, 0x03}; _send_simple(init8, 11); return 1000000; } void BM1370_set_job_difficulty_mask(int difficulty) { // Default mask of 256 diff unsigned char job_difficulty_mask[9] = {0x00, TICKET_MASK, 0b00000000, 0b00000000, 0b00000000, 0b11111111}; // The mask must be a power of 2 so there are no holes // Correct: {0b00000000, 0b00000000, 0b11111111, 0b11111111} // Incorrect: {0b00000000, 0b00000000, 0b11100111, 0b11111111} // (difficulty - 1) if it is a pow 2 then step down to second largest for more hashrate sampling difficulty = _largest_power_of_two(difficulty) - 1; // convert difficulty into char array // Ex: 256 = {0b00000000, 0b00000000, 0b00000000, 0b11111111}, {0x00, 0x00, 0x00, 0xff} // Ex: 512 = {0b00000000, 0b00000000, 0b00000001, 0b11111111}, {0x00, 0x00, 0x01, 0xff} for (int i = 0; i < 4; i++) { char value = (difficulty >> (8 * i)) & 0xFF; // The char is read in backwards to the register so we need to reverse them // So a mask of 512 looks like 0b00000000 00000000 00000001 1111111 // and not 0b00000000 00000000 10000000 1111111 job_difficulty_mask[5 - i] = _reverse_bits(value); } ESP_LOGI(TAG, "Setting ASIC difficulty mask to %d", difficulty); _send_BM1370((TYPE_CMD | GROUP_ALL | CMD_WRITE), job_difficulty_mask, 6, BM1370_SERIALTX_DEBUG); } static uint8_t id = 0; void BM1370_send_work(void * pvParameters, bm_job * next_bm_job) { GlobalState * GLOBAL_STATE = (GlobalState *) pvParameters; BM1370_job job; id = (id + 24) % 128; job.job_id = id; job.num_midstates = 0x01; memcpy(&job.starting_nonce, &next_bm_job->starting_nonce, 4); memcpy(&job.nbits, &next_bm_job->target, 4); memcpy(&job.ntime, &next_bm_job->ntime, 4); memcpy(job.merkle_root, next_bm_job->merkle_root_be, 32); memcpy(job.prev_block_hash, next_bm_job->prev_block_hash_be, 32); memcpy(&job.version, &next_bm_job->version, 4); if (GLOBAL_STATE->ASIC_TASK_MODULE.active_jobs[job.job_id] != NULL) { free_bm_job(GLOBAL_STATE->ASIC_TASK_MODULE.active_jobs[job.job_id]); } GLOBAL_STATE->ASIC_TASK_MODULE.active_jobs[job.job_id] = next_bm_job; pthread_mutex_lock(&GLOBAL_STATE->valid_jobs_lock); GLOBAL_STATE->valid_jobs[job.job_id] = 1; pthread_mutex_unlock(&GLOBAL_STATE->valid_jobs_lock); //debug sent jobs - this can get crazy if the interval is short #if BM1370_DEBUG_JOBS ESP_LOGI(TAG, "Send Job: %02X", job.job_id); #endif _send_BM1370((TYPE_JOB | GROUP_SINGLE | CMD_WRITE), (uint8_t *)&job, sizeof(BM1370_job), BM1370_DEBUG_WORK); } asic_result * BM1370_receive_work(void) { // wait for a response int received = SERIAL_rx(asic_response_buffer, 11, BM1370_TIMEOUT_MS); bool uart_err = received < 0; bool uart_timeout = received == 0; uint8_t asic_timeout_counter = 0; // handle response if (uart_err) { ESP_LOGI(TAG, "UART Error in serial RX"); return NULL; } else if (uart_timeout) { if (asic_timeout_counter >= BM1370_TIMEOUT_THRESHOLD) { ESP_LOGE(TAG, "ASIC not sending data"); asic_timeout_counter = 0; } asic_timeout_counter++; return NULL; } if (received != 11 || asic_response_buffer[0] != 0xAA || asic_response_buffer[1] != 0x55) { ESP_LOGI(TAG, "Serial RX invalid %i", received); ESP_LOG_BUFFER_HEX(TAG, asic_response_buffer, received); SERIAL_clear_buffer(); return NULL; } return (asic_result *) asic_response_buffer; } static uint16_t reverse_uint16(uint16_t num) { return (num >> 8) | (num << 8); } static uint32_t reverse_uint32(uint32_t val) { return ((val >> 24) & 0xff) | // Move byte 3 to byte 0 ((val << 8) & 0xff0000) | // Move byte 1 to byte 2 ((val >> 8) & 0xff00) | // Move byte 2 to byte 1 ((val << 24) & 0xff000000); // Move byte 0 to byte 3 } task_result * BM1370_proccess_work(void * pvParameters) { asic_result * asic_result = BM1370_receive_work(); if (asic_result == NULL) { return NULL; } // uint8_t job_id = asic_result->job_id; // uint8_t rx_job_id = ((int8_t)job_id & 0xf0) >> 1; // ESP_LOGI(TAG, "Job ID: %02X, RX: %02X", job_id, rx_job_id); // uint8_t job_id = asic_result->job_id & 0xf8; // ESP_LOGI(TAG, "Job ID: %02X, Core: %01X", job_id, asic_result->job_id & 0x07); uint8_t job_id = (asic_result->job_id & 0xf0) >> 1; uint8_t core_id = (uint8_t)((reverse_uint32(asic_result->nonce) >> 25) & 0x7f); // BM1370 has 80 cores, so it should be coded on 7 bits uint8_t small_core_id = asic_result->job_id & 0x0f; // BM1370 has 16 small cores, so it should be coded on 4 bits uint32_t version_bits = (reverse_uint16(asic_result->version) << 13); // shift the 16 bit value left 13 ESP_LOGI(TAG, "Job ID: %02X, Core: %d/%d, Ver: %08" PRIX32, job_id, core_id, small_core_id, version_bits); GlobalState * GLOBAL_STATE = (GlobalState *) pvParameters; if (GLOBAL_STATE->valid_jobs[job_id] == 0) { ESP_LOGE(TAG, "Invalid job nonce found, 0x%02X", job_id); return NULL; } uint32_t rolled_version = GLOBAL_STATE->ASIC_TASK_MODULE.active_jobs[job_id]->version | version_bits; result.job_id = job_id; result.nonce = asic_result->nonce; result.rolled_version = rolled_version; return &result; }