Updated logging

mbfido/announce.c

@@ -307,6 +307,9 @@ long Report(gr_list *ta, long filepos)
 	/*
 	 * Area block header
 	 */
+#if defined(__FreeBSD__)
+	Syslog('-', "Area Block GJZ: \"%s\" \"%s\" 0", T_File.Echo, T_File.Comment);
+#endif
 	MacroVars("GJZ", "ssd", T_File.Echo, T_File.Comment, 0);
 	fseek(fi, filepos, SEEK_SET);
 	Msg_Macro(fi);
@@ -327,23 +330,26 @@ long Report(gr_list *ta, long filepos)
 	     * Report one newfile, first line.
 	     */
 	    fseek(fi, filepos1, SEEK_SET);
-	Syslog('-', "1");
 	    ftime = T_File.Fdate;
-//	    MacroVars("slbkdt", "ssddss", T_File.Name, T_File.LName, T_File.Size, T_File.SizeKb, /* rfcdate(ftime) */ " ",
-	//			    To_Low(T_File.LDesc[0],newfiles.HiAscii));
-	MacroVars("sl", "ss", T_File.Name, T_File.LName);
-	Syslog('-', "2");
-	MacroVars("bk", "dd", T_File.Size, T_File.SizeKb);
-	Syslog('-', "3");
-	MacroVars("dt", "ss", rfcdate(ftime), To_Low(T_File.LDesc[0],newfiles.HiAscii));
-	Syslog('-', "4");
+#if defined (__FreeBSD__)
+	    Syslog('-', "start a file ...");
+	    Syslog('-', "sl: \"%s\" \"%s\"", T_File.Name, T_File.LName);
+	    Syslog('-', "bk: \"%d\" \"%d\"", T_File.Size, T_File.SizeKb);
+	    Syslog('-', "dt: \"%d\" \"%d\"", rfcdate(ftime), To_Low(T_File.LDesc[0],newfiles.HiAscii));
+#endif
+	    MacroVars("sl", "ss", T_File.Name, T_File.LName);
+	    MacroVars("bk", "dd", T_File.Size, T_File.SizeKb);
+	    MacroVars("dt", "ss", rfcdate(ftime), To_Low(T_File.LDesc[0],newfiles.HiAscii));
 	    Msg_Macro(fi);
-	Syslog('-', "5");
 	    filepos2 = ftell(fi);
