SFTP 사용자 로그인 정보 실시간 필터링

Question

(defvarl db-user "user")
(defvarl db-pw "password")

(defun mysql-insert (db-name table-name . values)
  (let* ((alist (plist-to-alist values))
         (columns [mapcar car alist])
         (values [mapcar cdr alist]))
    ;; fix as necessary, remove echo
    (sh `echo mysql -u @{db-user} -p@{db-pw} -e \ \
         "INSERT INTO @{db-name}.${table-name} (@{columns ", "}) \ \
          VALUES ('@{values "', '"}')"`)))

;; (daemon nil nil) ;; uncomment to daemonize

(let ((log (open-tail "syslog")))
  (whilet ((line (get-line log)))
    (if-match `@mon @day @hh:@mm:@ss @nil systemd[@pid]: Started Session @num of user @user.` line
      (mysql-insert "log-db" "sftp-table"
                    'date `@mon @day @hh:@mm:@ss`
                    'user user))))

데이터에 대해 이 명령을 실행하면 로그를 스캔하고 MySQL 명령을 인쇄합니다.

$ txr daemon.tl
mysql -u user -ppassword -e INSERT INTO log-db.name (date, user)  VALUES ('Jun 23 15:47:13', 'ftpuser1')

그런 다음 더 많은 데이터가 로그에 추가될 때까지 기다립니다. 오픈 스트림은 로그 파일 open-tail처럼 작동합니다 . tail -f파일이 회전되면 자동으로 감지하여 이름을 바꾸어 파일을 회전하는 경우에도 작동합니다. 새 파일 syslog의 이름을 바꾸고 쓰기를 시작 하면 syslog.1그대로 따릅니다.syslog

에 대해 말하자면 syslog, 이는 날짜를 원하는 형식으로 조정하고 실제 데이터베이스, 테이블 및 열 이름을 사용하는 등의 다른 편집 외에도 실제 파일을 가리켜야 합니다.

데이터베이스 비밀번호는 환경 변수 또는 명령줄 매개변수를 통해 입력할 수 있습니다. 하지만 이것이 데몬으로 실행되고 있다면 기록되어야 합니다.어딘가에.

데이터베이스 삽입 명령은 올바르게 이스케이프되어야 합니다. 어떤 이유로 values사용자 이름이 포함되면 '어떻게 될까요 ?

Answer 1

솔루션 스케치TXR 불분명한 음성.

(defvarl db-user "user")
(defvarl db-pw "password")

(defun mysql-insert (db-name table-name . values)
  (let* ((alist (plist-to-alist values))
         (columns [mapcar car alist])
         (values [mapcar cdr alist]))
    ;; fix as necessary, remove echo
    (sh `echo mysql -u @{db-user} -p@{db-pw} -e \ \
         "INSERT INTO @{db-name}.${table-name} (@{columns ", "}) \ \
          VALUES ('@{values "', '"}')"`)))

;; (daemon nil nil) ;; uncomment to daemonize

(let ((log (open-tail "syslog")))
  (whilet ((line (get-line log)))
    (if-match `@mon @day @hh:@mm:@ss @nil systemd[@pid]: Started Session @num of user @user.` line
      (mysql-insert "log-db" "sftp-table"
                    'date `@mon @day @hh:@mm:@ss`
                    'user user))))