/mandos/trunk : revision 370

71

INET_ADDRSTRLEN, INET6_ADDRSTRLEN

72

*/

73

#include <unistd.h> /* close(), SEEK_SET, off_t, write(),

74

getuid(), getgid(), setuid(),

74

getuid(), getgid(), seteuid(),

75

setgid() */

76

#include <arpa/inet.h> /* inet_pton(), htons */

77

#include <iso646.h> /* not, or, and */

80

argp_parse(), ARGP_KEY_ARG,

81

ARGP_KEY_END, ARGP_ERR_UNKNOWN */

82

#include <signal.h> /* sigemptyset(), sigaddset(),

83

sigaction(), SIGTERM, sigaction,

84

sig_atomic_t */

83

sigaction(), SIGTERM, sig_atomic_t,

84

raise() */

85

86

#ifdef __linux__

87

#include <sys/klog.h> /* klogctl() */

164

*/

165

static bool init_gpgme(const char *seckey,

166

const char *pubkey, const char *tempdir){

167

int ret;

168

167

gpgme_error_t rc;

169

168

gpgme_engine_info_t engine_info;

170

169

173

172

* Helper function to insert pub and seckey to the engine keyring.

174

173

*/

175

174

bool import_key(const char *filename){

175

int ret;

176

int fd;

177

gpgme_data_t pgp_data;

178

249

return false;

250

}

251

252

return true;

252

return true;

253

}

254

255

/*

309

}

310

gpgme_recipient_t recipient;

311

recipient = result->recipients;

312

if(recipient){

313

while(recipient != NULL){

314

fprintf(stderr, "Public key algorithm: %s\n",

315

gpgme_pubkey_algo_name(recipient->pubkey_algo));

316

fprintf(stderr, "Key ID: %s\n", recipient->keyid);

317

fprintf(stderr, "Secret key available: %s\n",

318

recipient->status == GPG_ERR_NO_SECKEY

319

? "No" : "Yes");

320

recipient = recipient->next;

321

}

312

while(recipient != NULL){

313

fprintf(stderr, "Public key algorithm: %s\n",

314

gpgme_pubkey_algo_name(recipient->pubkey_algo));

315

fprintf(stderr, "Key ID: %s\n", recipient->keyid);

316

fprintf(stderr, "Secret key available: %s\n",

317

recipient->status == GPG_ERR_NO_SECKEY

318

? "No" : "Yes");

319

recipient = recipient->next;

322

320

}

323

321

}

324

322

}

476

474

static int init_gnutls_session(gnutls_session_t *session){

477

475

int ret;

478

476

/* GnuTLS session creation */

479

ret = gnutls_init(session, GNUTLS_SERVER);

477

do {

478

ret = gnutls_init(session, GNUTLS_SERVER);

479

} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);

480

if(ret != GNUTLS_E_SUCCESS){

481

fprintf(stderr, "Error in GnuTLS session initialization: %s\n",

482

safer_gnutls_strerror(ret));

484

485

{

486

const char *err;

487

ret = gnutls_priority_set_direct(*session, mc.priority, &err);

487

do {

488

ret = gnutls_priority_set_direct(*session, mc.priority, &err);

489

} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);

488

490

if(ret != GNUTLS_E_SUCCESS){

489

491

fprintf(stderr, "Syntax error at: %s\n", err);

490

492

fprintf(stderr, "GnuTLS error: %s\n",

494

496

}

495

497

}

496

498

497

ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,

498

mc.cred);

499

do {

500

ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,

501

mc.cred);

502

} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);

499

503

if(ret != GNUTLS_E_SUCCESS){

500

504

fprintf(stderr, "Error setting GnuTLS credentials: %s\n",

501

505

safer_gnutls_strerror(ret));

504

508

}

505

509

506

510

/* ignore client certificate if any. */

507

gnutls_certificate_server_set_request(*session,

508

GNUTLS_CERT_IGNORE);

511

