drivers/isdn/i4l/isdn_ttyfax.c

   1 /* $Id: isdn_ttyfax.c,v 1.1.2.2 2004/01/12 22:37:19 keil Exp $
   2  *
   3  * Linux ISDN subsystem, tty_fax AT-command emulator (linklevel).
   4  *
   5  * Copyright 1999    by Armin Schindler (mac@melware.de)
   6  * Copyright 1999    by Ralf Spachmann (mel@melware.de)
   7  * Copyright 1999    by Cytronics & Melware
   8  *
   9  * This software may be used and distributed according to the terms
  10  * of the GNU General Public License, incorporated herein by reference.
  11  *
  12  */
  13
  14 #undef ISDN_TTY_FAX_STAT_DEBUG
  15 #undef ISDN_TTY_FAX_CMD_DEBUG
  16
  17 #include <linux/isdn.h>
  18 #include "isdn_common.h"
  19 #include "isdn_tty.h"
  20 #include "isdn_ttyfax.h"
  21
  22
  23 static char *isdn_tty_fax_revision = "$Revision: 1.1.2.2 $";
  24
  25 #define PARSE_ERROR1 { isdn_tty_fax_modem_result(1, info); return 1; }
  26
  27 static char *
  28 isdn_getrev(const char *revision)
  29 {
  30         char *rev;
  31         char *p;
  32
  33         if ((p = strchr(revision, ':'))) {
  34                 rev = p + 2;
  35                 p = strchr(rev, '$');
  36                 *--p = 0;
  37         } else
  38                 rev = "???";
  39         return rev;
  40 }
  41
  42 /*
  43  * Fax Class 2 Modem results
  44  *
  45  */
  46
  47 static void
  48 isdn_tty_fax_modem_result(int code, modem_info * info)
  49 {
  50         atemu *m = &info->emu;
  51         T30_s *f = info->fax;
  52         char rs[50];
  53         char rss[50];
  54         char *rp;
  55         int i;
  56         static char *msg[] =
  57         {"OK", "ERROR", "+FCON", "+FCSI:", "+FDIS:",
  58          "+FHNG:", "+FDCS:", "CONNECT", "+FTSI:",
  59          "+FCFR", "+FPTS:", "+FET:"};
  60
  61
  62         isdn_tty_at_cout("\r\n", info);
  63         isdn_tty_at_cout(msg[code], info);
  64
  65 #ifdef ISDN_TTY_FAX_CMD_DEBUG
  66         printk(KERN_DEBUG "isdn_tty: Fax send %s on ttyI%d\n",
  67                 msg[code], info->line);
  68 #endif
  69         switch (code) {
  70                 case 0: /* OK */
  71                         break;
  72                 case 1: /* ERROR */
  73                         break;
  74                 case 2: /* +FCON */
  75                         /* Append CPN, if enabled */
  76                         if ((m->mdmreg[REG_CPNFCON] & BIT_CPNFCON) &&
  77                                 (!(dev->usage[info->isdn_channel] & ISDN_USAGE_OUTGOING))) {
  78                                 sprintf(rs, "/%s", m->cpn);
  79                                 isdn_tty_at_cout(rs, info);
  80                         }
  81                         info->online = 1;
  82                         f->fet = 0;
  83                         if (f->phase == ISDN_FAX_PHASE_A)
  84                                 f->phase = ISDN_FAX_PHASE_B;
  85                         break;
  86                 case 3: /* +FCSI */
  87                 case 8: /* +FTSI */
  88                         sprintf(rs, "\"%s\"", f->r_id);
  89                         isdn_tty_at_cout(rs, info);
  90                         break;
  91                 case 4: /* +FDIS */
  92                         rs[0] = 0;
  93                         rp = &f->r_resolution;
  94                         for (i = 0; i < 8; i++) {
  95                                 sprintf(rss, "%c%s", rp[i] + 48,
  96                                         (i < 7) ? "," : "");
  97                                 strcat(rs, rss);
  98                         }
  99                         isdn_tty_at_cout(rs, info);
 100 #ifdef ISDN_TTY_FAX_CMD_DEBUG
 101                         printk(KERN_DEBUG "isdn_tty: Fax DIS=%s on ttyI%d\n",
 102                                rs, info->line);
 103 #endif
 104                         break;
 105                 case 5: /* +FHNG */
 106                         sprintf(rs, "%d", f->code);
 107                         isdn_tty_at_cout(rs, info);
 108                         info->faxonline = 0;
 109                         break;
 110                 case 6: /* +FDCS */
 111                         rs[0] = 0;
 112                         rp = &f->r_resolution;
 113                         for (i = 0; i < 8; i++) {
 114                                 sprintf(rss, "%c%s", rp[i] + 48,
 115                                         (i < 7) ? "," : "");
 116                                 strcat(rs, rss);
 117                         }
 118                         isdn_tty_at_cout(rs, info);
 119 #ifdef ISDN_TTY_FAX_CMD_DEBUG
 120                         printk(KERN_DEBUG "isdn_tty: Fax DCS=%s on ttyI%d\n",
 121                                rs, info->line);
 122 #endif
 123                         break;
 124                 case 7: /* CONNECT */
 125                         info->faxonline |= 2;
 126                         break;
 127                 case 9: /* FCFR */
 128                         break;
 129                 case 10:        /* FPTS */
 130                         isdn_tty_at_cout("1", info);
 131                         break;
 132                 case 11:        /* FET */
 133                         sprintf(rs, "%d", f->fet);
 134                         isdn_tty_at_cout(rs, info);
 135                         break;
 136         }
 137
 138         isdn_tty_at_cout("\r\n", info);
 139
 140         switch (code) {
 141                 case 7: /* CONNECT */
 142                         info->online = 2;
 143                         if (info->faxonline & 1) {
 144                                 sprintf(rs, "%c", XON);
 145                                 isdn_tty_at_cout(rs, info);
 146                         }
 147                         break;
 148         }
 149 }
 150
 151 static int
 152 isdn_tty_fax_command1(modem_info * info, isdn_ctrl * c)
 153 {
 154         static char *msg[] =
 155         {"OK", "CONNECT", "NO CARRIER", "ERROR", "FCERROR"};
 156
 157 #ifdef ISDN_TTY_FAX_CMD_DEBUG
 158         printk(KERN_DEBUG "isdn_tty: FCLASS1 cmd(%d)\n", c->parm.aux.cmd);
 159 #endif
 160         if (c->parm.aux.cmd < ISDN_FAX_CLASS1_QUERY) {
 161                 if (info->online)
 162                         info->online = 1;
 163                 isdn_tty_at_cout("\r\n", info);
 164                 isdn_tty_at_cout(msg[c->parm.aux.cmd], info);
 165                 isdn_tty_at_cout("\r\n", info);
 166         }
 167         switch (c->parm.aux.cmd) {
 168                 case ISDN_FAX_CLASS1_CONNECT:
 169                         info->online = 2;
 170                         break;
 171                 case ISDN_FAX_CLASS1_OK:
 172                 case ISDN_FAX_CLASS1_FCERROR:
 173                 case ISDN_FAX_CLASS1_ERROR:
 174                 case ISDN_FAX_CLASS1_NOCARR:
 175                         break;
 176                 case ISDN_FAX_CLASS1_QUERY:
 177                         isdn_tty_at_cout("\r\n", info);
 178                         if (!c->parm.aux.para[0]) {
 179                                 isdn_tty_at_cout(msg[ISDN_FAX_CLASS1_ERROR], info);
 180                                 isdn_tty_at_cout("\r\n", info);
 181                         } else {
 182                                 isdn_tty_at_cout(c->parm.aux.para, info);
 183                                 isdn_tty_at_cout("\r\nOK\r\n", info);
 184                         }
 185                         break;
 186         }
 187         return (0);
 188 }
 189
 190 int
 191 isdn_tty_fax_command(modem_info * info, isdn_ctrl * c)
 192 {
 193         T30_s *f = info->fax;
 194         char rs[10];
 195
 196         if (TTY_IS_FCLASS1(info))
 197                 return (isdn_tty_fax_command1(info, c));
 198
 199 #ifdef ISDN_TTY_FAX_CMD_DEBUG
 200         printk(KERN_DEBUG "isdn_tty: Fax cmd %d on ttyI%d\n",
 201                f->r_code, info->line);
 202 #endif
 203         switch (f->r_code) {
 204                 case ISDN_TTY_FAX_FCON:
 205                         info->faxonline = 1;
 206                         isdn_tty_fax_modem_result(2, info);     /* +FCON */
 207                         return (0);
 208                 case ISDN_TTY_FAX_FCON_I:
 209                         info->faxonline = 16;
 210                         isdn_tty_fax_modem_result(2, info);     /* +FCON */
 211                         return (0);
 212                 case ISDN_TTY_FAX_RID:
 213                         if (info->faxonline & 1)
 214                                 isdn_tty_fax_modem_result(3, info);     /* +FCSI */
 215                         if (info->faxonline & 16)
 216                                 isdn_tty_fax_modem_result(8, info);     /* +FTSI */
 217                         return (0);
 218                 case ISDN_TTY_FAX_DIS:
 219                         isdn_tty_fax_modem_result(4, info);     /* +FDIS */
 220                         return (0);
 221                 case ISDN_TTY_FAX_HNG:
 222                         if (f->phase == ISDN_FAX_PHASE_C) {
 223                                 if (f->direction == ISDN_TTY_FAX_CONN_IN) {
 224                                         sprintf(rs, "%c%c", DLE, ETX);
 225                                         isdn_tty_at_cout(rs, info);
 226                                 } else {
 227                                         sprintf(rs, "%c", 0x18);
 228                                         isdn_tty_at_cout(rs, info);
 229                                 }
 230                                 info->faxonline &= ~2;  /* leave data mode */
 231                                 info->online = 1;
 232                         }
 233                         f->phase = ISDN_FAX_PHASE_E;
 234                         isdn_tty_fax_modem_result(5, info);     /* +FHNG */
 235                         isdn_tty_fax_modem_result(0, info);     /* OK */
 236                         return (0);
 237                 case ISDN_TTY_FAX_DCS:
 238                         isdn_tty_fax_modem_result(6, info);     /* +FDCS */
 239                         isdn_tty_fax_modem_result(7, info);     /* CONNECT */
 240                         f->phase = ISDN_FAX_PHASE_C;
 241                         return (0);
 242                 case ISDN_TTY_FAX_TRAIN_OK:
 243                         isdn_tty_fax_modem_result(6, info);     /* +FDCS */
 244                         isdn_tty_fax_modem_result(0, info);     /* OK */
 245                         return (0);
 246                 case ISDN_TTY_FAX_SENT:
 247                         isdn_tty_fax_modem_result(0, info);     /* OK */
 248                         return (0);
 249                 case ISDN_TTY_FAX_CFR:
 250                         isdn_tty_fax_modem_result(9, info);     /* +FCFR */
 251                         return (0);
 252                 case ISDN_TTY_FAX_ET:
 253                         sprintf(rs, "%c%c", DLE, ETX);
 254                         isdn_tty_at_cout(rs, info);
 255                         isdn_tty_fax_modem_result(10, info);    /* +FPTS */
 256                         isdn_tty_fax_modem_result(11, info);    /* +FET */
 257                         isdn_tty_fax_modem_result(0, info);     /* OK */
 258                         info->faxonline &= ~2;  /* leave data mode */
 259                         info->online = 1;
 260                         f->phase = ISDN_FAX_PHASE_D;
 261                         return (0);
 262                 case ISDN_TTY_FAX_PTS:
 263                         isdn_tty_fax_modem_result(10, info);    /* +FPTS */
 264                         if (f->direction == ISDN_TTY_FAX_CONN_OUT) {
 265                                 if (f->fet == 1)
 266                                         f->phase = ISDN_FAX_PHASE_B;
 267                                 if (f->fet == 0)
 268                                         isdn_tty_fax_modem_result(0, info);     /* OK */
 269                         }
 270                         return (0);
 271                 case ISDN_TTY_FAX_EOP:
 272                         info->faxonline &= ~2;  /* leave data mode */
 273                         info->online = 1;
 274                         f->phase = ISDN_FAX_PHASE_D;
 275                         return (0);
 276
 277         }
 278         return (-1);
 279 }
 280
 281
 282 void
 283 isdn_tty_fax_bitorder(modem_info * info, struct sk_buff *skb)
 284 {
 285         __u8 LeftMask;
 286         __u8 RightMask;
 287         __u8 fBit;
 288         __u8 Data;
 289         int i;
 290
 291         if (!info->fax->bor) {
 292                 for (i = 0; i < skb->len; i++) {
 293                         Data = skb->data[i];
 294                         for (
 295                                     LeftMask = 0x80, RightMask = 0x01;
 296                                     LeftMask > RightMask;
 297                                     LeftMask >>= 1, RightMask <<= 1
 298                             ) {
 299                                 fBit = (Data & LeftMask);
 300                                 if (Data & RightMask)
 301                                         Data |= LeftMask;
 302                                 else
 303                                         Data &= ~LeftMask;
 304                                 if (fBit)
 305                                         Data |= RightMask;
 306                                 else
 307                                         Data &= ~RightMask;
 308
 309                         }
 310                         skb->data[i] = Data;
 311                 }
 312         }
 313 }
 314
 315 /*
 316  * Parse AT+F.. FAX class 1 commands
 317  */
 318
 319 static int
 320 isdn_tty_cmd_FCLASS1(char **p, modem_info * info)
 321 {
 322         static char *cmd[] =
 323         {"AE", "TS", "RS", "TM", "RM", "TH", "RH"};
 324         isdn_ctrl c;
 325         int par, i;
 326         u_long flags;
 327
 328         for (c.parm.aux.cmd = 0; c.parm.aux.cmd < 7; c.parm.aux.cmd++)
 329                 if (!strncmp(p[0], cmd[c.parm.aux.cmd], 2))
 330                         break;
 331
 332 #ifdef ISDN_TTY_FAX_CMD_DEBUG
 333         printk(KERN_DEBUG "isdn_tty_cmd_FCLASS1 (%s,%d)\n", p[0], c.parm.aux.cmd);
 334 #endif
 335         if (c.parm.aux.cmd == 7)
 336                 PARSE_ERROR1;
 337
 338         p[0] += 2;
 339         switch (*p[0]) {
 340                 case '?':
 341                         p[0]++;
 342                         c.parm.aux.subcmd = AT_QUERY;
 343                         break;
 344                 case '=':
 345                         p[0]++;
 346                         if (*p[0] == '?') {
 347                                 p[0]++;
 348                                 c.parm.aux.subcmd = AT_EQ_QUERY;
 349                         } else {
 350                                 par = isdn_getnum(p);
 351                                 if ((par < 0) || (par > 255))
 352                                         PARSE_ERROR1;
 353                                 c.parm.aux.subcmd = AT_EQ_VALUE;
 354                                 c.parm.aux.para[0] = par;
 355                         }
 356                         break;
 357                 case 0:
 358                         c.parm.aux.subcmd = AT_COMMAND;
 359                         break;
 360                 default:
 361                         PARSE_ERROR1;
 362         }
 363         c.command = ISDN_CMD_FAXCMD;
 364 #ifdef ISDN_TTY_FAX_CMD_DEBUG
 365         printk(KERN_DEBUG "isdn_tty_cmd_FCLASS1 %d/%d/%d)\n",
 366                c.parm.aux.cmd, c.parm.aux.subcmd, c.parm.aux.para[0]);
 367 #endif
 368         if (info->isdn_driver < 0) {
 369                 if ((c.parm.aux.subcmd == AT_EQ_VALUE) ||
 370                     (c.parm.aux.subcmd == AT_COMMAND)) {
 371                         PARSE_ERROR1;
 372                 }
 373                 spin_lock_irqsave(&dev->lock, flags);
 374                 /* get a temporary connection to the first free fax driver */
 375                 i = isdn_get_free_channel(ISDN_USAGE_FAX, ISDN_PROTO_L2_FAX,
 376                                           ISDN_PROTO_L3_FCLASS1, -1, -1, "00");
 377                 if (i < 0) {
 378                         spin_unlock_irqrestore(&dev->lock, flags);
 379                         PARSE_ERROR1;
 380                 }
 381                 info->isdn_driver = dev->drvmap[i];
 382                 info->isdn_channel = dev->chanmap[i];
 383                 info->drv_index = i;
 384                 dev->m_idx[i] = info->line;
 385                 spin_unlock_irqrestore(&dev->lock, flags);
 386                 c.driver = info->isdn_driver;
 387                 c.arg = info->isdn_channel;
 388                 isdn_command(&c);
 389                 spin_lock_irqsave(&dev->lock, flags);
 390                 isdn_free_channel(info->isdn_driver, info->isdn_channel,
 391                                   ISDN_USAGE_FAX);
 392                 info->isdn_driver = -1;
 393                 info->isdn_channel = -1;
 394                 if (info->drv_index >= 0) {
 395                         dev->m_idx[info->drv_index] = -1;
 396                         info->drv_index = -1;
 397                 }
 398                 spin_unlock_irqrestore(&dev->lock, flags);
 399         } else {
 400                 c.driver = info->isdn_driver;
 401                 c.arg = info->isdn_channel;
 402                 isdn_command(&c);
 403         }
 404         return 1;
 405 }
 406
 407 /*
 408  * Parse AT+F.. FAX class 2 commands
 409  */
 410
 411 static int
 412 isdn_tty_cmd_FCLASS2(char **p, modem_info * info)
 413 {
 414         atemu *m = &info->emu;
 415         T30_s *f = info->fax;
 416         isdn_ctrl cmd;
 417         int par;
 418         char rs[50];
 419         char rss[50];
 420         int maxdccval[] =
 421         {1, 5, 2, 2, 3, 2, 0, 7};
 422
 423         /* FAA still unchanged */
 424         if (!strncmp(p[0], "AA", 2)) {  /* TODO */
 425                 p[0] += 2;
 426                 switch (*p[0]) {
 427                         case '?':
 428                                 p[0]++;
 429                                 sprintf(rs, "\r\n%d", 0);
 430                                 isdn_tty_at_cout(rs, info);
 431                                 break;
 432                         case '=':
 433                                 p[0]++;
 434                                 par = isdn_getnum(p);
 435                                 if ((par < 0) || (par > 255))
 436                                         PARSE_ERROR1;
 437                                 break;
 438                         default:
 439                                 PARSE_ERROR1;
 440                 }
 441                 return 0;
 442         }
 443         /* BADLIN=value - dummy 0=disable errorchk disabled, 1-255 nr. of lines for making page bad */
 444         if (!strncmp(p[0], "BADLIN", 6)) {
 445                 p[0] += 6;
 446                 switch (*p[0]) {
 447                         case '?':
 448                                 p[0]++;
 449                                 sprintf(rs, "\r\n%d", f->badlin);
 450                                 isdn_tty_at_cout(rs, info);
 451                                 break;
 452                         case '=':
 453                                 p[0]++;
 454                                 if (*p[0] == '?') {
 455                                         p[0]++;
 456                                         sprintf(rs, "\r\n0-255");
 457                                         isdn_tty_at_cout(rs, info);
 458                                 } else {
 459                                         par = isdn_getnum(p);
 460                                         if ((par < 0) || (par > 255))
 461                                                 PARSE_ERROR1;
 462                                         f->badlin = par;
 463 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 464                                         printk(KERN_DEBUG "isdn_tty: Fax FBADLIN=%d\n", par);
 465 #endif
 466                                 }
 467                                 break;
 468                         default:
 469                                 PARSE_ERROR1;
 470                 }
 471                 return 0;
 472         }
 473         /* BADMUL=value - dummy 0=disable errorchk disabled (treshold multiplier) */
 474         if (!strncmp(p[0], "BADMUL", 6)) {
 475                 p[0] += 6;
 476                 switch (*p[0]) {
 477                         case '?':
 478                                 p[0]++;
 479                                 sprintf(rs, "\r\n%d", f->badmul);
 480                                 isdn_tty_at_cout(rs, info);
 481                                 break;
 482                         case '=':
 483                                 p[0]++;
 484                                 if (*p[0] == '?') {
 485                                         p[0]++;
 486                                         sprintf(rs, "\r\n0-255");
 487                                         isdn_tty_at_cout(rs, info);
 488                                 } else {
 489                                         par = isdn_getnum(p);
 490                                         if ((par < 0) || (par > 255))
 491                                                 PARSE_ERROR1;
 492                                         f->badmul = par;
 493 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 494                                         printk(KERN_DEBUG "isdn_tty: Fax FBADMUL=%d\n", par);
 495 #endif
 496                                 }
 497                                 break;
 498                         default:
 499                                 PARSE_ERROR1;
 500                 }
 501                 return 0;
 502         }
 503         /* BOR=n - Phase C bit order, 0=direct, 1=reverse */
 504         if (!strncmp(p[0], "BOR", 3)) {
 505                 p[0] += 3;
 506                 switch (*p[0]) {
 507                         case '?':
 508                                 p[0]++;
 509                                 sprintf(rs, "\r\n%d", f->bor);
 510                                 isdn_tty_at_cout(rs, info);
 511                                 break;
 512                         case '=':
 513                                 p[0]++;
 514                                 if (*p[0] == '?') {
 515                                         p[0]++;
 516                                         sprintf(rs, "\r\n0,1");
 517                                         isdn_tty_at_cout(rs, info);
 518                                 } else {
 519                                         par = isdn_getnum(p);
 520                                         if ((par < 0) || (par > 1))
 521                                                 PARSE_ERROR1;
 522                                         f->bor = par;
 523 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 524                                         printk(KERN_DEBUG "isdn_tty: Fax FBOR=%d\n", par);
 525 #endif
 526                                 }
 527                                 break;
 528                         default:
 529                                 PARSE_ERROR1;
 530                 }
 531                 return 0;
 532         }
 533         /* NBC=n - No Best Capabilities */
 534         if (!strncmp(p[0], "NBC", 3)) {
 535                 p[0] += 3;
 536                 switch (*p[0]) {
 537                         case '?':
 538                                 p[0]++;
 539                                 sprintf(rs, "\r\n%d", f->nbc);
 540                                 isdn_tty_at_cout(rs, info);
 541                                 break;
 542                         case '=':
 543                                 p[0]++;
 544                                 if (*p[0] == '?') {
 545                                         p[0]++;
 546                                         sprintf(rs, "\r\n0,1");
 547                                         isdn_tty_at_cout(rs, info);
 548                                 } else {
 549                                         par = isdn_getnum(p);
 550                                         if ((par < 0) || (par > 1))
 551                                                 PARSE_ERROR1;
 552                                         f->nbc = par;
 553 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 554                                         printk(KERN_DEBUG "isdn_tty: Fax FNBC=%d\n", par);
 555 #endif
 556                                 }
 557                                 break;
 558                         default:
 559                                 PARSE_ERROR1;
 560                 }
 561                 return 0;
 562         }
 563         /* BUF? - Readonly buffersize readout  */
 564         if (!strncmp(p[0], "BUF?", 4)) {
 565                 p[0] += 4;
 566 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 567                 printk(KERN_DEBUG "isdn_tty: Fax FBUF? (%d) \n", (16 * m->mdmreg[REG_PSIZE]));
 568 #endif
 569                 p[0]++;
 570                 sprintf(rs, "\r\n %d ", (16 * m->mdmreg[REG_PSIZE]));
 571                 isdn_tty_at_cout(rs, info);
 572                 return 0;
 573         }
 574         /* CIG=string - local fax station id string for polling rx */
 575         if (!strncmp(p[0], "CIG", 3)) {
 576                 int i, r;
 577                 p[0] += 3;
 578                 switch (*p[0]) {
 579                         case '?':
 580                                 p[0]++;
 581                                 sprintf(rs, "\r\n\"%s\"", f->pollid);
 582                                 isdn_tty_at_cout(rs, info);
 583                                 break;
 584                         case '=':
 585                                 p[0]++;
 586                                 if (*p[0] == '?') {
 587                                         p[0]++;
 588                                         sprintf(rs, "\r\n\"STRING\"");
 589                                         isdn_tty_at_cout(rs, info);
 590                                 } else {
 591                                         if (*p[0] == '"')
 592                                                 p[0]++;
 593                                         for (i = 0; (*p[0]) && i < (FAXIDLEN - 1) && (*p[0] != '"'); i++) {
 594                                                 f->pollid[i] = *p[0]++;
 595                                         }
 596                                         if (*p[0] == '"')
 597                                                 p[0]++;
 598                                         for (r = i; r < FAXIDLEN; r++) {
 599                                                 f->pollid[r] = 32;
 600                                         }
 601                                         f->pollid[FAXIDLEN - 1] = 0;
 602 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 603                                         printk(KERN_DEBUG "isdn_tty: Fax local poll ID rx \"%s\"\n", f->pollid);
 604 #endif
 605                                 }
 606                                 break;
 607                         default:
 608                                 PARSE_ERROR1;
 609                 }
 610                 return 0;
 611         }
 612         /* CQ=n - copy qlty chk, 0= no chk, 1=only 1D chk, 2=1D+2D chk */
 613         if (!strncmp(p[0], "CQ", 2)) {
 614                 p[0] += 2;
 615                 switch (*p[0]) {
 616                         case '?':
 617                                 p[0]++;
 618                                 sprintf(rs, "\r\n%d", f->cq);
 619                                 isdn_tty_at_cout(rs, info);
 620                                 break;
 621                         case '=':
 622                                 p[0]++;
 623                                 if (*p[0] == '?') {
 624                                         p[0]++;
 625                                         sprintf(rs, "\r\n0,1,2");
 626                                         isdn_tty_at_cout(rs, info);
 627                                 } else {
 628                                         par = isdn_getnum(p);
 629                                         if ((par < 0) || (par > 2))
 630                                                 PARSE_ERROR1;
 631                                         f->cq = par;
 632 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 633                                         printk(KERN_DEBUG "isdn_tty: Fax FCQ=%d\n", par);
 634 #endif
 635                                 }
 636                                 break;
 637                         default:
 638                                 PARSE_ERROR1;
 639                 }
 640                 return 0;
 641         }
 642         /* CR=n - can receive? 0= no data rx or poll remote dev, 1=do receive data or poll remote dev */
 643         if (!strncmp(p[0], "CR", 2)) {
 644                 p[0] += 2;
 645                 switch (*p[0]) {
 646                         case '?':
 647                                 p[0]++;
 648                                 sprintf(rs, "\r\n%d", f->cr);   /* read actual value from struct and print */
 649                                 isdn_tty_at_cout(rs, info);
 650                                 break;
 651                         case '=':
 652                                 p[0]++;
 653                                 if (*p[0] == '?') {
 654                                         p[0]++;
 655                                         sprintf(rs, "\r\n0,1");         /* display online help */
 656                                         isdn_tty_at_cout(rs, info);
 657                                 } else {
 658                                         par = isdn_getnum(p);
 659                                         if ((par < 0) || (par > 1))
 660                                                 PARSE_ERROR1;
 661                                         f->cr = par;
 662 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 663                                         printk(KERN_DEBUG "isdn_tty: Fax FCR=%d\n", par);
 664 #endif
 665                                 }
 666                                 break;
 667                         default:
 668                                 PARSE_ERROR1;
 669                 }
 670                 return 0;
 671         }
 672         /* CTCRTY=value - ECM retry count */
 673         if (!strncmp(p[0], "CTCRTY", 6)) {
 674                 p[0] += 6;
 675                 switch (*p[0]) {
 676                         case '?':
 677                                 p[0]++;
 678                                 sprintf(rs, "\r\n%d", f->ctcrty);
 679                                 isdn_tty_at_cout(rs, info);
 680                                 break;
 681                         case '=':
 682                                 p[0]++;
 683                                 if (*p[0] == '?') {
 684                                         p[0]++;
 685                                         sprintf(rs, "\r\n0-255");
 686                                         isdn_tty_at_cout(rs, info);
 687                                 } else {
 688                                         par = isdn_getnum(p);
 689                                         if ((par < 0) || (par > 255))
 690                                                 PARSE_ERROR1;
 691                                         f->ctcrty = par;
 692 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 693                                         printk(KERN_DEBUG "isdn_tty: Fax FCTCRTY=%d\n", par);
 694 #endif
 695                                 }
 696                                 break;
 697                         default:
 698                                 PARSE_ERROR1;
 699                 }
 700                 return 0;
 701         }
 702         /* DCC=vr,br,wd,ln,df,ec,bf,st - DCE capabilities parms */
 703         if (!strncmp(p[0], "DCC", 3)) {
 704                 char *rp = &f->resolution;
 705                 int i;
 706
 707                 p[0] += 3;
 708                 switch (*p[0]) {
 709                         case '?':
 710                                 p[0]++;
 711                                 strcpy(rs, "\r\n");
 712                                 for (i = 0; i < 8; i++) {
 713                                         sprintf(rss, "%c%s", rp[i] + 48,
 714                                                 (i < 7) ? "," : "");
 715                                         strcat(rs, rss);
 716                                 }
 717                                 isdn_tty_at_cout(rs, info);
 718                                 break;
 719                         case '=':
 720                                 p[0]++;
 721                                 if (*p[0] == '?') {
 722                                         isdn_tty_at_cout("\r\n(0,1),(0-5),(0-2),(0-2),(0-3),(0-2),(0),(0-7)", info);
 723                                         p[0]++;
 724                                 } else {
 725                                         for (i = 0; (((*p[0] >= '0') && (*p[0] <= '9')) || (*p[0] == ',')) && (i < 8); i++) {
 726                                                 if (*p[0] != ',') {
 727                                                         if ((*p[0] - 48) > maxdccval[i]) {
 728                                                                 PARSE_ERROR1;
 729                                                         }
 730                                                         rp[i] = *p[0] - 48;
 731                                                         p[0]++;
 732                                                         if (*p[0] == ',')
 733                                                                 p[0]++;
 734                                                 } else
 735                                                         p[0]++;
 736                                         }
 737 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 738                                         printk(KERN_DEBUG "isdn_tty: Fax FDCC capabilities DCE=%d,%d,%d,%d,%d,%d,%d,%d\n",
 739                                                rp[0], rp[1], rp[2], rp[3], rp[4], rp[5], rp[6], rp[7]);
 740 #endif
 741                                 }
 742                                 break;
 743                         default:
 744                                 PARSE_ERROR1;
 745                 }
 746                 return 0;
 747         }
 748         /* DIS=vr,br,wd,ln,df,ec,bf,st - current session parms */
 749         if (!strncmp(p[0], "DIS", 3)) {
 750                 char *rp = &f->resolution;
 751                 int i;
 752
 753                 p[0] += 3;
 754                 switch (*p[0]) {
 755                         case '?':
 756                                 p[0]++;
 757                                 strcpy(rs, "\r\n");
 758                                 for (i = 0; i < 8; i++) {
 759                                         sprintf(rss, "%c%s", rp[i] + 48,
 760                                                 (i < 7) ? "," : "");
 761                                         strcat(rs, rss);
 762                                 }
 763                                 isdn_tty_at_cout(rs, info);
 764                                 break;
 765                         case '=':
 766                                 p[0]++;
 767                                 if (*p[0] == '?') {
 768                                         isdn_tty_at_cout("\r\n(0,1),(0-5),(0-2),(0-2),(0-3),(0-2),(0),(0-7)", info);
 769                                         p[0]++;
 770                                 } else {
 771                                         for (i = 0; (((*p[0] >= '0') && (*p[0] <= '9')) || (*p[0] == ',')) && (i < 8); i++) {
 772                                                 if (*p[0] != ',') {
 773                                                         if ((*p[0] - 48) > maxdccval[i]) {
 774                                                                 PARSE_ERROR1;
 775                                                         }
 776                                                         rp[i] = *p[0] - 48;
 777                                                         p[0]++;
 778                                                         if (*p[0] == ',')
 779                                                                 p[0]++;
 780                                                 } else
 781                                                         p[0]++;
 782                                         }
 783 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 784                                         printk(KERN_DEBUG "isdn_tty: Fax FDIS session parms=%d,%d,%d,%d,%d,%d,%d,%d\n",
 785                                                rp[0], rp[1], rp[2], rp[3], rp[4], rp[5], rp[6], rp[7]);
 786 #endif
 787                                 }
 788                                 break;
 789                         default:
 790                                 PARSE_ERROR1;
 791                 }
 792                 return 0;
 793         }
 794         /* DR - Receive Phase C data command, initiates document reception */
 795         if (!strncmp(p[0], "DR", 2)) {
 796                 p[0] += 2;
 797                 if ((info->faxonline & 16) &&   /* incoming connection */
 798                     ((f->phase == ISDN_FAX_PHASE_B) || (f->phase == ISDN_FAX_PHASE_D))) {
 799 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 800                         printk(KERN_DEBUG "isdn_tty: Fax FDR\n");
 801 #endif
 802                         f->code = ISDN_TTY_FAX_DR;
 803                         cmd.driver = info->isdn_driver;
 804                         cmd.arg = info->isdn_channel;
 805                         cmd.command = ISDN_CMD_FAXCMD;
 806                         isdn_command(&cmd);
 807                         if (f->phase == ISDN_FAX_PHASE_B) {
 808                                 f->phase = ISDN_FAX_PHASE_C;
 809                         } else if (f->phase == ISDN_FAX_PHASE_D) {
 810                                 switch (f->fet) {
 811                                         case 0: /* next page will be received */
 812                                                 f->phase = ISDN_FAX_PHASE_C;
 813                                                 isdn_tty_fax_modem_result(7, info);     /* CONNECT */
 814                                                 break;
 815                                         case 1: /* next doc will be received */
 816                                                 f->phase = ISDN_FAX_PHASE_B;
 817                                                 break;
 818                                         case 2: /* fax session is terminating */
 819                                                 f->phase = ISDN_FAX_PHASE_E;
 820                                                 break;
 821                                         default:
 822                                                 PARSE_ERROR1;
 823                                 }
 824                         }
 825                 } else {
 826                         PARSE_ERROR1;
 827                 }
 828                 return 1;
 829         }
 830         /* DT=df,vr,wd,ln - TX phase C data command (release DCE to proceed with negotiation) */
 831         if (!strncmp(p[0], "DT", 2)) {
 832                 int i, val[] =
 833                 {4, 0, 2, 3};
 834                 char *rp = &f->resolution;
 835
 836                 p[0] += 2;
 837                 if (!info->faxonline & 1)       /* not outgoing connection */
 838                         PARSE_ERROR1;
 839
 840                 for (i = 0; (((*p[0] >= '0') && (*p[0] <= '9')) || (*p[0] == ',')) && (i < 4); i++) {
 841                         if (*p[0] != ',') {
 842                                 if ((*p[0] - 48) > maxdccval[val[i]]) {
 843                                         PARSE_ERROR1;
 844                                 }
 845                                 rp[val[i]] = *p[0] - 48;
 846                                 p[0]++;
 847                                 if (*p[0] == ',')
 848                                         p[0]++;
 849                         } else
 850                                 p[0]++;
 851                 }
 852 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 853                 printk(KERN_DEBUG "isdn_tty: Fax FDT tx data command parms=%d,%d,%d,%d\n",
 854                        rp[4], rp[0], rp[2], rp[3]);
 855 #endif
 856                 if ((f->phase == ISDN_FAX_PHASE_B) || (f->phase == ISDN_FAX_PHASE_D)) {
 857                         f->code = ISDN_TTY_FAX_DT;
 858                         cmd.driver = info->isdn_driver;
 859                         cmd.arg = info->isdn_channel;
 860                         cmd.command = ISDN_CMD_FAXCMD;
 861                         isdn_command(&cmd);
 862                         if (f->phase == ISDN_FAX_PHASE_D) {
 863                                 f->phase = ISDN_FAX_PHASE_C;
 864                                 isdn_tty_fax_modem_result(7, info);     /* CONNECT */
 865                         }
 866                 } else {
 867                         PARSE_ERROR1;
 868                 }
 869                 return 1;
 870         }
 871         /* ECM=n - Error mode control 0=disabled, 2=enabled, handled by DCE alone incl. buff of partial pages */
 872         if (!strncmp(p[0], "ECM", 3)) {
 873                 p[0] += 3;
 874                 switch (*p[0]) {
 875                         case '?':
 876                                 p[0]++;
 877                                 sprintf(rs, "\r\n%d", f->ecm);
 878                                 isdn_tty_at_cout(rs, info);
 879                                 break;
 880                         case '=':
 881                                 p[0]++;
 882                                 if (*p[0] == '?') {
 883                                         p[0]++;
 884                                         sprintf(rs, "\r\n0,2");
 885                                         isdn_tty_at_cout(rs, info);
 886                                 } else {
 887                                         par = isdn_getnum(p);
 888                                         if ((par != 0) && (par != 2))
 889                                                 PARSE_ERROR1;
 890                                         f->ecm = par;
 891 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 892                                         printk(KERN_DEBUG "isdn_tty: Fax FECM=%d\n", par);
 893 #endif
 894                                 }
 895                                 break;
 896                         default:
 897                                 PARSE_ERROR1;
 898                 }
 899                 return 0;
 900         }
 901         /* ET=n - End of page or document */
 902         if (!strncmp(p[0], "ET=", 3)) {
 903                 p[0] += 3;
 904                 if (*p[0] == '?') {
 905                         p[0]++;
 906                         sprintf(rs, "\r\n0-2");
 907                         isdn_tty_at_cout(rs, info);
 908                 } else {
 909                         if ((f->phase != ISDN_FAX_PHASE_D) || (!info->faxonline & 1))
 910                                 PARSE_ERROR1;
 911                         par = isdn_getnum(p);
 912                         if ((par < 0) || (par > 2))
 913                                 PARSE_ERROR1;
 914                         f->fet = par;
 915                         f->code = ISDN_TTY_FAX_ET;
 916                         cmd.driver = info->isdn_driver;
 917                         cmd.arg = info->isdn_channel;
 918                         cmd.command = ISDN_CMD_FAXCMD;
 919                         isdn_command(&cmd);
 920 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 921                         printk(KERN_DEBUG "isdn_tty: Fax FET=%d\n", par);
 922 #endif
 923                         return 1;
 924                 }
 925                 return 0;
 926         }
 927         /* K - terminate */
 928         if (!strncmp(p[0], "K", 1)) {
 929                 p[0] += 1;
 930                 if ((f->phase == ISDN_FAX_PHASE_IDLE) || (f->phase == ISDN_FAX_PHASE_E))
 931                         PARSE_ERROR1;
 932                 isdn_tty_modem_hup(info, 1);
 933                 return 1;
 934         }
 935         /* LID=string - local fax ID */
 936         if (!strncmp(p[0], "LID", 3)) {
 937                 int i, r;
 938                 p[0] += 3;
 939                 switch (*p[0]) {
 940                         case '?':
 941                                 p[0]++;
 942                                 sprintf(rs, "\r\n\"%s\"", f->id);
 943                                 isdn_tty_at_cout(rs, info);
 944                                 break;
 945                         case '=':
 946                                 p[0]++;
 947                                 if (*p[0] == '?') {
 948                                         p[0]++;
 949                                         sprintf(rs, "\r\n\"STRING\"");
 950                                         isdn_tty_at_cout(rs, info);
 951                                 } else {
 952                                         if (*p[0] == '"')
 953                                                 p[0]++;
 954                                         for (i = 0; (*p[0]) && i < (FAXIDLEN - 1) && (*p[0] != '"'); i++) {
 955                                                 f->id[i] = *p[0]++;
 956                                         }
 957                                         if (*p[0] == '"')
 958                                                 p[0]++;
 959                                         for (r = i; r < FAXIDLEN; r++) {
 960                                                 f->id[r] = 32;
 961                                         }
 962                                         f->id[FAXIDLEN - 1] = 0;
 963 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 964                                         printk(KERN_DEBUG "isdn_tty: Fax local ID \"%s\"\n", f->id);
 965 #endif
 966                                 }
 967                                 break;
 968                         default:
 969                                 PARSE_ERROR1;
 970                 }
 971                 return 0;
 972         }
 973
 974         /* MDL? - DCE Model       */
 975         if (!strncmp(p[0], "MDL?", 4)) {
 976                 p[0] += 4;
 977 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 978                 printk(KERN_DEBUG "isdn_tty: FMDL?\n");
 979 #endif
 980                 isdn_tty_at_cout("\r\nisdn4linux", info);
 981                 return 0;
 982         }
 983         /* MFR? - DCE Manufacturer */
 984         if (!strncmp(p[0], "MFR?", 4)) {
 985                 p[0] += 4;
 986 #ifdef ISDN_TTY_FAX_STAT_DEBUG
 987                 printk(KERN_DEBUG "isdn_tty: FMFR?\n");
 988 #endif
 989                 isdn_tty_at_cout("\r\nisdn4linux", info);
 990                 return 0;
 991         }
 992         /* MINSP=n - Minimum Speed for Phase C */
 993         if (!strncmp(p[0], "MINSP", 5)) {
 994                 p[0] += 5;
 995                 switch (*p[0]) {
 996                         case '?':
 997                                 p[0]++;
 998                                 sprintf(rs, "\r\n%d", f->minsp);
 999                                 isdn_tty_at_cout(rs, info);
1000                                 break;
1001                         case '=':
1002                                 p[0]++;
1003                                 if (*p[0] == '?') {
1004                                         p[0]++;
1005                                         sprintf(rs, "\r\n0-5");
1006                                         isdn_tty_at_cout(rs, info);
1007                                 } else {
1008                                         par = isdn_getnum(p);
1009                                         if ((par < 0) || (par > 5))
1010                                                 PARSE_ERROR1;
1011                                         f->minsp = par;
1012 #ifdef ISDN_TTY_FAX_STAT_DEBUG
1013                                         printk(KERN_DEBUG "isdn_tty: Fax FMINSP=%d\n", par);
1014 #endif
1015                                 }
1016                                 break;
1017                         default:
1018                                 PARSE_ERROR1;
1019                 }
1020                 return 0;
1021         }
1022         /* PHCTO=value - DTE phase C timeout */
1023         if (!strncmp(p[0], "PHCTO", 5)) {
1024                 p[0] += 5;
1025                 switch (*p[0]) {
1026                         case '?':
1027                                 p[0]++;
1028                                 sprintf(rs, "\r\n%d", f->phcto);
1029                                 isdn_tty_at_cout(rs, info);
1030                                 break;
1031                         case '=':
1032                                 p[0]++;
1033                                 if (*p[0] == '?') {
1034                                         p[0]++;
1035                                         sprintf(rs, "\r\n0-255");
1036                                         isdn_tty_at_cout(rs, info);
1037                                 } else {
1038                                         par = isdn_getnum(p);
1039                                         if ((par < 0) || (par > 255))
1040                                                 PARSE_ERROR1;
1041                                         f->phcto = par;
1042 #ifdef ISDN_TTY_FAX_STAT_DEBUG
1043                                         printk(KERN_DEBUG "isdn_tty: Fax FPHCTO=%d\n", par);
1044 #endif
1045                                 }
1046                                 break;
1047                         default:
1048                                 PARSE_ERROR1;
1049                 }
1050                 return 0;
1051         }
1052
1053         /* REL=n - Phase C received EOL alignment */
1054         if (!strncmp(p[0], "REL", 3)) {
1055                 p[0] += 3;
1056                 switch (*p[0]) {
1057                         case '?':
1058                                 p[0]++;
1059                                 sprintf(rs, "\r\n%d", f->rel);
1060                                 isdn_tty_at_cout(rs, info);
1061                                 break;
1062                         case '=':
1063                                 p[0]++;
1064                                 if (*p[0] == '?') {
1065                                         p[0]++;
1066                                         sprintf(rs, "\r\n0,1");
1067                                         isdn_tty_at_cout(rs, info);
1068                                 } else {
1069                                         par = isdn_getnum(p);
1070                                         if ((par < 0) || (par > 1))
1071                                                 PARSE_ERROR1;
1072                                         f->rel = par;
1073 #ifdef ISDN_TTY_FAX_STAT_DEBUG
1074                                         printk(KERN_DEBUG "isdn_tty: Fax FREL=%d\n", par);
1075 #endif
1076                                 }
1077                                 break;
1078                         default:
1079                                 PARSE_ERROR1;
1080                 }
1081                 return 0;
1082         }
1083         /* REV? - DCE Revision */
1084         if (!strncmp(p[0], "REV?", 4)) {
1085                 p[0] += 4;
1086 #ifdef ISDN_TTY_FAX_STAT_DEBUG
1087                 printk(KERN_DEBUG "isdn_tty: FREV?\n");
1088 #endif
1089                 strcpy(rss, isdn_tty_fax_revision);
1090                 sprintf(rs, "\r\nRev: %s", isdn_getrev(rss));
1091                 isdn_tty_at_cout(rs, info);
1092                 return 0;
1093         }
1094
1095         /* Phase C Transmit Data Block Size */
1096         if (!strncmp(p[0], "TBC=", 4)) {        /* dummy, not used */
1097                 p[0] += 4;
1098 #ifdef ISDN_TTY_FAX_STAT_DEBUG
1099                 printk(KERN_DEBUG "isdn_tty: Fax FTBC=%c\n", *p[0]);
1100 #endif
1101                 switch (*p[0]) {
1102                         case '0':
1103                                 p[0]++;
1104                                 break;
1105                         default:
1106                                 PARSE_ERROR1;
1107                 }
1108                 return 0;
1109         }
1110         printk(KERN_DEBUG "isdn_tty: unknown token=>AT+F%s<\n", p[0]);
1111         PARSE_ERROR1;
1112 }
1113
1114 int
1115 isdn_tty_cmd_PLUSF_FAX(char **p, modem_info * info)
1116 {
1117         if (TTY_IS_FCLASS2(info))
1118                 return (isdn_tty_cmd_FCLASS2(p, info));
1119         else if (TTY_IS_FCLASS1(info))
1120                 return (isdn_tty_cmd_FCLASS1(p, info));
1121         PARSE_ERROR1;
1122 }