Mercurial > hg > freeDiameter
view libfdproto/log.c @ 1492:fadf8947c0fb
Add 3GPP TS 29.172 V15.2.0 (2019-12)
Add AVPs from 3GPP TS 29.172:
- SLg-Location-Type, Enumerated, code 2500, section 7.4.2
- LCS-EPS-Client-Name, Grouped, code 2501, section 7.4.3
- LCS-Requestor-Name, Grouped, code 2502, section 7.4.4
- LCS-Priority, Unsigned32, code 2503, section 7.4.5
- LCS-QoS, Grouped, code 2504, section 7.4.6
- Horizontal-Accuracy, Unsigned32, code 2505, section 7.4.7
- Vertical-Accuracy, Unsigned32, code 2506, section 7.4.8
- Vertical-Requested, Enumerated, code 2507, section 7.4.9
- Velocity-Requested, Enumerated, code 2508, section 7.4.10
- Response-Time, Enumerated, code 2509, section 7.4.11
- Supported-GAD-Shapes, Unsigned32, code 2510, section 7.4.12
- LCS-Codeword, UTF8String, code 2511, section 7.4.13
- LCS-Privacy-Check, Enumerated, code 2512, section 7.4.14
- Accuracy-Fulfilment-Indicator, Enumerated, code 2513, section 7.4.15
- Age-Of-Location-Estimate, Unsigned32, code 2514, section 7.4.16
- Velocity-Estimate, OctetString, code 2515, section 7.4.17
- EUTRAN-Positioning-Data, OctetString, code 2516, section 7.4.18
- ECGI, OctetString, code 2517, section 7.4.19
- Location-Event, Enumerated, code 2518, section 7.4.20
- Pseudonym-Indicator, Enumerated, code 2519, section 7.4.21
- LCS-Service-Type-ID, Unsigned32, code 2520, section 7.4.22
- LCS-Privacy-Check-Non-Session, Grouped, code 2521, section 7.4.23
- LCS-Privacy-Check-Session, Grouped, code 2522, section 7.4.24
- LCS-QoS-Class, Enumerated, code 2523, section 7.4.27
- GERAN-Positioning-Info, Grouped, code 2524, section 7.4.29
- GERAN-Positioning-Data, OctetString, code 2525, section 7.4.30
- GERAN-GANSS-Positioning-Data, OctetString, code 2526, section 7.4.31
- UTRAN-Positioning-Info, Grouped, code 2527, section 7.4.32
- UTRAN-Positioning-Data, OctetString, code 2528, section 7.4.33
- UTRAN-GANSS-Positioning-Data, OctetString, code 2529, section 7.4.34
- LRR-Flags, Unsigned32, code 2530, section 7.4.35
- LCS-Reference-Number, OctetString, code 2531, section 7.4.37
- Deferred-Location-Type, Unsigned32, code 2532, section 7.4.36
- Area-Event-Info, Grouped, code 2533, section 7.4.38
- Area-Definition, Grouped, code 2534, section 7.4.39
- Area, Grouped, code 2535, section 7.4.40
- Area-Type, Unsigned32, code 2536, section 7.4.41
- Area-Identification, Grouped, code 2537, section 7.4.42
- Occurrence-Info, Enumerated, code 2538, section 7.4.43
- Interval-Time, Unsigned32, code 2539, section 7.4.44
- Periodic-LDR-Information, Grouped, code 2540, section 7.4.45
- Reporting-Amount, Unsigned32, code 2541, section 7.4.46
- Reporting-Interval, Unsigned32, code 2542, section 7.4.47
- Reporting-PLMN-List, Grouped, code 2543, section 7.4.48
- PLMN-ID-List, Grouped, code 2544, section 7.4.49
- PLR-Flags, Unsigned32, code 2545, section 7.4.52
- PLA-Flags, Unsigned32, code 2546, section 7.4.53
- Deferred-MT-LR-Data, Grouped, code 2547, section 7.4.54
- Termination-Cause, Unsigned32, code 2548, section 7.4.55
- LRA-Flags, Unsigned32, code 2549, section 7.4.56
- Periodic-Location-Support-Indicator, Enumerated, code 2550, section 7.4.50
- Prioritized-List-Indicator, Enumerated, code 2551, section 7.4.51
- ESMLC-Cell-Info, Grouped, code 2552, section 7.4.57
- Cell-Portion-ID, Unsigned32, code 2553, section 7.4.58
- 1xRTT-RCID, OctetString, code 2554, section 7.4.59
- Delayed-Location-Reporting-Data, Grouped, code 2555, section 7.4.60
- Civic-Address, UTF8String, code 2556, section 7.4.61
- Barometric-Pressure, Unsigned32, code 2557, section 7.4.62
- UTRAN-Additional-Positioning-Data, OctetString, code 2558, section 7.4.63
- Motion-Event-Info, Grouped, code 2559, section 7.4.64
- Linear-Distance, Unsigned32, code 2560, section 7.4.65
- Maximum-Interval, Unsigned32, code 2561, section 7.4.66
- Sampling-Interval, Unsigned32, code 2562, section 7.4.67
- Reporting-Duration, Unsigned32, code 2563, section 7.4.68
- Reporting-Location-Requirements, Unsigned32, code 2564, section 7.4.69
- Additional-Area, Grouped, code 2565, section 7.4.70
author | Luke Mewburn <luke@mewburn.net> |
---|---|
date | Mon, 30 Mar 2020 12:38:31 +1100 |
parents | d4a4ab5239c7 |
children | 566bb46cc73f |
line wrap: on
line source
/********************************************************************************************************* * Software License Agreement (BSD License) * * Author: Sebastien Decugis <sdecugis@freediameter.net> * * * * Copyright (c) 2015, WIDE Project and NICT * * All rights reserved. * * * * Redistribution and use of this software in source and binary forms, with or without modification, are * * permitted provided that the following conditions are met: * * * * * Redistributions of source code must retain the above * * copyright notice, this list of conditions and the * * following disclaimer. * * * * * Redistributions in binary form must reproduce the above * * copyright notice, this list of conditions and the * * following disclaimer in the documentation and/or other * * materials provided with the distribution. * * * * * Neither the name of the WIDE Project or NICT nor the * * names of its contributors may be used to endorse or * * promote products derived from this software without * * specific prior written permission of WIDE Project and * * NICT. * * * * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED * * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A * * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR * * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT * * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS * * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR * * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF * * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. * *********************************************************************************************************/ #include "fdproto-internal.h" #include <stdarg.h> pthread_mutex_t fd_log_lock = PTHREAD_MUTEX_INITIALIZER; pthread_key_t fd_log_thname; int fd_g_debug_lvl = FD_LOG_NOTICE; static void fd_internal_logger( int, const char *, va_list ); static int use_colors = 0; /* 0: not init, 1: yes, 2: no */ /* These may be used to pass specific debug requests via the command-line parameters */ char * fd_debug_one_function = NULL; char * fd_debug_one_file = NULL; /* Useless function, only to ease setting up a breakpoint in gdb (break fd_breakhere) -- use TRACE_HERE */ int fd_breaks = 0; int fd_breakhere(void) { return ++fd_breaks; } /* Allow passing of the log and debug information from base stack to extensions */ void (*fd_logger)( int loglevel, const char * format, va_list args ) = fd_internal_logger; /* Register an external call back for tracing and debug */ int fd_log_handler_register( void (*logger)(int loglevel, const char * format, va_list args) ) { CHECK_PARAMS( logger ); if ( fd_logger != fd_internal_logger ) { return EALREADY; /* only one registration allowed */ } else { fd_logger = logger; } return 0; } /* Implement a simple reset function here */ int fd_log_handler_unregister ( void ) { fd_logger = fd_internal_logger; return 0; /* Successfull in all cases. */ } static void fd_cleanup_mutex_silent( void * mutex ) { (void)pthread_mutex_unlock((pthread_mutex_t *)mutex); } static void fd_internal_logger( int printlevel, const char *format, va_list ap ) { char buf[25]; /* Do we need to trace this ? */ if (printlevel < fd_g_debug_lvl) return; /* add timestamp */ printf("%s ", fd_log_time(NULL, buf, sizeof(buf), #if (defined(DEBUG) && defined(DEBUG_WITH_META)) 1, 1 #else /* (defined(DEBUG) && defined(DEBUG_WITH_META)) */ 0, 0 #endif /* (defined(DEBUG) && defined(DEBUG_WITH_META)) */ )); /* Use colors on stdout ? */ if (!use_colors) { if (isatty(STDOUT_FILENO)) use_colors = 1; else use_colors = 2; } switch(printlevel) { case FD_LOG_ANNOYING: printf("%s A ", (use_colors == 1) ? "\e[0;37m" : ""); break; case FD_LOG_DEBUG: printf("%s DBG ", (use_colors == 1) ? "\e[0;37m" : ""); break; case FD_LOG_INFO: printf("%sINFO ", (use_colors == 1) ? "\e[1;37m" : ""); break; case FD_LOG_NOTICE: printf("%sNOTI ", (use_colors == 1) ? "\e[1;37m" : ""); break; case FD_LOG_ERROR: printf("%sERROR ", (use_colors == 1) ? "\e[0;31m" : ""); break; case FD_LOG_FATAL: printf("%sFATAL! ", (use_colors == 1) ? "\e[0;31m" : ""); break; default: printf("%s ??? ", (use_colors == 1) ? "\e[0;31m" : ""); } vprintf(format, ap); if (use_colors == 1) printf("\e[00m"); printf("\n"); fflush(stdout); } /* Log a debug message */ void fd_log ( int loglevel, const char * format, ... ) { va_list ap; (void)pthread_mutex_lock(&fd_log_lock); pthread_cleanup_push(fd_cleanup_mutex_silent, &fd_log_lock); va_start(ap, format); fd_logger(loglevel, format, ap); va_end(ap); pthread_cleanup_pop(0); (void)pthread_mutex_unlock(&fd_log_lock); } /* Log a debug message */ void fd_log_va ( int loglevel, const char * format, va_list args ) { (void)pthread_mutex_lock(&fd_log_lock); pthread_cleanup_push(fd_cleanup_mutex_silent, &fd_log_lock); fd_logger(loglevel, format, args); pthread_cleanup_pop(0); (void)pthread_mutex_unlock(&fd_log_lock); } /* Function to set the thread's friendly name */ void fd_log_threadname ( const char * name ) { void * val = NULL; TRACE_ENTRY("%p(%s)", name, name?:"/"); /* First, check if a value is already assigned to the current thread */ val = pthread_getspecific(fd_log_thname); if (TRACE_BOOL(ANNOYING)) { if (val) { fd_log_debug("(Thread '%s' renamed to '%s')", (char *)val, name?:"(nil)"); } else { fd_log_debug("(Thread %p named '%s')", (void *)pthread_self(), name?:"(nil)"); } } if (val != NULL) { free(val); } /* Now create the new string */ if (name == NULL) { CHECK_POSIX_DO( pthread_setspecific(fd_log_thname, NULL), /* continue */); return; } CHECK_MALLOC_DO( val = strdup(name), return ); CHECK_POSIX_DO( pthread_setspecific(fd_log_thname, val), /* continue */); return; } /* Write time into a buffer */ char * fd_log_time ( struct timespec * ts, char * buf, size_t len, int incl_date, int incl_ms ) { int ret; size_t offset = 0; struct timespec tp; struct tm tm; /* Get current time */ if (!ts) { ret = clock_gettime(CLOCK_REALTIME, &tp); if (ret != 0) { snprintf(buf, len, "%s", strerror(ret)); return buf; } ts = &tp; } offset += strftime(buf + offset, len - offset, incl_date?"%D,%T":"%T", localtime_r( &ts->tv_sec , &tm )); if (incl_ms) offset += snprintf(buf + offset, len - offset, ".%6.6ld", ts->tv_nsec / 1000); return buf; } static size_t sys_mempagesz = 0; static size_t get_mempagesz(void) { if (!sys_mempagesz) { sys_mempagesz = sysconf(_SC_PAGESIZE); /* We alloc buffer by memory pages for efficiency. This can be readjusted if too memory consuming */ if (sys_mempagesz <= 0) sys_mempagesz = 256; /* default size if above call failed */ } return sys_mempagesz; } /* Helper function for fd_*_dump. Prints the format string from 'offset' into '*buf', extends if needed. The location of buf can be updated by this function. */ char * fd_dump_extend(char ** buf, size_t *len, size_t *offset, const char * format, ... ) { va_list ap; int to_write; size_t o = 0; size_t mempagesz = get_mempagesz(); /* we do not TRACE_ENTRY this one on purpose */ CHECK_PARAMS_DO(buf && len, return NULL); if (*buf == NULL) { CHECK_MALLOC_DO(*buf = malloc(mempagesz), return NULL); *len = mempagesz; } if (offset) o = *offset; va_start(ap, format); to_write = vsnprintf(*buf + o, *len - o, format, ap); va_end(ap); if (to_write + o >= *len) { /* There was no room in the buffer, we extend and redo */ size_t new_len = (((to_write + o) / mempagesz) + 1) * mempagesz; CHECK_MALLOC_DO(*buf = realloc(*buf, new_len), return NULL); *len = new_len; va_start(ap, format); to_write = vsnprintf(*buf + o, *len - o, format, ap); va_end(ap); } if (offset) *offset += to_write; return *buf; } char * fd_dump_extend_hexdump(char ** buf, size_t *len, size_t *offset, uint8_t *data, size_t datalen, size_t trunc, size_t wrap ) { int truncated = 0; size_t towrite = 0; size_t o = 0; int i; char * p; size_t mempagesz = get_mempagesz(); #define TRUNK_MARK "[...]" CHECK_PARAMS_DO(buf && len && data, return NULL); if (trunc && (datalen > trunc)) { datalen = trunc; truncated = 1; } towrite = datalen * 2; if (wrap) towrite += datalen / wrap; /* add 1 '\n' every wrap byte */ if (truncated) towrite += CONSTSTRLEN(TRUNK_MARK); if (offset) o = *offset; if (*buf == NULL) { /* Directly allocate the size we need */ *len = (((towrite + o) / mempagesz) + 1 ) * mempagesz; CHECK_MALLOC_DO(*buf = malloc(*len), return NULL); } else if ((towrite + o) >= *len) { /* There is no room in the buffer, we extend and redo */ size_t new_len = (((towrite + o) / mempagesz) + 1) * mempagesz; CHECK_MALLOC_DO(*buf = realloc(*buf, new_len), return NULL); *len = new_len; } p = *buf + o; for (i = 0; i < datalen; i++) { sprintf(p, "%02hhX", data[i]); p+=2; if ((wrap) && ((i+1) % wrap == 0)) { *p++='\n'; *p ='\0'; /* we want to ensure the buffer is always 0-terminated */ } } if (truncated) memcpy(p, TRUNK_MARK, CONSTSTRLEN(TRUNK_MARK)); if (offset) *offset += towrite; return *buf; }