gnutls_certificate_server_set_request(*session, GNUTLS_CERT_IGNORE);

509

512

510

513

gnutls_dh_set_prime_bits(*session, mc.dh_bits);

511

514

516

519

static void empty_log(__attribute__((unused)) AvahiLogLevel level,

517

520

__attribute__((unused)) const char *txt){}

518

521

522

sig_atomic_t quit_now = 0;

523

int signal_received = 0;

524

519

525

/* Called when a Mandos server is found */

520

526

static int start_mandos_communication(const char *ip, uint16_t port,

521

527

AvahiIfIndex if_index,

522

528

int af){

523

int ret, tcp_sd;

529

int ret, tcp_sd = -1;

524

530

ssize_t sret;

525

531

union {

526

532

struct sockaddr_in in;

530

536

char *decrypted_buffer;

531

537

size_t buffer_length = 0;

532

538

size_t buffer_capacity = 0;

533

ssize_t decrypted_buffer_size;

534

539

size_t written;

535

540

int retval = 0;

536

541

gnutls_session_t session;

537

542

int pf; /* Protocol family */

538

543

544

if(quit_now){

545

return -1;

546

}

547

539

548

switch(af){

540

549

case AF_INET6:

541

550

pf = PF_INET6;

561

570

tcp_sd = socket(pf, SOCK_STREAM, 0);

562

571

if(tcp_sd < 0){

563

572

perror("socket");

564

return -1;

573

retval = -1;

574

goto mandos_end;

575

}

576

577

if(quit_now){

578

goto mandos_end;

565

579

}

566

580

567

581

memset(&to, 0, sizeof(to));

568

582

if(af == AF_INET6){

569

to.in6.sin6_family = (uint16_t)af;

583

to.in6.sin6_family = (sa_family_t)af;

570

584

ret = inet_pton(af, ip, &to.in6.sin6_addr);

571

585

} else { /* IPv4 */

572

586

to.in.sin_family = (sa_family_t)af;

574

588

}

575

589

if(ret < 0 ){

576

590

perror("inet_pton");

577

return -1;

591

retval = -1;

592

goto mandos_end;

578

593

}

579

594

if(ret == 0){

580

595

fprintf(stderr, "Bad address: %s\n", ip);

581

return -1;

596

retval = -1;

597

goto mandos_end;

582

598

}

583

599

if(af == AF_INET6){

584

600

to.in6.sin6_port = htons(port); /* Spurious warnings from

591

607

if(if_index == AVAHI_IF_UNSPEC){

592

608

fprintf(stderr, "An IPv6 link-local address is incomplete"

593

609

" without a network interface\n");

594

return -1;

610

retval = -1;

611

goto mandos_end;

595

612

}

596

613

/* Set the network interface number as scope */

597

614

to.in6.sin6_scope_id = (uint32_t)if_index;

602

619

-Wunreachable-code */

603

620

}

604

621

622

if(quit_now){

623

goto mandos_end;

624

}

625

605

626

if(debug){

606

627

if(af == AF_INET6 and if_index != AVAHI_IF_UNSPEC){

607

628

char interface[IF_NAMESIZE];

634

655

}

635

656

}

636

657

658

if(quit_now){

659

goto mandos_end;

660

}

661

637

662

if(af == AF_INET6){

638

663

ret = connect(tcp_sd, &to.in6, sizeof(to));

639

664

} else {

641

666

}

642

667

if(ret < 0){

643

668

perror("connect");

644

return -1;

669

retval = -1;

670

goto mandos_end;

671

}

672

673

if(quit_now){

674

goto mandos_end;

645

675

}

646

676

647

677

const char *out = mandos_protocol_version;

666

696

break;

667

697

}

668

698

}

699

700

if(quit_now){

701

goto mandos_end;

702

}

669

703

}

670

704

671

705

if(debug){

672

706

fprintf(stderr, "Establishing TLS session with %s\n", ip);

673

707

}

