diff options
Diffstat (limited to 'src/cups/backend_shinkos6145.c')
-rw-r--r-- | src/cups/backend_shinkos6145.c | 2522 |
1 files changed, 2522 insertions, 0 deletions
diff --git a/src/cups/backend_shinkos6145.c b/src/cups/backend_shinkos6145.c new file mode 100644 index 0000000..692a42c --- /dev/null +++ b/src/cups/backend_shinkos6145.c @@ -0,0 +1,2522 @@ +/* + * Shinko/Sinfonia CHC-S6145 CUPS backend -- libusb-1.0 version + * + * (c) 2015-2016 Solomon Peachy <pizza@shaftnet.org> + * + * Low-level documentation was provided by Sinfonia. Thank you! + * + * The latest version of this program can be found at: + * + * http://git.shaftnet.org/cgit/selphy_print.git + * + * This program is free software; you can redistribute it and/or modify it + * under the terms of the GNU General Public License as published by the Free + * Software Foundation; either version 2 of the License, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, but + * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY + * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License + * for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + * + * [http://www.gnu.org/licenses/gpl-2.0.html] + * + * An additional permission is granted, under the GPLv2 section 10, to combine + * and/or redistribute this program with the proprietary libS6145ImageProcess + * library, providing you have *written permission* from Sinfonia Technology + * Co. LTD to use and/or redistribute that library. + * + * You must still adhere to all other terms of the license to this program + * (ie GPLv2) and the license of the libS6145ImageProcess library. + * + */ + +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <unistd.h> + +#include <errno.h> +#include <sys/types.h> +#include <sys/stat.h> +#include <fcntl.h> +#include <signal.h> +#include <time.h> + +/* For Integration into gutenprint */ +#if defined(HAVE_CONFIG_H) +#include <config.h> +#endif + +#if defined(USE_DLOPEN) +#define WITH_DYNAMIC +#include <dlfcn.h> +#define DL_INIT() do {} while(0) +#define DL_OPEN(__x) dlopen(__x, RTLD_NOW) +#define DL_SYM(__x, __y) dlsym(__x, __y) +#define DL_CLOSE(__x) dlclose(__x) +#define DL_EXIT() do {} while(0) +#elif defined(USE_LTDL) +#define WITH_DYNAMIC +#include <ltdl.h> +#define DL_INIT() lt_dlinit() +#define DL_OPEN(__x) lt_dlopen(__x) +#define DL_SYM(__x, __y) lt_dlsym(__x, __y) +#define DL_CLOSE(__x) do {} while(0) +#define DL_EXIT() lt_dlexit() +#else +#define DL_INIT() do {} while(0) +#define DL_CLOSE(__x) do {} while(0) +#define DL_EXIT() do {} while(0) +#warning "No dynamic loading support!" +#endif + +#define BACKEND shinkos6145_backend + +#include "backend_common.h" + +/* Image processing library function prototypes */ +typedef int (*ImageProcessingFN)(unsigned char *, unsigned short *, void *); +typedef int (*ImageAvrCalcFN)(unsigned char *, unsigned short, unsigned short, unsigned char *); + +#define LIB_NAME "libS6145ImageProcess.so" // Official library +#define LIB_NAME_RE "libS6145ImageReProcess.so" // Reimplemented library + +enum { + S_IDLE = 0, + S_PRINTER_READY_CMD, + S_PRINTER_SENT_DATA, + S_FINISHED, +}; + +/* Structure of printjob header. All fields are LITTLE ENDIAN */ +struct s6145_printjob_hdr { + uint32_t len1; /* Fixed at 0x10 */ + uint32_t model; /* Equal to the printer model (eg '6245' or '1245' decimal) */ + uint32_t media_w; /* 0x02 for 5", 0x03 for 6" */ + uint32_t unk3; /* Fixed at 0x01 */ + + uint32_t len2; /* Fixed at 0x64 */ + uint32_t unk5; + uint32_t media; /* 0x08 5x5, 0x03 5x7, 0x07 2x6, 0x00 4x6, 0x06 6x6/6x6+6x2/4x6*2/6x8 */ + uint32_t unk6; + + uint32_t method; /* 0x00 normal, 0x02 4x6*2, 0x04 2x6*2, 0x05 6x6+2x6 */ + uint32_t qual; /* 0x00 default, 0x01 std */ + uint32_t oc_mode; /* 0x00 default, 0x01 off, 0x02 glossy, 0x03 matte */ + uint32_t unk8; + + uint32_t unk9; + uint32_t columns; + uint32_t rows; + uint32_t copies; + + uint32_t unk10; + uint32_t unk11; + uint32_t unk12; + uint32_t unk13; + + uint32_t unk14; + uint32_t unk15; + uint32_t dpi; /* Fixed at '300' (decimal) */ + uint32_t unk16; + + uint32_t unk17; + uint32_t unk18; + uint32_t unk19; + uint32_t unk20; + + uint32_t unk21; +} __attribute__((packed)); + +/* "Image Correction Parameter" File */ +// 128 bytes total, apparently an array of 32-bit values +struct tankParamTable { + uint32_t trdTankSize; + uint32_t sndTankSize; + uint32_t fstTankSize; + uint32_t trdTankIniEnergy; + uint32_t sndTankIniEnergy; + uint32_t fstTankIniEnergy; + uint32_t trdTrdConductivity; + uint32_t sndSndConductivity; + uint32_t fstFstConductivity; + uint32_t outTrdConductivity; + uint32_t trdSndConductivity; + uint32_t sndFstConductivity; + uint32_t fstOutConductivity; + uint32_t plusMaxEnergy; + uint32_t minusMaxEnergy; + uint32_t plusMaxEnergyPreRead; + uint32_t minusMaxEnergyPreRead; + uint32_t preReadLevelDiff; + uint32_t rsvd[14]; // null? +} __attribute__((packed)); + +struct shinkos6145_correctionparam { + uint16_t pulseTransTable_Y[256]; // @0 + uint16_t pulseTransTable_M[256]; // @512 + uint16_t pulseTransTable_C[256]; // @1024 + uint16_t pulseTransTable_O[256]; // @1536 + + uint16_t lineHistCoefTable_Y[256]; // @2048 + uint16_t lineHistCoefTable_M[256]; // @2560 + uint16_t lineHistCoefTable_C[256]; // @3072 + uint16_t lineHistCoefTable_O[256]; // @3584 + + uint16_t lineCorrectEnvA_Y; // @4096 + uint16_t lineCorrectEnvA_M; // @4098 + uint16_t lineCorrectEnvA_C; // @4100 + uint16_t lineCorrectEnvA_O; // @4102 + + uint16_t lineCorrectEnvB_Y; // @4104 + uint16_t lineCorrectEnvB_M; // @4106 + uint16_t lineCorrectEnvB_C; // @4108 + uint16_t lineCorrectEnvB_O; // @4110 + + uint16_t lineCorrectEnvC_Y; // @4112 + uint16_t lineCorrectEnvC_M; // @4114 + uint16_t lineCorrectEnvC_C; // @4116 + uint16_t lineCorrectEnvC_O; // @4118 + + uint32_t lineCorrectSlice_Y; // @4120 + uint32_t lineCorrectSlice_M; // @4124 + uint32_t lineCorrectSlice_C; // @4128 + uint32_t lineCorrectSlice_O; // @4132 + + uint32_t lineCorrectSlice1Line_Y; // @4136 + uint32_t lineCorrectSlice1Line_M; // @4140 + uint32_t lineCorrectSlice1Line_C; // @4144 + uint32_t lineCorrectSlice1Line_O; // @4148 + + uint32_t lineCorrectPulseMax_Y; // @4152 [array] + uint32_t lineCorrectPulseMax_M; // @4156 [array] + uint32_t lineCorrectPulseMax_C; // @4160 [array] + uint32_t lineCorrectPulseMax_O; // @4164 [array] + + struct tankParamTable tableTankParam_Y; // @4168 + struct tankParamTable tableTankParam_M; // @4296 + struct tankParamTable tableTankParam_C; // @4424 + struct tankParamTable tableTankParam_O; // @4552 + + uint16_t tankPlusMaxEnergyTable_Y[256]; // @4680 + uint16_t tankPlusMaxEnergyTable_M[256]; // @5192 + uint16_t tankPlusMaxEnergyTable_C[256]; // @5704 + uint16_t tankPlusMaxEnergyTable_O[256]; // @6216 + + uint16_t tankMinusMaxEnergy_Y[256]; // @6728 + uint16_t tankMinusMaxEnergy_M[256]; // @7240 + uint16_t tankMinusMaxEnergy_C[256]; // @7752 + uint16_t tankMinusMaxEnergy_O[256]; // @8264 + + uint16_t printMaxPulse_Y; // @8776 + uint16_t printMaxPulse_M; // @8778 + uint16_t printMaxPulse_C; // @8780 + uint16_t printMaxPulse_O; // @8782 + + uint16_t mtfWeightH_Y; // @8784 + uint16_t mtfWeightH_M; // @8786 + uint16_t mtfWeightH_C; // @8788 + uint16_t mtfWeightH_O; // @8790 + + uint16_t mtfWeightV_Y; // @8792 + uint16_t mtfWeightV_M; // @8794 + uint16_t mtfWeightV_C; // @8796 + uint16_t mtfWeightV_O; // @8798 + + uint16_t mtfSlice_Y; // @8800 + uint16_t mtfSlice_M; // @8802 + uint16_t mtfSlice_C; // @8804 + uint16_t mtfSlice_O; // @8806 + + uint16_t val_1; // @8808 // 1 enables linepreprintprocess + uint16_t val_2; // @8810 // 1 enables ctankprocess + uint16_t printOpLevel; // @8812 + uint16_t matteMode; // @8814 // 1 for matte + + uint16_t randomBase[4]; // @8816 [use lower byte of each] + + uint16_t matteSize; // @8824 + uint16_t matteGloss; // @8826 + uint16_t matteDeglossBlk; // @8828 + uint16_t matteDeglossWht; // @8830 + + uint16_t printSideOffset; // @8832 + uint16_t headDots; // @8834 [always 0x0780, ie 1920. print width + + uint16_t SideEdgeCoefTable[128]; // @8836 + uint8_t rsvd_2[256]; // @9092, null? + uint16_t SideEdgeLvCoefTable[256]; // @9348 + uint8_t rsvd_3[2572]; // @9860, null? + + /* User-supplied data */ + uint16_t width; // @12432 + uint16_t height; // @12434 + uint8_t pad[3948]; // @12436, null. +} __attribute__((packed)); /* 16384 bytes */ + +/* Private data stucture */ +struct shinkos6145_ctx { + struct libusb_device_handle *dev; + uint8_t endp_up; + uint8_t endp_down; + int type; + + uint8_t jobid; + + struct s6145_printjob_hdr hdr; + + uint8_t image_avg[3]; /* CMY */ + + uint8_t *databuf; + size_t datalen; + + uint8_t ribbon_type; + + uint16_t last_donor; + uint16_t last_remain; + uint16_t last_ribbon; + + uint8_t *eeprom; + size_t eepromlen; + + void *dl_handle; + ImageProcessingFN ImageProcessing; + ImageAvrCalcFN ImageAvrCalc; + + struct shinkos6145_correctionparam *corrdata; + size_t corrdatalen; +}; + +static int shinkos6145_get_imagecorr(struct shinkos6145_ctx *ctx); +static int shinkos6145_get_eeprom(struct shinkos6145_ctx *ctx); + +/* Structs for printer */ +struct s6145_cmd_hdr { + uint16_t cmd; + uint16_t len; /* Not including this header */ +} __attribute__((packed)); + +#define S6145_CMD_GETSTATUS 0x0001 +#define S6145_CMD_MEDIAINFO 0x0002 +#define S6145_CMD_ERRORLOG 0x0004 +#define S6145_CMD_GETPARAM 0x0005 +#define S6145_CMD_GETSERIAL 0x0006 +#define S6145_CMD_PRINTSTAT 0x0007 +#define S6145_CMD_EXTCOUNTER 0x0008 +#define S6145_CMD_MEMORYBANK 0x000A // Brava 21 only? + +#define S6145_CMD_PRINTJOB 0x4001 +#define S6145_CMD_CANCELJOB 0x4002 +#define S6145_CMD_FLASHLED 0x4003 +#define S6145_CMD_RESET 0x4004 +#define S6145_CMD_READTONE 0x4005 +#define S6145_CMD_SETPARAM 0x4007 + +#define S6145_CMD_GETCORR 0x400D +#define S6145_CMD_GETEEPROM 0x400E +#define S6145_CMD_SETEEPROM 0x400F + +#define S6145_CMD_FWINFO 0xC003 +#define S6145_CMD_UPDATE 0xC004 + +static char *cmd_names(uint16_t v) { + switch (le16_to_cpu(v)) { + case S6145_CMD_GETSTATUS: + return "Get Status"; + case S6145_CMD_MEDIAINFO: + return "Get Media Info"; + case S6145_CMD_ERRORLOG: + return "Get Error Log"; + case S6145_CMD_GETPARAM: + return "Get Parameter"; + case S6145_CMD_GETSERIAL: + return "Get Serial Number"; + case S6145_CMD_PRINTSTAT: + return "Get Print ID Status"; + case S6145_CMD_EXTCOUNTER: + return "Get Extended Counters"; + case S6145_CMD_PRINTJOB: + return "Print"; + case S6145_CMD_CANCELJOB: + return "Cancel Print"; + case S6145_CMD_FLASHLED: + return "Flash LEDs"; + case S6145_CMD_RESET: + return "Reset"; + case S6145_CMD_READTONE: + return "Read Tone Curve"; + case S6145_CMD_SETPARAM: + return "Set Parameter"; + case S6145_CMD_GETCORR: + return "Get Image Correction Parameter"; + case S6145_CMD_GETEEPROM: + return "Get EEPROM Backup Parameter"; + case S6145_CMD_SETEEPROM: + return "Set EEPROM Backup Parameter"; + case S6145_CMD_FWINFO: + return "Get Firmware Info"; + case S6145_CMD_UPDATE: + return "Update"; + default: + return "Unknown Command"; + } +}; + +struct s6145_print_cmd { + struct s6145_cmd_hdr hdr; + uint8_t id; + uint16_t count; + uint16_t columns; + uint16_t rows; + uint8_t media; /* reserved in docs, but brava21 uses this */ + uint8_t combo_wait; + uint8_t reserved[6]; + uint8_t unk_1; /* Brava 21 sets this to 1 */ + uint8_t method; + uint8_t image_avg; +} __attribute__((packed)); + +#define PRINT_MODE_NO_OC 0x01 +#define PRINT_MODE_GLOSSY 0x02 +#define PRINT_MODE_MATTE 0x03 + +#if 0 +static char *print_modes(uint8_t v) { + switch (v) { + case PRINT_MODE_NO_OC: + return "No Overcoat"; + case PRINT_MODE_GLOSSY: + return "Glossy"; + case PRINT_MODE_MATTE: + return "Matte"; + default: + return "Unknown"; + } +} +#endif + +#define PRINT_METHOD_STD 0x00 +#define PRINT_METHOD_COMBO_2 0x02 +#define PRINT_METHOD_SPLIT 0x04 +#define PRINT_METHOD_DOUBLE 0x08 +#define PRINT_METHOD_NOTRIM 0x80 + +static char *print_methods (uint8_t v) { + switch (v & 0xf) { + case PRINT_METHOD_STD: + return "Standard"; + case PRINT_METHOD_COMBO_2: + return "2up"; + case PRINT_METHOD_SPLIT: + return "Split"; + case PRINT_METHOD_DOUBLE: + return "Double"; + default: + return "Unknown"; + } +} + +struct s6145_cancel_cmd { + struct s6145_cmd_hdr hdr; + uint8_t id; +} __attribute__((packed)); + +struct s6145_reset_cmd { + struct s6145_cmd_hdr hdr; + uint8_t target; + uint8_t curveid; +} __attribute__((packed)); + +#define RESET_PRINTER 0x03 +#define RESET_TONE_CURVE 0x04 + +#define TONE_CURVE_ID 0x01 + +struct s6145_readtone_cmd { + struct s6145_cmd_hdr hdr; + uint8_t target; + uint8_t curveid; +} __attribute__((packed)); + +#define READ_TONE_CURVE_USER 0x01 +#define READ_TONE_CURVE_CURR 0x02 + +struct s6145_setparam_cmd { + struct s6145_cmd_hdr hdr; + uint8_t target; + uint32_t param; +} __attribute__((packed)); + +#define PARAM_OC_PRINT 0x20 +#define PARAM_PAPER_PRESV 0x3d +#define PARAM_DRIVER_MODE 0x3e +#define PARAM_PAPER_MODE 0x3f +#define PARAM_REGION_CODE 0x53 // Brava 21 only? +#define PARAM_SLEEP_TIME 0x54 + + +#define PARAM_OC_PRINT_OFF 0x00000001 +#define PARAM_OC_PRINT_GLOSS 0x00000002 +#define PARAM_OC_PRINT_MATTE 0x00000003 + +#define PARAM_PAPER_PRESV_OFF 0x00000000 +#define PARAM_PAPER_PRESV_ON 0x00000001 + +#define PARAM_DRIVER_WIZOFF 0x00000000 +#define PARAM_DRIVER_WIZON 0x00000001 + +#define PARAM_PAPER_NOCUT 0x00000000 +#define PARAM_PAPER_CUTLOAD 0x00000001 + +#define PARAM_SLEEP_5MIN 0x00000000 +#define PARAM_SLEEP_15MIN 0x00000001 +#define PARAM_SLEEP_30MIN 0x00000002 +#define PARAM_SLEEP_60MIN 0x00000003 +#define PARAM_SLEEP_120MIN 0x00000004 +#define PARAM_SLEEP_240MIN 0x00000005 + +struct s6145_seteeprom_cmd { + struct s6145_cmd_hdr hdr; + uint8_t data[256]; /* Maxlen */ +} __attribute__((packed)); + +struct s6145_errorlog_cmd { + struct s6145_cmd_hdr hdr; + uint16_t index; /* 0 is latest */ +} __attribute__((packed)); + +struct s6145_getparam_cmd { + struct s6145_cmd_hdr hdr; + uint8_t target; +} __attribute__((packed)); + +struct s6145_getprintidstatus_cmd { + struct s6145_cmd_hdr hdr; + uint8_t id; +} __attribute__((packed)); + +struct s6145_fwinfo_cmd { + struct s6145_cmd_hdr hdr; + uint8_t target; +} __attribute__((packed)); + +#define FWINFO_TARGET_MAIN_BOOT 0x01 +#define FWINFO_TARGET_MAIN_APP 0x02 +#define FWINFO_TARGET_PRINT_TABLES 0x03 +#define FWINFO_TARGET_DSP 0x04 + +static char *fwinfo_targets (uint8_t v) { + switch (v) { + case FWINFO_TARGET_MAIN_BOOT: + return "Main Boot "; + case FWINFO_TARGET_MAIN_APP: + return "Main App "; + case FWINFO_TARGET_DSP: + return "DSP "; + case FWINFO_TARGET_PRINT_TABLES: + return "Print Tables"; + default: + return "Unknown "; + } +} + +struct s6145_update_cmd { + struct s6145_cmd_hdr hdr; + uint8_t target; + uint8_t curve_id; + uint8_t reset; // ?? + uint8_t reserved[3]; + uint32_t size; +} __attribute__((packed)); + +#define UPDATE_TARGET_USER 0x03 +#define UPDATE_TARGET_CURRENT 0x04 + +static char *update_targets (uint8_t v) { + switch (v) { + case UPDATE_TARGET_USER: + return "User"; + case UPDATE_TARGET_CURRENT: + return "Current"; + default: + return "Unknown"; + } +} + +#define UPDATE_SIZE 0x600 +/* Update is three channels, Y, M, C; + each is 256 entries of 11-bit data padded to 16-bits. + Printer expects LE data. We use BE data on disk. +*/ + +struct s6145_status_hdr { + uint8_t result; + uint8_t error; + uint8_t printer_major; + uint8_t printer_minor; + uint8_t reserved[3]; + uint8_t status; + uint16_t payload_len; +} __attribute__((packed)); + +#define RESULT_SUCCESS 0x01 +#define RESULT_FAIL 0x02 + +#define ERROR_NONE 0x00 +#define ERROR_INVALID_PARAM 0x01 +#define ERROR_MAIN_APP_INACTIVE 0x02 +#define ERROR_COMMS_TIMEOUT 0x03 +#define ERROR_MAINT_NEEDED 0x04 +#define ERROR_BAD_COMMAND 0x05 +#define ERROR_PRINTER 0x11 +#define ERROR_BUFFER_FULL 0x21 + +static char *error_codes(uint8_t major, uint8_t minor) +{ + switch(major) { + case 0x01: /* "Controller Error" */ + switch(minor) { + case 0x01: + return "Controller: EEPROM Write Timeout"; + case 0x0A: + return "Controller: Invalid Print Parameter Table"; + case 0x0C: + return "Controller: Print Parameter Table Mismatch"; + case 0x0F: + return "Controller: Main FW Checksum"; + case 0x10: + return "Controller: Flash Write Failed"; + case 0x13: + return "Controller: Print Parameter Table Checksum"; + case 0x14: + return "Controller: Print Parameter Table Write Failed"; + case 0x15: + return "Controller: User Tone Curve Write Failed"; + case 0x16: + return "Controller: MSP Communication"; + case 0x17: + return "Controller: THV Autotuning"; + case 0x18: + return "Controller: THV Value Out of Range"; + case 0x19: + return "Controller: Thermal Head"; + case 0x1A: + return "Controller: Wake from Power Save Failed"; + default: + return "Controller: Unknown"; + } + case 0x02: /* "Mechanical Error" */ + switch (minor) { + case 0x01: + return "Mechanical: Pinch Head Home"; + case 0x02: + return "Mechanical: Pinch Head (position 1)"; + case 0x03: + return "Mechanical: Pinch Head (position 2)"; + case 0x04: + return "Mechanical: Pinch Head (position 3)"; + case 0x0B: + return "Mechanical: Cutter (Right)"; + case 0x0C: + return "Mechanical: Cutter (Left)"; + default: + return "Mechanical: Unknown"; + } + case 0x03: /* "Sensor Error" */ + switch (minor) { + case 0x01: + return "Sensor: Head Up"; + case 0x02: + return "Sensor: Head Down"; + case 0x0B: + return "Sensor: Cutter Left"; + case 0x0C: + return "Sensor: Cutter Right"; + case 0x0D: + return "Sensor: Cutter Left+Right"; + case 0x15: + return "Sensor: Head Up Unstable"; + case 0x16: + return "Sensor: Head Down Unstable"; + case 0x17: + return "Sensor: Cutter Left Unstable"; + case 0x18: + return "Sensor: Cutter Right Unstable"; + case 0x19: + return "Sensor: Cover Open Unstable"; + case 0x1E: + return "Sensor: Ribbon Mark (Cyan)"; + case 0x1F: + return "Sensor: Ribbon Mark (OC)"; + default: + return "Sensor: Unknown"; + } + case 0x04: /* "Temperature Sensor Error" */ + switch (minor) { + case 0x01: + return "Temp Sensor: Thermal Head Low"; + case 0x02: + return "Temp Sensor: Thermal Head High"; + case 0x05: + return "Temp Sensor: Environment Low"; + case 0x06: + return "Temp Sensor: Environment High"; + case 0x07: + return "Temp Sensor: Preheat"; + case 0x08: + return "Temp Sensor: Thermal Protect"; + default: + return "Temp Sensor: Unknown"; + } + case 0x5: /* "Paper Jam" */ + switch (minor) { + case 0x01: + return "Paper Jam: Loading Paper Top On"; + case 0x02: + return "Paper Jam: Loading Print Position On"; + case 0x03: + return "Paper Jam: Loading Print Position Off"; + case 0x04: + return "Paper Jam: Loading Paper Top Off"; + case 0x05: + return "Paper Jam: Loading Cut Print Position Off"; + case 0x0C: + return "Paper Jam: Initializing Print Position Off"; + case 0x0D: + return "Paper Jam: Initializing Print Position On"; + case 0x15: + return "Paper Jam: Printing Print Position Off"; + case 0x16: + return "Paper Jam: Printing Paper Top On"; + case 0x17: + return "Paper Jam: Printing Paper Top Off"; + case 0x1F: + return "Paper Jam: Precut Print Position Off"; + case 0x20: + return "Paper Jam: Precut Print Position On"; + + case 0x29: + return "Paper Jam: Printing Paper Top On"; + case 0x2A: + return "Paper Jam: Printing Pre-Yellow Print Position Off"; + case 0x2B: + return "Paper Jam: Printing Yellow Print Position Off"; + case 0x2C: + return "Paper Jam: Printing Yellow Print Position On"; + case 0x2D: + return "Paper Jam: Printing Pre-Magenta Print Position Off"; + case 0x2E: + return "Paper Jam: Printing Magenta Print Position On"; + case 0x2F: + return "Paper Jam: Printing Magenta Print Position Off"; + case 0x30: + return "Paper Jam: Printing Pre-Cyan Print Position Off"; + case 0x31: + return "Paper Jam: Printing Cyan Print Position On"; + case 0x32: + return "Paper Jam: Printing Cyan Print Position Off"; + case 0x33: + return "Paper Jam: Printing Pre-OC Print Position Off"; + case 0x34: + return "Paper Jam: Printing OC Print Position On"; + case 0x35: + return "Paper Jam: Printing OC Print Position Off"; + case 0x36: + return "Paper Jam: Cut Print Position Off"; + case 0x37: + return "Paper Jam: Home Position Off"; + case 0x38: + return "Paper Jam: Paper Top Off"; + case 0x39: + return "Paper Jam: Print Position On"; + + case 0x51: + return "Paper Jam: Paper Empty On, Top On, Position On"; + case 0x52: + return "Paper Jam: Paper Empty On, Top On, Position Off"; + case 0x54: + return "Paper Jam: Paper Empty On, Top Off, Position Off"; + case 0x60: + return "Paper Jam: Cutter Right"; + case 0x61: + return "Paper Jam: Cutter Left"; + + default: + return "Paper Jam: Unknown"; + } + case 0x06: /* User Error */ + switch (minor) { + case 0x01: + return "Drawer Unit Open"; + case 0x02: + return "Incorrect Ribbon"; + case 0x04: + return "Ribbon Empty"; + case 0x08: + return "No Paper"; + case 0x0C: + return "Paper End"; + default: + return "Unknown"; + } + default: + return "Unknown"; + } +} + +static char *error_str(uint8_t v) { + switch (v) { + case ERROR_NONE: + return "None"; + case ERROR_INVALID_PARAM: + return "Invalid Command Parameter"; + case ERROR_MAIN_APP_INACTIVE: + return "Main App Inactive"; + case ERROR_COMMS_TIMEOUT: + return "Main Communication Timeout"; + case ERROR_MAINT_NEEDED: + return "Maintainence Needed"; + case ERROR_BAD_COMMAND: + return "Inappropriate Command"; + case ERROR_PRINTER: + return "Printer Error"; + case ERROR_BUFFER_FULL: + return "Buffer Full"; + default: + return "Unknown"; + } +} + +#define STATUS_READY 0x00 +#define STATUS_INIT_CPU 0x31 +#define STATUS_INIT_RIBBON 0x32 +#define STATUS_INIT_PAPER 0x33 +#define STATUS_THERMAL_PROTECT 0x34 +#define STATUS_USING_PANEL 0x35 +#define STATUS_SELF_DIAG 0x36 +#define STATUS_DOWNLOADING 0x37 + +#define STATUS_FEEDING_PAPER 0x61 +#define STATUS_PRE_HEAT 0x62 +#define STATUS_PRINT_Y 0x63 +#define STATUS_BACK_FEED_Y 0x64 +#define STATUS_PRINT_M 0x65 +#define STATUS_BACK_FEED_M 0x66 +#define STATUS_PRINT_C 0x67 +#define STATUS_BACK_FEED_C 0x68 +#define STATUS_PRINT_OP 0x69 +#define STATUS_PAPER_CUT 0x6A +#define STATUS_PAPER_EJECT 0x6B +#define STATUS_BACK_FEED_E 0x6C + +static char *status_str(uint8_t v) { + switch (v) { + case STATUS_READY: + return "Ready"; + case STATUS_INIT_CPU: + return "Initializing CPU"; + case STATUS_INIT_RIBBON: + return "Initializing Ribbon"; + case STATUS_INIT_PAPER: + return "Loading Paper"; + case STATUS_THERMAL_PROTECT: + return "Thermal Protection"; + case STATUS_USING_PANEL: + return "Using Operation Panel"; + case STATUS_SELF_DIAG: + return "Processing Self Diagnosis"; + case STATUS_DOWNLOADING: + return "Processing Download"; + case STATUS_FEEDING_PAPER: + return "Feeding Paper"; + case STATUS_PRE_HEAT: + return "Pre-Heating"; + case STATUS_PRINT_Y: + return "Printing Yellow"; + case STATUS_BACK_FEED_Y: + return "Back-Feeding - Yellow Complete"; + case STATUS_PRINT_M: + return "Printing Magenta"; + case STATUS_BACK_FEED_M: + return "Back-Feeding - Magenta Complete"; + case STATUS_PRINT_C: + return "Printing Cyan"; + case STATUS_BACK_FEED_C: + return "Back-Feeding - Cyan Complete"; + case STATUS_PRINT_OP: + return "Laminating"; + case STATUS_PAPER_CUT: + return "Cutting Paper"; + case STATUS_PAPER_EJECT: + return "Ejecting Paper"; + case STATUS_BACK_FEED_E: + return "Back-Feeding - Ejected"; + case ERROR_PRINTER: + return "Printer Error"; + default: + return "Unknown"; + } +} + +struct s6145_status_resp { + struct s6145_status_hdr hdr; + uint32_t count_lifetime; + uint32_t count_maint; + uint32_t count_paper; + uint32_t count_cutter; + uint32_t count_head; + uint32_t count_ribbon_left; + uint32_t reserved; + + uint8_t bank1_printid; + uint16_t bank1_remaining; + uint16_t bank1_finished; + uint16_t bank1_specified; + uint8_t bank1_status; + + uint8_t bank2_printid; + uint16_t bank2_remaining; + uint16_t bank2_finished; + uint16_t bank2_specified; + uint8_t bank2_status; + + uint8_t reserved2[16]; + uint8_t tonecurve_status; + uint8_t reserved3[6]; +} __attribute__((packed)); + +#define BANK_STATUS_FREE 0x00 +#define BANK_STATUS_XFER 0x01 +#define BANK_STATUS_FULL 0x02 +#define BANK_STATUS_PRINTING 0x12 + +static char *bank_statuses(uint8_t v) +{ + switch (v) { + case BANK_STATUS_FREE: + return "Free"; + case BANK_STATUS_XFER: + return "Xfer"; + case BANK_STATUS_FULL: + return "Full"; + case BANK_STATUS_PRINTING: + return "Printing"; + default: + return "Unknown"; + } +} + +#define TONECURVE_INIT 0x00 +#define TONECURVE_USER 0x01 +#define TONECURVE_CURRENT 0x02 + +static char *tonecurve_statuses (uint8_t v) +{ + switch(v) { + case 0: + return "Initial"; + case 1: + return "UserSet"; + case 2: + return "Current"; + default: + return "Unknown"; + } +} + +struct s6145_geteeprom_resp { + struct s6145_status_hdr hdr; + uint8_t data[256]; +} __attribute__((packed)); + +struct s6145_readtone_resp { + struct s6145_status_hdr hdr; + uint16_t total_size; +} __attribute__((packed)); + +struct s6145_mediainfo_item { + uint8_t media_code; + uint16_t columns; + uint16_t rows; + uint8_t reserved; + uint8_t print_method; /* PRINT_METHOD_* */ + uint8_t reserved2[3]; +} __attribute__((packed)); + +#define MEDIA_4x6 0x00 +#define MEDIA_3_5x5 0x01 +#define MEDIA_5x7 0x03 +#define MEDIA_6x9 0x05 +#define MEDIA_6x8 0x06 +#define MEDIA_2x6 0x07 +#define MEDIA_6x6 0x08 +#define MEDIA_89x60mm 0x10 +#define MEDIA_89x59mm 0x11 +#define MEDIA_89x58mm 0x12 +#define MEDIA_89x57mm 0x13 +#define MEDIA_89x56mm 0x14 +#define MEDIA_89x55mm 0x15 + +static char *print_sizes (uint8_t v) { + switch (v) { + case MEDIA_4x6: + return "4x6"; + case MEDIA_3_5x5: + return "3.5x5"; + case MEDIA_5x7: + return "5x7"; + case MEDIA_6x9: + return "6x9"; + case MEDIA_6x8: + return "6x8"; + case MEDIA_2x6: + return "2x6"; + case MEDIA_6x6: + return "6x6"; + case MEDIA_89x60mm: + return "89x60mm"; + case MEDIA_89x59mm: + return "89x59mm"; + case MEDIA_89x58mm: + return "89x58mm"; + case MEDIA_89x57mm: + return "89x57mm"; + case MEDIA_89x56mm: + return "89x56mm"; + case MEDIA_89x55mm: + return "89x55mm"; + default: + return "Unknown"; + } +} + +#define RIBBON_NONE 0x00 +#define RIBBON_4x6 0x01 +#define RIBBON_3_5x5 0x02 +#define RIBBON_5x7 0x03 +#define RIBBON_6x8 0x04 +#define RIBBON_6x9 0x05 +// XXX what about 89xXXXmm ribbons? + +static int ribbon_sizes (uint8_t v) { + switch (v) { + case RIBBON_4x6: + return 300; + case RIBBON_3_5x5: + return 340; + case RIBBON_5x7: + return 170; + case RIBBON_6x8: + return 150; + case RIBBON_6x9: + return 130; // XXX guessed + // XXX 89x??? rubbons. + default: + return 300; // don't want 0. + } +} + +static const char *print_ribbons (uint8_t v) { + switch (v) { + case RIBBON_NONE: + return "None"; + case RIBBON_4x6: + return "4x6"; + case RIBBON_3_5x5: + return "3.5x5"; + case RIBBON_5x7: + return "5x7"; + case RIBBON_6x8: + return "6x8"; + case RIBBON_6x9: + return "6x9"; + // XXX 89x??? rubbons. + default: + return "Unknown"; + } +} + +struct s6145_mediainfo_resp { + struct s6145_status_hdr hdr; + uint8_t ribbon; + uint8_t reserved; + uint8_t count; + struct s6145_mediainfo_item items[10]; /* Not all necessarily used */ +} __attribute__((packed)); + +struct s6145_error_item { + uint8_t major; + uint8_t minor; + uint32_t print_counter; +} __attribute__((packed)); + +struct s6145_errorlog_resp { + struct s6145_status_hdr hdr; + uint8_t count; + struct s6145_error_item items[10]; /* Not all necessarily used */ +} __attribute__((packed)); + +struct s6145_getparam_resp { + struct s6145_status_hdr hdr; + uint32_t param; +} __attribute__((packed)); + +struct s6145_getserial_resp { + struct s6145_status_hdr hdr; + uint8_t data[8]; +} __attribute__((packed)); + +struct s6145_getprintidstatus_resp { + struct s6145_status_hdr hdr; + uint8_t id; + uint16_t remaining; + uint16_t finished; + uint16_t specified; + uint16_t status; +} __attribute__((packed)); + +#define STATUS_WAITING 0x0000 +#define STATUS_PRINTING 0x0100 +#define STATUS_COMPLETED 0x0200 +#define STATUS_ERROR 0xFFFF + +struct s6145_getextcounter_resp { + struct s6145_status_hdr hdr; + uint32_t lifetime_distance; /* Inches */ + uint32_t maint_distance; + uint32_t head_distance; + uint8_t reserved[32]; +} __attribute__((packed)); + +struct s6145_fwinfo_resp { + struct s6145_status_hdr hdr; + uint8_t name[8]; + uint8_t type[16]; + uint8_t date[10]; + uint8_t major; + uint8_t minor; + uint16_t checksum; +} __attribute__((packed)); + +struct s6145_imagecorr_resp { + struct s6145_status_hdr hdr; + uint16_t total_size; +} __attribute__((packed)); + +struct s6145_imagecorr_data { + uint8_t remain_pkt; + uint8_t return_size; + uint8_t data[16]; +} __attribute__((packed)); + +static int get_param(struct shinkos6145_ctx *ctx, int target, uint32_t *param); + +#define READBACK_LEN 512 /* Needs to be larger than largest response hdr */ +#define CMDBUF_LEN sizeof(struct s6145_print_cmd) + +uint8_t rdbuf[READBACK_LEN]; + +static int s6145_do_cmd(struct shinkos6145_ctx *ctx, + uint8_t *cmd, int cmdlen, + int minlen, int *num) +{ + int ret; + struct s6145_status_hdr *resp = (struct s6145_status_hdr *) rdbuf; + + libusb_device_handle *dev = ctx->dev; + uint8_t endp_up = ctx->endp_up; + uint8_t endp_down = ctx->endp_down; + + if ((ret = send_data(dev, endp_down, + cmd, cmdlen))) + return (ret < 0) ? ret : -99; + + ret = read_data(dev, endp_up, + rdbuf, READBACK_LEN, num); + + if (ret < 0) + return ret; + if (*num < minlen) { + ERROR("Short read! (%d/%d))\n", *num, minlen); + return -99; + } + + if (resp->result != RESULT_SUCCESS) { + INFO("Printer Status: %02x (%s)\n", resp->status, + status_str(resp->status)); + INFO(" Result: 0x%02x Error: 0x%02x (0x%02x/0x%02x = %s)\n", + resp->result, resp->error, resp->printer_major, + resp->printer_minor, error_codes(resp->printer_major, resp->printer_minor)); + return -99; + } + + return ret; +} + +static int get_status(struct shinkos6145_ctx *ctx) +{ + struct s6145_cmd_hdr cmd; + struct s6145_status_resp *resp = (struct s6145_status_resp *) rdbuf; + struct s6145_getextcounter_resp *resp2 = (struct s6145_getextcounter_resp *) rdbuf; + int ret, num = 0; + uint32_t val; + + cmd.cmd = cpu_to_le16(S6145_CMD_GETSTATUS); + cmd.len = cpu_to_le16(0); + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.cmd)); + return ret; + } + + INFO("Printer Status: 0x%02x (%s)\n", resp->hdr.status, + status_str(resp->hdr.status)); + if (resp->hdr.status == ERROR_PRINTER) { + if(resp->hdr.error == ERROR_NONE) + resp->hdr.error = resp->hdr.status; + INFO(" Error 0x%02x (%s) 0x%02x/0x%02x (%s)\n", + resp->hdr.error, + error_str(resp->hdr.error), + resp->hdr.printer_major, + resp->hdr.printer_minor, error_codes(resp->hdr.printer_major, resp->hdr.printer_minor)); + } + if (le16_to_cpu(resp->hdr.payload_len) != (sizeof(struct s6145_status_resp) - sizeof(struct s6145_status_hdr))) + return -1; + + INFO(" Print Counts:\n"); + INFO("\tSince Paper Changed:\t%08u\n", le32_to_cpu(resp->count_paper)); + INFO("\tLifetime:\t\t%08u\n", le32_to_cpu(resp->count_lifetime)); + INFO("\tMaintainence:\t\t%08u\n", le32_to_cpu(resp->count_maint)); + INFO("\tPrint Head:\t\t%08u\n", le32_to_cpu(resp->count_head)); + INFO(" Cutter Actuations:\t%08u\n", le32_to_cpu(resp->count_cutter)); + INFO(" Ribbon Remaining:\t%08u\n", le32_to_cpu(resp->count_ribbon_left)); + INFO("Bank 1: 0x%02x (%s) Job %03u @ %03u/%03u (%03u remaining)\n", + resp->bank1_status, bank_statuses(resp->bank1_status), + resp->bank1_printid, + le16_to_cpu(resp->bank1_finished), + le16_to_cpu(resp->bank1_specified), + le16_to_cpu(resp->bank1_remaining)); + + INFO("Bank 2: 0x%02x (%s) Job %03u @ %03u/%03u (%03u remaining)\n", + resp->bank2_status, bank_statuses(resp->bank1_status), + resp->bank2_printid, + le16_to_cpu(resp->bank2_finished), + le16_to_cpu(resp->bank2_specified), + le16_to_cpu(resp->bank2_remaining)); + + INFO("Tonecurve Status: 0x%02x (%s)\n", resp->tonecurve_status, tonecurve_statuses(resp->tonecurve_status)); + + /* Query Extended counters */ + cmd.cmd = cpu_to_le16(S6145_CMD_EXTCOUNTER); + cmd.len = cpu_to_le16(0); + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp2), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.cmd)); + return ret; + } + if (le16_to_cpu(resp2->hdr.payload_len) != (sizeof(struct s6145_getextcounter_resp) - sizeof(struct s6145_status_hdr))) + return -1; + + INFO("Lifetime Distance: %08u inches\n", le32_to_cpu(resp2->lifetime_distance)); + INFO("Maintainence Distance: %08u inches\n", le32_to_cpu(resp2->maint_distance)); + INFO("Head Distance: %08u inches\n", le32_to_cpu(resp2->head_distance)); + + /* Query various params */ + if(ctx->type == P_SHINKO_S6145D) { + if ((ret = get_param(ctx, PARAM_REGION_CODE, &val))) { + ERROR("Failed to execute command\n"); + return ret; + } + INFO("Region Code: %#x\n", val); + + } + if ((ret = get_param(ctx, PARAM_PAPER_PRESV, &val))) { + ERROR("Failed to execute command\n"); + return ret; + } + INFO("Paper Preserve mode: %s\n", (val ? "On" : "Off")); + + if ((ret = get_param(ctx, PARAM_DRIVER_MODE, &val))) { + ERROR("Failed to execute command\n"); + return ret; + } + INFO("Driver mode: %s\n", (val ? "On" : "Off")); + + if ((ret = get_param(ctx, PARAM_PAPER_MODE, &val))) { + ERROR("Failed to execute command\n"); + return ret; + } + INFO("Paper load mode: %s\n", (val ? "Cut" : "No Cut")); + + if ((ret = get_param(ctx, PARAM_SLEEP_TIME, &val))) { + ERROR("Failed to execute command\n"); + return ret; + } + if (val == 0) + val = 5; + else if (val == 1) + val = 15; + else if (val == 2) + val = 30; + else if (val == 3) + val = 60; + else if (val == 4) + val = 120; + else if (val >= 5) + val = 240; + else + val = 240; // default? + + INFO("Sleep delay: %u minutes\n", val); + + return 0; +} + +static int get_fwinfo(struct shinkos6145_ctx *ctx) +{ + struct s6145_fwinfo_cmd cmd; + struct s6145_fwinfo_resp *resp = (struct s6145_fwinfo_resp *)rdbuf; + int num = 0; + int i; + + cmd.hdr.cmd = cpu_to_le16(S6145_CMD_FWINFO); + cmd.hdr.len = cpu_to_le16(1); + + INFO("FW Information:\n"); + + for (i = FWINFO_TARGET_MAIN_BOOT ; i <= FWINFO_TARGET_PRINT_TABLES ; i++) { + int ret; + cmd.target = i; + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command (%d)\n", cmd_names(cmd.hdr.cmd), ret); + continue; + } + + if (le16_to_cpu(resp->hdr.payload_len) != (sizeof(struct s6145_fwinfo_resp) - sizeof(struct s6145_status_hdr))) + continue; + + INFO(" %s\t ver %02x.%02x\n", fwinfo_targets(i), + resp->major, resp->minor); +#if 0 + INFO(" name: '%s'\n", resp->name); + INFO(" type: '%s'\n", resp->type); + INFO(" date: '%s'\n", resp->date); + INFO(" version: %02x.%02x (CRC %04x)\n", resp->major, resp->minor, + le16_to_cpu(resp->checksum)); +#endif + } + return 0; +} + +static int get_errorlog(struct shinkos6145_ctx *ctx) +{ + struct s6145_cmd_hdr cmd; + struct s6145_errorlog_resp *resp = (struct s6145_errorlog_resp *) rdbuf; + int ret, num = 0; + int i; + + cmd.cmd = cpu_to_le16(S6145_CMD_ERRORLOG); + cmd.len = cpu_to_le16(0); + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.cmd)); + return ret; + } + + if (le16_to_cpu(resp->hdr.payload_len) != (sizeof(struct s6145_errorlog_resp) - sizeof(struct s6145_status_hdr))) + return -2; + + INFO("Stored Error Events: %u entries:\n", resp->count); + for (i = 0 ; i < resp->count ; i++) { + INFO(" %02d: @ %08u prints : 0x%02x/0x%02x (%s)\n", i, + le32_to_cpu(resp->items[i].print_counter), + resp->items[i].major, resp->items[i].minor, + error_codes(resp->items[i].major, resp->items[i].minor)); + } + return 0; +} + +static int get_mediainfo(struct shinkos6145_ctx *ctx) +{ + struct s6145_cmd_hdr cmd; + struct s6145_mediainfo_resp *resp = (struct s6145_mediainfo_resp *) rdbuf; + int ret, num = 0; + int i; + + cmd.cmd = cpu_to_le16(S6145_CMD_MEDIAINFO); + cmd.len = cpu_to_le16(0); + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.cmd)); + return ret; + } + + if (le16_to_cpu(resp->hdr.payload_len) != (sizeof(struct s6145_mediainfo_resp) - sizeof(struct s6145_status_hdr))) + return -2; + + INFO("Loaded Media Type: %s\n", print_ribbons(resp->ribbon)); + INFO("Supported Print Sizes: %u entries:\n", resp->count); + for (i = 0 ; i < resp->count ; i++) { + INFO(" %02d: C 0x%02x (%s), %04ux%04u, P 0x%02x (%s)\n", i, + resp->items[i].media_code, print_sizes(resp->items[i].media_code), + le16_to_cpu(resp->items[i].columns), + le16_to_cpu(resp->items[i].rows), + resp->items[i].print_method, print_methods(resp->items[i].print_method)); + } + return 0; +} + +static int cancel_job(struct shinkos6145_ctx *ctx, char *str) +{ + struct s6145_cancel_cmd cmd; + struct s6145_status_hdr *resp = (struct s6145_status_hdr *) rdbuf; + int ret, num = 0; + + if (!str) + return -1; + + cmd.id = atoi(str); + + cmd.hdr.cmd = cpu_to_le16(S6145_CMD_CANCELJOB); + cmd.hdr.len = cpu_to_le16(1); + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.hdr.cmd)); + return ret; + } + + return 0; +} + +static int flash_led(struct shinkos6145_ctx *ctx) +{ + struct s6145_cmd_hdr cmd; + struct s6145_status_hdr *resp = (struct s6145_status_hdr *) rdbuf; + int ret, num = 0; + + cmd.cmd = cpu_to_le16(S6145_CMD_FLASHLED); + cmd.len = cpu_to_le16(0); + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.cmd)); + return ret; + } + + return 0; +} + + +static int set_param(struct shinkos6145_ctx *ctx, int target, uint32_t param) +{ + struct s6145_setparam_cmd cmd; + struct s6145_status_hdr *resp = (struct s6145_status_hdr *) rdbuf; + int ret, num = 0; + + /* Set up command */ + cmd.target = target; + cmd.param = cpu_to_le32(param); + + cmd.hdr.cmd = cpu_to_le16(S6145_CMD_SETPARAM); + cmd.hdr.len = cpu_to_le16(sizeof(struct s6145_setparam_cmd)-sizeof(cmd.hdr)); + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command (%d)\n", cmd_names(cmd.hdr.cmd), ret); + } + + return ret; +} + +static int get_param(struct shinkos6145_ctx *ctx, int target, uint32_t *param) +{ + struct s6145_getparam_cmd cmd; + struct s6145_getparam_resp *resp = (struct s6145_getparam_resp *) rdbuf; + int ret, num = 0; + + /* Set up command */ + cmd.target = target; + + cmd.hdr.cmd = cpu_to_le16(S6145_CMD_GETPARAM); + cmd.hdr.len = cpu_to_le16(sizeof(struct s6145_getparam_cmd)-sizeof(cmd.hdr)); + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command (%d)\n", cmd_names(cmd.hdr.cmd), ret); + } + *param = le32_to_cpu(resp->param); + + return ret; +} + + +static int reset_curve(struct shinkos6145_ctx *ctx, int target) +{ + struct s6145_reset_cmd cmd; + struct s6145_status_hdr *resp = (struct s6145_status_hdr *) rdbuf; + int ret, num = 0; + + cmd.target = target; + + cmd.hdr.cmd = cpu_to_le16(S6145_CMD_RESET); + cmd.hdr.len = cpu_to_le16(1); + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.hdr.cmd)); + return ret; + } + + return 0; +} + +static int shinkos6145_dump_corrdata(struct shinkos6145_ctx *ctx, char *fname) +{ + int ret; + + ret = shinkos6145_get_imagecorr(ctx); + if (ret) { + ERROR("Failed to execute command\n"); + return ret; + } + + /* Open file and write it out */ + { + int fd = open(fname, O_WRONLY|O_CREAT, S_IRUSR|S_IWUSR); + if (fd < 0) { + ERROR("Unable to open filename\n"); + return fd; + } + + write(fd, ctx->corrdata, sizeof(struct shinkos6145_correctionparam)); + close(fd); + } + + /* Free the buffers */ + free(ctx->corrdata); + ctx->corrdata = NULL; + ctx->corrdatalen = 0; + + return ret; +} + +static int shinkos6145_dump_eeprom(struct shinkos6145_ctx *ctx, char *fname) +{ + int ret; + + ret = shinkos6145_get_eeprom(ctx); + if (ret) { + ERROR("Failed to execute command\n"); + return ret; + } + + /* Open file and write it out */ + { + int fd = open(fname, O_WRONLY|O_CREAT, S_IRUSR|S_IWUSR); + if (fd < 0) { + ERROR("Unable to open filename\n"); + return fd; + } + + write(fd, ctx->eeprom, ctx->eepromlen); + close(fd); + } + + /* Free the buffers */ + free(ctx->eeprom); + ctx->eeprom = NULL; + ctx->eepromlen = 0; + + return ret; +} + +static int get_tonecurve(struct shinkos6145_ctx *ctx, int type, char *fname) +{ + struct s6145_readtone_cmd cmd; + struct s6145_readtone_resp *resp = (struct s6145_readtone_resp *) rdbuf; + int ret, num = 0; + + uint8_t *data; + uint16_t curves[UPDATE_SIZE] = { 0 }; + + int i,j; + + cmd.target = type; + cmd.curveid = TONE_CURVE_ID; + + cmd.hdr.cmd = cpu_to_le16(S6145_CMD_READTONE); + cmd.hdr.len = cpu_to_le16(1); + + INFO("Dump %s Tone Curve to '%s'\n", tonecurve_statuses(type), fname); + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.hdr.cmd)); + return ret; + } + + resp->total_size = le16_to_cpu(resp->total_size); + + data = malloc(resp->total_size * 2); + if (!data) { + ERROR("Memory Allocation Failure!\n"); + return -1; + } + + i = 0; + while (i < resp->total_size) { + ret = read_data(ctx->dev, ctx->endp_up, + data + i, + resp->total_size * 2 - i, + &num); + if (ret < 0) + goto done; + i += num; + } + + i = j = 0; + while (i < resp->total_size) { + memcpy(curves + j, data + i+2, data[i+1]); + j += data[i+1] / 2; + i += data[i+1] + 2; + } + + /* Open file and write it out */ + { + int tc_fd = open(fname, O_WRONLY|O_CREAT, S_IRUSR|S_IWUSR); + if (tc_fd < 0) { + ret = -1; + goto done; + } + + for (i = 0 ; i < UPDATE_SIZE; i++) { + /* Byteswap appropriately */ + curves[i] = cpu_to_be16(le16_to_cpu(curves[i])); + } + write(tc_fd, curves, UPDATE_SIZE * sizeof(uint16_t)); + close(tc_fd); + } + +done: + free(data); + return ret; +} + +static int set_tonecurve(struct shinkos6145_ctx *ctx, int target, char *fname) +{ + struct s6145_update_cmd cmd; + struct s6145_status_hdr *resp = (struct s6145_status_hdr *) rdbuf; + int ret, num = 0; + + INFO("Set %s Tone Curve from '%s'\n", update_targets(target), fname); + + uint16_t *data = malloc(UPDATE_SIZE * sizeof(uint16_t)); + if (!data) { + ERROR("Memory Allocation Failure!\n"); + return -1; + } + + /* Read in file */ + int tc_fd = open(fname, O_RDONLY); + if (tc_fd < 0) { + ret = -1; + goto done; + } + if (read(tc_fd, data, UPDATE_SIZE * sizeof(uint16_t)) != (UPDATE_SIZE * sizeof(uint16_t))) { + ret = -2; + goto done; + } + close(tc_fd); + /* Byteswap data to local CPU.. */ + for (ret = 0; ret < UPDATE_SIZE ; ret++) { + data[ret] = be16_to_cpu(data[ret]); + } + + /* Set up command */ + cmd.target = target; + cmd.reserved[0] = cmd.reserved[1] = cmd.reserved[2] = 0; + cmd.reset = 0; + cmd.size = cpu_to_le32(UPDATE_SIZE * sizeof(uint16_t)); + + cmd.hdr.cmd = cpu_to_le16(S6145_CMD_UPDATE); + cmd.hdr.len = cpu_to_le16(sizeof(struct s6145_update_cmd)-sizeof(cmd.hdr)); + + /* Byteswap data to format printer is expecting.. */ + for (ret = 0; ret < UPDATE_SIZE ; ret++) { + data[ret] = cpu_to_le16(data[ret]); + } + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.hdr.cmd)); + goto done; + } + + /* Sent transfer */ + if ((ret = send_data(ctx->dev, ctx->endp_down, + (uint8_t *) data, UPDATE_SIZE * sizeof(uint16_t)))) { + goto done; + } + +done: + free(data); + + return ret; +} + +static int shinkos6145_get_imagecorr(struct shinkos6145_ctx *ctx) +{ + struct s6145_cmd_hdr cmd; + struct s6145_imagecorr_resp *resp = (struct s6145_imagecorr_resp *) rdbuf; + + size_t total = 0; + int ret, num; + cmd.cmd = cpu_to_le16(S6145_CMD_GETCORR); + cmd.len = 0; + + if (ctx->corrdata) { + free(ctx->corrdata); + ctx->corrdata = NULL; + } + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.cmd)); + goto done; + } + + ctx->corrdatalen = le16_to_cpu(resp->total_size); + INFO("Fetching %zu bytes of image correction data\n", ctx->corrdatalen); + + ctx->corrdata = malloc(sizeof(struct shinkos6145_correctionparam)); + if (!ctx->corrdata) { + ERROR("Memory allocation failure\n"); + ret = -ENOMEM; + goto done; + } + memset(ctx->corrdata, 0, sizeof(struct shinkos6145_correctionparam)); + total = 0; + + while (total < ctx->corrdatalen) { + struct s6145_imagecorr_data data; + + ret = read_data(ctx->dev, ctx->endp_up, (uint8_t *) &data, + sizeof(data), + &num); + if (ret < 0) + goto done; + + memcpy(((uint8_t*)ctx->corrdata) + total, data.data, sizeof(data.data)); + total += sizeof(data.data); + + if (data.remain_pkt == 0) + DEBUG("correction block transferred (%zu/%zu total)\n", total, ctx->corrdatalen); + + } + + +done: + return ret; +} + +static int shinkos6145_get_eeprom(struct shinkos6145_ctx *ctx) +{ + struct s6145_cmd_hdr cmd; + struct s6145_geteeprom_resp *resp = (struct s6145_geteeprom_resp *) rdbuf; + + int ret, num; + cmd.cmd = cpu_to_le16(S6145_CMD_GETEEPROM); + cmd.len = 0; + + if (ctx->eeprom) { + free(ctx->eeprom); + ctx->eeprom = NULL; + } + + if ((ret = s6145_do_cmd(ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.cmd)); + goto done; + } + + ctx->eepromlen = le16_to_cpu(resp->hdr.payload_len); + ctx->eeprom = malloc(ctx->eepromlen); + if (!ctx->eeprom) { + ERROR("Memory allocation failure\n"); + ret = -ENOMEM; + goto done; + } + memcpy(ctx->eeprom, resp->data, ctx->eepromlen); + +done: + return ret; +} + +static void shinkos6145_cmdline(void) +{ + DEBUG("\t\t[ -c filename ] # Get user/NV tone curve\n"); + DEBUG("\t\t[ -C filename ] # Set user/NV tone curve\n"); + DEBUG("\t\t[ -e ] # Query error log\n"); + DEBUG("\t\t[ -F ] # Flash Printer LED\n"); + DEBUG("\t\t[ -i ] # Query printer info\n"); + DEBUG("\t\t[ -k num ] # Set sleep time (5-240 minutes)\n"); + DEBUG("\t\t[ -l filename ] # Get current tone curve\n"); + DEBUG("\t\t[ -L filename ] # Set current tone curve\n"); + DEBUG("\t\t[ -m ] # Query media\n"); + DEBUG("\t\t[ -q filename ] # Extract eeprom data\n"); + DEBUG("\t\t[ -Q filename ] # Extract image correction params\n"); + DEBUG("\t\t[ -r ] # Reset user/NV tone curve\n"); + DEBUG("\t\t[ -R ] # Reset printer to factory defaults\n"); + DEBUG("\t\t[ -s ] # Query status\n"); + DEBUG("\t\t[ -X jobid ] # Abort a printjob\n"); +} + +int shinkos6145_cmdline_arg(void *vctx, int argc, char **argv) +{ + struct shinkos6145_ctx *ctx = vctx; + int i, j = 0; + + if (!ctx) + return -1; + + while ((i = getopt(argc, argv, GETOPT_LIST_GLOBAL "c:C:eFik:l:L:mr:Q:q:R:sX:")) >= 0) { + switch(i) { + GETOPT_PROCESS_GLOBAL + case 'c': + j = get_tonecurve(ctx, TONECURVE_USER, optarg); + break; + case 'C': + j = set_tonecurve(ctx, TONECURVE_USER, optarg); + break; + case 'e': + j = get_errorlog(ctx); + break; + case 'F': + j = flash_led(ctx); + break; + case 'i': + j = get_fwinfo(ctx); + break; + case 'k': { + uint32_t i = atoi(optarg); + if (i <= 5) + i = 0; + else if (i <= 15) + i = 1; + else if (i <= 30) + i = 2; + else if (i <= 60) + i = 3; + else if (i <= 120) + i = 4; + else if (i <= 240) + i = 5; + else + i = 5; + + j = set_param(ctx, PARAM_SLEEP_TIME, i); + break; + } + case 'l': + j = get_tonecurve(ctx, TONECURVE_CURRENT, optarg); + break; + case 'L': + j = set_tonecurve(ctx, TONECURVE_CURRENT, optarg); + break; + case 'm': + j = get_mediainfo(ctx); + break; + case 'q': + j = shinkos6145_dump_eeprom(ctx, optarg); + break; + case 'Q': + j = shinkos6145_dump_corrdata(ctx, optarg); + break; + case 'r': + j = reset_curve(ctx, RESET_TONE_CURVE); + break; + case 'R': + j = reset_curve(ctx, RESET_PRINTER); + break; + case 's': + j = get_status(ctx); + break; + case 'X': + j = cancel_job(ctx, optarg); + break; + default: + break; /* Ignore completely */ + } + + if (j) return j; + } + + return 0; +} + +static void *shinkos6145_init(void) +{ + struct shinkos6145_ctx *ctx = malloc(sizeof(struct shinkos6145_ctx)); + if (!ctx) { + ERROR("Memory Allocation Failure!\n"); + return NULL; + } + memset(ctx, 0, sizeof(struct shinkos6145_ctx)); + + DL_INIT(); + + return ctx; +} + +static void shinkos6145_attach(void *vctx, struct libusb_device_handle *dev, + uint8_t endp_up, uint8_t endp_down, uint8_t jobid) +{ + struct shinkos6145_ctx *ctx = vctx; + struct libusb_device *device; + struct libusb_device_descriptor desc; + + ctx->dev = dev; + ctx->endp_up = endp_up; + ctx->endp_down = endp_down; + + device = libusb_get_device(dev); + libusb_get_device_descriptor(device, &desc); + + ctx->type = lookup_printer_type(&shinkos6145_backend, + desc.idVendor, desc.idProduct); + + /* Attempt to open the library */ +#if defined(WITH_DYNAMIC) + INFO("Attempting to load image processing library\n"); + ctx->dl_handle = DL_OPEN(LIB_NAME); /* Try the Sinfonia one first */ + if (!ctx->dl_handle) + ctx->dl_handle = DL_OPEN(LIB_NAME_RE); /* Then the RE one */ + if (!ctx->dl_handle) + WARNING("Image processing library not found, using internal fallback code\n"); + if (ctx->dl_handle) { + ctx->ImageProcessing = DL_SYM(ctx->dl_handle, "ImageProcessing"); + ctx->ImageAvrCalc = DL_SYM(ctx->dl_handle, "ImageAvrCalc"); + if (!ctx->ImageProcessing || !ctx->ImageAvrCalc) { + WARNING("Problem resolving symbols in imaging processing library\n"); + DL_CLOSE(ctx->dl_handle); + ctx->dl_handle = NULL; + } else { + INFO("Image processing library successfully loaded\n"); + } + } +#else + WARNING("Dynamic library support not enabled, using internal fallback code\n"); +#endif + + /* Ensure jobid is sane */ + ctx->jobid = (jobid & 0x7f) + 1; + + /* Initialize donor */ + ctx->last_donor = ctx->last_remain = 65535; +} + +static void shinkos6145_teardown(void *vctx) { + struct shinkos6145_ctx *ctx = vctx; + + if (!ctx) + return; + + if (ctx->databuf) + free(ctx->databuf); + if (ctx->eeprom) + free(ctx->eeprom); + if (ctx->corrdata) + free(ctx->corrdata); + if (ctx->dl_handle) + DL_CLOSE(ctx->dl_handle); + + DL_EXIT(); + + free(ctx); +} + +static void lib6145_calc_avg(struct shinkos6145_ctx *ctx, uint16_t rows, uint16_t cols) +{ + uint32_t plane, i, planelen; + planelen = rows * cols; + + for (plane = 0 ; plane < 3 ; plane++) { + uint64_t sum = 0; + + for (i = 0 ; i < planelen ; i++) { + sum += ctx->databuf[(planelen * plane) + i]; + } + ctx->image_avg[plane] = (sum / planelen); + } +} + +static void lib6145_process_image(uint8_t *src, uint16_t *dest, + struct shinkos6145_correctionparam *corrdata, + uint8_t oc_mode) +{ + uint32_t in, out; + + uint16_t pad_l, pad_r, row_lim; + uint16_t row, col; + + row_lim = le16_to_cpu(corrdata->headDots); + pad_l = (row_lim - le16_to_cpu(corrdata->width)) / 2; + pad_r = pad_l + le16_to_cpu(corrdata->width); + out = 0; + in = 0; + + /* Convert YMC 8-bit to 16-bit, and pad appropriately to full stripe */ + for (row = 0 ; row < le16_to_cpu(corrdata->height) ; row++) { + for (col = 0 ; col < row_lim; col++) { + uint16_t val; + if (col < pad_l) { + val = 0; + } else if (col < pad_r) { + val = corrdata->pulseTransTable_Y[src[in++]]; + } else { + val = 0; + } + dest[out++] = val; + } + } + for (row = 0 ; row < le16_to_cpu(corrdata->height) ; row++) { + for (col = 0 ; col < row_lim; col++) { + uint16_t val; + if (col < pad_l) { + val = 0; + } else if (col < pad_r) { + val = corrdata->pulseTransTable_M[src[in++]]; + } else { + val = 0; + } + dest[out++] = val; + } + } + for (row = 0 ; row < le16_to_cpu(corrdata->height) ; row++) { + for (col = 0 ; col < row_lim; col++) { + uint16_t val; + if (col < pad_l) { + val = 0; + } else if (col < pad_r) { + val = corrdata->pulseTransTable_C[src[in++]]; + } else { + val = 0; + } + dest[out++] = val; + } + } + + /* Generate lamination plane, if desired */ + if (oc_mode > PRINT_MODE_NO_OC) { + // XXX matters if we're using glossy/matte... + for (row = 0 ; row < le16_to_cpu(corrdata->height) ; row++) { + for (col = 0 ; col < row_lim; col++) { + uint16_t val; + if (col < pad_l) { + val = 0; + } else if (col < pad_r) { + val = corrdata->pulseTransTable_O[corrdata->printOpLevel]; + } else { + val = 0; + } + dest[out++] = val; + } + } + } +} + +static int shinkos6145_read_parse(void *vctx, int data_fd) { + struct shinkos6145_ctx *ctx = vctx; + int ret; + uint8_t tmpbuf[4]; + + if (!ctx) + return CUPS_BACKEND_FAILED; + + /* Read in then validate header */ + ret = read(data_fd, &ctx->hdr, sizeof(ctx->hdr)); + if (ret < 0 || ret != sizeof(ctx->hdr)) { + if (ret == 0) + return CUPS_BACKEND_CANCEL; + ERROR("Read failed (%d/%d/%d)\n", + ret, 0, (int)sizeof(ctx->hdr)); + perror("ERROR: Read failed"); + return ret; + } + + if (le32_to_cpu(ctx->hdr.len1) != 0x10 || + le32_to_cpu(ctx->hdr.len2) != 0x64 || + le32_to_cpu(ctx->hdr.dpi) != 300) { + ERROR("Unrecognized header data format!\n"); + return CUPS_BACKEND_CANCEL; + } + + if (le32_to_cpu(ctx->hdr.model) != 6145) { + ERROR("Unrecognized printer (%u)!\n", le32_to_cpu(ctx->hdr.model)); + + return CUPS_BACKEND_CANCEL; + } + + if (ctx->databuf) { + free(ctx->databuf); + ctx->databuf = NULL; + } + + ctx->datalen = le32_to_cpu(ctx->hdr.rows) * le32_to_cpu(ctx->hdr.columns) * 3; + ctx->databuf = malloc(ctx->datalen); + if (!ctx->databuf) { + ERROR("Memory allocation failure!\n"); + return CUPS_BACKEND_FAILED; + } + + { + int remain = ctx->datalen; + uint8_t *ptr = ctx->databuf; + do { + ret = read(data_fd, ptr, remain); + if (ret < 0) { + ERROR("Read failed (%d/%d/%zu)\n", + ret, remain, ctx->datalen); + perror("ERROR: Read failed"); + return ret; + } + ptr += ret; + remain -= ret; + } while (remain); + } + + /* Make sure footer is sane too */ + ret = read(data_fd, tmpbuf, 4); + if (ret != 4) { + ERROR("Read failed (%d/%d/%d)\n", + ret, 4, 4); + perror("ERROR: Read failed"); + return ret; + } + if (tmpbuf[0] != 0x04 || + tmpbuf[1] != 0x03 || + tmpbuf[2] != 0x02 || + tmpbuf[3] != 0x01) { + ERROR("Unrecognized footer data format!\n"); + return CUPS_BACKEND_FAILED; + } + + return CUPS_BACKEND_OK; +} + +static int shinkos6145_main_loop(void *vctx, int copies) { + struct shinkos6145_ctx *ctx = vctx; + + int ret, num; + uint8_t cmdbuf[CMDBUF_LEN]; + uint8_t rdbuf2[READBACK_LEN]; + + int i, last_state = -1, state = S_IDLE; + + struct s6145_cmd_hdr *cmd = (struct s6145_cmd_hdr *) cmdbuf; + struct s6145_print_cmd *print = (struct s6145_print_cmd *) cmdbuf; + struct s6145_status_resp *sts = (struct s6145_status_resp *) rdbuf; + struct s6145_mediainfo_resp *media = (struct s6145_mediainfo_resp *) rdbuf; + + uint32_t cur_mode; + + /* Send Media Query */ + memset(cmdbuf, 0, CMDBUF_LEN); + cmd->cmd = cpu_to_le16(S6145_CMD_MEDIAINFO); + cmd->len = cpu_to_le16(0); + + if ((ret = s6145_do_cmd(ctx, + cmdbuf, sizeof(*cmd), + sizeof(*media), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd->cmd)); + return CUPS_BACKEND_FAILED; + } + + if (le16_to_cpu(media->hdr.payload_len) != (sizeof(struct s6145_mediainfo_resp) - sizeof(struct s6145_status_hdr))) + return CUPS_BACKEND_FAILED; + + /* Validate print sizes */ + for (i = 0; i < media->count ; i++) { + /* Look for matching media */ + if (le16_to_cpu(media->items[i].columns) == cpu_to_le16(le32_to_cpu(ctx->hdr.columns)) && + le16_to_cpu(media->items[i].rows) == cpu_to_le16(le32_to_cpu(ctx->hdr.rows)) && + media->items[i].print_method == le32_to_cpu(ctx->hdr.method) && + media->items[i].media_code == le32_to_cpu(ctx->hdr.media)) + break; + } + if (i == media->count) { + ERROR("Incorrect media loaded for print!\n"); + return CUPS_BACKEND_HOLD; + } + + ctx->last_ribbon = media->ribbon; + + /* Tell CUPS about the consumables we report */ + ATTR("marker-colors=#00FFFF#FF00FF#FFFF00\n"); + ATTR("marker-high-levels=100\n"); + ATTR("marker-low-levels=10\n"); + ATTR("marker-names='%s'\n", print_ribbons(media->ribbon)); + ATTR("marker-types=ribbonWax\n"); + ctx->ribbon_type = media->ribbon; + + // XXX check copies against remaining media? + + /* Query printer mode */ + ret = get_param(ctx, PARAM_OC_PRINT, &cur_mode); + if (ret) { + ERROR("Failed to execute command\n"); + return ret; + } + +top: + if (state != last_state) { + if (dyesub_debug) + DEBUG("last_state %d new %d\n", last_state, state); + } + + /* Send Status Query */ + memset(cmdbuf, 0, CMDBUF_LEN); + cmd->cmd = cpu_to_le16(S6145_CMD_GETSTATUS); + cmd->len = cpu_to_le16(0); + + if ((ret = s6145_do_cmd(ctx, + cmdbuf, sizeof(*cmd), + sizeof(struct s6145_status_hdr), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd->cmd)); + return CUPS_BACKEND_FAILED; + } + + if (memcmp(rdbuf, rdbuf2, READBACK_LEN)) { + uint16_t donor, remain; + + memcpy(rdbuf2, rdbuf, READBACK_LEN); + + INFO("Printer Status: 0x%02x (%s)\n", + sts->hdr.status, status_str(sts->hdr.status)); + + /* Guessimate a percentage for the remaining media */ + donor = le32_to_cpu(sts->count_ribbon_left) * 100 / ribbon_sizes(ctx->ribbon_type); + if (donor != ctx->last_donor) { + ctx->last_donor = donor; + ATTR("marker-levels=%d\n", donor); + } + remain = le32_to_cpu(sts->count_ribbon_left); + if (remain != ctx->last_remain) { + ctx->last_remain = remain; + ATTR("marker-message=\"%d prints remaining on '%s' ribbon\"\n", remain, print_ribbons(media->ribbon)); + } + + if (sts->hdr.result != RESULT_SUCCESS) + goto printer_error; + if (sts->hdr.status == ERROR_PRINTER) + goto printer_error; + } else if (state == last_state) { + sleep(1); + goto top; + } + last_state = state; + + fflush(stderr); + + switch (state) { + case S_IDLE: + INFO("Waiting for printer idle\n"); + /* If either bank is free, continue */ + if (sts->bank1_status == BANK_STATUS_FREE || + sts->bank2_status == BANK_STATUS_FREE) + state = S_PRINTER_READY_CMD; + + break; + case S_PRINTER_READY_CMD: { + /* Set matte/etc */ + + uint32_t oc_mode = le32_to_cpu(ctx->hdr.oc_mode); + uint32_t updated = 0; + + if (!oc_mode) /* if nothing set, default to glossy */ + oc_mode = PARAM_OC_PRINT_GLOSS; + + if (cur_mode != oc_mode) { + /* If cur_mode is not the same as desired oc_mode, + change it -- but we have to wait until the printer + is COMPLETELY idle */ + if (sts->bank1_status != BANK_STATUS_FREE || + sts->bank2_status != BANK_STATUS_FREE) { + INFO("Need to switch overcoat mode, waiting for printer idle\n"); + sleep(1); + goto top; + } + ret = set_param(ctx, PARAM_OC_PRINT, oc_mode); + if (ret) { + ERROR("Failed to execute command\n"); + return ret; + } + updated = 1; + } + + ret = shinkos6145_get_eeprom(ctx); + if (ret) { + ERROR("Failed to execute command\n"); + return ret; + } + + /* Get image correction parameters if necessary */ + if (updated || !ctx->corrdata || !ctx->corrdatalen) { + ret = shinkos6145_get_imagecorr(ctx); + if (ret) { + ERROR("Failed to execute command\n"); + return ret; + } + } + + /* Set up library transform... */ + uint32_t newlen = le16_to_cpu(ctx->corrdata->headDots) * + le32_to_cpu(ctx->hdr.rows) * sizeof(uint16_t) * 4; + uint16_t *databuf2 = malloc(newlen); + + /* Set the size in the correctiondata */ + ctx->corrdata->width = cpu_to_le16(le32_to_cpu(ctx->hdr.columns)); + ctx->corrdata->height = cpu_to_le16(le32_to_cpu(ctx->hdr.rows)); + + /* Convert packed RGB to planar YMC */ + // XXX would it make more sense to have Gutenprint generate + // planar YMC data as an extension of the spooler format? + { + int planelen = le16_to_cpu(ctx->corrdata->width) * le16_to_cpu(ctx->corrdata->height); + uint8_t *databuf3 = malloc(ctx->datalen); + + for (i = 0 ; i < planelen ; i++) { + uint8_t r, g, b; + r = ctx->databuf[3*i]; + g = ctx->databuf[3*i+1]; + b = ctx->databuf[3*i+2]; + databuf3[i] = 255 - b; + databuf3[planelen + i] = 255 - g; + databuf3[planelen + planelen + i] = 255 - r; + } + free(ctx->databuf); + ctx->databuf = databuf3; + } + + /* Perform the actual library transform */ + if (ctx->dl_handle) { + INFO("Calling image processing library...\n"); + + if (ctx->ImageAvrCalc(ctx->databuf, le32_to_cpu(ctx->hdr.columns), le32_to_cpu(ctx->hdr.rows), ctx->image_avg)) { + ERROR("Library returned error!\n"); + return CUPS_BACKEND_FAILED; + } + ctx->ImageProcessing(ctx->databuf, databuf2, ctx->corrdata); + } else { + WARNING("Utilizing fallback internal image processing code\n"); + WARNING(" *** Output quality will be poor! *** \n"); + + lib6145_calc_avg(ctx, le32_to_cpu(ctx->hdr.columns), le32_to_cpu(ctx->hdr.rows)); + lib6145_process_image(ctx->databuf, databuf2, ctx->corrdata, oc_mode); + } + + free(ctx->databuf); + ctx->databuf = (uint8_t*) databuf2; + ctx->datalen = newlen; + + INFO("Sending print job (internal id %u)\n", ctx->jobid); + + memset(cmdbuf, 0, CMDBUF_LEN); + print->hdr.cmd = cpu_to_le16(S6145_CMD_PRINTJOB); + print->hdr.len = cpu_to_le16(sizeof (*print) - sizeof(*cmd)); + + print->id = ctx->jobid; + print->count = cpu_to_le16(copies); + print->columns = cpu_to_le16(le32_to_cpu(ctx->hdr.columns)); + print->rows = cpu_to_le16(le32_to_cpu(ctx->hdr.rows)); + print->image_avg = ctx->image_avg[2]; /* Cyan level */ + print->method = cpu_to_le32(ctx->hdr.method); + print->combo_wait = 0; + + /* Brava21 header has a few quirks */ + if(ctx->type == P_SHINKO_S6145D) { + print->media = ctx->hdr.media; + print->unk_1 = 0x01; + } + + if ((ret = s6145_do_cmd(ctx, + cmdbuf, sizeof(*print), + sizeof(struct s6145_status_hdr), + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(print->hdr.cmd)); + return ret; + } + + if (sts->hdr.result != RESULT_SUCCESS) { + if (sts->hdr.error == ERROR_BUFFER_FULL) { + INFO("Printer Buffers full, retrying\n"); + break; + } else if ((sts->hdr.status & 0xf0) == 0x30 || sts->hdr.status == 0x21) { + INFO("Printer busy (%s), retrying\n", status_str(sts->hdr.status)); + break; + } else if (sts->hdr.status != ERROR_NONE) + goto printer_error; + } + + INFO("Sending image data to printer\n"); + // XXX we shouldn't send the lamination layer over if + // it's not needed. hdr->oc_mode == PRINT_MODE_NO_OC + if ((ret = send_data(ctx->dev, ctx->endp_down, + ctx->databuf, ctx->datalen))) + return CUPS_BACKEND_FAILED; + + INFO("Waiting for printer to acknowledge completion\n"); + sleep(1); + state = S_PRINTER_SENT_DATA; + break; + } + case S_PRINTER_SENT_DATA: + if (fast_return) { + INFO("Fast return mode enabled.\n"); + state = S_FINISHED; + } else if (sts->hdr.status == STATUS_READY) { + state = S_FINISHED; + } + break; + default: + break; + }; + + if (state != S_FINISHED) + goto top; + + INFO("Print complete\n"); + + return CUPS_BACKEND_OK; + +printer_error: + ERROR("Printer reported error: %#x (%s) status: %#x (%s) -> %#x.%#x (%s)\n", + sts->hdr.error, + error_str(sts->hdr.error), + sts->hdr.status, + status_str(sts->hdr.status), + sts->hdr.printer_major, sts->hdr.printer_minor, + error_codes(sts->hdr.printer_major, sts->hdr.printer_minor)); + return CUPS_BACKEND_FAILED; +} + +static int shinkos6145_query_serno(struct libusb_device_handle *dev, uint8_t endp_up, uint8_t endp_down, char *buf, int buf_len) +{ + struct s6145_cmd_hdr cmd; + struct s6145_getserial_resp *resp = (struct s6145_getserial_resp*) rdbuf; + int ret, num = 0; + + struct shinkos6145_ctx ctx = { + .dev = dev, + .endp_up = endp_up, + .endp_down = endp_down, + }; + + cmd.cmd = cpu_to_le16(S6145_CMD_GETSERIAL); + cmd.len = cpu_to_le16(0); + + if ((ret = s6145_do_cmd(&ctx, + (uint8_t*)&cmd, sizeof(cmd), + sizeof(*resp) - 1, + &num)) < 0) { + ERROR("Failed to execute %s command\n", cmd_names(cmd.cmd)); + return ret; + } + + /* Null-terminate */ + resp->hdr.payload_len = le16_to_cpu(resp->hdr.payload_len); + if (resp->hdr.payload_len > 23) + resp->hdr.payload_len = 23; + resp->data[resp->hdr.payload_len] = 0; + strncpy(buf, (char*)resp->data, buf_len); + buf[buf_len-1] = 0; /* ensure it's null terminated */ + + return CUPS_BACKEND_OK; +} + +/* Exported */ +#define USB_VID_SHINKO 0x10CE +#define USB_PID_SHINKO_S6145 0x0019 +#define USB_PID_SHINKO_S6145D 0x001E /* Aka CIAAT Brava 21 */ + +struct dyesub_backend shinkos6145_backend = { + .name = "Shinko/Sinfonia CHC-S6145", + .version = "0.21", + .uri_prefix = "shinkos6145", + .cmdline_usage = shinkos6145_cmdline, + .cmdline_arg = shinkos6145_cmdline_arg, + .init = shinkos6145_init, + .attach = shinkos6145_attach, + .teardown = shinkos6145_teardown, + .read_parse = shinkos6145_read_parse, + .main_loop = shinkos6145_main_loop, + .query_serno = shinkos6145_query_serno, + .devices = { + { USB_VID_SHINKO, USB_PID_SHINKO_S6145, P_SHINKO_S6145, ""}, + { USB_VID_SHINKO, USB_PID_SHINKO_S6145D, P_SHINKO_S6145D, ""}, + { 0, 0, 0, ""} + } +}; + +/* CHC-S6145 spool file format + + Spool file consists of an 116-byte header, followed by RGB-packed data, + followed by a 4-byte footer. Header appears to consist of a series of + 4-byte Little Endian words. + + 10 00 00 00 MM MM 00 00 HH 00 00 00 01 00 00 00 MM == Model (ie 6145d), HH == 0x02 (5" media), 0x03 (6" media) + 64 00 00 00 00 00 00 00 TT 00 00 00 00 00 00 00 TT == 0x08 5x5, 0x03 5x7, 0x07 2x6, 0x00 4x6, 0x06 6x6/6x6+6x2/6x8 + UU 00 00 00 ZZ 00 00 00 XX 00 00 00 00 00 00 00 XX == 0x00 default, 0x02 glossy, 0x03 matte, ZZ == 0x00 default, 0x01 == std qual; UU == 0x00 normal, 0x04 2x6*2, 0x05 6x6+2x6 + 00 00 00 00 WW WW 00 00 HH HH 00 00 NN 00 00 00 WW/HH Width, Height (LE), NN == Copies + 00 00 00 00 00 00 00 00 00 00 00 00 ce ff ff ff + 00 00 00 00 ce ff ff ff QQ QQ 00 00 ce ff ff ff QQ == DPI (300) + 00 00 00 00 ce ff ff ff 00 00 00 00 00 00 00 00 + 00 00 00 00 + + [[Packed RGB payload of WW*HH*3 bytes]] + + 04 03 02 01 [[ footer ]] + +*/ |