//----------------------------------------------------------------------------- // Copyright 2007 Jonathan Westhues // // This file is part of LDmicro. // // LDmicro 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 3 of the License, or // (at your option) any later version. // // LDmicro 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 LDmicro. If not, see . //------ // // Routines to maintain the processor I/O list. Whenever the user changes the // name of an element, rebuild the I/O list from the PLC program, so that new // assigned names are automatically reflected in the I/O list. Also keep a // list of old I/Os that have been deleted, so that if the user deletes a // a name and then recreates it the associated settings (e.g. pin number) // will not be forgotten. Also the dialog box for assigning I/O pins. // Jonathan Westhues, Oct 2004 //----------------------------------------------------------------------------- #include "linuxUI.h" //#include #include #include #include #include "ldmicro.h" // I/O that we have seen recently, so that we don't forget pin assignments // when we re-extract the list #define MAX_IO_SEEN_PREVIOUSLY 512 static struct { char name[MAX_NAME_LEN]; int type; int pin; } IoSeenPreviously[MAX_IO_SEEN_PREVIOUSLY]; static int IoSeenPreviouslyCount; /*// // stuff for the dialog box that lets you choose pin assignments static BOOL DialogDone; static BOOL DialogCancel;*/ static QDialog* IoDialog; QTreeWidget* PinList; static QDialogButtonBox* ButtonBox; // // stuff for the popup that lets you set the simulated value of an analog in static QDialog* AnalogSliderMain; static QSlider* AnalogSliderTrackbar; static QLabel* AnalogSliderLabel; static BOOL AnalogSliderDone; static BOOL AnalogSliderCancel; //Slider procedures to display slider values at realtime // and to close slider window on release void AnalogSliderProc(int Value, char* name); void AnalogSliderRelProc(char* name); void ListView_RedrawItems(HLIST list, int min, int max); static void DestroyWindow() { delete PinList; delete ButtonBox; delete IoDialog; } //----------------------------------------------------------------------------- // Append an I/O to the I/O list if it is not in there already. //----------------------------------------------------------------------------- static void AppendIo(char *name, int type) { int i; for(i = 0; i < Prog.io.count; i++) { if(strcmp(Prog.io.assignment[i].name, name)==0) { if(type != IO_TYPE_GENERAL && Prog.io.assignment[i].type == IO_TYPE_GENERAL) { Prog.io.assignment[i].type = type; } // already in there return; } } if(i < MAX_IO) { Prog.io.assignment[i].type = type; Prog.io.assignment[i].pin = NO_PIN_ASSIGNED; strcpy(Prog.io.assignment[i].name, name); (Prog.io.count)++; } } //----------------------------------------------------------------------------- // Move an I/O pin into the `seen previously' list. This means that if the // user creates input Xasd, assigns it a pin, deletes, and then recreates it, // then it will come back with the correct pin assigned. //----------------------------------------------------------------------------- static void AppendIoSeenPreviously(char *name, int type, int pin) { if(strcmp(name+1, "new")==0) return; int i; for(i = 0; i < IoSeenPreviouslyCount; i++) { if(strcmp(name, IoSeenPreviously[i].name)==0 && type == IoSeenPreviously[i].type) { if(pin != NO_PIN_ASSIGNED) { IoSeenPreviously[i].pin = pin; } return; } } if(IoSeenPreviouslyCount >= MAX_IO_SEEN_PREVIOUSLY) { // maybe improve later; just throw away all our old information, and // the user might have to reenter the pin if they delete and recreate // things IoSeenPreviouslyCount = 0; } i = IoSeenPreviouslyCount; IoSeenPreviously[i].type = type; IoSeenPreviously[i].pin = pin; strcpy(IoSeenPreviously[i].name, name); IoSeenPreviouslyCount++; } //----------------------------------------------------------------------------- // Walk a subcircuit, calling ourselves recursively and extracting all the // I/O names out of it. //----------------------------------------------------------------------------- static void ExtractNamesFromCircuit(int which, void *any) { ElemLeaf *l = (ElemLeaf *)any; switch(which) { case ELEM_PARALLEL_SUBCKT: { ElemSubcktParallel *p = (ElemSubcktParallel *)any; int i; for(i = 0; i < p->count; i++) { ExtractNamesFromCircuit(p->contents[i].which, p->contents[i].d.any); } break; } case ELEM_SERIES_SUBCKT: { ElemSubcktSeries *s = (ElemSubcktSeries *)any; int i; for(i = 0; i < s->count; i++) { ExtractNamesFromCircuit(s->contents[i].which, s->contents[i].d.any); } break; } case ELEM_CONTACTS: switch(l->d.contacts.name[0]) { case 'R': AppendIo(l->d.contacts.name, IO_TYPE_INTERNAL_RELAY); break; case 'Y': AppendIo(l->d.contacts.name, IO_TYPE_DIG_OUTPUT); break; case 'X': AppendIo(l->d.contacts.name, IO_TYPE_DIG_INPUT); break; default: oops(); break; } break; case ELEM_COIL: AppendIo(l->d.coil.name, l->d.coil.name[0] == 'R' ? IO_TYPE_INTERNAL_RELAY : IO_TYPE_DIG_OUTPUT); break; case ELEM_TON: case ELEM_TOF: AppendIo(l->d.timer.name, which == ELEM_TON ? IO_TYPE_TON : IO_TYPE_TOF); break; case ELEM_RTO: AppendIo(l->d.timer.name, IO_TYPE_RTO); break; case ELEM_MOVE: AppendIo(l->d.move.dest, IO_TYPE_GENERAL); break; case ELEM_ADD: case ELEM_SUB: case ELEM_MUL: case ELEM_DIV: AppendIo(l->d.math.dest, IO_TYPE_GENERAL); break; case ELEM_FORMATTED_STRING: if(strlen(l->d.fmtdStr.var) > 0) { AppendIo(l->d.fmtdStr.var, IO_TYPE_UART_TX); } break; case ELEM_UART_SEND: AppendIo(l->d.uart.name, IO_TYPE_UART_TX); break; case ELEM_UART_RECV: AppendIo(l->d.uart.name, IO_TYPE_UART_RX); break; case ELEM_SET_PWM: AppendIo(l->d.setPwm.name, IO_TYPE_PWM_OUTPUT); break; case ELEM_CTU: case ELEM_CTD: case ELEM_CTC: AppendIo(l->d.counter.name, IO_TYPE_COUNTER); break; case ELEM_READ_ADC: AppendIo(l->d.readAdc.name, IO_TYPE_READ_ADC); break; case ELEM_SHIFT_REGISTER: { int i; for(i = 0; i < l->d.shiftRegister.stages; i++) { char str[MAX_NAME_LEN+10]; sprintf(str, "%s%d", l->d.shiftRegister.name, i); AppendIo(str, IO_TYPE_GENERAL); } break; } case ELEM_LOOK_UP_TABLE: AppendIo(l->d.lookUpTable.dest, IO_TYPE_GENERAL); break; case ELEM_PIECEWISE_LINEAR: AppendIo(l->d.piecewiseLinear.dest, IO_TYPE_GENERAL); break; case ELEM_PLACEHOLDER: case ELEM_COMMENT: case ELEM_SHORT: case ELEM_OPEN: case ELEM_MASTER_RELAY: case ELEM_ONE_SHOT_RISING: case ELEM_ONE_SHOT_FALLING: case ELEM_EQU: case ELEM_NEQ: case ELEM_GRT: case ELEM_GEQ: case ELEM_LES: case ELEM_LEQ: case ELEM_RES: case ELEM_PERSIST: break; default: oops(); } } //----------------------------------------------------------------------------- // Compare function to qsort() the I/O list. Group by type, then // alphabetically within each section. //----------------------------------------------------------------------------- static int CompareIo(const void *av, const void *bv) { PlcProgramSingleIo *a = (PlcProgramSingleIo *)av; PlcProgramSingleIo *b = (PlcProgramSingleIo *)bv; if(a->type != b->type) { return a->type - b->type; } if(a->pin == NO_PIN_ASSIGNED && b->pin != NO_PIN_ASSIGNED) return 1; if(b->pin == NO_PIN_ASSIGNED && a->pin != NO_PIN_ASSIGNED) return -1; return strcmp(a->name, b->name); } //----------------------------------------------------------------------------- // Wipe the I/O list and then re-extract it from the PLC program, taking // care not to forget the pin assignments. Gets passed the selected item // as an index into the list; modifies the list, so returns the new selected // item as an index into the new list. //----------------------------------------------------------------------------- int GenerateIoList(int prevSel) { int i, j; char selName[MAX_NAME_LEN]; if(prevSel >= 0) { strcpy(selName, Prog.io.assignment[prevSel].name); } if(IoSeenPreviouslyCount > MAX_IO_SEEN_PREVIOUSLY/2) { // flush it so there's lots of room, and we don't run out and // forget important things IoSeenPreviouslyCount = 0; } // remember the pin assignments for(i = 0; i < Prog.io.count; i++) { AppendIoSeenPreviously(Prog.io.assignment[i].name, Prog.io.assignment[i].type, Prog.io.assignment[i].pin); } // wipe the list Prog.io.count = 0; // extract the new list so that it must be up to date for(i = 0; i < Prog.numRungs; i++) { ExtractNamesFromCircuit(ELEM_SERIES_SUBCKT, Prog.rungs[i]); } for(i = 0; i < Prog.io.count; i++) { if(Prog.io.assignment[i].type == IO_TYPE_DIG_INPUT || Prog.io.assignment[i].type == IO_TYPE_DIG_OUTPUT || Prog.io.assignment[i].type == IO_TYPE_READ_ADC) { for(j = 0; j < IoSeenPreviouslyCount; j++) { if(strcmp(Prog.io.assignment[i].name, IoSeenPreviously[j].name)==0) { Prog.io.assignment[i].pin = IoSeenPreviously[j].pin; break; } } } } qsort(Prog.io.assignment, Prog.io.count, sizeof(PlcProgramSingleIo), CompareIo); if(prevSel >= 0) { for(i = 0; i < Prog.io.count; i++) { if(strcmp(Prog.io.assignment[i].name, selName)==0) break; } if(i < Prog.io.count) return i; } // no previous, or selected was deleted return -1; } //----------------------------------------------------------------------------- // Load the I/O list from a file. Since we are just loading pin assignments, // put it into IoSeenPreviously so that it will get used on the next // extraction. //----------------------------------------------------------------------------- BOOL LoadIoListFromFile(FILE *f) { char line[80]; char name[MAX_NAME_LEN]; int pin; while(fgets(line, sizeof(line), f)) { ManageLineEnding(line); if(strcmp(line, "END\n")==0) { return TRUE; } // Don't internationalize this! It's the file format, not UI. if(sscanf(line, " %s at %d", name, &pin)==2) { int type; switch(name[0]) { case 'X': type = IO_TYPE_DIG_INPUT; break; case 'Y': type = IO_TYPE_DIG_OUTPUT; break; case 'A': type = IO_TYPE_READ_ADC; break; default: oops(); } AppendIoSeenPreviously(name, type, pin); } } return FALSE; } //----------------------------------------------------------------------------- // Write the I/O list to a file. Since everything except the pin assignment // can be extracted from the schematic, just write the Xs and Ys. //----------------------------------------------------------------------------- void SaveIoListToFile(FILE *f) { int i; for(i = 0; i < Prog.io.count; i++) { if(Prog.io.assignment[i].type == IO_TYPE_DIG_INPUT || Prog.io.assignment[i].type == IO_TYPE_DIG_OUTPUT || Prog.io.assignment[i].type == IO_TYPE_READ_ADC) { // Don't internationalize this! It's the file format, not UI. fprintf(f, " %s at %d\n", Prog.io.assignment[i].name, Prog.io.assignment[i].pin); } } } //----------------------------------------------------------------------------- // A little toolbar-style window that pops up to allow the user to set the // simulated value of an ADC pin. //----------------------------------------------------------------------------- void ShowAnalogSliderPopup(char *name) { QPoint pt = MainWindow->mapFromGlobal(QCursor::pos()); SWORD currentVal = GetAdcShadow(name); SWORD maxVal; if(Prog.mcu) { maxVal = Prog.mcu->adcMax; } else { maxVal = 1023; } if(maxVal == 0) { Error(_("No ADC or ADC not supported for selected micro.")); return; } int left = pt.x() - 10; // try to put the slider directly under the cursor (though later we might // realize that that would put the popup off the screen) int top = pt.y() - (15 + (73*currentVal)/maxVal); QRect r = MainWindow->rect(); if(top + 110 >= r.bottom()) { top = r.bottom() - 110; } if(top < 0) top = 0; AnalogSliderMain = CreateWindowClient("I/O Pin", left, top, 30, 100, IoList); QVBoxLayout* AnalogSliderLayout = new QVBoxLayout(AnalogSliderMain); AnalogSliderMain->setWindowFlags(Qt::Popup); AnalogSliderMain->setWindowTitle(_("I/O Pin")); AnalogSliderTrackbar = new QSlider(AnalogSliderMain); AnalogSliderTrackbar->setMinimum(0); AnalogSliderTrackbar->setMaximum(maxVal); AnalogSliderTrackbar->setTickInterval((maxVal + 1)/8); AnalogSliderTrackbar->setValue(currentVal); AnalogSliderLabel = new QLabel(); char str[5]; sprintf(str, "%d",currentVal); AnalogSliderLabel->setText(str); AnalogSliderLayout->addWidget(AnalogSliderTrackbar); AnalogSliderLayout->addWidget(AnalogSliderLabel); QObject::connect(AnalogSliderTrackbar, &QSlider::valueChanged, std::bind(AnalogSliderProc, std::placeholders::_1, name) ); QObject::connect(AnalogSliderTrackbar, &QSlider::sliderReleased, std::bind(AnalogSliderRelProc, name) ); /* connect( sender, &Sender::valueChanged, std::bind( &Receiver::updateValue, receiver, "senderValue", std::placeholders::_1 ) );*/ AnalogSliderMain->show(); } void AnalogSliderRelProc(char* name) { AnalogSliderMain->hide(); } void ListView_RedrawItems(HLIST list, int min, int max) { int IoListSelectionPoint; QTreeWidgetItem iter; QTreeWidgetItem* selection; selection = list->currentItem(); IoListSelectionPoint =list->indexOfTopLevelItem(selection); NMHDR h; h.code = LVN_GETDISPINFO; h.hlistFrom = list; list->clear(); h.hlistIter.clear(); for(int i = 0; i < Prog.io.count; i++) { h.item.iItem = i; IoListProc(&h); } list->insertTopLevelItems(0, h.hlistIter); if(IoListSelectionPoint >= 0) { list->setCurrentItem(list->topLevelItem(IoListSelectionPoint)); } } void AnalogSliderProc(int Value, char* name) { char str[5]; sprintf(str, "%d", Value); AnalogSliderLabel->setText(str); SWORD v = AnalogSliderTrackbar->value(); // AnalogSliderMain->hide(); SetAdcShadow(name, v); SimulateOneCycle(TRUE); } static void MakeControls() { QVBoxLayout* IoLayout = new QVBoxLayout(IoDialog); NiceFont(IoDialog); PinList = new QTreeWidget(); PinList->setHeaderLabel(_("Assign:")); FixedFont(PinList); PinList->setFixedSize(125, 320); ButtonBox = new QDialogButtonBox(QDialogButtonBox::Ok | QDialogButtonBox::Cancel, Qt::Vertical); IoLayout->addWidget(PinList); IoLayout->addWidget(ButtonBox); QObject::connect(PinList, &QTreeWidget::itemActivated, IoDialog, &QDialog::accept); QObject::connect(ButtonBox, SIGNAL(accepted()), IoDialog, SLOT(accept())); QObject::connect(ButtonBox, SIGNAL(rejected()), IoDialog, SLOT(reject())); } void ShowIoDialog(int item) { if(!Prog.mcu) { MessageBox(MainWindow, _("No microcontroller has been selected. You must select a " "microcontroller before you can assign I/O pins.\r\n\r\n" "Select a microcontroller under the Settings menu and try " "again."), _("I/O Pin Assignment"), MB_OK, MB_ICONWARNING); return; } if(Prog.mcu->whichIsa == ISA_ANSIC) { Error(_("Can't specify I/O assignment for ANSI C target; compile and " "see comments in generated source code.")); return; } if(Prog.mcu->whichIsa == ISA_INTERPRETED) { Error(_("Can't specify I/O assignment for interpretable target; see " "comments in reference implementation of interpreter.")); return; } if(Prog.io.assignment[item].name[0] != 'X' && Prog.io.assignment[item].name[0] != 'Y' && Prog.io.assignment[item].name[0] != 'A') { Error(_("Can only assign pin number to input/output pins (Xname or " "Yname or Aname).")); return; } if(Prog.io.assignment[item].name[0] == 'A' && Prog.mcu->adcCount == 0) { Error(_("No ADC or ADC not supported for this micro.")); return; } if(strcmp(Prog.io.assignment[item].name+1, "new")==0) { Error(_("Rename I/O from default name ('%s') before assigning " "MCU pin."), Prog.io.assignment[item].name); return; } // We need the TOOLWINDOW style, or else the window will be forced to // a minimum width greater than our current width. And without the // APPWINDOW style, it becomes impossible to get the window back (by // Alt+Tab or taskbar). IoDialog = CreateWindowClient(_("I/O Pin"), 100, 100, 107, 387, MainWindow); MakeControls(); QList PinListItems; PinListItems.insert(0,new QTreeWidgetItem( QStringList(_("(no pin)")))); int i; for(i = 0; i < Prog.mcu->pinCount; i++) { int j; for(j = 0; j < Prog.io.count; j++) { if(j == item) continue; if(Prog.io.assignment[j].pin == Prog.mcu->pinInfo[i].pin) { goto cant_use_this_io; } } if(UartFunctionUsed() && Prog.mcu && ((Prog.mcu->pinInfo[i].pin == Prog.mcu->uartNeeds.rxPin) || (Prog.mcu->pinInfo[i].pin == Prog.mcu->uartNeeds.txPin))) { goto cant_use_this_io; } if(PwmFunctionUsed() && Prog.mcu->pinInfo[i].pin == Prog.mcu->pwmNeedsPin) { goto cant_use_this_io; } if(Prog.io.assignment[item].name[0] == 'A') { for(j = 0; j < Prog.mcu->adcCount; j++) { if(Prog.mcu->adcInfo[j].pin == Prog.mcu->pinInfo[i].pin) { // okay; we know how to connect it up to the ADC break; } } if(j == Prog.mcu->adcCount) { goto cant_use_this_io; } } char buf[40]; if(Prog.mcu->pinCount <= 21) { sprintf(buf, "%3d %c%c%d", Prog.mcu->pinInfo[i].pin, Prog.mcu->portPrefix, Prog.mcu->pinInfo[i].port, Prog.mcu->pinInfo[i].bit); } else { sprintf(buf, "%3d %c%c%d", Prog.mcu->pinInfo[i].pin, Prog.mcu->portPrefix, Prog.mcu->pinInfo[i].port, Prog.mcu->pinInfo[i].bit); } PinListItems.append(new QTreeWidgetItem( QStringList(buf))); cant_use_this_io:; } PinList->insertTopLevelItems(0, PinListItems); int ret = IoDialog->exec(); switch(ret) { case QDialog::Accepted: { char pin[16]; strncpy(pin, PinList->currentItem()->text(0).toStdString().c_str(), 16); if(strcmp(pin, _("(no pin)"))==0) { int i; for(i = 0; i < IoSeenPreviouslyCount; i++) { if(strcmp(IoSeenPreviously[i].name, Prog.io.assignment[item].name)==0) { IoSeenPreviously[i].pin = NO_PIN_ASSIGNED; } } Prog.io.assignment[item].pin = NO_PIN_ASSIGNED; } else { Prog.io.assignment[item].pin = atoi(pin); // Only one name can be bound to each pin; make sure that there's // not another entry for this pin in the IoSeenPreviously list, // that might get used if the user creates a new pin with that // name. int i; for(i = 0; i < IoSeenPreviouslyCount; i++) { if(IoSeenPreviously[i].pin == atoi(pin)) { IoSeenPreviously[i].pin = NO_PIN_ASSIGNED; } } } } break; case QDialog::Rejected: break; } DestroyWindow(); } //----------------------------------------------------------------------------- // Called in response to a notify for the listview. Handles click, text-edit // operations etc., but also gets called to find out what text to display // where (LPSTR_TEXTCALLBACK); that way we don't have two parallel copies of // the I/O list to keep in sync. //---------------------------------------------------------------- ------------- void IoListProc(NMHDR *h) { QStringList StrL; int item; switch(h->code) { case LVN_GETDISPINFO: { item = h->item.iItem; /// Don't confuse people by displaying bogus pin assignments /// for the C target. char IO_value_holder[60]; QString val; /// case LV_IO_NAME: val = QString::fromStdString( (const char*)Prog.io.assignment[item].name); StrL.insert(0,val); /// case LV_IO_TYPE: val = QString::fromStdString( IoTypeToString(Prog.io.assignment[item].type)); StrL.insert(1,val); /// case LV_IO_STATE: if(InSimulationMode) { char *name = Prog.io.assignment[item].name; DescribeForIoList(name, IO_value_holder); } else { strcpy(IO_value_holder, ""); } val = QString::fromStdString(IO_value_holder); StrL.insert(2,val); /// case LV_IO_PIN: if(Prog.mcu && (Prog.mcu->whichIsa == ISA_ANSIC || Prog.mcu->whichIsa == ISA_INTERPRETED) ) { strcpy(IO_value_holder, ""); } else { PinNumberForIo(IO_value_holder, &(Prog.io.assignment[item])); } val = QString::fromStdString(IO_value_holder); StrL.insert(3,val); /// case LV_IO_PORT: /// Don't confuse people by displaying bogus pin assignments /// for the C target. if(Prog.mcu && Prog.mcu->whichIsa == ISA_ANSIC) { strcpy(IO_value_holder, ""); break; } int type = Prog.io.assignment[item].type; if(type != IO_TYPE_DIG_INPUT && type != IO_TYPE_DIG_OUTPUT && type != IO_TYPE_READ_ADC) { strcpy(IO_value_holder, ""); break; } int pin = Prog.io.assignment[item].pin; if(pin == NO_PIN_ASSIGNED || !Prog.mcu) { strcpy(IO_value_holder, ""); break; } if(UartFunctionUsed() && Prog.mcu) { if((Prog.mcu->uartNeeds.rxPin == pin) || (Prog.mcu->uartNeeds.txPin == pin)) { strcpy(IO_value_holder, _("")); break; } } if(PwmFunctionUsed() && Prog.mcu) { if(Prog.mcu->pwmNeedsPin == pin) { strcpy(IO_value_holder, _("")); break; } } int j; for(j = 0; j < Prog.mcu->pinCount; j++) { if(Prog.mcu->pinInfo[j].pin == pin) { sprintf(IO_value_holder, "%c%c%d", Prog.mcu->portPrefix, Prog.mcu->pinInfo[j].port, Prog.mcu->pinInfo[j].bit); break; } } if(j == Prog.mcu->pinCount) { sprintf(IO_value_holder, _("")); } val = QString::fromStdString(IO_value_holder); StrL.insert(4,val); break; } case LVN_ITEMACTIVATE: { if(InSimulationMode) { char *name = Prog.io.assignment[h->item.iItem].name; if(name[0] == 'X') { SimulationToggleContact(name); } else if(name[0] == 'A') { ShowAnalogSliderPopup(name); } } else { UndoRemember(); ShowIoDialog(h->item.iItem); ProgramChanged(); InvalidateRect(MainWindow, NULL, FALSE); } break; } } h->hlistIter.insert(item,new QTreeWidgetItem(StrL)); }