674

708

709

if(quit_now){

710

goto mandos_end;

711

}

712

675

713

gnutls_transport_set_ptr(session, (gnutls_transport_ptr_t) tcp_sd);

676

714

677

do{

715

if(quit_now){

716

goto mandos_end;

717

}

718

719

do {

678

720

ret = gnutls_handshake(session);

721

if(quit_now){

722

goto mandos_end;

723

}

679

724

} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);

680

725

681

726

if(ret != GNUTLS_E_SUCCESS){

695

740

}

696

741

697

742

while(true){

743

744

if(quit_now){

745

goto mandos_end;

746

}

747

698

748

buffer_capacity = incbuffer(&buffer, buffer_length,

699

749

buffer_capacity);

700

750

if(buffer_capacity == 0){

703

753

goto mandos_end;

704

754

}

705

755

756

if(quit_now){

757

goto mandos_end;

758

}

759

706

760

sret = gnutls_record_recv(session, buffer+buffer_length,

707

761

BUFFER_SIZE);

708

762

if(sret == 0){

714

768

case GNUTLS_E_AGAIN:

715

769

break;

716

770

case GNUTLS_E_REHANDSHAKE:

717

do{

771

do {

718

772

ret = gnutls_handshake(session);

773

774

if(quit_now){

775

goto mandos_end;

776

}

719

777

} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);

720

778

if(ret < 0){

721

779

fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");

740

798

fprintf(stderr, "Closing TLS session\n");

741

799

}

742

800

801

if(quit_now){

802

goto mandos_end;

803

}

804

743

805

gnutls_bye(session, GNUTLS_SHUT_RDWR);

744

806

807

if(quit_now){

808

goto mandos_end;

809

}

810

745

811

if(buffer_length > 0){

812

ssize_t decrypted_buffer_size;

746

813

decrypted_buffer_size = pgp_packet_decrypt(buffer,

747

814

buffer_length,

748

815

&decrypted_buffer);

749

816

if(decrypted_buffer_size >= 0){

817

750

818

written = 0;

751

819

while(written < (size_t) decrypted_buffer_size){

820

if(quit_now){

821

goto mandos_end;

822

}

823

752

824

ret = (int)fwrite(decrypted_buffer + written, 1,

753

825

(size_t)decrypted_buffer_size - written,

754

826

stdout);

774

846

775

847

mandos_end:

776

848

free(buffer);

777

ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));

849

if(tcp_sd >= 0){

850

ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));

851

}

778

852

if(ret == -1){

779

853

perror("close");

780

854

}

781

855

gnutls_deinit(session);

856

if(quit_now){

857

retval = -1;

858

}

782

859

return retval;

783

860

}

784

861

801

878

/* Called whenever a service has been resolved successfully or

802

879

timed out */

803

880

881

if(quit_now){

882

return;

883

}

884

804

885

switch(event){

805

886

default:

806

887

case AVAHI_RESOLVER_FAILURE:

843

924

/* Called whenever a new services becomes available on the LAN or

844

925

is removed from the LAN */

845

926

927

if(quit_now){

928

return;

929

}

930

846

931

switch(event){

847

932

default:

848

933

case AVAHI_BROWSER_FAILURE:

877

962

}

878

963

}

879

964

880

sig_atomic_t quit_now = 0;

881

882

965

/* stop main loop after sigterm has been called */

883