+
 	    /*
 	     * Extra description lines follow
 	     */
 	    for (i = 1; i < 24; i++) {
+#if defined (__FreeBSD__)
+		Syslog('-', "t %2d: \"%s\"", i, To_Low(T_File.LDesc[i],newfiles.HiAscii));
+#endif
 		MacroVars("t", "s", To_Low(T_File.LDesc[i],newfiles.HiAscii));
 		fseek(fi, filepos2, SEEK_SET);
 		if (strlen(T_File.LDesc[i])) {

mbfido/magic.c

@@ -107,8 +107,6 @@ int GetMagicRec(int Typ, int First)
     if (First)
 	MagicNr = 0;
 
-    Syslog('f', "GetMagicRec(%d, %s), MagicNr = %d", Typ, First ? "true":"false", MagicNr);
-
     temp = calloc(PATH_MAX, sizeof(char));
     sprintf(temp, "%s/etc/magic.data", getenv("MBSE_ROOT"));
     if ((FeM = fopen(temp, "r")) == NULL) {
@@ -152,7 +150,6 @@ int GetMagicRec(int Typ, int First)
 		}
 		*q++ = '$';
 		*q = '\0';
-		Syslog('f', "Magic mask \"%s\" -> \"%s\"", MBSE_SS(magic.Mask), MBSE_SS(mask));
 
 		if ((re_comp(mask)) == NULL) {
 		    if (re_exec(TIC.NewName)) {

mbfido/pack.c

@@ -133,7 +133,7 @@ int pack_queue(char *name)
 	sprintf(pktfile, "%08lx.pkt", sequencer());
 
 	if (nodelock(&noden)) {
-		WriteError("Node %s lock error", ascfnode(&noden, 0x1f));
+		Syslog('+', "Mail stays in queue, will be added later");
 		if (noden.domain)
 			free(noden.domain);
 		free(arcfile);
@@ -318,7 +318,7 @@ int add_queue(char *name)
 	Syslog('p', "Outfile: %s", outfile);
 
 	if (nodelock(&noden)) {
-		WriteError("Node %s lock error", ascfnode(&noden, 0x1f));
+		Syslog('+', "Mail stays in queue, will be added later");
 		free(outfile);
 		if (noden.domain)
 			free(noden.domain);

mbfido/tic.c

@@ -125,7 +125,6 @@ int Tic()
 	sort_fdlist(&fdl);
 
 	while ((fname = pull_fdlist(&fdl)) != NULL) {
-		Syslog('f', "Tic() starting with %s", fname);
 		if (LoadTic(inbound, fname) == 0)
 			rc = 1;
 		if (IsSema((char *)"upsalarm")) {
@@ -138,7 +137,6 @@ int Tic()
 			break;
 		}
 	}
-	Syslog('f', "Tic() finished all files");
 
 	if (!do_quiet) {
 		printf("\r");
@@ -171,7 +169,6 @@ int LoadTic(char *inb, char *tfn)
 	fa_list	*sbl = NULL;
 	int	DescCnt = FALSE;
 
-	Syslog('f', "Entering LoadTic()");
 	if (CFG.slow_util && do_quiet)
 		usleep(1);
 
@@ -179,8 +176,7 @@ int LoadTic(char *inb, char *tfn)
 	memset(&T_File, 0, sizeof(T_File));
 
 	sprintf(TIC.Inbound, "%s", inb);
-//	strncpy(TIC.TicName, tfn, 12);
-	sprintf(TIC.TicName, "%s", tfn);
+	strncpy(TIC.TicName, tfn, 12);
 
 	chdir(inb);
 	if ((tfp = fopen(tfn, "r")) == NULL) {
@@ -188,15 +184,23 @@ int LoadTic(char *inb, char *tfn)
 		return 1;
 	}
 
+	/*
+	 * Although a TIC line may only be 255 characters long,
+	 * nobody seems to care and lines are up to 1024 characters
+	 * long.
+	 */
 	if (PATH_MAX > 1024)
 	    bufsize = PATH_MAX;
 	else
 	    bufsize = 1024;
 	Temp = calloc(bufsize+1, sizeof(char));
 	Buf  = calloc(bufsize+1, sizeof(char));
-	Syslog('f', "Tic buffersize %d", bufsize);
 
 	while ((fgets(Buf, bufsize, tfp)) != NULL) {
+
+		if (strlen(Buf) == bufsize)
+		    Syslog('!', "Detected a TIC file line of %d characters long", bufsize);
+
 		/*
 		 * Remove all garbage from the .TIC file.
 		 */
@@ -209,11 +213,6 @@ int LoadTic(char *inb, char *tfn)
 			}
 		Temp[j] = '\0';
 
-//		if (strlen(Temp) > 255) {
-//		    Syslog('+', "Truncating TIC line of %d characters", strlen(Temp));
-//		    Temp[255] = '\0';
-//		}
-
 		Syslog('f', "TIC: %s", Temp);
 		if (strncasecmp(Temp, "hatch", 5) == 0) {
 			TIC.TicIn.Hatch = TRUE;
@@ -292,6 +291,9 @@ int LoadTic(char *inb, char *tfn)
 			TIC.TicIn.Size = atoi(Temp+5);
 
 		} else if (strncasecmp(Temp, "date ", 5) == 0) {
+			/*
+			 * Drop this one and log
+			 */
 			Syslog('f', "Date: %s", Temp+5);
 
 		} else if (strncasecmp(Temp, "cost ", 5) == 0) {
@@ -471,7 +473,6 @@ int LoadTic(char *inb, char *tfn)
 	tic_in++;
 	rc = ProcessTic(sbl);
 	tidy_falist(&sbl);
-	Syslog('f', "Finishing LoadTic()");
 
 	return rc;
 }