net/sctp/proc.c

   1 /* SCTP kernel implementation
   2  * Copyright (c) 2003 International Business Machines, Corp.
   3  *
   4  * This file is part of the SCTP kernel implementation
   5  *
   6  * This SCTP implementation is free software;
   7  * you can redistribute it and/or modify it under the terms of
   8  * the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2, or (at your option)
  10  * any later version.
  11  *
  12  * This SCTP implementation is distributed in the hope that it
  13  * will be useful, but WITHOUT ANY WARRANTY; without even the implied
  14  *                 ************************
  15  * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  16  * See the GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with GNU CC; see the file COPYING.  If not, see
  20  * <http://www.gnu.org/licenses/>.
  21  *
  22  * Please send any bug reports or fixes you make to the
  23  * email address(es):
  24  *    lksctp developers <linux-sctp@vger.kernel.org>
  25  *
  26  * Written or modified by:
  27  *    Sridhar Samudrala <sri@us.ibm.com>
  28  */
  29
  30 #include <linux/types.h>
  31 #include <linux/seq_file.h>
  32 #include <linux/init.h>
  33 #include <linux/export.h>
  34 #include <net/sctp/sctp.h>
  35 #include <net/ip.h> /* for snmp_fold_field */
  36
  37 static const struct snmp_mib sctp_snmp_list[] = {
  38         SNMP_MIB_ITEM("SctpCurrEstab", SCTP_MIB_CURRESTAB),
  39         SNMP_MIB_ITEM("SctpActiveEstabs", SCTP_MIB_ACTIVEESTABS),
  40         SNMP_MIB_ITEM("SctpPassiveEstabs", SCTP_MIB_PASSIVEESTABS),
  41         SNMP_MIB_ITEM("SctpAborteds", SCTP_MIB_ABORTEDS),
  42         SNMP_MIB_ITEM("SctpShutdowns", SCTP_MIB_SHUTDOWNS),
  43         SNMP_MIB_ITEM("SctpOutOfBlues", SCTP_MIB_OUTOFBLUES),
  44         SNMP_MIB_ITEM("SctpChecksumErrors", SCTP_MIB_CHECKSUMERRORS),
  45         SNMP_MIB_ITEM("SctpOutCtrlChunks", SCTP_MIB_OUTCTRLCHUNKS),
  46         SNMP_MIB_ITEM("SctpOutOrderChunks", SCTP_MIB_OUTORDERCHUNKS),
  47         SNMP_MIB_ITEM("SctpOutUnorderChunks", SCTP_MIB_OUTUNORDERCHUNKS),
  48         SNMP_MIB_ITEM("SctpInCtrlChunks", SCTP_MIB_INCTRLCHUNKS),
  49         SNMP_MIB_ITEM("SctpInOrderChunks", SCTP_MIB_INORDERCHUNKS),
  50         SNMP_MIB_ITEM("SctpInUnorderChunks", SCTP_MIB_INUNORDERCHUNKS),
  51         SNMP_MIB_ITEM("SctpFragUsrMsgs", SCTP_MIB_FRAGUSRMSGS),
  52         SNMP_MIB_ITEM("SctpReasmUsrMsgs", SCTP_MIB_REASMUSRMSGS),
  53         SNMP_MIB_ITEM("SctpOutSCTPPacks", SCTP_MIB_OUTSCTPPACKS),
  54         SNMP_MIB_ITEM("SctpInSCTPPacks", SCTP_MIB_INSCTPPACKS),
  55         SNMP_MIB_ITEM("SctpT1InitExpireds", SCTP_MIB_T1_INIT_EXPIREDS),
  56         SNMP_MIB_ITEM("SctpT1CookieExpireds", SCTP_MIB_T1_COOKIE_EXPIREDS),
  57         SNMP_MIB_ITEM("SctpT2ShutdownExpireds", SCTP_MIB_T2_SHUTDOWN_EXPIREDS),
  58         SNMP_MIB_ITEM("SctpT3RtxExpireds", SCTP_MIB_T3_RTX_EXPIREDS),
  59         SNMP_MIB_ITEM("SctpT4RtoExpireds", SCTP_MIB_T4_RTO_EXPIREDS),
  60         SNMP_MIB_ITEM("SctpT5ShutdownGuardExpireds", SCTP_MIB_T5_SHUTDOWN_GUARD_EXPIREDS),
  61         SNMP_MIB_ITEM("SctpDelaySackExpireds", SCTP_MIB_DELAY_SACK_EXPIREDS),
  62         SNMP_MIB_ITEM("SctpAutocloseExpireds", SCTP_MIB_AUTOCLOSE_EXPIREDS),
  63         SNMP_MIB_ITEM("SctpT3Retransmits", SCTP_MIB_T3_RETRANSMITS),
  64         SNMP_MIB_ITEM("SctpPmtudRetransmits", SCTP_MIB_PMTUD_RETRANSMITS),
  65         SNMP_MIB_ITEM("SctpFastRetransmits", SCTP_MIB_FAST_RETRANSMITS),
  66         SNMP_MIB_ITEM("SctpInPktSoftirq", SCTP_MIB_IN_PKT_SOFTIRQ),
  67         SNMP_MIB_ITEM("SctpInPktBacklog", SCTP_MIB_IN_PKT_BACKLOG),
  68         SNMP_MIB_ITEM("SctpInPktDiscards", SCTP_MIB_IN_PKT_DISCARDS),
  69         SNMP_MIB_ITEM("SctpInDataChunkDiscards", SCTP_MIB_IN_DATA_CHUNK_DISCARDS),
  70         SNMP_MIB_SENTINEL
  71 };
  72
  73 /* Display sctp snmp mib statistics(/proc/net/sctp/snmp). */
  74 static int sctp_snmp_seq_show(struct seq_file *seq, void *v)
  75 {
  76         struct net *net = seq->private;
  77         int i;
  78
  79         for (i = 0; sctp_snmp_list[i].name != NULL; i++)
  80                 seq_printf(seq, "%-32s\t%ld\n", sctp_snmp_list[i].name,
  81                            snmp_fold_field(net->sctp.sctp_statistics,
  82                                       sctp_snmp_list[i].entry));
  83
  84         return 0;
  85 }
  86
  87 /* Initialize the seq file operations for 'snmp' object. */
  88 static int sctp_snmp_seq_open(struct inode *inode, struct file *file)
  89 {
  90         return single_open_net(inode, file, sctp_snmp_seq_show);
  91 }
  92
  93 static const struct file_operations sctp_snmp_seq_fops = {
  94         .owner   = THIS_MODULE,
  95         .open    = sctp_snmp_seq_open,
  96         .read    = seq_read,
  97         .llseek  = seq_lseek,
  98         .release = single_release_net,
  99 };
 100
 101 /* Set up the proc fs entry for 'snmp' object. */
 102 int __net_init sctp_snmp_proc_init(struct net *net)
 103 {
 104         struct proc_dir_entry *p;
 105
 106         p = proc_create("snmp", S_IRUGO, net->sctp.proc_net_sctp,
 107                         &sctp_snmp_seq_fops);
 108         if (!p)
 109                 return -ENOMEM;
 110
 111         return 0;
 112 }
 113
 114 /* Cleanup the proc fs entry for 'snmp' object. */
 115 void sctp_snmp_proc_exit(struct net *net)
 116 {
 117         remove_proc_entry("snmp", net->sctp.proc_net_sctp);
 118 }
 119
 120 /* Dump local addresses of an association/endpoint. */
 121 static void sctp_seq_dump_local_addrs(struct seq_file *seq, struct sctp_ep_common *epb)
 122 {
 123         struct sctp_association *asoc;
 124         struct sctp_sockaddr_entry *laddr;
 125         struct sctp_transport *peer;
 126         union sctp_addr *addr, *primary = NULL;
 127         struct sctp_af *af;
 128
 129         if (epb->type == SCTP_EP_TYPE_ASSOCIATION) {
 130                 asoc = sctp_assoc(epb);
 131
 132                 peer = asoc->peer.primary_path;
 133                 if (unlikely(peer == NULL)) {
 134                         WARN(1, "Association %p with NULL primary path!\n", asoc);
 135                         return;
 136                 }
 137
 138                 primary = &peer->saddr;
 139         }
 140
 141         rcu_read_lock();
 142         list_for_each_entry_rcu(laddr, &epb->bind_addr.address_list, list) {
 143                 if (!laddr->valid)
 144                         continue;
 145
 146                 addr = &laddr->a;
 147                 af = sctp_get_af_specific(addr->sa.sa_family);
 148                 if (primary && af->cmp_addr(addr, primary)) {
 149                         seq_printf(seq, "*");
 150                 }
 151                 af->seq_dump_addr(seq, addr);
 152         }
 153         rcu_read_unlock();
 154 }
 155
 156 /* Dump remote addresses of an association. */
 157 static void sctp_seq_dump_remote_addrs(struct seq_file *seq, struct sctp_association *assoc)
 158 {
 159         struct sctp_transport *transport;
 160         union sctp_addr *addr, *primary;
 161         struct sctp_af *af;
 162
 163         primary = &assoc->peer.primary_addr;
 164         rcu_read_lock();
 165         list_for_each_entry_rcu(transport, &assoc->peer.transport_addr_list,
 166                         transports) {
 167                 addr = &transport->ipaddr;
 168                 if (transport->dead)
 169                         continue;
 170
 171                 af = sctp_get_af_specific(addr->sa.sa_family);
 172                 if (af->cmp_addr(addr, primary)) {
 173                         seq_printf(seq, "*");
 174                 }
 175                 af->seq_dump_addr(seq, addr);
 176         }
 177         rcu_read_unlock();
 178 }
 179
 180 static void *sctp_eps_seq_start(struct seq_file *seq, loff_t *pos)
 181 {
 182         if (*pos >= sctp_ep_hashsize)
 183                 return NULL;
 184
 185         if (*pos < 0)
 186                 *pos = 0;
 187
 188         if (*pos == 0)
 189                 seq_printf(seq, " ENDPT     SOCK   STY SST HBKT LPORT   UID INODE LADDRS\n");
 190
 191         return (void *)pos;
 192 }
 193
 194 static void sctp_eps_seq_stop(struct seq_file *seq, void *v)
 195 {
 196 }
 197
 198
 199 static void *sctp_eps_seq_next(struct seq_file *seq, void *v, loff_t *pos)
 200 {
 201         if (++*pos >= sctp_ep_hashsize)
 202                 return NULL;
 203
 204         return pos;
 205 }
 206
 207
 208 /* Display sctp endpoints (/proc/net/sctp/eps). */
 209 static int sctp_eps_seq_show(struct seq_file *seq, void *v)
 210 {
 211         struct sctp_hashbucket *head;
 212         struct sctp_ep_common *epb;
 213         struct sctp_endpoint *ep;
 214         struct sock *sk;
 215         int    hash = *(loff_t *)v;
 216
 217         if (hash >= sctp_ep_hashsize)
 218                 return -ENOMEM;
 219
 220         head = &sctp_ep_hashtable[hash];
 221         local_bh_disable();
 222         read_lock(&head->lock);
 223         sctp_for_each_hentry(epb, &head->chain) {
 224                 ep = sctp_ep(epb);
 225                 sk = epb->sk;
 226                 if (!net_eq(sock_net(sk), seq_file_net(seq)))
 227                         continue;
 228                 seq_printf(seq, "%8pK %8pK %-3d %-3d %-4d %-5d %5u %5lu ", ep, sk,
 229                            sctp_sk(sk)->type, sk->sk_state, hash,
 230                            epb->bind_addr.port,
 231                            from_kuid_munged(seq_user_ns(seq), sock_i_uid(sk)),
 232                            sock_i_ino(sk));
 233
 234                 sctp_seq_dump_local_addrs(seq, epb);
 235                 seq_printf(seq, "\n");
 236         }
 237         read_unlock(&head->lock);
 238         local_bh_enable();
 239
 240         return 0;
 241 }
 242
 243 static const struct seq_operations sctp_eps_ops = {
 244         .start = sctp_eps_seq_start,
 245         .next  = sctp_eps_seq_next,
 246         .stop  = sctp_eps_seq_stop,
 247         .show  = sctp_eps_seq_show,
 248 };
 249
 250
 251 /* Initialize the seq file operations for 'eps' object. */
 252 static int sctp_eps_seq_open(struct inode *inode, struct file *file)
 253 {
 254         return seq_open_net(inode, file, &sctp_eps_ops,
 255                             sizeof(struct seq_net_private));
 256 }
 257
 258 static const struct file_operations sctp_eps_seq_fops = {
 259         .open    = sctp_eps_seq_open,
 260         .read    = seq_read,
 261         .llseek  = seq_lseek,
 262         .release = seq_release_net,
 263 };
 264
 265 /* Set up the proc fs entry for 'eps' object. */
 266 int __net_init sctp_eps_proc_init(struct net *net)
 267 {
 268         struct proc_dir_entry *p;
 269
 270         p = proc_create("eps", S_IRUGO, net->sctp.proc_net_sctp,
 271                         &sctp_eps_seq_fops);
 272         if (!p)
 273                 return -ENOMEM;
 274
 275         return 0;
 276 }
 277
 278 /* Cleanup the proc fs entry for 'eps' object. */
 279 void sctp_eps_proc_exit(struct net *net)
 280 {
 281         remove_proc_entry("eps", net->sctp.proc_net_sctp);
 282 }
 283
 284 struct sctp_ht_iter {
 285         struct seq_net_private p;
 286         struct rhashtable_iter hti;
 287 };
 288
 289 static struct sctp_transport *sctp_transport_get_next(struct seq_file *seq)
 290 {
 291         struct sctp_ht_iter *iter = seq->private;
 292         struct sctp_transport *t;
 293
 294         t = rhashtable_walk_next(&iter->hti);
 295         for (; t; t = rhashtable_walk_next(&iter->hti)) {
 296                 if (IS_ERR(t)) {
 297                         if (PTR_ERR(t) == -EAGAIN)
 298                                 continue;
 299                         break;
 300                 }
 301
 302                 if (net_eq(sock_net(t->asoc->base.sk), seq_file_net(seq)) &&
 303                     t->asoc->peer.primary_path == t)
 304                         break;
 305         }
 306
 307         return t;
 308 }
 309
 310 static struct sctp_transport *sctp_transport_get_idx(struct seq_file *seq,
 311                                                      loff_t pos)
 312 {
 313         void *obj = SEQ_START_TOKEN;
 314
 315         while (pos && (obj = sctp_transport_get_next(seq)) && !IS_ERR(obj))
 316                 pos--;
 317
 318         return obj;
 319 }
 320
 321 static int sctp_transport_walk_start(struct seq_file *seq)
 322 {
 323         struct sctp_ht_iter *iter = seq->private;
 324         int err;
 325
 326         err = rhashtable_walk_init(&sctp_transport_hashtable, &iter->hti);
 327         if (err)
 328                 return err;
 329
 330         err = rhashtable_walk_start(&iter->hti);
 331
 332         return err == -EAGAIN ? 0 : err;
 333 }
 334
 335 static void sctp_transport_walk_stop(struct seq_file *seq)
 336 {
 337         struct sctp_ht_iter *iter = seq->private;
 338
 339         rhashtable_walk_stop(&iter->hti);
 340         rhashtable_walk_exit(&iter->hti);
 341 }
 342
 343 static void *sctp_assocs_seq_start(struct seq_file *seq, loff_t *pos)
 344 {
 345         int err = sctp_transport_walk_start(seq);
 346
 347         if (err)
 348                 return ERR_PTR(err);
 349
 350         return sctp_transport_get_idx(seq, *pos);
 351 }
 352
 353 static void sctp_assocs_seq_stop(struct seq_file *seq, void *v)
 354 {
 355         sctp_transport_walk_stop(seq);
 356 }
 357
 358 static void *sctp_assocs_seq_next(struct seq_file *seq, void *v, loff_t *pos)
 359 {
 360         ++*pos;
 361
 362         return sctp_transport_get_next(seq);
 363 }
 364
 365 /* Display sctp associations (/proc/net/sctp/assocs). */
 366 static int sctp_assocs_seq_show(struct seq_file *seq, void *v)
 367 {
 368         struct sctp_transport *transport;
 369         struct sctp_association *assoc;
 370         struct sctp_ep_common *epb;
 371         struct sock *sk;
 372
 373         if (v == SEQ_START_TOKEN) {
 374                 seq_printf(seq, " ASSOC     SOCK   STY SST ST HBKT "
 375                                 "ASSOC-ID TX_QUEUE RX_QUEUE UID INODE LPORT "
 376                                 "RPORT LADDRS <-> RADDRS "
 377                                 "HBINT INS OUTS MAXRT T1X T2X RTXC "
 378                                 "wmema wmemq sndbuf rcvbuf\n");
 379                 return 0;
 380         }
 381
 382         transport = (struct sctp_transport *)v;
 383         if (!sctp_transport_hold(transport))
 384                 return 0;
 385         assoc = transport->asoc;
 386         epb = &assoc->base;
 387         sk = epb->sk;
 388
 389         seq_printf(seq,
 390                    "%8pK %8pK %-3d %-3d %-2d %-4d "
 391                    "%4d %8d %8d %7u %5lu %-5d %5d ",
 392                    assoc, sk, sctp_sk(sk)->type, sk->sk_state,
 393                    assoc->state, 0,
 394                    assoc->assoc_id,
 395                    assoc->sndbuf_used,
 396                    atomic_read(&assoc->rmem_alloc),
 397                    from_kuid_munged(seq_user_ns(seq), sock_i_uid(sk)),
 398                    sock_i_ino(sk),
 399                    epb->bind_addr.port,
 400                    assoc->peer.port);
 401         seq_printf(seq, " ");
 402         sctp_seq_dump_local_addrs(seq, epb);
 403         seq_printf(seq, "<-> ");
 404         sctp_seq_dump_remote_addrs(seq, assoc);
 405         seq_printf(seq, "\t%8lu %5d %5d %4d %4d %4d %8d "
 406                    "%8d %8d %8d %8d",
 407                 assoc->hbinterval, assoc->c.sinit_max_instreams,
 408                 assoc->c.sinit_num_ostreams, assoc->max_retrans,
 409                 assoc->init_retries, assoc->shutdown_retries,
 410                 assoc->rtx_data_chunks,
 411                 atomic_read(&sk->sk_wmem_alloc),
 412                 sk->sk_wmem_queued,
 413                 sk->sk_sndbuf,
 414                 sk->sk_rcvbuf);
 415         seq_printf(seq, "\n");
 416
 417         sctp_transport_put(transport);
 418
 419         return 0;
 420 }
 421
 422 static const struct seq_operations sctp_assoc_ops = {
 423         .start = sctp_assocs_seq_start,
 424         .next  = sctp_assocs_seq_next,
 425         .stop  = sctp_assocs_seq_stop,
 426         .show  = sctp_assocs_seq_show,
 427 };
 428
 429 /* Initialize the seq file operations for 'assocs' object. */
 430 static int sctp_assocs_seq_open(struct inode *inode, struct file *file)
 431 {
 432         return seq_open_net(inode, file, &sctp_assoc_ops,
 433                             sizeof(struct sctp_ht_iter));
 434 }
 435
 436 static const struct file_operations sctp_assocs_seq_fops = {
 437         .open    = sctp_assocs_seq_open,
 438         .read    = seq_read,
 439         .llseek  = seq_lseek,
 440         .release = seq_release_net,
 441 };
 442
 443 /* Set up the proc fs entry for 'assocs' object. */
 444 int __net_init sctp_assocs_proc_init(struct net *net)
 445 {
 446         struct proc_dir_entry *p;
 447
 448         p = proc_create("assocs", S_IRUGO, net->sctp.proc_net_sctp,
 449                         &sctp_assocs_seq_fops);
 450         if (!p)
 451                 return -ENOMEM;
 452
 453         return 0;
 454 }
 455
 456 /* Cleanup the proc fs entry for 'assocs' object. */
 457 void sctp_assocs_proc_exit(struct net *net)
 458 {
 459         remove_proc_entry("assocs", net->sctp.proc_net_sctp);
 460 }
 461
 462 static void *sctp_remaddr_seq_start(struct seq_file *seq, loff_t *pos)
 463 {
 464         int err = sctp_transport_walk_start(seq);
 465
 466         if (err)
 467                 return ERR_PTR(err);
 468
 469         return sctp_transport_get_idx(seq, *pos);
 470 }
 471
 472 static void *sctp_remaddr_seq_next(struct seq_file *seq, void *v, loff_t *pos)
 473 {
 474         ++*pos;
 475
 476         return sctp_transport_get_next(seq);
 477 }
 478
 479 static void sctp_remaddr_seq_stop(struct seq_file *seq, void *v)
 480 {
 481         sctp_transport_walk_stop(seq);
 482 }
 483
 484 static int sctp_remaddr_seq_show(struct seq_file *seq, void *v)
 485 {
 486         struct sctp_association *assoc;
 487         struct sctp_transport *tsp;
 488
 489         if (v == SEQ_START_TOKEN) {
 490                 seq_printf(seq, "ADDR ASSOC_ID HB_ACT RTO MAX_PATH_RTX "
 491                                 "REM_ADDR_RTX START STATE\n");
 492                 return 0;
 493         }
 494
 495         tsp = (struct sctp_transport *)v;
 496         if (!sctp_transport_hold(tsp))
 497                 return 0;
 498         assoc = tsp->asoc;
 499
 500         list_for_each_entry_rcu(tsp, &assoc->peer.transport_addr_list,
 501                                 transports) {
 502                 if (tsp->dead)
 503                         continue;
 504                 /*
 505                  * The remote address (ADDR)
 506                  */
 507                 tsp->af_specific->seq_dump_addr(seq, &tsp->ipaddr);
 508                 seq_printf(seq, " ");
 509                 /*
 510                  * The association ID (ASSOC_ID)
 511                  */
 512                 seq_printf(seq, "%d ", tsp->asoc->assoc_id);
 513
 514                 /*
 515                  * If the Heartbeat is active (HB_ACT)
 516                  * Note: 1 = Active, 0 = Inactive
 517                  */
 518                 seq_printf(seq, "%d ", timer_pending(&tsp->hb_timer));
 519
 520                 /*
 521                  * Retransmit time out (RTO)
 522                  */
 523                 seq_printf(seq, "%lu ", tsp->rto);
 524
 525                 /*
 526                  * Maximum path retransmit count (PATH_MAX_RTX)
 527                  */
 528                 seq_printf(seq, "%d ", tsp->pathmaxrxt);
 529
 530                 /*
 531                  * remote address retransmit count (REM_ADDR_RTX)
 532                  * Note: We don't have a way to tally this at the moment
 533                  * so lets just leave it as zero for the moment
 534                  */
 535                 seq_puts(seq, "0 ");
 536
 537                 /*
 538                  * remote address start time (START).  This is also not
 539                  * currently implemented, but we can record it with a
 540                  * jiffies marker in a subsequent patch
 541                  */
 542                 seq_puts(seq, "0 ");
 543
 544                 /*
 545                  * The current state of this destination. I.e.
 546                  * SCTP_ACTIVE, SCTP_INACTIVE, ...
 547                  */
 548                 seq_printf(seq, "%d", tsp->state);
 549
 550                 seq_printf(seq, "\n");
 551         }
 552
 553         sctp_transport_put(tsp);
 554
 555         return 0;
 556 }
 557
 558 static const struct seq_operations sctp_remaddr_ops = {
 559         .start = sctp_remaddr_seq_start,
 560         .next  = sctp_remaddr_seq_next,
 561         .stop  = sctp_remaddr_seq_stop,
 562         .show  = sctp_remaddr_seq_show,
 563 };
 564
 565 /* Cleanup the proc fs entry for 'remaddr' object. */
 566 void sctp_remaddr_proc_exit(struct net *net)
 567 {
 568         remove_proc_entry("remaddr", net->sctp.proc_net_sctp);
 569 }
 570
 571 static int sctp_remaddr_seq_open(struct inode *inode, struct file *file)
 572 {
 573         return seq_open_net(inode, file, &sctp_remaddr_ops,
 574                             sizeof(struct sctp_ht_iter));
 575 }
 576
 577 static const struct file_operations sctp_remaddr_seq_fops = {
 578         .open = sctp_remaddr_seq_open,
 579         .read = seq_read,
 580         .llseek = seq_lseek,
 581         .release = seq_release_net,
 582 };
 583
 584 int __net_init sctp_remaddr_proc_init(struct net *net)
 585 {
 586         struct proc_dir_entry *p;
 587
 588         p = proc_create("remaddr", S_IRUGO, net->sctp.proc_net_sctp,
 589                         &sctp_remaddr_seq_fops);
 590         if (!p)
 591                 return -ENOMEM;
 592         return 0;
 593 }