static void handle_sigterm(__attribute__((unused)) int sig){

966

static void handle_sigterm(int sig){

884

967

if(quit_now){

885

968

return;

886

969

}

887

970

quit_now = 1;

971

signal_received = sig;

888

972

int old_errno = errno;

889

973

if(mc.simple_poll != NULL){

890

974

avahi_simple_poll_quit(mc.simple_poll);

901

985

int exitcode = EXIT_SUCCESS;

902

986

const char *interface = "eth0";

903

987

struct ifreq network;

904

int sd;

988

int sd = -1;

989

bool take_down_interface = false;

905

990

uid_t uid;

906

991

gid_t gid;

907

992

char *connect_to = NULL;

915

1000

bool gpgme_initialized = false;

916

1001

float delay = 2.5f;

917

1002

918

struct sigaction old_sigterm_action;

1003

struct sigaction old_sigterm_action = { .sa_handler = SIG_DFL };

919

1004

struct sigaction sigterm_action = { .sa_handler = handle_sigterm };

920

1005

1006

uid = getuid();

1007

gid = getgid();

1008

1009

/* Lower any group privileges we might have, just to be safe */

1010

errno = 0;

1011

ret = setgid(gid);

1012

if(ret == -1){

1013

perror("setgid");

1014

}

1015

1016

/* Lower user privileges (temporarily) */

1017

errno = 0;

1018

ret = seteuid(uid);

1019

if(ret == -1){

1020

perror("seteuid");

1021

}

1022

1023

if(quit_now){

1024

goto end;

1025

}

1026

921

1027

{

922

1028

struct argp_option options[] = {

923

1029

{ .name = "debug", .key = 128,

1050

1156

exitcode = EXIT_FAILURE;

1051

1157

goto end;

1052

1158

}

1053

ret = sigaction(SIGTERM, &sigterm_action, &old_sigterm_action);

1054

if(ret == -1){

1055

perror("sigaction");

1056

exitcode = EXIT_FAILURE;

1057

goto end;

1058

}

1159

/* Need to check if the handler is SIG_IGN before handling:

1160

| [[info:libc:Initial Signal Actions]] |

1161

| [[info:libc:Basic Signal Handling]] |

1162

*/

1163

ret = sigaction(SIGINT, NULL, &old_sigterm_action);

1164

if(ret == -1){

1165

perror("sigaction");

1166

return EXIT_FAILURE;

1167

}

1168

if(old_sigterm_action.sa_handler != SIG_IGN){

1169

ret = sigaction(SIGINT, &sigterm_action, NULL);

1170

if(ret == -1){

1171

perror("sigaction");

1172

exitcode = EXIT_FAILURE;

1173

goto end;

1174

}

1175

}

1176

ret = sigaction(SIGHUP, NULL, &old_sigterm_action);

1177

if(ret == -1){

1178

perror("sigaction");

1179

return EXIT_FAILURE;

1180

}

1181

if(old_sigterm_action.sa_handler != SIG_IGN){

1182

ret = sigaction(SIGHUP, &sigterm_action, NULL);

1183

if(ret == -1){

1184

perror("sigaction");

1185

exitcode = EXIT_FAILURE;

1186

goto end;

1187

}

1188

}

1189

ret = sigaction(SIGTERM, NULL, &old_sigterm_action);

1190

if(ret == -1){

1191

perror("sigaction");

1192

return EXIT_FAILURE;

1193

}

1194

if(old_sigterm_action.sa_handler != SIG_IGN){

1195

ret = sigaction(SIGTERM, &sigterm_action, NULL);

1196

if(ret == -1){

1197

perror("sigaction");

1198

exitcode = EXIT_FAILURE;

1199

goto end;

1200

}

1201

}

1059

1202

1060

1203

/* If the interface is down, bring it up */

1061

1204

if(interface[0] != '\0'){

1205

if_index = (AvahiIfIndex) if_nametoindex(interface);

1206

if(if_index == 0){

1207

fprintf(stderr, "No such interface: \"%s\"\n", interface);

1208

exitcode = EXIT_FAILURE;

1209

goto end;

1210

}

1211

1212

if(quit_now){

1213

goto end;

1214

}

1215

1216

/* Re-raise priviliges */

1217

errno = 0;

1218

ret = seteuid(0);

1219

if(ret == -1){

1220

perror("seteuid");

1221

}

1222

1062

1223

#ifdef __linux__

1063

1224

/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO

1064

1225

messages to mess up the prompt */

1082

1243

}

1083

1244

}

1084

1245

#endif /* __linux__ */

1246

/* Lower privileges */

1247

errno = 0;

1248

ret = seteuid(uid);

1249

if(ret == -1){

1250

perror("seteuid");

1251

}

1085

1252

goto end;

1086

1253

}

1087

1254

strcpy(network.ifr_name, interface);

1097

1264

}

1098

1265

#endif /* __linux__ */

1099

1266

exitcode = EXIT_FAILURE;

1267

/* Lower privileges */

1268

errno = 0;

1269

ret = seteuid(uid);

1270

if(ret == -1){

1271

perror("seteuid");

1272

}

1100

1273

goto end;

1101

1274

}

1102

1275

if((network.ifr_flags & IFF_UP) == 0){

1103

1276

network.ifr_flags |= IFF_UP;

1277

take_down_interface = true;

1104

1278

ret = ioctl(sd, SIOCSIFFLAGS, &network);

1105

1279

if(ret == -1){

1280

take_down_interface = false;

1106

1281

perror("ioctl SIOCSIFFLAGS");

1107

1282

exitcode = EXIT_FAILURE;

1108

1283

#ifdef __linux__

1113

1288

}

1114

1289

}

1115

1290

#endif /* __linux__ */

1291

/* Lower privileges */

1292

errno = 0;

1293

ret = seteuid(uid);

1294

if(ret == -1){

1295

perror("seteuid");

1296

}

1116

1297

goto end;

1117

1298

}

