]> git.sesse.net Git - vlc/blob - src/misc/stats.c
Use calloc when needed.
[vlc] / src / misc / stats.c
1 /*****************************************************************************
2  * stats.c: Statistics handling
3  *****************************************************************************
4  * Copyright (C) 2006 the VideoLAN team
5  * $Id$
6  *
7  * Authors: ClĂ©ment Stenac <zorglub@videolan.org>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22  *****************************************************************************/
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27
28 #ifdef HAVE_CONFIG_H
29 # include "config.h"
30 #endif
31
32 #include <vlc_common.h>
33 #include <stdio.h>                                               /* required */
34
35 #include "input/input_internal.h"
36
37 /*****************************************************************************
38  * Local prototypes
39  *****************************************************************************/
40 static int CounterUpdate( vlc_object_t *p_this,
41                           counter_t *p_counter,
42                           vlc_value_t val, vlc_value_t * );
43 static void TimerDump( vlc_object_t *p_this, counter_t *p_counter, bool);
44
45 /*****************************************************************************
46  * Exported functions
47  *****************************************************************************/
48
49 /**
50  * Create a statistics counter
51  * \param p_this a VLC object
52  * \param i_type the type of stored data. One of VLC_VAR_STRING,
53  * VLC_VAR_INTEGER, VLC_VAR_FLOAT
54  * \param i_compute_type the aggregation type. One of STATS_LAST (always
55  * keep the last value), STATS_COUNTER (increment by the passed value),
56  * STATS_MAX (keep the maximum passed value), STATS_MIN, or STATS_DERIVATIVE
57  * (keep a time derivative of the value)
58  */
59 counter_t * __stats_CounterCreate( vlc_object_t *p_this,
60                                    int i_type, int i_compute_type )
61 {
62     counter_t *p_counter = (counter_t*) malloc( sizeof( counter_t ) ) ;
63     (void)p_this;
64
65     if( !p_counter ) return NULL;
66     p_counter->i_compute_type = i_compute_type;
67     p_counter->i_type = i_type;
68     p_counter->i_samples = 0;
69     p_counter->pp_samples = NULL;
70     p_counter->psz_name = NULL;
71
72     p_counter->update_interval = 0;
73     p_counter->last_update = 0;
74
75     return p_counter;
76 }
77
78 /** Update a counter element with new values
79  * \param p_this a VLC object
80  * \param p_counter the counter to update
81  * \param val the vlc_value union containing the new value to aggregate. For
82  * more information on how data is aggregated, \see __stats_Create
83  * \param val_new a pointer that will be filled with new data
84  */
85 int __stats_Update( vlc_object_t *p_this, counter_t *p_counter,
86                     vlc_value_t val, vlc_value_t *val_new )
87 {
88     if( !libvlc_stats (p_this) || !p_counter ) return VLC_EGENERIC;
89     return CounterUpdate( p_this, p_counter, val, val_new );
90 }
91
92 /** Get the aggregated value for a counter
93  * \param p_this an object
94  * \param p_counter the counter
95  * \param val a pointer to an initialized vlc_value union. It will contain the
96  * retrieved value
97  * \return an error code
98  */
99 int __stats_Get( vlc_object_t *p_this, counter_t *p_counter, vlc_value_t *val )
100 {
101     if( !libvlc_stats (p_this) || !p_counter || p_counter->i_samples == 0 )
102     {
103         val->i_int = val->f_float = 0.0;
104         return VLC_EGENERIC;
105     }
106
107     switch( p_counter->i_compute_type )
108     {
109     case STATS_LAST:
110     case STATS_MIN:
111     case STATS_MAX:
112     case STATS_COUNTER:
113         *val = p_counter->pp_samples[0]->value;
114         break;
115     case STATS_DERIVATIVE:
116         /* Not ready yet */
117         if( p_counter->i_samples < 2 )
118         {
119             val->i_int = 0; val->f_float = 0.0;
120             return VLC_EGENERIC;
121         }
122         if( p_counter->i_type == VLC_VAR_INTEGER )
123         {
124             float f = ( p_counter->pp_samples[0]->value.i_int -
125                         p_counter->pp_samples[1]->value.i_int ) /
126                     (float)(  p_counter->pp_samples[0]->date -
127                               p_counter->pp_samples[1]->date );
128             val->i_int = (int)f;
129         }
130         else
131         {
132             float f = (float)( p_counter->pp_samples[0]->value.f_float -
133                                p_counter->pp_samples[1]->value.f_float ) /
134                       (float)( p_counter->pp_samples[0]->date -
135                                p_counter->pp_samples[1]->date );
136             val->f_float = f;
137         }
138         break;
139     }
140     return VLC_SUCCESS;;
141 }
142
143 input_stats_t *stats_NewInputStats( input_thread_t *p_input )
144 {
145     (void)p_input;
146     input_stats_t *p_stats = calloc( 1, sizeof(input_stats_t) );
147     if( !p_stats )
148         return NULL;
149
150     vlc_mutex_init( &p_stats->lock );
151     stats_ReinitInputStats( p_stats );
152
153     return p_stats;
154 }
155
156 void stats_ComputeInputStats( input_thread_t *p_input, input_stats_t *p_stats )
157 {
158     if( !libvlc_stats (p_input) ) return;
159
160     vlc_mutex_lock( &p_input->p->counters.counters_lock );
161     vlc_mutex_lock( &p_stats->lock );
162
163     /* Input */
164     stats_GetInteger( p_input, p_input->p->counters.p_read_packets,
165                       &p_stats->i_read_packets );
166     stats_GetInteger( p_input, p_input->p->counters.p_read_bytes,
167                       &p_stats->i_read_bytes );
168     stats_GetFloat( p_input, p_input->p->counters.p_input_bitrate,
169                     &p_stats->f_input_bitrate );
170     stats_GetInteger( p_input, p_input->p->counters.p_demux_read,
171                       &p_stats->i_demux_read_bytes );
172     stats_GetFloat( p_input, p_input->p->counters.p_demux_bitrate,
173                     &p_stats->f_demux_bitrate );
174
175     /* Decoders */
176     stats_GetInteger( p_input, p_input->p->counters.p_decoded_video,
177                       &p_stats->i_decoded_video );
178     stats_GetInteger( p_input, p_input->p->counters.p_decoded_audio,
179                       &p_stats->i_decoded_audio );
180
181     /* Sout */
182     if( p_input->p->counters.p_sout_send_bitrate )
183     {
184         stats_GetInteger( p_input, p_input->p->counters.p_sout_sent_packets,
185                           &p_stats->i_sent_packets );
186         stats_GetInteger( p_input, p_input->p->counters.p_sout_sent_bytes,
187                           &p_stats->i_sent_bytes );
188         stats_GetFloat  ( p_input, p_input->p->counters.p_sout_send_bitrate,
189                           &p_stats->f_send_bitrate );
190     }
191
192     /* Aout */
193     stats_GetInteger( p_input, p_input->p->counters.p_played_abuffers,
194                       &p_stats->i_played_abuffers );
195     stats_GetInteger( p_input, p_input->p->counters.p_lost_abuffers,
196                       &p_stats->i_lost_abuffers );
197
198     /* Vouts */
199     stats_GetInteger( p_input, p_input->p->counters.p_displayed_pictures,
200                       &p_stats->i_displayed_pictures );
201     stats_GetInteger( p_input, p_input->p->counters.p_lost_pictures,
202                       &p_stats->i_lost_pictures );
203
204     vlc_mutex_unlock( &p_stats->lock );
205     vlc_mutex_unlock( &p_input->p->counters.counters_lock );
206 }
207
208 void stats_ReinitInputStats( input_stats_t *p_stats )
209 {
210     vlc_mutex_lock( &p_stats->lock );
211     p_stats->i_read_packets = p_stats->i_read_bytes =
212     p_stats->f_input_bitrate = p_stats->f_average_input_bitrate =
213     p_stats->i_demux_read_packets = p_stats->i_demux_read_bytes =
214     p_stats->f_demux_bitrate = p_stats->f_average_demux_bitrate =
215     p_stats->i_displayed_pictures = p_stats->i_lost_pictures =
216     p_stats->i_played_abuffers = p_stats->i_lost_abuffers =
217     p_stats->i_decoded_video = p_stats->i_decoded_audio =
218     p_stats->i_sent_bytes = p_stats->i_sent_packets = p_stats->f_send_bitrate
219      = 0;
220     vlc_mutex_unlock( &p_stats->lock );
221 }
222
223 void stats_DumpInputStats( input_stats_t *p_stats  )
224 {
225     vlc_mutex_lock( &p_stats->lock );
226     /* f_bitrate is in bytes / microsecond
227      * *1000 => bytes / millisecond => kbytes / seconds */
228     fprintf( stderr, "Input : %i (%i bytes) - %f kB/s - "
229                      "Demux : %i (%i bytes) - %f kB/s\n"
230                      " - Vout : %i/%i - Aout : %i/%i - Sout : %f\n",
231                     p_stats->i_read_packets, p_stats->i_read_bytes,
232                     p_stats->f_input_bitrate * 1000,
233                     p_stats->i_demux_read_packets, p_stats->i_demux_read_bytes,
234                     p_stats->f_demux_bitrate * 1000,
235                     p_stats->i_displayed_pictures, p_stats->i_lost_pictures,
236                     p_stats->i_played_abuffers, p_stats->i_lost_abuffers,
237                     p_stats->f_send_bitrate );
238     vlc_mutex_unlock( &p_stats->lock );
239 }
240
241 void __stats_ComputeGlobalStats( vlc_object_t *p_obj, global_stats_t *p_stats )
242 {
243     vlc_list_t *p_list;
244     int i_index;
245
246     if( !libvlc_stats (p_obj) ) return;
247
248     vlc_mutex_lock( &p_stats->lock );
249
250     p_list = vlc_list_find( p_obj, VLC_OBJECT_INPUT, FIND_ANYWHERE );
251     if( p_list )
252     {
253         float f_total_in = 0, f_total_out = 0,f_total_demux = 0;
254         for( i_index = 0; i_index < p_list->i_count ; i_index ++ )
255         {
256             float f_in = 0, f_out = 0, f_demux = 0;
257             input_thread_t *p_input = (input_thread_t *)
258                              p_list->p_values[i_index].p_object;
259             vlc_mutex_lock( &p_input->p->counters.counters_lock );
260             stats_GetFloat( p_obj, p_input->p->counters.p_input_bitrate, &f_in );
261             if( p_input->p->counters.p_sout_send_bitrate )
262                 stats_GetFloat( p_obj, p_input->p->counters.p_sout_send_bitrate,
263                                     &f_out );
264             stats_GetFloat( p_obj, p_input->p->counters.p_demux_bitrate,
265                                 &f_demux );
266             vlc_mutex_unlock( &p_input->p->counters.counters_lock );
267             f_total_in += f_in; f_total_out += f_out;f_total_demux += f_demux;
268         }
269         p_stats->f_input_bitrate = f_total_in;
270         p_stats->f_output_bitrate = f_total_out;
271         p_stats->f_demux_bitrate = f_total_demux;
272         vlc_list_release( p_list );
273     }
274
275     vlc_mutex_unlock( &p_stats->lock );
276 }
277
278 void __stats_TimerStart( vlc_object_t *p_obj, const char *psz_name,
279                          unsigned int i_id )
280 {
281     libvlc_priv_t *priv = libvlc_priv (p_obj->p_libvlc);
282     counter_t *p_counter = NULL;
283
284     if( !priv->b_stats ) return;
285
286     vlc_mutex_lock( &priv->timer_lock );
287
288     for( int i = 0 ; i < priv->i_timers; i++ )
289     {
290         if( priv->pp_timers[i]->i_id == i_id
291             && priv->pp_timers[i]->p_obj == p_obj )
292         {
293             p_counter = priv->pp_timers[i];
294             break;
295         }
296     }
297     if( !p_counter )
298     {
299         counter_sample_t *p_sample;
300         p_counter = stats_CounterCreate( p_obj->p_libvlc, VLC_VAR_TIME,
301                                          STATS_TIMER );
302         if( !p_counter )
303             goto out;
304         p_counter->psz_name = strdup( psz_name );
305         p_counter->i_id = i_id;
306         p_counter->p_obj = p_obj;
307         INSERT_ELEM( priv->pp_timers, priv->i_timers,
308                      priv->i_timers, p_counter );
309
310         /* 1st sample : if started: start_date, else last_time, b_started */
311         p_sample = (counter_sample_t *)malloc( sizeof( counter_sample_t ) );
312         INSERT_ELEM( p_counter->pp_samples, p_counter->i_samples,
313                      p_counter->i_samples, p_sample );
314         p_sample->date = 0; p_sample->value.b_bool = 0;
315         /* 2nd sample : global_time, i_samples */
316         p_sample = (counter_sample_t *)malloc( sizeof( counter_sample_t ) );
317         INSERT_ELEM( p_counter->pp_samples, p_counter->i_samples,
318                      p_counter->i_samples, p_sample );
319         p_sample->date = 0; p_sample->value.i_int = 0;
320     }
321     if( p_counter->pp_samples[0]->value.b_bool == true )
322     {
323         msg_Warn( p_obj, "timer '%s' was already started !", psz_name );
324         goto out;
325     }
326     p_counter->pp_samples[0]->value.b_bool = true;
327     p_counter->pp_samples[0]->date = mdate();
328 out:
329     vlc_mutex_unlock( &priv->timer_lock );
330 }
331
332 void __stats_TimerStop( vlc_object_t *p_obj, unsigned int i_id )
333 {
334     counter_t *p_counter = NULL;
335     libvlc_priv_t *priv = libvlc_priv (p_obj->p_libvlc);
336
337     if( !priv->b_stats ) return;
338     vlc_mutex_lock( &priv->timer_lock );
339     for( int i = 0 ; i < priv->i_timers; i++ )
340     {
341         if( priv->pp_timers[i]->i_id == i_id
342             && priv->pp_timers[i]->p_obj == p_obj )
343         {
344             p_counter = priv->pp_timers[i];
345             break;
346         }
347     }
348     if( !p_counter || p_counter->i_samples != 2 )
349     {
350         msg_Err( p_obj, "timer does not exist" );
351         goto out;
352     }
353     p_counter->pp_samples[0]->value.b_bool = false;
354     p_counter->pp_samples[1]->value.i_int += 1;
355     p_counter->pp_samples[0]->date = mdate() - p_counter->pp_samples[0]->date;
356     p_counter->pp_samples[1]->date += p_counter->pp_samples[0]->date;
357 out:
358     vlc_mutex_unlock( &priv->timer_lock );
359 }
360
361 void __stats_TimerDump( vlc_object_t *p_obj, unsigned int i_id )
362 {
363     counter_t *p_counter = NULL;
364     libvlc_priv_t *priv = libvlc_priv (p_obj->p_libvlc);
365
366     if( !priv->b_stats ) return;
367     vlc_mutex_lock( &priv->timer_lock );
368     for( int i = 0 ; i < priv->i_timers; i++ )
369     {
370         if( priv->pp_timers[i]->i_id == i_id
371             && priv->pp_timers[i]->p_obj == p_obj )
372         {
373             p_counter = priv->pp_timers[i];
374             break;
375         }
376     }
377     TimerDump( p_obj, p_counter, true );
378     vlc_mutex_unlock( &priv->timer_lock );
379 }
380
381 void __stats_TimersDumpAll( vlc_object_t *p_obj )
382 {
383     libvlc_priv_t *priv = libvlc_priv (p_obj->p_libvlc);
384
385     if( !priv->b_stats ) return;
386     vlc_mutex_lock( &priv->timer_lock );
387     for ( int i = 0 ; i < priv->i_timers ; i++ )
388         TimerDump( p_obj, priv->pp_timers[i], false );
389     vlc_mutex_unlock( &priv->timer_lock );
390 }
391
392 void __stats_TimerClean( vlc_object_t *p_obj, unsigned int i_id )
393 {
394     libvlc_priv_t *priv = libvlc_priv (p_obj->p_libvlc);
395
396     vlc_mutex_lock( &priv->timer_lock );
397     for ( int i = priv->i_timers -1 ; i >= 0; i-- )
398     {
399         counter_t *p_counter = priv->pp_timers[i];
400         if( p_counter->i_id == i_id && p_counter->p_obj == p_obj )
401         {
402             REMOVE_ELEM( priv->pp_timers, priv->i_timers, i );
403             stats_CounterClean( p_counter );
404         }
405     }
406     vlc_mutex_unlock( &priv->timer_lock );
407 }
408
409 void __stats_TimersCleanAll( vlc_object_t *p_obj )
410 {
411     libvlc_priv_t *priv = libvlc_priv (p_obj->p_libvlc);
412
413     vlc_mutex_lock( &priv->timer_lock );
414     for ( int i = priv->i_timers -1 ; i >= 0; i-- )
415     {
416         counter_t *p_counter = priv->pp_timers[i];
417         REMOVE_ELEM( priv->pp_timers, priv->i_timers, i );
418         stats_CounterClean( p_counter );
419     }
420     vlc_mutex_unlock( &priv->timer_lock );
421 }
422
423 void stats_CounterClean( counter_t *p_c )
424 {
425     if( p_c )
426     {
427         int i = p_c->i_samples - 1 ;
428         while( i >= 0 )
429         {
430             counter_sample_t *p_s = p_c->pp_samples[i];
431             REMOVE_ELEM( p_c->pp_samples, p_c->i_samples, i );
432             free( p_s );
433             i--;
434         }
435         free( p_c->psz_name );
436         free( p_c );
437     }
438 }
439
440
441 /********************************************************************
442  * Following functions are local
443  ********************************************************************/
444
445 /**
446  * Update a statistics counter, according to its type
447  * If needed, perform a bit of computation (derivative, mostly)
448  * This function must be entered with stats handler lock
449  * \param p_counter the counter to update
450  * \param val the "new" value
451  * \return an error code
452  */
453 static int CounterUpdate( vlc_object_t *p_handler,
454                           counter_t *p_counter,
455                           vlc_value_t val, vlc_value_t *new_val )
456 {
457     switch( p_counter->i_compute_type )
458     {
459     case STATS_LAST:
460     case STATS_MIN:
461     case STATS_MAX:
462         if( p_counter->i_samples > 1)
463         {
464             msg_Err( p_handler, "LAST counter has several samples !" );
465             return VLC_EGENERIC;
466         }
467         if( p_counter->i_type != VLC_VAR_FLOAT &&
468             p_counter->i_type != VLC_VAR_INTEGER &&
469             p_counter->i_compute_type != STATS_LAST )
470         {
471             msg_Err( p_handler, "unable to compute MIN or MAX for this type");
472             return VLC_EGENERIC;
473         }
474
475         if( p_counter->i_samples == 0 )
476         {
477             counter_sample_t *p_new = (counter_sample_t*)malloc(
478                                                sizeof( counter_sample_t ) );
479             p_new->value.psz_string = NULL;
480
481             INSERT_ELEM( p_counter->pp_samples, p_counter->i_samples,
482                          p_counter->i_samples, p_new );
483         }
484         if( p_counter->i_samples == 1 )
485         {
486             /* Update if : LAST or (MAX and bigger) or (MIN and bigger) */
487             if( p_counter->i_compute_type == STATS_LAST ||
488                 ( p_counter->i_compute_type == STATS_MAX &&
489                    ( ( p_counter->i_type == VLC_VAR_INTEGER &&
490                        p_counter->pp_samples[0]->value.i_int > val.i_int ) ||
491                      ( p_counter->i_type == VLC_VAR_FLOAT &&
492                        p_counter->pp_samples[0]->value.f_float > val.f_float )
493                    ) ) ||
494                 ( p_counter->i_compute_type == STATS_MIN &&
495                    ( ( p_counter->i_type == VLC_VAR_INTEGER &&
496                        p_counter->pp_samples[0]->value.i_int < val.i_int ) ||
497                      ( p_counter->i_type == VLC_VAR_FLOAT &&
498                        p_counter->pp_samples[0]->value.f_float < val.f_float )
499                    ) ) )
500             {
501                 if( p_counter->i_type == VLC_VAR_STRING &&
502                     p_counter->pp_samples[0]->value.psz_string )
503                 {
504                     free( p_counter->pp_samples[0]->value.psz_string );
505                 }
506                 p_counter->pp_samples[0]->value = val;
507                 *new_val = p_counter->pp_samples[0]->value;
508             }
509         }
510         break;
511     case STATS_DERIVATIVE:
512     {
513         counter_sample_t *p_new, *p_old;
514         mtime_t now = mdate();
515         if( now - p_counter->last_update < p_counter->update_interval )
516         {
517             return VLC_EGENERIC;
518         }
519         p_counter->last_update = now;
520         if( p_counter->i_type != VLC_VAR_FLOAT &&
521             p_counter->i_type != VLC_VAR_INTEGER )
522         {
523             msg_Err( p_handler, "Unable to compute DERIVATIVE for this type");
524             return VLC_EGENERIC;
525         }
526         /* Insert the new one at the beginning */
527         p_new = (counter_sample_t*)malloc( sizeof( counter_sample_t ) );
528         p_new->value = val;
529         p_new->date = p_counter->last_update;
530         INSERT_ELEM( p_counter->pp_samples, p_counter->i_samples,
531                      0, p_new );
532
533         if( p_counter->i_samples == 3 )
534         {
535             p_old = p_counter->pp_samples[2];
536             REMOVE_ELEM( p_counter->pp_samples, p_counter->i_samples, 2 );
537             free( p_old );
538         }
539         break;
540     }
541     case STATS_COUNTER:
542         if( p_counter->i_samples > 1)
543         {
544             msg_Err( p_handler, "LAST counter has several samples !" );
545             return VLC_EGENERIC;
546         }
547         if( p_counter->i_samples == 0 )
548         {
549             counter_sample_t *p_new = (counter_sample_t*)malloc(
550                                                sizeof( counter_sample_t ) );
551             p_new->value.psz_string = NULL;
552
553             INSERT_ELEM( p_counter->pp_samples, p_counter->i_samples,
554                          p_counter->i_samples, p_new );
555         }
556         if( p_counter->i_samples == 1 )
557         {
558             switch( p_counter->i_type )
559             {
560             case VLC_VAR_INTEGER:
561                 p_counter->pp_samples[0]->value.i_int += val.i_int;
562                 if( new_val )
563                     new_val->i_int = p_counter->pp_samples[0]->value.i_int;
564                 break;
565             case VLC_VAR_FLOAT:
566                 p_counter->pp_samples[0]->value.f_float += val.f_float;
567                 if( new_val )
568                     new_val->f_float = p_counter->pp_samples[0]->value.f_float;
569             default:
570                 msg_Err( p_handler, "Trying to increment invalid variable %s",
571                          p_counter->psz_name );
572                 return VLC_EGENERIC;
573             }
574         }
575         break;
576     }
577     return VLC_SUCCESS;
578 }
579
580 static void TimerDump( vlc_object_t *p_obj, counter_t *p_counter,
581                        bool b_total )
582 {
583     if( !p_counter )
584         return;
585
586     mtime_t last, total;
587     int i_total;
588     if( p_counter->i_samples != 2 )
589     {
590         msg_Err( p_obj, "timer %s does not exist", p_counter->psz_name );
591         return;
592     }
593     i_total = p_counter->pp_samples[1]->value.i_int;
594     total = p_counter->pp_samples[1]->date;
595     if( p_counter->pp_samples[0]->value.b_bool == true )
596     {
597         last = mdate() - p_counter->pp_samples[0]->date;
598         i_total += 1;
599         total += last;
600     }
601     else
602     {
603         last = p_counter->pp_samples[0]->date;
604     }
605     if( b_total )
606     {
607         msg_Dbg( p_obj,
608              "TIMER %s : %.3f ms - Total %.3f ms / %i intvls (Avg %.3f ms)",
609              p_counter->psz_name, (float)last/1000, (float)total/1000, i_total,
610              (float)(total)/(1000*(float)i_total ) );
611     }
612     else
613     {
614         msg_Dbg( p_obj,
615              "TIMER %s : Total %.3f ms / %i intvls (Avg %.3f ms)",
616              p_counter->psz_name, (float)total/1000, i_total,
617              (float)(total)/(1000*(float)i_total ) );
618     }
619 }