void iota_gfx_task_user(void) {
#if DEBUG_TO_SCREEN
if (debug_enable) {
return;
}
#endif
struct CharacterMatrix matrix;
matrix_clear(&matrix);
matrix_write_P(&matrix, PSTR("TKC1800"));
uint8_t layer = biton32(layer_state);
char buf[40];
snprintf(buf,sizeof(buf), "Undef-%d", layer);
matrix_write_P(&matrix, PSTR("\nLayer: "));
matrix_write(&matrix, layer_lookup[layer]);
// Host Keyboard LED Status
char led[40];
snprintf(led, sizeof(led), "\n\n%s %s %s",
(host_keyboard_leds() & (1<<USB_LED_NUM_LOCK)) ? "NUMLOCK" : " ",
(host_keyboard_leds() & (1<<USB_LED_CAPS_LOCK)) ? "CAPS" : " ",
(host_keyboard_leds() & (1<<USB_LED_SCROLL_LOCK)) ? "SCLK" : " ");
matrix_write(&matrix, led);
matrix_update(&display, &matrix);
}
void iota_gfx_task_user(void) {
struct CharacterMatrix matrix;
matrix_clear(&matrix);
if (is_master) {
matrix_write(&matrix, read_mode_icon(!get_enable_kc_lang()));
matrix_write(&matrix, " ");
matrix_write(&matrix, read_layer_state());
matrix_write(&matrix, read_host_led_state());
} else {
matrix_write(&matrix, read_logo());
}
matrix_update(&display, &matrix);
}
void render_status(struct CharacterMatrix *matrix) {
// Render to mode icon
static char logo[][2][3] = {{{0x95,0x96,0},{0xb5,0xb6,0}},{{0x97,0x98,0},{0xb7,0xb8,0}}};
int mode_number = get_enable_kc_lang() ? 0 : 1;
matrix_write(matrix, logo[mode_number][0]);
matrix_write(matrix, "\n");
matrix_write(matrix, logo[mode_number][1]);
// Define layers here, Have not worked out how to have text displayed for each layer. Copy down the number you see and add a case for it below
char buf[40];
snprintf(buf,sizeof(buf), "Undef-%ld", layer_state);
matrix_write_P(matrix, PSTR("\nLayer: "));
switch (biton32(layer_state)) {
case L_BASE:
matrix_write_P(matrix,
default_layer_state == 1UL<<_EDVORAK ? PSTR("EDVORAK") : PSTR("QWERTY")
);
break;
case _EDVORAKJ1:
case _EDVORAKJ2:
matrix_write_P(matrix, PSTR("JP_EXT"));
break;
case _RAISE:
matrix_write_P(matrix, PSTR("Raise"));
break;
case _LOWER:
matrix_write_P(matrix, PSTR("Lower"));
break;
case _ADJUST:
matrix_write_P(matrix, PSTR("Adjust"));
break;
default:
matrix_write(matrix, buf);
}
// Host Keyboard LED Status
char led[40];
snprintf(led, sizeof(led), "\n%s %s %s %s",
get_enable_jp_extra_layer() && get_japanese_mode() ? "EXT" : " ",
(host_keyboard_leds() & (1<<USB_LED_NUM_LOCK)) ? "NMLK" : " ",
(host_keyboard_leds() & (1<<USB_LED_CAPS_LOCK)) ? "CAPS" : " ",
(host_keyboard_leds() & (1<<USB_LED_SCROLL_LOCK)) ? "SCLK" : " ");
matrix_write(matrix, led);
}
static void render_logo(struct CharacterMatrix *matrix) {
static char logo[] = {
0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8a,0x8b,0x8c,0x8d,0x8e,0x8f,0x90,0x91,0x92,0x93,0x94,
0xa0,0xa1,0xa2,0xa3,0xa4,0xa5,0xa6,0xa7,0xa8,0xa9,0xaa,0xab,0xac,0xad,0xae,0xaf,0xb0,0xb1,0xb2,0xb3,0xb4,
0xc0,0xc1,0xc2,0xc3,0xc4,0xc5,0xc6,0xc7,0xc8,0xc9,0xca,0xcb,0xcc,0xcd,0xce,0xcf,0xd0,0xd1,0xd2,0xd3,0xd4,
0};
matrix_write(matrix, logo);
}
matrix* matrix_transpose(matrix* m) {
matrix* mat_out = matrix_zero(m->n_cols, m->n_rows);
int i_row, i_col;
for (i_row = 0; i_row < m->n_rows; i_row++) {
for (i_col = 0; i_col < m->n_cols; i_col++) {
matrix_write(mat_out, i_col, i_row, matrix_read(m, i_row, i_col));
}
}
return mat_out;
}
void matrix_render_user(struct CharacterMatrix *matrix) {
if (is_master) {
// If you want to change the display of OLED, you need to change here
matrix_write_ln(matrix, read_layer_state());
matrix_write_ln(matrix, read_keylog());
matrix_write_ln(matrix, read_keylogs());
//matrix_write_ln(matrix, read_mode_icon(keymap_config.swap_lalt_lgui));
//matrix_write_ln(matrix, read_host_led_state());
//matrix_write_ln(matrix, read_timelog());
} else {
matrix_write(matrix, read_logo());
}
}
int main (int argc, char *argv[])
{
#ifdef _DIST_
CnC::dist_cnc_init< cholesky_context > dc_init;
#endif
int n;
int b;
dist_type dt = BLOCKED_ROWS;
const char *fname = NULL;
const char *oname = NULL;
const char *mname = NULL;
int argi;
// Command line: cholesky n b filename [out-file]
if (argc < 3 || argc > 7) {
fprintf(stderr, "Incorrect number of arguments, epxected N BS [-i infile] [-o outfile] [-w mfile] [-dt disttype]\n");
return -1;
}
argi = 1;
n = atol(argv[argi++]);
b = atol(argv[argi++]);
while( argi < argc ) {
if( ! strcmp( argv[argi], "-o" ) ) oname = argv[++argi];
else if( ! strcmp( argv[argi], "-i" ) ) fname = argv[++argi];
else if( ! strcmp( argv[argi], "-w" ) ) mname = argv[++argi];
else if( ! strcmp( argv[argi], "-dt" ) ) dt = static_cast< dist_type >( atoi( argv[++argi] ) );
++argi;
}
#ifdef USE_MKL
if( mname == NULL ) {
mkl_set_num_threads( 1 );
omp_set_num_threads( 1 );
}
#endif
if(n % b != 0) {
fprintf(stderr, "The tile size is not compatible with the given matrix\n");
exit(0);
}
double * A = new double[n*n];
matrix_init( A, n, fname );
if( mname ) matrix_write( A, n, mname );
else cholesky(A, n, b, oname, dt);
delete [] A;
return 0;
}
BOOL ASENSOR::BiasSave( void )
{
BOOL ok;
matrix B,H;
time_t t;
int i;
if( !CalibrationFlags[ASENSOR_CALIBRATION_BIAS] )
{
return(TRUE);
}
//disp(BiasVolts);
TIMER_delay(10.0);
B.duplicate(BiasVolts);
MakeRowVector(B);
//printf("ASENSOR::BiasSave()\n");
//disp(B);
ok = matrix_write(BiasFile,B);
STR_printf(ok,ASENSOR_debugf,ASENSOR_errorf,"ASENSOR::BiasSave() %s %s.\n",BiasFile,STR_OkFailed(ok));
if( ok )
{
time(&t);
H.dim(1,DAQ_ChannelCount+1);
H(1,1) = (double)t;
for( i=0; (i < DAQ_ChannelCount); i++ )
{
H(1,i+2) = B(i+1,1);
}
ok = matrix_append(BiasHistoryFile,H);
STR_printf(ok,ASENSOR_debugf,ASENSOR_errorf,"ASENSOR::BiasSave() %s %s.\n",BiasHistoryFile,STR_OkFailed(ok));
}
return(ok);
}
void render_status(struct CharacterMatrix *matrix) {
// Render to mode icon
static char logo[][2][3]={{{0x95,0x96,0},{0xb5,0xb6,0}},{{0x97,0x98,0},{0xb7,0xb8,0}}};
if(keymap_config.swap_lalt_lgui==false){
matrix_write(matrix, logo[0][0]);
matrix_write_P(matrix, PSTR("\n"));
matrix_write(matrix, logo[0][1]);
}else{
matrix_write(matrix, logo[1][0]);
matrix_write_P(matrix, PSTR("\n"));
matrix_write(matrix, logo[1][1]);
}
// Define layers here, Have not worked out how to have text displayed for each layer. Copy down the number you see and add a case for it below
char buf[40];
snprintf(buf,sizeof(buf), "Undef-%ld", layer_state);
matrix_write_P(matrix, PSTR("\nMode: "));
switch (layer_state) {
case L_BASE:
matrix_write_P(matrix, PSTR("Swan Match"));
break;
case L_RAISE:
matrix_write_P(matrix, PSTR("Calculator"));
break;
case L_LOWER:
matrix_write_P(matrix, PSTR("Cursor"));
break;
case L_ADJUST:
case L_ADJUST_TRI:
matrix_write_P(matrix, PSTR("Setting"));
break;
default:
matrix_write(matrix, buf);
}
// Host Keyboard LED Status
char led[40];
snprintf(led, sizeof(led), "\n%s %s %s",
(host_keyboard_leds() & (1<<USB_LED_NUM_LOCK)) ? "NUMLOCK" : " ",
(host_keyboard_leds() & (1<<USB_LED_CAPS_LOCK)) ? "CAPS" : " ",
(host_keyboard_leds() & (1<<USB_LED_SCROLL_LOCK)) ? "SCLK" : " ");
matrix_write(matrix, led);
}
void master(char *a_fname, char *b_fname, char *out_fname) {
Matrix a = matrix_read(a_fname);
Matrix b = matrix_read(b_fname);
if (a.width != a.height || b.width != b.height || a.width != b.width) {
printf("Invalid inputs. Both matricies must be nxn. A was %dx%d. B was"
" %dx%d", a.height, a.width, b.height, b.width);
MPI_Abort(MPI_COMM_WORLD, -1);
}
MPI_Bcast(&(a.width), 1, MPI_INT, 0, MPI_COMM_WORLD);
Matrix result = matrix_malloc(a.width, b.width);
matrix_init(&result);
MPI_matrix_multiply(&result, &a, &b, a.width, 0, MPI_COMM_WORLD);
matrix_write(out_fname, result);
if (result.width <= 20)
matrix_print(result);
free(result.data);
free(a.data);
free(b.data);
}
void iota_gfx_task_user(void) {
#if DEBUG_TO_SCREEN
if (debug_enable) {
return;
}
#endif
struct CharacterMatrix matrix;
matrix_clear(&matrix);
matrix_write_P(&matrix, PSTR("USB: "));
#ifdef PROTOCOL_LUFA
switch (USB_DeviceState) {
case DEVICE_STATE_Unattached:
matrix_write_P(&matrix, PSTR("Unattached"));
break;
case DEVICE_STATE_Suspended:
matrix_write_P(&matrix, PSTR("Suspended"));
break;
case DEVICE_STATE_Configured:
matrix_write_P(&matrix, PSTR("Connected"));
break;
case DEVICE_STATE_Powered:
matrix_write_P(&matrix, PSTR("Powered"));
break;
case DEVICE_STATE_Default:
matrix_write_P(&matrix, PSTR("Default"));
break;
case DEVICE_STATE_Addressed:
matrix_write_P(&matrix, PSTR("Addressed"));
break;
default:
matrix_write_P(&matrix, PSTR("Invalid"));
}
#endif
// Define layers here, Have not worked out how to have text displayed for each layer. Copy down the number you see and add a case for it below
char buf[40];
snprintf(buf,sizeof(buf), "Undef-%ld", layer_state);
matrix_write_P(&matrix, PSTR("\n\nLayer: "));
switch (layer_state) {
case L_BASE:
matrix_write_P(&matrix, PSTR("Default"));
break;
case L_RAISE:
matrix_write_P(&matrix, PSTR("Raise"));
break;
case L_LOWER:
matrix_write_P(&matrix, PSTR("Lower"));
break;
case L_ADJUST:
matrix_write_P(&matrix, PSTR("ADJUST"));
break;
default:
matrix_write(&matrix, buf);
}
// Host Keyboard LED Status
char led[40];
snprintf(led, sizeof(led), "\n%s %s %s",
(host_keyboard_leds() & (1<<USB_LED_NUM_LOCK)) ? "NUMLOCK" : " ",
(host_keyboard_leds() & (1<<USB_LED_CAPS_LOCK)) ? "CAPS" : " ",
(host_keyboard_leds() & (1<<USB_LED_SCROLL_LOCK)) ? "SCLK" : " ");
matrix_write(&matrix, led);
matrix_update(&display, &matrix);
}
void matrix_render_user(struct CharacterMatrix *matrix) {
if (is_master) {
static char indctr[2][20][5]=
{
// white icon
{
{0x80,0x81,0x82,0x83,0},
{0x88,0x89,0x8A,0x8B,0},
{0x90,0x91,0x92,0x93,0},
{0x98,0x99,0x9A,0x9B,0},
{0x01,0x02,0x03,0x04,0},
{0xA0,0xA1,0xA2,0xA3,0},
{0xA8,0xA9,0xAA,0xAB,0},
{0xB0,0xB1,0xB2,0xB3,0},
{0xB8,0xB9,0xBA,0xBB,0},
{0x21,0x22,0x23,0x24,0},
{0xC0,0xC1,0xC2,0xC3,0},
{0xC8,0xC9,0xCA,0xCB,0},
{0xD0,0xD1,0xD2,0xD3,0},
{0xD8,0xD9,0xDA,0xDB,0},
{0x41,0x42,0x43,0x44,0},
{0xE0,0xE1,0xE2,0xE3,0},
{0xE8,0xE9,0xEA,0xEB,0},
{0xF0,0xF1,0xF2,0xF3,0},
{0xF8,0xF9,0xFA,0xFB,0},
{0x61,0x62,0x63,0x64,0}
},
// Black icon
{
{0x84,0x85,0x86,0x87,0},
{0x8C,0x8D,0x8E,0x8F,0},
{0x94,0x95,0x96,0x97,0},
{0x9C,0x9D,0x9E,0x9F,0},
{0x05,0x06,0x07,0x08,0},
{0xA4,0xA5,0xA6,0xA7,0},
{0xAC,0xAD,0xAE,0xAF,0},
{0xB4,0xB5,0xB6,0xB7,0},
{0xBC,0xBD,0xBE,0xBF,0},
{0x25,0x26,0x27,0x28,0},
{0xC4,0xC5,0xC6,0xC7,0},
{0xCC,0xCD,0xCE,0xCF,0},
{0xD4,0xD5,0xD6,0xD7,0},
{0xDC,0xDD,0xDE,0xDF,0},
{0x45,0x46,0x47,0x48,0},
{0xE4,0xE5,0xE6,0xE7,0},
{0xEC,0xED,0xEE,0xEF,0},
{0xF4,0xF5,0xF6,0xF7,0},
{0xFC,0xFD,0xFE,0xFF,0},
{0x65,0x66,0x67,0x68,0}
}
};
int rown = 0;
int rowc = 0;
int rowl = 0;
int rowr = 0;
int rowa = 0;
//Set Indicator icon
if (host_keyboard_leds() & (1<<USB_LED_NUM_LOCK)) { rown = 1; } else { rown = 0; }
if (host_keyboard_leds() & (1<<USB_LED_CAPS_LOCK)) { rowc = 1; } else { rowc = 0; }
if (layer_state == L_LOWER) { rowl = 1; }
if (layer_state == L_RAISE) { rowr = 1; }
if (layer_state == L_ADJUST) { rowa = 1; }
matrix_write(matrix, indctr[rowl] [0]);
matrix_write(matrix, indctr[rowr] [1]);
matrix_write(matrix, indctr[rowa] [2]);
matrix_write(matrix, indctr[rowc] [3]);
matrix_write(matrix, indctr[rown] [4]);
matrix_write_char(matrix, 0x13);
matrix_write(matrix, indctr[rowl] [5]);
matrix_write(matrix, indctr[rowr] [6]);
matrix_write(matrix, indctr[rowa] [7]);
matrix_write(matrix, indctr[rowc] [8]);
matrix_write(matrix, indctr[rown] [9]);
matrix_write_char(matrix, 0x13);
matrix_write(matrix, indctr[rowl] [10]);
matrix_write(matrix, indctr[rowr] [11]);
matrix_write(matrix, indctr[rowa] [12]);
matrix_write(matrix, indctr[rowc] [13]);
matrix_write(matrix, indctr[rown] [14]);
matrix_write_char(matrix, 0x13);
matrix_write(matrix, indctr[rowl] [15]);
matrix_write(matrix, indctr[rowr] [16]);
matrix_write(matrix, indctr[rowa] [17]);
matrix_write(matrix, indctr[rowc] [18]);
matrix_write(matrix, indctr[rown] [19]);
}else{
matrix_write(matrix, read_logo());
}
}
void iota_gfx_write(const char *data) {
matrix_write(&display, data);
}
void matrix_write_ln(struct CharacterMatrix *matrix, const char *data) {
char data_ln[strlen(data)+2];
snprintf(data_ln, sizeof(data_ln), "%s\n", data);
matrix_write(matrix, data_ln);
}