1118

1299

}

1130

1311

perror("nanosleep");

1131

1312

}

1132

1313

}

1133

ret = (int)TEMP_FAILURE_RETRY(close(sd));

1134

if(ret == -1){

1135

perror("close");

1314

if(not take_down_interface){

1315

/* We won't need the socket anymore */

1316

ret = (int)TEMP_FAILURE_RETRY(close(sd));

1317

if(ret == -1){

1318

perror("close");

1319

}

1136

1320

}

1137

1321

#ifdef __linux__

1138

1322

if(restore_loglevel){

1143

1327

}

1144

1328

}

1145

1329

#endif /* __linux__ */

1146

}

1147

1148

uid = getuid();

1149

gid = getgid();

1150

1151

errno = 0;

1152

setgid(gid);

1153

if(ret == -1){

1154

perror("setgid");

1155

}

1156

1157

ret = setuid(uid);

1158

if(ret == -1){

1159

perror("setuid");

1330

/* Lower privileges */

1331

errno = 0;

1332

if(take_down_interface){

1333

/* Lower privileges */

1334

ret = seteuid(uid);

1335

if(ret == -1){

1336

perror("seteuid");

1337

}

1338

} else {

1339

/* Lower privileges permanently */

1340

ret = setuid(uid);

1341

if(ret == -1){

1342

perror("setuid");

1343

}

1344

}

1345

}

1346

1347

if(quit_now){

1348

goto end;

1160

1349

}

1161

1350

1162

1351

ret = init_gnutls_global(pubkey, seckey);

1168

1357

gnutls_initialized = true;

1169

1358

}

1170

1359

1360

if(quit_now){

1361

goto end;

1362

}

1363

1364

tempdir_created = true;

1171

1365

if(mkdtemp(tempdir) == NULL){

1366

tempdir_created = false;

1172

1367

perror("mkdtemp");

1173

1368

goto end;

1174

1369

}

1175

tempdir_created = true;

1370

1371

if(quit_now){

1372

goto end;

1373

}

1176

1374

1177

1375

if(not init_gpgme(pubkey, seckey, tempdir)){

1178

1376

fprintf(stderr, "init_gpgme failed\n");

1182

1380

gpgme_initialized = true;

1183

1381

}

1184

1382

1185

if(interface[0] != '\0'){

1186

if_index = (AvahiIfIndex) if_nametoindex(interface);

1187

if(if_index == 0){

1188

fprintf(stderr, "No such interface: \"%s\"\n", interface);

1189

exitcode = EXIT_FAILURE;

1190

goto end;

1191

}

1383

if(quit_now){

1384

goto end;

1192

1385

}

1193

1386

1194

1387

if(connect_to != NULL){

1200

1393

exitcode = EXIT_FAILURE;

1201

1394

goto end;

1202

1395

}

1396

1397

if(quit_now){

1398

goto end;

1399

}

1400

1203

1401

uint16_t port;

1204

1402

errno = 0;

1205

1403

tmpmax = strtoimax(address+1, &tmp, 10);

1209

1407

exitcode = EXIT_FAILURE;

1210

1408

goto end;

1211

1409

}

1410

1411

if(quit_now){

1412

goto end;

1413

}

1414

1212

1415

port = (uint16_t)tmpmax;

1213

1416

*address = '\0';

1214

1417

address = connect_to;

1219

1422

} else {

1220

1423

af = AF_INET;

1221

1424

}

1425

1426

if(quit_now){

1427

goto end;

1428

}

1429

1222

1430

ret = start_mandos_communication(address, port, if_index, af);

1223

1431

if(ret < 0){

1224

1432

exitcode = EXIT_FAILURE;

1227

1435

}

1228

1436

goto end;

1229

1437

}

1230

1438

1439

if(quit_now){

1440

goto end;

1441

}

1442

1231

1443

{

1232

1444

AvahiServerConfig config;

1233

1445

/* Do not publish any local Zeroconf records */

1254

1466

goto end;

1255

1467

}

1256

1468

1469

if(quit_now){

1470

goto end;

1471

}

1472

1257

1473

/* Create the Avahi service browser */

1258

1474

sb = avahi_s_service_browser_new(mc.server, if_index,

1259

1475

AVAHI_PROTO_UNSPEC, "_mandos._tcp",

1265

1481

goto end;

1266

1482

}

1267

1483

1484

if(quit_now){

1485

goto end;

1486

}

1487

1268

1488

/* Run the main loop */

1269

1489

1270

1490

if(debug){

1299

1519

gpgme_release(mc.ctx);

1300

1520

}

1301

1521

1522

/* Take down the network interface */

1523

if(take_down_interface){

1524

/* Re-raise priviliges */

1525

errno = 0;

1526

ret = seteuid(0);

1527

if(ret == -1){

1528

perror("seteuid");

1529

}

1530

if(geteuid() == 0){

1531

ret = ioctl(sd, SIOCGIFFLAGS, &network);

1532

if(ret == -1){

1533

perror("ioctl SIOCGIFFLAGS");

1534

} else if(network.ifr_flags & IFF_UP) {

1535

network.ifr_flags &= ~IFF_UP; /* clear flag */

1536

ret = ioctl(sd, SIOCSIFFLAGS, &network);

1537

if(ret == -1){

1538

perror("ioctl SIOCSIFFLAGS");

1539

}

1540

}

1541

ret = (int)TEMP_FAILURE_RETRY(close(sd));

1542

if(ret == -1){

1543

perror("close");

1544

}

1545

/* Lower privileges permanently */

1546

errno = 0;

1547

ret = setuid(uid);

1548

if(ret == -1){

1549

perror("setuid");

1550

}

1551

}

1552

}

1553

1302

1554

/* Removes the temp directory used by GPGME */

1303

1555

if(tempdir_created){

1304

1556

DIR *d;

1343

1595

}

1344

1596

}

1345

1597

1598

if(quit_now){

1599

sigemptyset(&old_sigterm_action.sa_mask);

1600

old_sigterm_action.sa_handler = SIG_DFL;

1601

ret = sigaction(signal_received, &old_sigterm_action, NULL);

1602

if(ret == -1){

1603

perror("sigaction");

1604

}

1605

raise(signal_received);

1606

}

1607

1346

1608

return exitcode;

1347

1609

}